/* * input.c * * Modified to work as client in socket based protocol */ #include "copyright.h" #include #include #include #include #ifdef hpux #include #else /* hpux */ #include #endif /* hpux */ #include #include #include "netrek.h" #ifdef RECORD #include "recorder.h" #endif #if __STDC__ || defined(__cplusplus) #define P_(s) s #else #define P_(s) () #endif /* input.c */ static unsigned char *AddStringToKeymap P_((unsigned char *str, unsigned char *keymap, char *keymapName, int isCtrlKeymap)); static void AddStrToButtonMap P_((unsigned char *str, char *buttonmap)); int torprepeat = 0; int last_torp = 0; #undef P_ /* * Create a keymap with the default bindings. * * If keyMap has not been allocated yet (keyMap is NULL) this will involve * reallocating the keymap. Otherwise, the procedure will reset the * given keymap. * * RETURN: The updated keymap. */ unsigned char * InitKeyMap(keyMap) unsigned char *keyMap; { register i; unsigned char *defaultMap; if (!keyMap) { keyMap = (unsigned char *) calloc(1, MAXKEY); if (!keyMap) { fprintf(stderr, "netrek: Out of memory\n"); exit(1); } } defaultMap = keymaps[KEYMAP_DEFAULT]; if ((!defaultMap) || (keyMap == defaultMap)) { /* The default keyMap starts out as a null keymap. */ for (i = MAXKEY - 2; i >= 0; --i) keyMap[i] = i + 32; keyMap[MAXKEY - 1] = 0; } else { /* Other keymaps start out as the current default keymap. */ for (i = MAXKEY - 1; i >= 0; --i) keyMap[i] = defaultMap[i]; } return keyMap; } /* * Add the given string of keybindings to the keymap. * * The keymap will be re-initialised if it is not already defined. If * isCtrlKeymap is set then `^' notation is allowed. The variable * "keymapName" contains the name of the keymap (eg "ckeymap-sc") so that * errors can be reported nicely. * * RETURN The updated keymap. */ static unsigned char * AddStringToKeymap(str, keymap, keymapName, isCtrlKeymap) unsigned char *str, *keymap; char *keymapName; int isCtrlKeymap; { int ch = 0, left = 0, offset = 0, error = 0; unsigned char *point; if (!keymap) keymap = InitKeyMap(keymap); /* * Use a character by character parser so that we can examine each * character properly and so we don't parse passed the end of the string * if it ends too early. */ point = str; for (; *str != '\0'; ++str) { /* Read the next key */ if (*str == '^' && isCtrlKeymap) { if (!offset) { offset = 96; /* A single ^ means control */ continue; /* No new character */ } else { ch = '^'; /* A double ^ means ^ */ } } else if (*str >= 32 && *str < MAXASCII) { ch = *(str) + offset; } else { error = 1; ch = 1; } /* Have we read two keys yet? */ if (!left) { left = ch; } else if (error) { fprintf(stderr, "%s: Ignoring the %s entry `", defaults_file, keymapName); while (point <= str) { putc(*point, stderr); ++point; } fputs("'.\n\tUse 'ckeymap' to map control characters.\n", stderr); left = 0; point = str + 1; } else { keymap[left - 32] = ch; left = 0; point = str + 1; } offset = 0; /* Forget about ^ flag after each key is read */ } if (left || offset) { fprintf(stderr, "%s: %s ends halfway through a key definition\n", defaults_file, keymapName); } return keymap; } /* * Add a string of definitions to a buttonmap. */ static void AddStrToButtonMap(str, buttonmap) unsigned char *str; char *buttonmap; { int ind, offset, error; char *errString = "%s: buttonmap ends in the middle of a definition.\n"; while (*str != '\0') { /* * Set the flags. */ offset = 0; error = 0; /* * Get a number. */ ind = (*str) - '0'; if (ind > 9) ind = (*str) - 'a' + 10; if (ind < 1 || ind > 12) { fprintf(stderr, "%s: %c ignored in buttonmap\n", defaults_file, *str); error = 1; /* Allow error recovery */ } if(ind > 3) extended_mouse = 1; /* * Get a key to map to. */ offset = 0; if (*(++str) == '\0') { fprintf(stderr, errString, defaults_file); break; } if (*str == '^') { if (*(++str) == '\0') { fprintf(stderr, errString, defaults_file); break; } if (*str != '^') offset = 96; /* ^a is ctrl-a but ^^ is ^ */ } /* * Do the mapping if an error has not occured. */ if (!error) buttonmap[ind] = *str + offset; ++str; } } void initkeymaps() /* * Load a new set of keymaps. * * NOTE: The function will install a new set of keymaps, rather than * extending the old keymaps, if the defaults file is reloaded halfway * through a game. */ { unsigned char *str; register i; char buf[80]; /* * Create the default keymap first because the default keymap should be * the basis for ship specific keymaps. * * Don't call InitKeyMap(keymaps[KEYMAP_DEFAULT]) here because it should have * been called already in initDefaults so that the macro defintions could * be assigned. This is very nasty but what can you do. */ if ((str = (unsigned char *) getdefault("keymap")) != NULL) { keymaps[KEYMAP_DEFAULT] = AddStringToKeymap(str, keymaps[KEYMAP_DEFAULT], "keymap", 0); } #ifdef CONTROL_KEY if ((str = (unsigned char *) getdefault("ckeymap")) != NULL) { keymaps[KEYMAP_DEFAULT] = AddStringToKeymap(str, keymaps[KEYMAP_DEFAULT], "ckeymap", 1); } #endif /* * Now create a keymap for each ship type that requires it. */ for (i = NUM_TYPES - 1; i >= 0; --i) { if (keymaps[i]) keymaps[i] = InitKeyMap(keymaps[i]); sprintf(buf, "keymap-%s", classes[i]); if ((str = (unsigned char *) getdefault(buf)) != NULL) { keymaps[i] = AddStringToKeymap(str, keymaps[i], buf, 0); } #ifdef CONTROL_KEY sprintf(buf, "ckeymap-%s", classes[i]); if ((str = (unsigned char *) getdefault(buf)) != NULL) { keymaps[i] = AddStringToKeymap(str, keymaps[i], buf, 1); } #endif } /* * Now extend keymap with keymap-default and ckeymap-default. */ if ((str = (unsigned char *) getdefault("keymap-default")) != NULL) { keymaps[KEYMAP_DEFAULT] = AddStringToKeymap(str, keymaps[KEYMAP_DEFAULT], "keymap-default", 0); } #ifdef CONTROL_KEY if ((str = (unsigned char *) getdefault("ckeymap-default")) != NULL) { keymaps[KEYMAP_DEFAULT] = AddStringToKeymap(str, keymaps[KEYMAP_DEFAULT], "ckeymap-default", 1); } #endif #ifdef SHOW_DEFAULTS show_defaults("input-keymap", "keymap", "aabbcc", "Maps new keys to old keys. Format: ..."); show_defaults("input-keymap", "keymap-[sc,dd,ca,bb,sb]", "", "Ship-specific keymap extensions (default is keymap)."); show_defaults("input-keymap", "keymap-default", "", "keymap extension used if keymap- is not defined"); #endif #ifdef CONTROL_KEY /* COWlite */ #ifdef SHOW_DEFAULTS show_defaults("input-keymap", "ckeymap", "^a^a^b^b^c^c", "Control keys keymap. Format ...\n\ Any combination of normal keys and control keys can be mapped to one\n\ another. In other words, you can map from control key to control key\n\ control key to normal key, normal key to normal key, and normal key\n\ to control key.\n\ \n\ New format for ckeymap is:\n\ c = any printable ascii character.\n\ ^ = introduce control mapping (the key '^' not control + key.)\n\ \n\ Each entry is a pair, like:\n\ cc # regular format\n\ c^c # regular->control\n\ ^cc # control->regular\n\ ^c^c # control->control"); show_defaults("input-keymap", "ckeymap-[sc,dd,ca,bb,sb]", "", "Ship-specific control-key map extensions (default is ckeymap)"); show_defaults("input-keymap", "ckeymap-default", "", "ckeymap extension used if ckeymap- is not defined"); #endif #endif /* note: not stored on server */ for (i = 11; i >= 0; --i) /* Clear the current button map */ buttonmap[i] = '\0'; if ((str = (unsigned char *) getdefault("buttonmap")) != NULL) AddStrToButtonMap(str, buttonmap); #ifdef SHOW_DEFAULTS show_defaults("input", "buttonmap", "1t2p3k4%5q6#7u8c9iaTbyc;", "Maps buttons to key functions. Format: