From d2185c2bcdba9fc69846c99a2d01ef037ce2266f Mon Sep 17 00:00:00 2001 From: Holger Schemel Date: Wed, 18 Nov 1998 20:42:06 +0100 Subject: [PATCH] rnd-19981118-1 --- src/Makefile | 121 +---- src/files.c | 1433 ------------------------------------------------- src/netserv.c | 904 ------------------------------- 3 files changed, 9 insertions(+), 2449 deletions(-) delete mode 100644 src/files.c delete mode 100644 src/netserv.c diff --git a/src/Makefile b/src/Makefile index 6dc3a1a2..a652a6d4 100644 --- a/src/Makefile +++ b/src/Makefile @@ -7,133 +7,30 @@ # configuration section # #-----------------------------------------------------------------------------# -# change this to your favorite ANSI C compiler -CC = gcc - -# on Solaris and similar systems, you'll need to uncomment this -# EXTRA_LIBS = -lnsl -lsocket - -# specify X11 library path on your system -XLIB_PATH = /usr/X11/lib - -# change this to the directory where you want to install game data like levels -GAME_DIR = . - -# uncomment this if your system has no joystick include file -# JOYSTICK = -DNO_JOYSTICK - -# uncomment this if your system has no sound -# SOUNDS = -DNO_SOUNDS - -# choose if you want to allow many global score file entries for one player -# when installing the game in a multi user environment, choose this -# SCORE_ENTRIES = ONE_PER_NAME -# when installing the game in a single user environment, choose this -SCORE_ENTRIES = MANY_PER_NAME - -# The XPM-Library is no longer needed to build this program, -# but is used to load graphics if XPM_INCLUDE_FILE is defined, -# because the GIF loading routines are still a bit beta. -# If you want to use the Xpm library, convert the GIF files to Xpm -# files (and you need corresponding mask files in xbm format). - -# XPM_INCLUDE_FILE = -DXPM_INCLUDE_FILE="" -# EXTRA_X11_LIBS = -lXpm - #-----------------------------------------------------------------------------# # you shouldn't need to change anything below # #-----------------------------------------------------------------------------# PROGNAME = rocksndiamonds +SRC_DIR = src +MAKE = make RM = rm -f -CPP = $(CC) -E -CONFIG_GAME_DIR = -DGAME_DIR="\"$(GAME_DIR)\"" -CONFIG_SCORE_ENTRIES = -D$(SCORE_ENTRIES) +MAKE_CMD = $(MAKE) -C $(SRC_DIR) -CONFIG = $(CONFIG_GAME_DIR) $(SOUNDS) $(JOYSTICK) \ - $(CONFIG_SCORE_ENTRIES) $(XPM_INCLUDE_FILE) - -# DEBUG = -DDEBUG -g -ansi -pedantic -Wall -DEBUG = -DDEBUG -g -Wall -# DEBUG = -O6 - -# SYSTEM = -Aa -D_HPUX_SOURCE -Dhpux # for HP-UX (obsolete) -# SYSTEM = -DSYSV -Ae # for HP-UX -# INCL = -I/usr/include/X11R5 # for HP-UX and others -# INCL = -I/usr/local/X11/include # for SunOS and others -# LIBS = -L/usr/lib/X11R5 -lXpm -lX11 -lm -# # for HP-UX and others -# LIBS = -L/usr/local/X11/lib -lXpm -lX11 -lm -lsocket -R/usr/local/X11/lib -# # for SunOS and others - -# LIBS = -L/usr/X11R6/lib -lXpm -lX11 -lm -# LIBS = -L/usr/X11R6/lib -lX11 -lm - -# LIBS = -L/usr/X11R6/lib $(EXTRA_X11_LIBS) -lX11 -lm $(EXTRA_LIBS) -LIBS = -L$(XLIB_PATH) $(EXTRA_X11_LIBS) -lX11 -lm $(EXTRA_LIBS) - -# CFLAGS = -O2 $(CONFIG) $(SYSTEM) -CFLAGS = $(DEBUG) $(CONFIG) $(SYSTEM) $(INCL) - -SRCS = main.c \ - init.c \ - events.c \ - tools.c \ - screens.c \ - misc.c \ - game.c \ - editor.c \ - buttons.c \ - files.c \ - tape.c \ - sound.c \ - joystick.c \ - cartoons.c \ - random.c \ - pcx.c \ - image.c \ - network.c \ - netserv.c - -OBJS = main.o \ - init.o \ - events.o \ - tools.o \ - screens.o \ - misc.o \ - game.o \ - editor.o \ - buttons.o \ - files.o \ - tape.o \ - sound.o \ - joystick.o \ - cartoons.o \ - random.o \ - pcx.o \ - image.o \ - network.o \ - netserv.o all: $(PROGNAME) -$(PROGNAME): $(OBJS) - $(CC) $(CFLAGS) $(OBJS) $(LIBS) -o $(PROGNAME) - -.c.o: - $(CC) $(CFLAGS) -c $*.c +$(PROGNAME): + $(MAKE_CMD) clean: - $(RM) $(PROGNAME) $(SERVNAME) $(OBJS) + $(MAKE_CMD) clean + $(RM) $(PROGNAME) backup: - ./make_backup.sh + ./scripts/make_backup.sh depend: - for i in $(SRCS); do $(CPP) $(CFLAGS) -M $$i; done > .depend - -ifeq (.depend,$(wildcard .depend)) -include .depend -endif + $(MAKE_CMD) depend diff --git a/src/files.c b/src/files.c deleted file mode 100644 index 46671d46..00000000 --- a/src/files.c +++ /dev/null @@ -1,1433 +0,0 @@ -/*********************************************************** -* Rocks'n'Diamonds -- McDuffin Strikes Back! * -*----------------------------------------------------------* -* (c) 1995-98 Artsoft Entertainment * -* Holger Schemel * -* Oststrasse 11a * -* 33604 Bielefeld * -* phone: ++49 +521 290471 * -* email: aeglos@valinor.owl.de * -*----------------------------------------------------------* -* files.h * -***********************************************************/ - -#include -#include -#include -#include - -#include "files.h" -#include "tools.h" -#include "misc.h" -#include "tape.h" -#include "joystick.h" - -#define MAX_LINE_LEN 1000 - -static void SaveUserLevelInfo(); /* for 'InitUserLevelDir()' */ -static char *getSetupLine(char *, int); /* for 'SaveUserLevelInfo()' */ - -static char *getGlobalDataDir() -{ - return GAME_DIR; -} - -static char *getUserDataDir() -{ - static char *userdata_dir = NULL; - - if (!userdata_dir) - { - char *home_dir = getHomeDir(); - char *data_dir = USERDATA_DIRECTORY; - - userdata_dir = checked_malloc(strlen(home_dir) + strlen(data_dir) + 2); - sprintf(userdata_dir, "%s/%s", home_dir, data_dir); - } - - return userdata_dir; -} - -static char *getSetupDir() -{ - return getUserDataDir(); -} - -static char *getUserLevelDir(char *level_subdir) -{ - static char *userlevel_dir = NULL; - char *data_dir = getUserDataDir(); - char *userlevel_subdir = LEVELS_DIRECTORY; - - if (userlevel_dir) - free(userlevel_dir); - - userlevel_dir = checked_malloc(strlen(data_dir) + strlen(userlevel_subdir) + - strlen(level_subdir) + 3); - sprintf(userlevel_dir, "%s/%s%s%s", data_dir, userlevel_subdir, - (strlen(level_subdir) > 0 ? "/" : ""), level_subdir); - - return userlevel_dir; -} - -static char *getTapeDir(char *level_subdir) -{ - static char *tape_dir = NULL; - char *data_dir = getUserDataDir(); - char *tape_subdir = TAPES_DIRECTORY; - - if (tape_dir) - free(tape_dir); - - tape_dir = checked_malloc(strlen(data_dir) + strlen(tape_subdir) + - strlen(level_subdir) + 3); - sprintf(tape_dir, "%s/%s%s%s", data_dir, tape_subdir, - (strlen(level_subdir) > 0 ? "/" : ""), level_subdir); - - return tape_dir; -} - -static char *getScoreDir(char *level_subdir) -{ - static char *score_dir = NULL; - char *data_dir = getGlobalDataDir(); - char *score_subdir = SCORES_DIRECTORY; - - if (score_dir) - free(score_dir); - - score_dir = checked_malloc(strlen(data_dir) + strlen(score_subdir) + - strlen(level_subdir) + 3); - sprintf(score_dir, "%s/%s%s%s", data_dir, score_subdir, - (strlen(level_subdir) > 0 ? "/" : ""), level_subdir); - - return score_dir; -} - -static void createDirectory(char *dir, char *text) -{ - if (access(dir, F_OK) != 0) - if (mkdir(dir, USERDATA_DIR_MODE) != 0) - Error(ERR_WARN, "cannot create %s directory '%s'", text, dir); -} - -static void InitUserDataDirectory() -{ - createDirectory(getUserDataDir(), "user data"); -} - -static void InitTapeDirectory(char *level_subdir) -{ - createDirectory(getTapeDir(""), "main tape"); - createDirectory(getTapeDir(level_subdir), "level tape"); -} - -static void InitScoreDirectory(char *level_subdir) -{ - createDirectory(getScoreDir(""), "main score"); - createDirectory(getScoreDir(level_subdir), "level score"); -} - -static void InitUserLevelDirectory(char *level_subdir) -{ - if (access(getUserLevelDir(level_subdir), F_OK) != 0) - { - createDirectory(getUserLevelDir(""), "main user level"); - createDirectory(getUserLevelDir(level_subdir), "user level"); - - SaveUserLevelInfo(); - } -} - -void LoadLevel(int level_nr) -{ - int i, x, y; - char filename[MAX_FILENAME_LEN]; - char cookie[MAX_FILENAME_LEN]; - FILE *file; - - if (leveldir[leveldir_nr].user_defined) - sprintf(filename, "%s/%s/%d", - getUserLevelDir(""), leveldir[leveldir_nr].filename, level_nr); - else - sprintf(filename, "%s/%s/%d", - options.level_directory, leveldir[leveldir_nr].filename, level_nr); - - if (!(file = fopen(filename, "r"))) - Error(ERR_WARN, "cannot read level '%s' - creating new level", filename); - else - { - fgets(cookie, LEVEL_COOKIE_LEN, file); - fgetc(file); - - if (strcmp(cookie,LEVEL_COOKIE)) - { - Error(ERR_WARN, "wrong format of level file '%s'", filename); - fclose(file); - file = NULL; - } - } - - if (file) - { - lev_fieldx = level.fieldx = fgetc(file); - lev_fieldy = level.fieldy = fgetc(file); - - level.time = (fgetc(file)<<8) | fgetc(file); - level.edelsteine = (fgetc(file)<<8) | fgetc(file); - for(i=0; i= MAX_TAPELEN) - break; - - for(j=0; j 0) - { - tape.pos[i].action[j] = MV_NO_MOVING; - continue; - } - tape.pos[i].action[j] = fgetc(file); - } - - tape.pos[i].delay = fgetc(file); - - if (levelrec_10) - { - /* eliminate possible diagonal moves in old tapes */ - /* this is only for backward compatibility */ - - byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN }; - byte action = tape.pos[i].action[0]; - int k, num_moves = 0; - - for (k=0; k<4; k++) - { - if (action & joy_dir[k]) - { - tape.pos[i + num_moves].action[0] = joy_dir[k]; - if (num_moves > 0) - tape.pos[i + num_moves].delay = 0; - num_moves++; - } - } - - if (num_moves > 1) - { - num_moves--; - i += num_moves; - tape.length += num_moves; - } - } - - if (feof(file)) - break; - } - - fclose(file); - - if (i != tape.length) - Error(ERR_WARN, "level recording file '%s' corrupted", filename); - - tape.length_seconds = GetTapeLength(); -} - -void SaveTape(int level_nr) -{ - int i; - char filename[MAX_FILENAME_LEN]; - FILE *file; - boolean new_tape = TRUE; - - InitTapeDirectory(leveldir[leveldir_nr].filename); - - sprintf(filename, "%s/%d.%s", - getTapeDir(leveldir[leveldir_nr].filename), - level_nr, TAPEFILE_EXTENSION); - - /* if a tape still exists, ask to overwrite it */ - if ((file = fopen(filename, "r"))) - { - new_tape = FALSE; - fclose(file); - - if (!Request("Replace old tape ?", REQ_ASK)) - return; - } - - if (!(file = fopen(filename, "w"))) - { - Error(ERR_WARN, "cannot save level recording file '%s'", filename); - return; - } - - fputs(LEVELREC_COOKIE, file); /* Formatkennung */ - fputc(0x0a, file); - - fputc((tape.random_seed >> 24) & 0xff,file); - fputc((tape.random_seed >> 16) & 0xff,file); - fputc((tape.random_seed >> 8) & 0xff,file); - fputc((tape.random_seed >> 0) & 0xff,file); - - fputc((tape.date >> 24) & 0xff,file); - fputc((tape.date >> 16) & 0xff,file); - fputc((tape.date >> 8) & 0xff,file); - fputc((tape.date >> 0) & 0xff,file); - - fputc((tape.length >> 24) & 0xff,file); - fputc((tape.length >> 16) & 0xff,file); - fputc((tape.length >> 8) & 0xff,file); - fputc((tape.length >> 0) & 0xff,file); - - for(i=0; i= 100) - return s; - - strcpy(s_lower, s); - - for (i=0; itoken) - free(setup_file_list->token); - if (setup_file_list->value) - free(setup_file_list->value); - if (setup_file_list->next) - freeSetupFileList(setup_file_list->next); - free(setup_file_list); -} - -static struct SetupFileList *newSetupFileList(char *token, char *value) -{ - struct SetupFileList *new = checked_malloc(sizeof(struct SetupFileList)); - - new->token = checked_malloc(strlen(token) + 1); - strcpy(new->token, token); - - new->value = checked_malloc(strlen(value) + 1); - strcpy(new->value, value); - - new->next = NULL; - - return new; -} - -static char *getTokenValue(struct SetupFileList *setup_file_list, - char *token) -{ - if (!setup_file_list) - return NULL; - - if (strcmp(setup_file_list->token, token) == 0) - return setup_file_list->value; - else - return getTokenValue(setup_file_list->next, token); -} - -static void setTokenValue(struct SetupFileList *setup_file_list, - char *token, char *value) -{ - if (!setup_file_list) - return; - - if (strcmp(setup_file_list->token, token) == 0) - { - free(setup_file_list->value); - setup_file_list->value = checked_malloc(strlen(value) + 1); - strcpy(setup_file_list->value, value); - } - else if (setup_file_list->next == NULL) - setup_file_list->next = newSetupFileList(token, value); - else - setTokenValue(setup_file_list->next, token, value); -} - -#ifdef DEBUG -static void printSetupFileList(struct SetupFileList *setup_file_list) -{ - if (!setup_file_list) - return; - - printf("token: '%s'\n", setup_file_list->token); - printf("value: '%s'\n", setup_file_list->value); - - printSetupFileList(setup_file_list->next); -} -#endif - -static struct SetupFileList *loadSetupFileList(char *filename) -{ - int line_len; - char line[MAX_LINE_LEN]; - char *token, *value, *line_ptr; - struct SetupFileList *setup_file_list = newSetupFileList("", ""); - struct SetupFileList *first_valid_list_entry; - - FILE *file; - - if (!(file = fopen(filename, "r"))) - { - Error(ERR_WARN, "cannot open setup/info file '%s'", filename); - return NULL; - } - - while(!feof(file)) - { - /* read next line of input file */ - if (!fgets(line, MAX_LINE_LEN, file)) - break; - - /* cut trailing comment or whitespace from input line */ - for (line_ptr = line; *line_ptr; line_ptr++) - { - if (*line_ptr == '#' || *line_ptr == '\n') - { - *line_ptr = '\0'; - break; - } - } - - /* cut trailing whitespaces from input line */ - for (line_ptr = &line[strlen(line)]; line_ptr > line; line_ptr--) - if ((*line_ptr == ' ' || *line_ptr == '\t') && line_ptr[1] == '\0') - *line_ptr = '\0'; - - /* ignore empty lines */ - if (*line == '\0') - continue; - - line_len = strlen(line); - - /* cut leading whitespaces from token */ - for (token = line; *token; token++) - if (*token != ' ' && *token != '\t') - break; - - /* find end of token */ - for (line_ptr = token; *line_ptr; line_ptr++) - { - if (*line_ptr == ' ' || *line_ptr == '\t' || *line_ptr == ':') - { - *line_ptr = '\0'; - break; - } - } - - if (line_ptr < line + line_len) - value = line_ptr + 1; - else - value = "\0"; - - /* cut leading whitespaces from value */ - for (; *value; value++) - if (*value != ' ' && *value != '\t') - break; - - if (*token && *value) - setTokenValue(setup_file_list, token, value); - } - - fclose(file); - - first_valid_list_entry = setup_file_list->next; - - /* free empty list header */ - setup_file_list->next = NULL; - freeSetupFileList(setup_file_list); - - if (first_valid_list_entry == NULL) - Error(ERR_WARN, "setup/info file '%s' is empty", filename); - - return first_valid_list_entry; -} - -static void checkSetupFileListIdentifier(struct SetupFileList *setup_file_list, - char *identifier) -{ - if (!setup_file_list) - return; - - if (strcmp(setup_file_list->token, TOKEN_STR_FILE_IDENTIFIER) == 0) - { - if (strcmp(setup_file_list->value, identifier) != 0) - { - Error(ERR_WARN, "setup/info file has wrong version"); - return; - } - else - return; - } - - if (setup_file_list->next) - checkSetupFileListIdentifier(setup_file_list->next, identifier); - else - { - Error(ERR_WARN, "setup/info file has no version information"); - return; - } -} - -static void setLevelDirInfoToDefaults(struct LevelDirInfo *ldi) -{ - ldi->name = getStringCopy("non-existing"); - ldi->levels = 0; - ldi->sort_priority = 999; /* default: least priority */ - ldi->readonly = TRUE; -} - -static void setSetupInfoToDefaults(struct SetupInfo *si) -{ - int i; - - si->player_name = getStringCopy(getLoginName()); - - si->sound = TRUE; - si->sound_loops = FALSE; - si->sound_music = FALSE; - si->sound_simple = FALSE; - si->toons = TRUE; - si->double_buffering = TRUE; - si->direct_draw = !si->double_buffering; - si->scroll_delay = FALSE; - si->soft_scrolling = TRUE; - si->fading = FALSE; - si->autorecord = FALSE; - si->quick_doors = FALSE; - - for (i=0; iinput[i].use_joystick = FALSE; - si->input[i].joy.device_name = getStringCopy(joystick_device_name[i]); - si->input[i].joy.xleft = JOYSTICK_XLEFT; - si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE; - si->input[i].joy.xright = JOYSTICK_XRIGHT; - si->input[i].joy.yupper = JOYSTICK_YUPPER; - si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE; - si->input[i].joy.ylower = JOYSTICK_YLOWER; - si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0); - si->input[i].joy.bomb = (i == 0 ? JOY_BUTTON_2 : 0); - si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KEY_UNDEFINDED); - si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KEY_UNDEFINDED); - si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KEY_UNDEFINDED); - si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KEY_UNDEFINDED); - si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KEY_UNDEFINDED); - si->input[i].key.bomb = (i == 0 ? DEFAULT_KEY_BOMB : KEY_UNDEFINDED); - } -} - -static void setSetupInfo(int token_nr, char *token_value) -{ - int token_type = token_info[token_nr].type; - void *setup_value = token_info[token_nr].value; - - if (token_value == NULL) - return; - - /* set setup field to corresponding token value */ - switch (token_type) - { - case TYPE_BOOLEAN: - case TYPE_SWITCH: - *(boolean *)setup_value = get_string_boolean_value(token_value); - break; - - case TYPE_KEYSYM: - *(KeySym *)setup_value = getKeySymFromX11KeyName(token_value); - break; - - case TYPE_INTEGER: - *(int *)setup_value = get_string_integer_value(token_value); - break; - - case TYPE_STRING: - if (*(char **)setup_value != NULL) - free(*(char **)setup_value); - *(char **)setup_value = getStringCopy(token_value); - break; - - default: - break; - } -} - -static void decodeSetupFileList(struct SetupFileList *setup_file_list) -{ - int i, pnr; - - if (!setup_file_list) - return; - - /* handle global setup values */ - si = setup; - for (i=FIRST_GLOBAL_SETUP_TOKEN; i<=LAST_GLOBAL_SETUP_TOKEN; i++) - setSetupInfo(i, getTokenValue(setup_file_list, token_info[i].text)); - setup = si; - - /* handle player specific setup values */ - for (pnr=0; pnr highest_level_nr) - last_level_nr = highest_level_nr; - } - - return last_level_nr; -} - -static int compareLevelDirInfoEntries(const void *object1, const void *object2) -{ - const struct LevelDirInfo *entry1 = object1; - const struct LevelDirInfo *entry2 = object2; - int compare_result; - - if (entry1->sort_priority != entry2->sort_priority) - compare_result = entry1->sort_priority - entry2->sort_priority; - else - { - char *name1 = getStringToLower(entry1->name); - char *name2 = getStringToLower(entry2->name); - - compare_result = strcmp(name1, name2); - - free(name1); - free(name2); - } - - return compare_result; -} - -static int LoadLevelInfoFromLevelDir(char *level_directory, int start_entry) -{ - DIR *dir; - struct stat file_status; - char *directory = NULL; - char *filename = NULL; - struct SetupFileList *setup_file_list = NULL; - struct dirent *dir_entry; - int i, current_entry = start_entry; - - if ((dir = opendir(level_directory)) == NULL) - Error(ERR_EXIT, "cannot read level directory '%s'", level_directory); - - while (current_entry < MAX_LEVDIR_ENTRIES) - { - if ((dir_entry = readdir(dir)) == NULL) /* last directory entry */ - break; - - /* skip entries for current and parent directory */ - if (strcmp(dir_entry->d_name, ".") == 0 || - strcmp(dir_entry->d_name, "..") == 0) - continue; - - /* find out if directory entry is itself a directory */ - directory = getPath2(level_directory, dir_entry->d_name); - if (stat(directory, &file_status) != 0 || /* cannot stat file */ - (file_status.st_mode & S_IFMT) != S_IFDIR) /* not a directory */ - { - free(directory); - continue; - } - - if (strlen(dir_entry->d_name) >= MAX_LEVDIR_FILENAME) - { - Error(ERR_WARN, "filename of level directory '%s' too long -- ignoring", - dir_entry->d_name); - continue; - } - - filename = getPath2(directory, LEVELINFO_FILENAME); - setup_file_list = loadSetupFileList(filename); - - if (setup_file_list) - { - checkSetupFileListIdentifier(setup_file_list, LEVELINFO_COOKIE); - setLevelDirInfoToDefaults(&leveldir[current_entry]); - - ldi = leveldir[current_entry]; - for (i=FIRST_LEVELINFO_TOKEN; i<=LAST_LEVELINFO_TOKEN; i++) - setSetupInfo(i, getTokenValue(setup_file_list, token_info[i].text)); - leveldir[current_entry] = ldi; - - leveldir[current_entry].filename = getStringCopy(dir_entry->d_name); - leveldir[current_entry].user_defined = - (level_directory == options.level_directory ? FALSE : TRUE); - - freeSetupFileList(setup_file_list); - current_entry++; - } - else - Error(ERR_WARN, "ignoring level directory '%s'", directory); - - free(directory); - free(filename); - } - - if (current_entry == MAX_LEVDIR_ENTRIES) - Error(ERR_WARN, "using %d level directories -- ignoring the rest", - current_entry); - - closedir(dir); - - if (current_entry == start_entry && start_entry != -1) - Error(ERR_EXIT, "cannot find any valid level series in directory '%s'", - level_directory); - - return current_entry; -} - -void LoadLevelInfo() -{ - InitUserLevelDirectory(getLoginName()); - - num_leveldirs = 0; - leveldir_nr = 0; - - num_leveldirs = LoadLevelInfoFromLevelDir(options.level_directory, - num_leveldirs); - num_leveldirs = LoadLevelInfoFromLevelDir(getUserLevelDir(""), - num_leveldirs); - if (num_leveldirs > 1) - qsort(leveldir, num_leveldirs, sizeof(struct LevelDirInfo), - compareLevelDirInfoEntries); -} - -static void SaveUserLevelInfo() -{ - char filename[MAX_FILENAME_LEN]; - FILE *file; - int i; - - sprintf(filename, "%s/%s", - getUserLevelDir(getLoginName()), LEVELINFO_FILENAME); - - if (!(file = fopen(filename, "w"))) - { - Error(ERR_WARN, "cannot write level info file '%s'", filename); - return; - } - - ldi.name = getLoginName(); - ldi.levels = 100; - ldi.sort_priority = 300; - ldi.readonly = FALSE; - - fprintf(file, "%s\n\n", - getFormattedSetupEntry(TOKEN_STR_FILE_IDENTIFIER, LEVELINFO_COOKIE)); - - for (i=FIRST_LEVELINFO_TOKEN; i<=LAST_LEVELINFO_TOKEN; i++) - fprintf(file, "%s\n", getSetupLine("", i)); - - fclose(file); - - chmod(filename, SETUP_PERMS); -} - -void LoadSetup() -{ - char filename[MAX_FILENAME_LEN]; - struct SetupFileList *setup_file_list = NULL; - - /* always start with reliable default setup values */ - setSetupInfoToDefaults(&setup); - - sprintf(filename, "%s/%s", getSetupDir(), SETUP_FILENAME); - - setup_file_list = loadSetupFileList(filename); - - if (setup_file_list) - { - checkSetupFileListIdentifier(setup_file_list, SETUP_COOKIE); - decodeSetupFileList(setup_file_list); - - setup.direct_draw = !setup.double_buffering; - - freeSetupFileList(setup_file_list); - - /* needed to work around problems with fixed length strings */ - if (strlen(setup.player_name) >= MAX_NAMELEN) - setup.player_name[MAX_NAMELEN - 1] = '\0'; - else if (strlen(setup.player_name) < MAX_NAMELEN - 1) - { - char *new_name = checked_malloc(MAX_NAMELEN); - - strcpy(new_name, setup.player_name); - free(setup.player_name); - setup.player_name = new_name; - } - } - else - Error(ERR_WARN, "using default setup values"); -} - -static char *getSetupLine(char *prefix, int token_nr) -{ - int i; - static char entry[MAX_LINE_LEN]; - int token_type = token_info[token_nr].type; - void *setup_value = token_info[token_nr].value; - char *token_text = token_info[token_nr].text; - - /* start with the prefix, token and some spaces to format output line */ - sprintf(entry, "%s%s:", prefix, token_text); - for (i=strlen(entry); itoken, TOKEN_STR_FILE_IDENTIFIER) != 0) - fprintf(file, "%s\n", - getFormattedSetupEntry(list_entry->token, list_entry->value)); - - /* just to make things nicer :) */ - if (strcmp(list_entry->token, TOKEN_STR_LAST_LEVEL_SERIES) == 0) - fprintf(file, "\n"); - - list_entry = list_entry->next; - } - - fclose(file); - - chmod(filename, SETUP_PERMS); -} diff --git a/src/netserv.c b/src/netserv.c deleted file mode 100644 index 6ff6e52e..00000000 --- a/src/netserv.c +++ /dev/null @@ -1,904 +0,0 @@ -/* - * A server for a multi-player version of Tetris - * - * Copyright (C) 1996 Roger Espel Llima - * - * Started: 10 Oct 1996 - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation. See the file COPYING for details. - * - */ - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "netserv.h" -#include "misc.h" - -static int clients = 0; -static int bots = 0; -static int onceonly = 0; -static int timetoplay = 0; -static int is_daemon = 0; -static int levelnr = 5; -static int mode = -1; -static int paused = 0; - -struct user -{ - int fd; - unsigned char nick[16]; - unsigned char number; - struct user *next, *nextvictim; - char active; - char introduced; - unsigned char readbuf[MAX_BUFFER_SIZE]; - int nread; - unsigned char writbuf[MAX_BUFFER_SIZE]; - int nwrite; - char playing; - char isbot; - int lines; - unsigned int games; - unsigned char action; - int action_received; -}; - -static struct user *user0 = NULL; - -#define NEXT(u) ((u)->next ? (u)->next : user0) - -static struct sockaddr_in saddr; -static int lfd; -static unsigned char realbuf[512], *buf = realbuf + 4; - -static int interrupt; -static int tcp = -1; - -static unsigned long frame_counter = 0; - -static fd_set fds; - -static void syserr(char *s) -{ - if (!is_daemon) - fprintf(stderr, "fatal: %s failed.\n", s); - exit(1); -} - -static void addtobuffer(struct user *u, unsigned char *b, int len) -{ - if (u->nwrite + len >= MAX_BUFFER_SIZE) - Error(ERR_EXIT, "internal error: network send buffer overflow"); - - memcpy(u->writbuf + u->nwrite, b, len); - u->nwrite += len; -} - -static void flushuser(struct user *u) -{ - if (u->nwrite) - { - write(u->fd, u->writbuf, u->nwrite); - u->nwrite = 0; - } -} - -static void broadcast(struct user *except, int len, int activeonly) -{ - struct user *u; - - realbuf[0] = realbuf[1] = realbuf[2] = 0; - realbuf[3] = (unsigned char)len; - for (u=user0; u; u=u->next) - if (u != except && (u->active || !activeonly) && u->introduced) - addtobuffer(u, realbuf, 4 + len); -} - -static void sendtoone(struct user *to, int len) -{ - realbuf[0] = realbuf[1] = realbuf[2] = 0; - realbuf[3] = (unsigned char)len; - addtobuffer(to, realbuf, 4 + len); -} - -static void dropuser(struct user *u) -{ - struct user *v, *w; - - if (options.verbose) - printf("RND_SERVER: dropping client %d (%s)\n", u->number, u->nick); - - if (u == user0) - user0 = u->next; - else - { - for (v=user0; v; v=v->next) - { - if (v->next && v->next == u) - { - v->next = u->next; - break; - } - } - } - close(u->fd); - - if (u->introduced) - { - buf[0] = u->number; - buf[1] = OP_PLAYER_DISCONNECTED; - broadcast(u, 2, 0); - } - - for (v=user0; v; v=v->next) - { - if (v->nextvictim == u) - { - for (w=NEXT(v); w!=v; w=NEXT(w)) - { - if (w->active && w->playing) - { - v->nextvictim = w; - break; - } - } - if (v->nextvictim == u) - v->nextvictim = NULL; - } - } - - if (u->isbot) - bots--; - - free(u); - clients--; - - if (onceonly && clients == bots) - { - if (options.verbose) - { - printf("RND_SERVER: no clients left\n"); - printf("RND_SERVER: aborting\n"); - } - exit(0); - } - - if (clients == 0) - { - mode = -1; - levelnr = 5; - timetoplay = 0; - } -} - -static void new_connect(int fd) -{ - struct user *u, *v; - unsigned char nxn; - - u = checked_malloc(sizeof (struct user)); - - u->fd = fd; - u->nick[0] = 0; - u->next = user0; - u->nextvictim = NULL; - u->active = 0; - u->nread = 0; - u->nwrite = 0; - u->playing = 0; - u->isbot = 0; - u->introduced = 0; - u->games = 0; - u->action = 0; - u->action_received = 0; - - user0 = u; - - nxn = 1; - - again: - v = u->next; - while(v) - { - if (v->number == nxn) - { - nxn++; - goto again; - } - v = v->next; - } - - u->number = nxn; - if (options.verbose) - printf("RND_SERVER: client %d connecting from %s\n", nxn, inet_ntoa(saddr.sin_addr)); - clients++; - - buf[0] = 0; - buf[1] = OP_YOUR_NUMBER; - buf[2] = u->number; - sendtoone(u, 3); -} - -static void Handle_OP_PROTOCOL_VERSION(struct user *u, unsigned int len) -{ - if (len != 5 || buf[2] != PROT_VERS_1 || buf[3] != PROT_VERS_2) - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) has wrong protocol version %d.%d.%d\n", u->number, u->nick, buf[2], buf[3], buf[4]); - - buf[0] = 0; - buf[1] = OP_BADVERS; - buf[2] = PROT_VERS_1; - buf[3] = PROT_VERS_2; - buf[4] = PROT_VERS_3; - sendtoone(u, 5); - flushuser(u); - - dropuser(u); - interrupt = 1; - } - else - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) uses protocol version %d.%d.%d\n", u->number, u->nick, buf[2], buf[3], buf[4]); - } -} - -static void Handle_OP_NUMBER_WANTED(struct user *u) -{ - struct user *v; - int client_nr = u->number; - int nr_wanted = buf[2]; - int nr_is_free = 1; - - if (options.verbose) - printf("RND_SERVER: client %d (%s) wants to switch to # %d\n", - u->number, u->nick, nr_wanted); - - for (v=user0; v; v=v->next) - { - if (v->number == nr_wanted) - { - nr_is_free = 0; - break; - } - } - - if (options.verbose) - { - if (nr_is_free) - printf("RND_SERVER: client %d (%s) switches to # %d\n", - u->number, u->nick, nr_wanted); - else if (u->number == nr_wanted) - printf("RND_SERVER: client %d (%s) still has # %d\n", - u->number, u->nick, nr_wanted); - else - printf("RND_SERVER: client %d (%s) cannot switch (client %d still exists)\n", - u->number, u->nick, nr_wanted); - } - - if (nr_is_free) - u->number = nr_wanted; - - buf[0] = client_nr; - buf[1] = OP_NUMBER_WANTED; - buf[2] = nr_wanted; - buf[3] = u->number; - - /* - sendtoone(u, 4); - */ - - broadcast(NULL, 4, 0); -} - -static void Handle_OP_NICKNAME(struct user *u, unsigned int len) -{ - struct user *v; - int i; - - if (len>16) - len=16; - memcpy(u->nick, &buf[2], len-2); - u->nick[len-2] = 0; - for (i=0; inick[i] < ' ' || - (u->nick[i] > 0x7e && u->nick[i] <= 0xa0)) - { - u->nick[i] = 0; - break; - } - } - - if (!u->introduced) - { - buf[0] = u->number; - buf[1] = OP_PLAYER_CONNECTED; - broadcast(u, 2, 0); - } - - if (options.verbose) - printf("RND_SERVER: client %d calls itself \"%s\"\n", u->number, u->nick); - buf[1] = OP_NICKNAME; - broadcast(u, len, 0); - - if (!u->introduced) - { - for (v=user0; v; v=v->next) - { - if (v != u && v->introduced) - { - buf[0] = v->number; - buf[1] = OP_PLAYER_CONNECTED; - buf[2] = (v->games >> 8); - buf[3] = (v->games & 0xff); - sendtoone(u, 4); - buf[1] = OP_NICKNAME; - memcpy(&buf[2], v->nick, 14); - sendtoone(u, 2+strlen(v->nick)); - } - } - if (levelnr != 5) - { - buf[0] = 0; - buf[1] = OP_LEVEL; - buf[2] = levelnr; - sendtoone(u, 3); - } - if (mode >= 0) - { - buf[1] = OP_MODE; - buf[2] = mode; - sendtoone(u, 3); - } - } - - u->introduced = 1; -} - -static void Handle_OP_START_PLAYING(struct user *u) -{ - struct user *v, *w; - - if (options.verbose) - printf("RND_SERVER: client %d (%s) starts game [level %d from levedir %d (%s)]\n", - u->number, u->nick, - (buf[2] << 8) + buf[3], - (buf[4] << 8) + buf[5], - &buf[6]); - timetoplay = 0; - - for (w=user0; w; w=w->next) - { - if (w->introduced) - { - w->active = 1; - w->playing = 1; - w->lines = 0; - w->nextvictim = NULL; - for (v=NEXT(w); v!=w; v=NEXT(v)) - { - if (v->introduced) - { - w->nextvictim = v; - break; - } - } - } - } - - /* - if (paused) - { - paused = 0; - buf[1] = OP_CONT; - broadcast(NULL, 2, 0); - } - buf[1] = OP_START_PLAYING; - broadcast(NULL, 2, 0); - */ - - /* reset frame counter */ - frame_counter = 0; - - /* reset player actions */ - for (v=user0; v; v=v->next) - { - v->action = 0; - v->action_received = 0; - } - - broadcast(NULL, 10 + strlen(&buf[10])+1, 0); -} - -static void Handle_OP_PAUSE_PLAYING(struct user *u) -{ - if (options.verbose) - printf("RND_SERVER: client %d (%s) pauses game\n", u->number, u->nick); - broadcast(NULL, 2, 0); - paused = 1; -} - -static void Handle_OP_CONTINUE_PLAYING(struct user *u) -{ - if (options.verbose) - printf("RND_SERVER: client %d (%s) continues game\n", u->number, u->nick); - broadcast(NULL, 2, 0); - paused = 0; -} - -static void Handle_OP_STOP_PLAYING(struct user *u) -{ - if (options.verbose) - printf("RND_SERVER: client %d (%s) stops game\n", u->number, u->nick); - broadcast(NULL, 2, 0); -} - -static void Handle_OP_MOVE_FIGURE(struct user *u) -{ - struct user *v; - int last_client_nr = 0; - int i; - - /* store player action */ - for (v=user0; v; v=v->next) - { - if (v->number == u->number) - { - v->action = buf[2]; - v->action_received = 1; - } - } - - /* check if server received action from each player */ - for (v=user0; v; v=v->next) - { - if (!v->action_received) - return; - - if (v->number > last_client_nr) - last_client_nr = v->number; - } - - /* initialize all player actions to zero */ - for (i=0; inext) - { - buf[6 + v->number-1] = v->action; - v->action = 0; - v->action_received = 0; - } - - buf[2] = (unsigned char)((frame_counter >> 24) & 0xff); - buf[3] = (unsigned char)((frame_counter >> 16) & 0xff); - buf[4] = (unsigned char)((frame_counter >> 8) & 0xff); - buf[5] = (unsigned char)((frame_counter >> 0) & 0xff); - - broadcast(NULL, 6 + last_client_nr, 0); - - frame_counter++; - - /* - if (verbose) - printf("RND_SERVER: frame %d: client %d (%s) moves player [0x%02x]\n", - frame_counter, - u->number, u->nick, buf[2]); - */ -} - -void NetworkServer(int port, int serveronly) -{ - int i, sl, on; - struct user *u, *v, *w; - int mfd; - int r; - unsigned int len; - struct protoent *tcpproto; - struct timeval tv; - int is_daemon = 0; - -#ifndef NeXT - struct sigaction sact; -#endif - - if (port == 0) - port = DEFAULTPORT; - - if (!serveronly) - onceonly = 1; - - if ((tcpproto = getprotobyname("tcp")) != NULL) - tcp = tcpproto->p_proto; - -#ifdef NeXT - signal(SIGPIPE, SIG_IGN); -#else - sact.sa_handler = SIG_IGN; - sigemptyset(&sact.sa_mask); - sact.sa_flags = 0; - sigaction(SIGPIPE, &sact, NULL); -#endif - - - lfd = socket(PF_INET, SOCK_STREAM, 0); - saddr.sin_family = AF_INET; - saddr.sin_addr.s_addr = htonl(INADDR_ANY); - saddr.sin_port = htons(port); - - if (lfd < 0) - syserr("socket"); - on = 1; - - setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int)); - if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0) - syserr("bind"); - - listen(lfd, 5); - - if (is_daemon) - { - /* become a daemon, breaking all ties with the controlling terminal */ - options.verbose = 0; - for (i=0; i<255; i++) - { - if (i != lfd) - close(i); - } - - if (fork()) - exit(0); - setsid(); - if (fork()) - exit(0); - chdir("/"); - - /* open a fake stdin, stdout, stderr, just in case */ - open("/dev/null", O_RDONLY); - open("/dev/null", O_WRONLY); - open("/dev/null", O_WRONLY); - } - - if (options.verbose) - { - printf("rocksndiamonds network server: started up, listening on port %d\n", - port); - printf("rocksndiamonds network server: using protocol version %d.%d.%d\n", - PROT_VERS_1, PROT_VERS_2, PROT_VERS_3); - } - - while(1) - { - interrupt = 0; - - /* - if (timetoplay && time(NULL) >= timetoplay) - { - buf[0] = 0; - do_play(); - if (options.verbose) - printf("RND_SERVER: everyone lost... restarting game\n"); - timetoplay = 0; - } - */ - - for (u=user0; u; u=u->next) - flushuser(u); - - FD_ZERO(&fds); - mfd = lfd; - u = user0; - while (u) - { - FD_SET(u->fd, &fds); - if (u->fd > mfd) - mfd = u->fd; - u = u->next; - } - FD_SET(lfd, &fds); - tv.tv_sec = 0; - tv.tv_usec = 500000; - if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0) - { - if (errno != EINTR) - syserr("select"); - else - continue; - } - - if (sl < 0) - continue; - - if (clients > 0 && clients == bots) - { - if (options.verbose) - printf("RND_SERVER: only bots left... dropping all bots\n"); - while (user0) - dropuser(user0); - continue; - } - - if (sl == 0) - continue; - - if (FD_ISSET(lfd, &fds)) - { - int newfd, slen; - - slen = sizeof(saddr); - newfd = accept(lfd, (struct sockaddr *)&saddr, &slen); - if (newfd < 0) - { - if (errno != EINTR) - syserr("accept"); - } - else - { - if (tcp != -1) - { - on = 1; - setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int)); - } - new_connect(newfd); - } - continue; - } - - u = user0; - - do - { - if (FD_ISSET(u->fd, &fds)) - { - r = read(u->fd, u->readbuf + u->nread, MAX_BUFFER_SIZE - u->nread); - if (r <= 0) - { - if (options.verbose) - printf("RND_SERVER: EOF from client %d (%s)\n", u->number, u->nick); - dropuser(u); - interrupt = 1; - break; - } - u->nread += r; - while (u->nread >= 4 && u->nread >= 4 + u->readbuf[3]) - { - len = u->readbuf[3]; - if (u->readbuf[0] || u->readbuf[1] || u->readbuf[2]) - { - if (options.verbose) - printf("RND_SERVER: crap from client %d (%s)\n", u->number, u->nick); - write(u->fd, "\033]50;kanji24\007\033#8\033(0", 19); - dropuser(u); - interrupt = 1; - break; - } - memcpy(buf, &u->readbuf[4], len); - u->nread -= 4 + len; - memmove(u->readbuf, u->readbuf + 4 + len, u->nread); - - buf[0] = u->number; - if (!u->introduced && buf[1] != OP_NICKNAME) - { - if (options.verbose) - printf("RND_SERVER: !(client %d)->introduced && buf[1]==%d (expected OP_NICKNAME)\n", buf[0], buf[1]); - - dropuser(u); - interrupt = 1; - break; - } - - switch(buf[1]) - { - case OP_NICKNAME: - Handle_OP_NICKNAME(u, len); - break; - - case OP_PROTOCOL_VERSION: - Handle_OP_PROTOCOL_VERSION(u, len); - break; - - case OP_NUMBER_WANTED: - Handle_OP_NUMBER_WANTED(u); - break; - - case OP_START_PLAYING: - Handle_OP_START_PLAYING(u); - break; - - case OP_PAUSE_PLAYING: - Handle_OP_PAUSE_PLAYING(u); - break; - - case OP_CONTINUE_PLAYING: - Handle_OP_CONTINUE_PLAYING(u); - break; - - case OP_STOP_PLAYING: - Handle_OP_STOP_PLAYING(u); - break; - - case OP_MOVE_FIGURE: - Handle_OP_MOVE_FIGURE(u); - break; - - case OP_KILL: - for (v=user0; v; v=v->next) - { - if (v->number == buf[2]) - break; - } - if (v) - { - if (v->isbot) - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) kills bot %d (%s)\n", u->number, u->nick, v->number, v->nick); - - dropuser(v); - interrupt = 1; - break; - } - else - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) attempting to kill non-bot %d (%s)\n", u->number, u->nick, v->number, v->nick); - } - } - break; - - case OP_MODE: - mode = buf[2]; - if (options.verbose) - printf("RND_SERVER: client %d (%s) sets mode %d (%s)\n", u->number, u->nick, buf[2], buf[2] == 0 ? "normal" : (buf[2] == 1 ? "fun" : "unknown")); - broadcast(NULL, 3, 0); - break; - - case OP_BOT: - if (!u->isbot) - bots++; - u->isbot = 1; - if (options.verbose) - printf("RND_SERVER: client %d (%s) declares itself to be a bot\n", u->number, u->nick); - break; - - case OP_LEVEL: - levelnr = buf[2]; - if (options.verbose) - printf("RND_SERVER: client %d (%s) sets level %d\n", u->number, u->nick, buf[2]); - broadcast(NULL, 3, 0); - break; - - case OP_LOST: - { - struct user *won = NULL; - - if (options.verbose) - printf("RND_SERVER: client %d (%s) has lost\n", u->number, u->nick); - u->playing = 0; - broadcast(u, 2, 1); - i = 0; - for (v=user0; v; v=v->next) - { - if (v->nextvictim == u) - { - for (w=NEXT(v); w!=v; w=NEXT(w)) - { - if (w->active && w->playing) - { - v->nextvictim = w; - break; - } - } - if (v->nextvictim == u) - v->nextvictim = NULL; - } - } - for (v=user0; v; v=v->next) - { - if (v->playing) - { - i++; - won = v; - } - } - if (i == 1) - { - buf[0] = won->number; - buf[1] = OP_WON; - won->games++; - broadcast(NULL, 2, 0); - } - else if (i == 0) - { - buf[0] = u->number; - buf[1] = OP_WON; - u->games++; - broadcast(NULL, 2, 0); - } - if (i < 2 && clients > 1) - timetoplay = time(NULL) + 4; - } - break; - - case OP_ZERO: - broadcast(NULL, 2, 0); - if (options.verbose) - printf("RND_SERVER: client %d (%s) resets the game counters\n", u->number, u->nick); - for (v=user0; v; v=v->next) - v->games = 0; - break; - - case OP_CLEAR: - case OP_GROW: - broadcast(u, 2, 1); - break; - - case OP_MSG: - buf[len] = '\0'; - if (options.verbose) - printf("RND_SERVER: client %d (%s) sends message: %s\n", u->number, u->nick, &buf[2]); - broadcast(u, len, 0); - break; - - case OP_LINES: - if (len != 3) - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) sends crap for an OP_LINES\n", u->number, u->nick); - - dropuser(u); - interrupt = 1; - break; - } - if (u->nextvictim) - { - if (options.verbose) - printf("RND_SERVER: client %d (%s) sends %d %s to client %d (%s)\n", u->number, u->nick, (int)buf[2], buf[2] == 1 ? "line" : "lines", u->nextvictim->number, u->nextvictim->nick); - sendtoone(u->nextvictim, 3); - buf[3] = u->nextvictim->number; - buf[1] = OP_LINESTO; - broadcast(u->nextvictim, 4, 1); - for (v=NEXT(u->nextvictim); v!=u->nextvictim; v=NEXT(v)) - { - if (v->active && v != u && v->playing) - { - u->nextvictim = v; - break; - } - } - } - else if (options.verbose) - printf("RND_SERVER: client %d (%s) makes %d %s but has no victim\n", u->number, u->nick, (int)buf[2], buf[2] == 1 ? "line" : "lines"); - break; - - default: - if (options.verbose) - printf("RND_SERVER: opcode %d from client %d (%s) not understood\n", buf[0], u->number, u->nick); - } - } - } - - if (u && !interrupt) - u = u->next; - } - while (u && !interrupt); - } -} -- 2.34.1