#include "phalanx.h" char * index ( char *s, int c ) { int i; while ((i = *s) && c != i) s++; return (*s ? s : 0); } char * rindex (char *s, char c) { char *p; for (p = s; *s; s++) ; while (c != *s && s >= p) s--; return (s < p ? 0 : s); } /* getopt.c (slightly modified by O.Garcia, 12/4/92) */ /* now it accepts either '-' or '/' as switch character */ /* Newsgroups: mod.std.unix Subject: public domain AT&T getopt source Date: 3 Nov 85 19:34:15 GMT Here's something you've all been waiting for: the AT&T public domain source for getopt(3). It is the code which was given out at the 1985 UNIFORUM conference in Dallas. I obtained it by electronic mail directly from AT&T. The people there assure me that it is indeed in the public domain. */ #include #include #include #define ERR(s, c) if(opterr){fprintf(stderr,"%s%s%c\n",argv[0],s,c);} int opterr = 1; int optind = 1; int optopt; char *optarg; int getopt (int argc, char **argv, char *opts) { static int sp = 1; register int c; register char *cp; if (sp == 1) if (optind >= argc || (argv[optind][0] != '-' && argv[optind][0] != '/') || argv[optind][1] == '\0') return (EOF); else if (strcmp (argv[optind], "--") == 0 || strcmp (argv[optind], "//") == 0) { optind++; return (EOF); } optopt = c = argv[optind][sp]; if (c == ':' || (cp = strchr (opts, c)) == NULL) { ERR (": illegal option -- ", c); if (argv[optind][++sp] == '\0') { optind++; sp = 1; } return ('?'); } if (*++cp == ':') { if (argv[optind][sp + 1] != '\0') optarg = &argv[optind++][sp + 1]; else if (++optind >= argc) { ERR (": option requires an argument -- ", c); sp = 1; return ('?'); } else optarg = argv[optind++]; sp = 1; } else { if (argv[optind][++sp] == '\0') { sp = 1; optind++; } optarg = NULL; } return (c); } #include "learn.c" #include "killers.c" #include "data.c" #include "levels.c" #include "bcreate.c" #include "moving.c" #include "search.c" #include "endgame.c" #include "book.c" #include "hash.c" #include "genmoves.c" #include "evaluate.c" #include "io.c" #include "static.c" #include "phalanx.c"