aboutsummaryrefslogtreecommitdiffstats
path: root/FICS/makerank.c
diff options
context:
space:
mode:
Diffstat (limited to 'FICS/makerank.c')
-rw-r--r--FICS/makerank.c344
1 files changed, 344 insertions, 0 deletions
diff --git a/FICS/makerank.c b/FICS/makerank.c
new file mode 100644
index 0000000..076e16e
--- /dev/null
+++ b/FICS/makerank.c
@@ -0,0 +1,344 @@
+/*
+ * Revised by maxxe 23/12/14
+ */
+
+#include <ctype.h>
+#include <err.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#if __linux__
+#include <bsd/string.h>
+#endif
+
+#include "common.h"
+#include "ficsmain.h"
+#include "makerank.h"
+#include "utils.h"
+
+static ENTRY **list;
+static ENTRY **sortme;
+
+static char *rnames[] = { "std", "blitz", "wild", "lightning" };
+static int rtype;
+
+static int
+GetPlayerInfo(char *fileName, ENTRY *e)
+{
+ FILE *fp = NULL;
+ char NameWithCase[30] = { '\0' };
+ char field[20] = { '\0' };
+ char line[100] = { '\0' };
+ int done = 0;
+
+ e->computer = 0;
+
+ for (size_t i = 0; i < ARRAY_SIZE(e->r); i++) {
+ e->r[i].num = 0;
+ e->r[i].rating = 0;
+ }
+
+ if ((fp = fopen(fileName, "r")) == NULL ||
+ fgets(line, sizeof line, fp) == NULL ||
+ feof(fp)) {
+ if (fp)
+ fclose(fp);
+ return 0;
+ }
+
+ if (!strcmp(line, "v 1\n")) {
+ _Static_assert(ARRAY_SIZE(e->name) > 19, "Array too little");
+
+ if (fgets(line, sizeof line, fp) == NULL ||
+ sscanf(line, "%19s", e->name) != 1) {
+ warnx("%s: fgets() or sscanf() error", __func__);
+ fclose(fp);
+ return 0;
+ } else if (fgets(line, sizeof line, fp) == NULL ||
+ fgets(line, sizeof line, fp) == NULL ||
+ fgets(line, sizeof line, fp) == NULL) {
+ warnx("%s: fgets() error", __func__);
+// fclose(fp);
+// return 0;
+ }
+
+ if (fscanf(fp, "%d %*u %*u %*u %d %*u %*u %*u %*u %d %*u %*u "
+ "%*u %d %*u %*u %*u %*u %d %*u %*u %*u %d %*u %*u %*u %*u "
+ "%d %*u %*u %*u %d %*u %*u %*u %*u",
+ &(e->r[0].num),
+ &(e->r[0].rating),
+ &(e->r[1].num),
+ &(e->r[1].rating),
+ &(e->r[2].num),
+ &(e->r[2].rating),
+ &(e->r[3].num),
+ &(e->r[3].rating)) != 8) {
+ fprintf(stderr, "OOPS: couldn't parse player file %s."
+ "\n", fileName);
+ fclose(fp);
+ return 0;
+ }
+
+ done = 1;
+ } else {
+ do {
+ _Static_assert(ARRAY_SIZE(field) > 19,
+ "Unexpected array length");
+ _Static_assert(ARRAY_SIZE(NameWithCase) > 29,
+ "Unexpected array length");
+
+ if (sscanf(line, "%19s", field) != 1) {
+ warnx("%s: sscanf() error", __func__);
+ fclose(fp);
+ return 0;
+ }
+
+ if (!strcmp(field, "Name:")) {
+ if (sscanf(line, "%*s %29s", NameWithCase) != 1) {
+ warnx("%s: expected name with case",
+ __func__);
+ fclose(fp);
+ return 0;
+ }
+
+ if (strcasecmp(e->name, NameWithCase)) {
+ printf("TROUBLE: %s's handle is "
+ "listed as %s.\n", e->name,
+ NameWithCase);
+ } else if (strlcpy(e->name, NameWithCase,
+ sizeof e->name) >= sizeof e->name) {
+ fprintf(stderr, "%s: warning: "
+ "strlcpy() truncated\n", __func__);
+ }
+ } else if (!strcmp(field, "S_NUM:")) {
+ if (sscanf(line, "%*s %d", &(e->r[0].num)) != 1)
+ warnx("%s: S_NUM error", __func__);
+ } else if (!strcmp(field, "B_NUM:")) {
+ if (sscanf(line, "%*s %d", &(e->r[1].num)) != 1)
+ warnx("%s: B_NUM error", __func__);
+ } else if (!strcmp(field, "W_NUM:")) {
+ if (sscanf(line, "%*s %d", &(e->r[2].num)) != 1)
+ warnx("%s: W_NUM error", __func__);
+ } else if (!strcmp(field, "L_NUM:")) {
+ if (sscanf(line, "%*s %d", &(e->r[3].num)) != 1)
+ warnx("%s: L_NUM error", __func__);
+ } else if (!strcmp(field, "S_RATING:")) {
+ if (sscanf(line, "%*s %d",
+ &(e->r[0].rating)) != 1)
+ warnx("%s: S_RATING error", __func__);
+ } else if (!strcmp(field, "B_RATING:")) {
+ if (sscanf(line, "%*s %d",
+ &(e->r[1].rating)) != 1)
+ warnx("%s: B_RATING error", __func__);
+ } else if (!strcmp(field, "W_RATING:")) {
+ if (sscanf(line, "%*s %d",
+ &(e->r[2].rating)) != 1)
+ warnx("%s: W_RATING error", __func__);
+ } else if (!strcmp(field, "L_RATING:")) {
+ if (sscanf(line, "%*s %d",
+ &(e->r[3].rating)) != 1)
+ warnx("%s: L_RATING error", __func__);
+ } else if (!strcmp(field, "Network:")) {
+ done = 1;
+ }
+
+ if (fgets(line, sizeof line, fp) == NULL)
+ break;
+ } while (!done && !feof(fp));
+ }
+
+ fclose(fp);
+ return (done ? 1 : 0);
+}
+
+static int
+LoadEntries(void)
+{
+ ENTRY e;
+ FILE *fpPlayerList;
+ char command[90];
+ char letter1;
+ char pathInput[80];
+ int n = 0;
+ int listsize;
+
+ listsize = 100;
+ list = reallocarray(NULL, sizeof(ENTRY *), listsize);
+
+ if (list == NULL)
+ err(1, "%s: reallocarray", __func__);
+
+ for (letter1 = 'a'; letter1 <= 'z'; letter1++) {
+ printf("Loading %c's.\n", letter1);
+
+ snprintf(pathInput, sizeof pathInput, "%s/%c", DEFAULT_PLAYERS,
+ letter1);
+ snprintf(command, sizeof command, "ls -1 %s", pathInput);
+
+ if ((fpPlayerList = popen(command, "r")) == NULL)
+ continue;
+
+ while (1) {
+ if (fgets(e.name, sizeof(e.name), fpPlayerList) == NULL ||
+ feof(fpPlayerList))
+ break;
+
+ e.name[strcspn(e.name, "\n")] = '\0';
+
+ /*
+ * Validate that e.name does not contain path
+ * traversal or separators
+ */
+ if (!is_valid_filename(e.name, false)) {
+ printf("Skipping invalid filename: %s\n",
+ e.name);
+ continue;
+ }
+
+ if (e.name[0] != letter1) {
+ printf("File %c/%s: wrong directory.\n",
+ letter1, e.name);
+ } else {
+ snprintf(pathInput, sizeof pathInput,
+ "%s/%c/%s", DEFAULT_PLAYERS, letter1,
+ e.name);
+
+ if (GetPlayerInfo(pathInput, &e)) {
+ if ((list[n] = malloc(sizeof(ENTRY))) ==
+ NULL)
+ err(1, "%s: malloc", __func__);
+
+ memcpy(list[n], &e, sizeof(ENTRY));
+
+ if (++n == listsize) {
+ listsize += 100;
+ list = reallocarray(list,
+ listsize,
+ sizeof(ENTRY *));
+ if (list == NULL)
+ err(1, NULL);
+ }
+ }
+ }
+ } /* while (1) */
+
+ pclose(fpPlayerList);
+ } /* for */
+
+ return n;
+}
+
+static int
+SetComputers(int n)
+{
+ FILE *fpComp = NULL;
+ char comp[30] = { '\0' };
+ char line[100] = { '\0' };
+ int i = 0;
+
+ if (snprintf(line, sizeof line, "sort -f %s", COMPUTER_FILE) >=
+ (int)sizeof line) {
+ warnx("%s: snprintf truncated", __func__);
+ return 0;
+ } else if ((fpComp = popen(line, "r")) == NULL)
+ return 0;
+
+ while (i < n) {
+ if (fgets(comp, sizeof comp, fpComp) == NULL ||
+ feof(fpComp))
+ break;
+
+ comp[strcspn(comp, "\n")] = '\0';
+
+ while (i < n && strcasecmp(list[i]->name, comp) < 0)
+ i++;
+ if (i < n && strcasecmp(list[i]->name, comp) == 0)
+ list[i++]->computer = 1;
+ }
+
+ pclose(fpComp);
+ return 1;
+}
+
+static int
+sortfunc(const void *i, const void *j)
+{
+ int n = (*(ENTRY **)j)->r[rtype].rating -
+ (*(ENTRY **)i)->r[rtype].rating;
+
+ return n ? n : strcasecmp((*(ENTRY **)i)->name, (*(ENTRY **)j)->name);
+}
+
+static void
+makerank(void)
+{
+ FILE *fp;
+ char fName[200];
+ int fd;
+ int sortnum, sortmesize, i, n;
+
+ printf("Loading players\n");
+ n = LoadEntries();
+ printf("Found %d players.\n", n);
+ printf("Setting computers.\n");
+ SetComputers(n);
+
+ for (rtype = 0; rtype < 4; rtype++) {
+ sortnum = 0;
+ sortmesize = 100;
+ sortme = reallocarray(NULL, sizeof(ENTRY *),
+ sortmesize);
+
+ if (sortme == NULL)
+ err(1, "%s: reallocarray", __func__);
+
+ for (i = 0; i < n; i++) {
+ if (list[i]->r[rtype].rating) {
+ sortme[sortnum++] = list[i];
+
+ if (sortnum == sortmesize) {
+ sortmesize += 100;
+ sortme = reallocarray(sortme,
+ sortmesize,
+ sizeof(ENTRY *));
+ if (sortme == NULL)
+ err(1, NULL);
+ }
+ }
+ }
+
+ printf("Sorting %d %s.\n", sortnum, rnames[rtype]);
+ qsort(sortme, sortnum, sizeof(ENTRY *), sortfunc);
+
+ printf("Saving to file.\n");
+ snprintf(fName, sizeof fName, "%s/rank.%s", DEFAULT_STATS,
+ rnames[rtype]);
+
+ if ((fd = open(fName, g_open_flags[1], g_open_modes)) < 0 ||
+ (fp = fdopen(fd, "w")) == NULL)
+ err(1, "%s: rank file open error", __func__);
+
+ for (i = 0; i < sortnum; i++) {
+ fprintf(fp, "%s %d %d %d\n",
+ sortme[i]->name,
+ sortme[i]->r[rtype].rating,
+ sortme[i]->r[rtype].num,
+ sortme[i]->computer);
+ }
+ fclose(fp);
+ free(sortme);
+ }
+}
+
+int
+main(int argc, char **argv)
+{
+ if (argc > 1) {
+ fprintf(stderr, "usage: %s.\n", argv[0]);
+ return EXIT_FAILURE;
+ }
+
+ makerank();
+ return EXIT_SUCCESS;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-08 08:05:17 +0000