[BACK]Return to mdport.c CVS log [TXT][DIR] Up to [contributed] / early-roguelike / rogue4

Annotation of early-roguelike/rogue4/mdport.c, Revision 1.1

1.1     ! rubenllo    1: /*
        !             2:     mdport.c - Machine Dependent
        !             3: 
        !             4:     Copyright (C) 2005-2008 Nicholas J. Kisseberth
        !             5:     All rights reserved.
        !             6: 
        !             7:     Redistribution and use in source and binary forms, with or without
        !             8:     modification, are permitted provided that the following conditions
        !             9:     are met:
        !            10:     1. Redistributions of source code must retain the above copyright
        !            11:        notice, this list of conditions and the following disclaimer.
        !            12:     2. Redistributions in binary form must reproduce the above copyright
        !            13:        notice, this list of conditions and the following disclaimer in the
        !            14:        documentation and/or other materials provided with the distribution.
        !            15:     3. Neither the name(s) of the author(s) nor the names of other contributors
        !            16:        may be used to endorse or promote products derived from this software
        !            17:        without specific prior written permission.
        !            18: 
        !            19:     THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) AND CONTRIBUTORS ``AS IS'' AND
        !            20:     ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
        !            21:     IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !            22:     ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR(S) OR CONTRIBUTORS BE LIABLE
        !            23:     FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !            24:     DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
        !            25:     OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
        !            26:     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
        !            27:     LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
        !            28:     OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
        !            29:     SUCH DAMAGE.
        !            30: */
        !            31: 
        !            32: #ifdef HAVE_CONFIG_H
        !            33: #include "config.h"
        !            34: #endif
        !            35: 
        !            36: #if defined(_WIN32)
        !            37: #include <Windows.h>
        !            38: #include <Lmcons.h>
        !            39: #include <shlobj.h>
        !            40: #include <sys/types.h>
        !            41: #include <io.h>
        !            42: #include <conio.h>
        !            43: #undef MOUSE_MOVED
        !            44: #elif defined(__DJGPP__)
        !            45: #include <process.h>
        !            46: #else
        !            47: #include <sys/wait.h>
        !            48: #endif
        !            49: 
        !            50: #ifdef HAVE_PWD_H
        !            51: #include <pwd.h>
        !            52: #endif
        !            53: #ifdef HAVE_UNISTD_H
        !            54: #include <unistd.h>
        !            55: #endif
        !            56: #ifdef HAVE_UTMPX_H
        !            57: #include <utmpx.h>
        !            58: #endif
        !            59: #ifdef HAVE_ARPA_INET_H
        !            60: #include <arpa/inet.h>
        !            61: #endif
        !            62: 
        !            63: #ifdef __INTERIX
        !            64: char *strdup(const char *s);
        !            65: #endif
        !            66: 
        !            67: #include <ctype.h>
        !            68: #include <stdlib.h>
        !            69: #include <string.h>
        !            70: #include <errno.h>
        !            71: 
        !            72: #if defined(_WIN32) && !defined(__MINGW32__)
        !            73: #define PATH_MAX MAX_PATH
        !            74: #endif
        !            75: 
        !            76: #include <curses.h>
        !            77: #ifdef HAVE_TERM_H
        !            78: #include <term.h>
        !            79: #endif
        !            80: 
        !            81: #if defined(_WIN32)
        !            82: #include <process.h>
        !            83: #endif
        !            84: 
        !            85: #include <stdio.h>
        !            86: #include <fcntl.h>
        !            87: #include <limits.h>
        !            88: #include <sys/stat.h>
        !            89: #include <signal.h>
        !            90: #include <time.h>
        !            91: 
        !            92: #define MOD_MOVE(c) (toupper(c) )
        !            93: 
        !            94: void
        !            95: md_init(void)
        !            96: {
        !            97: #ifdef __INTERIX
        !            98:     char *term;
        !            99: 
        !           100:     term = getenv("TERM");
        !           101: 
        !           102:     if (term == NULL)
        !           103:         setenv("TERM","interix",1);
        !           104: #endif
        !           105: #if defined(__DJGPP__) || defined(_WIN32)
        !           106:     _fmode = _O_BINARY;
        !           107: #endif
        !           108: #if defined(__CYGWIN__) || defined(__MSYS__)
        !           109:     ESCDELAY=250;
        !           110: #endif
        !           111: }
        !           112: 
        !           113: static int md_standout_mode = 0;
        !           114: 
        !           115: void
        !           116: md_raw_standout(void)
        !           117: {
        !           118: #ifdef _WIN32
        !           119:     CONSOLE_SCREEN_BUFFER_INFO csbiInfo; 
        !           120:     HANDLE hStdout;
        !           121:     int fgattr,bgattr;
        !           122: 
        !           123:     if (md_standout_mode == 0)
        !           124:     {
        !           125:         hStdout = GetStdHandle(STD_OUTPUT_HANDLE); 
        !           126:         GetConsoleScreenBufferInfo(hStdout, &csbiInfo);
        !           127:         fgattr = (csbiInfo.wAttributes & 0xF);
        !           128:         bgattr = (csbiInfo.wAttributes & 0xF0);
        !           129:         SetConsoleTextAttribute(hStdout,(fgattr << 4) | (bgattr >> 4));
        !           130:         md_standout_mode = 1;
        !           131:     }
        !           132: #elif defined(SO)
        !           133:     tputs(SO,0,putchar);
        !           134:     fflush(stdout);
        !           135: #endif
        !           136: }
        !           137: 
        !           138: void
        !           139: md_raw_standend(void)
        !           140: {
        !           141: #ifdef _WIN32
        !           142:     CONSOLE_SCREEN_BUFFER_INFO csbiInfo; 
        !           143:     HANDLE hStdout;
        !           144:     int fgattr,bgattr;
        !           145: 
        !           146:     if (md_standout_mode == 1)
        !           147:     {
        !           148:         hStdout = GetStdHandle(STD_OUTPUT_HANDLE); 
        !           149:         GetConsoleScreenBufferInfo(hStdout, &csbiInfo);
        !           150:         fgattr = (csbiInfo.wAttributes & 0xF);
        !           151:         bgattr = (csbiInfo.wAttributes & 0xF0);
        !           152:         SetConsoleTextAttribute(hStdout,(fgattr << 4) | (bgattr >> 4));
        !           153:         md_standout_mode = 0;
        !           154:     }
        !           155: #elif defined(SE)
        !           156:     tputs(SE,0,putchar);
        !           157:     fflush(stdout);
        !           158: #endif
        !           159: }
        !           160: 
        !           161: int
        !           162: md_unlink_open_file(char *file, FILE *inf)
        !           163: {
        !           164: #ifdef _WIN32
        !           165:     fclose(inf);
        !           166:     _chmod(file, 0600);
        !           167:     return( _unlink(file) );
        !           168: #else
        !           169:     return(unlink(file));
        !           170: #endif
        !           171: }
        !           172: 
        !           173: int
        !           174: md_unlink(char *file)
        !           175: {
        !           176: #ifdef _WIN32
        !           177:     _chmod(file, 0600);
        !           178:     return( _unlink(file) );
        !           179: #else
        !           180:     return(unlink(file));
        !           181: #endif
        !           182: }
        !           183: 
        !           184: FILE *
        !           185: md_fdopen(int fd, char *mode)
        !           186: {
        !           187: #ifdef _WIN32
        !           188:     return( _fdopen(fd, mode) );
        !           189: #else
        !           190:     return( fdopen(fd, mode) );
        !           191: #endif
        !           192: }
        !           193: 
        !           194: int
        !           195: md_fileno(FILE *fp)
        !           196: {
        !           197: #ifdef _WIN32
        !           198:     return( _fileno(fp) );
        !           199: #else
        !           200:     return( fileno(fp) );
        !           201: #endif
        !           202: }
        !           203: 
        !           204: int
        !           205: md_creat(char *file, int mode)
        !           206: {
        !           207:     int fd;
        !           208: #ifdef _WIN32
        !           209:     mode = _S_IREAD | _S_IWRITE;
        !           210:     fd = _open(file,O_CREAT | O_EXCL | O_WRONLY, mode);
        !           211: #else
        !           212:     fd = open(file,O_CREAT | O_EXCL | O_WRONLY, mode);
        !           213: #endif
        !           214: 
        !           215:     return(fd);
        !           216: }
        !           217: 
        !           218: 
        !           219: void
        !           220: md_normaluser(void)
        !           221: {
        !           222: #ifndef _WIN32
        !           223:     setuid(getuid());
        !           224:     setgid(getgid());
        !           225: #endif
        !           226: }
        !           227: 
        !           228: int
        !           229: md_getuid(void)
        !           230: {
        !           231: #ifndef _WIN32
        !           232:     return( getuid() );
        !           233: #else
        !           234:     return(42);
        !           235: #endif
        !           236: }
        !           237: 
        !           238: char *
        !           239: md_getusername(int uid)
        !           240: {
        !           241:     static char login[80];
        !           242:     char *l = NULL;
        !           243: 
        !           244:     /* POSIX Shell has priority, then O/S specific methods */
        !           245:     if ( (uid == md_getuid()) && ((l = getenv("LOGNAME")) != NULL) )
        !           246:     {
        !           247:         strncpy(login,l,80);
        !           248:         login[79] = 0;
        !           249:         return(login);
        !           250:     }
        !           251: 
        !           252: #ifdef _WIN32
        !           253:     LPSTR mybuffer;
        !           254:     DWORD size = UNLEN + 1;
        !           255:     TCHAR buffer[UNLEN + 1];
        !           256: 
        !           257:     mybuffer = buffer;
        !           258:     if (uid != md_getuid())
        !           259:        strcpy(mybuffer, "someone");
        !           260:     else
        !           261:        GetUserName(mybuffer,&size);
        !           262:     l = mybuffer;
        !           263: #endif
        !           264: #if !defined(_WIN32) && !defined(DJGPP)
        !           265:     struct passwd *pw;
        !           266: 
        !           267:     pw = getpwuid(getuid());
        !           268:     if (pw != NULL)
        !           269:         l = pw->pw_name;
        !           270:     else
        !           271:         l = NULL;
        !           272: #endif
        !           273: 
        !           274:     if ((l == NULL) || (*l == '\0'))
        !           275:         if ( (l = getenv("USERNAME")) == NULL )
        !           276:                 if ( (l = getenv("USER")) == NULL )
        !           277:                     l = "nobody";
        !           278: 
        !           279:     strncpy(login,l,80);
        !           280:     login[79] = 0;
        !           281: 
        !           282:     return(login);
        !           283: }
        !           284: 
        !           285: char *
        !           286: md_gethomedir(void)
        !           287: {
        !           288:     static char homedir[PATH_MAX];
        !           289:     char *h = NULL;
        !           290:     size_t len;
        !           291: #if defined(_WIN32)
        !           292:     TCHAR szPath[PATH_MAX];
        !           293: #endif
        !           294: #if defined(_WIN32) || defined(DJGPP)
        !           295:     char slash = '\\';
        !           296: #else
        !           297:     char slash = '/';
        !           298:     struct passwd *pw;
        !           299:     pw = getpwuid(getuid());
        !           300:     if (pw != NULL)
        !           301:         h = pw->pw_dir;
        !           302:     else
        !           303:         h = "";
        !           304: 
        !           305:     if (strcmp(h,"/") == 0)
        !           306:         h = NULL;
        !           307: #endif
        !           308:     homedir[0] = 0;
        !           309: #ifdef _WIN32
        !           310:     if(SUCCEEDED(SHGetFolderPath(NULL, CSIDL_PERSONAL, NULL, 0, szPath)))
        !           311:         h = szPath;
        !           312: #endif
        !           313: 
        !           314:     if ( (h == NULL) || (*h == '\0') )
        !           315:         if ( (h = getenv("HOME")) == NULL )
        !           316:                 h = "";
        !           317: 
        !           318:     strncpy(homedir,h,PATH_MAX-1);
        !           319:     len = strlen(homedir);
        !           320: 
        !           321:     if ((len > 0) && (homedir[len-1] == slash))
        !           322:        homedir[len-1] = 0;
        !           323: 
        !           324:     return(homedir);
        !           325: }
        !           326: 
        !           327: void
        !           328: md_sleep(int s)
        !           329: {
        !           330: #ifdef _WIN32
        !           331:     Sleep(s);
        !           332: #else
        !           333:     sleep(s);
        !           334: #endif
        !           335: }
        !           336: 
        !           337: char *
        !           338: md_getshell(void)
        !           339: {
        !           340:     static char shell[PATH_MAX];
        !           341:     char *s = NULL;
        !           342: #ifdef _WIN32
        !           343:     char *def = "C:\\WINDOWS\\SYSTEM32\\CMD.EXE";
        !           344: #elif defined(__DJGPP__)
        !           345:     char *def = "C:\\COMMAND.COM";
        !           346: #else
        !           347:     char *def = "/bin/sh";
        !           348:     struct passwd *pw;
        !           349:     pw = getpwuid(getuid());
        !           350:     if (pw != NULL)
        !           351:         s = pw->pw_shell;
        !           352:     else
        !           353:         s = NULL;
        !           354: #endif
        !           355:     if ((s == NULL) || (*s == '\0'))
        !           356:         if ( (s = getenv("COMSPEC")) == NULL)
        !           357:             if ( (s = getenv("SHELL")) == NULL)
        !           358:                 if ( (s = getenv("SystemRoot")) == NULL)
        !           359:                     s = def;
        !           360: 
        !           361:     strncpy(shell,s,PATH_MAX);
        !           362:     shell[PATH_MAX-1] = 0;
        !           363: 
        !           364:     return(shell);
        !           365: }
        !           366: 
        !           367: void
        !           368: md_ignore_signals(void)
        !           369: {
        !           370: #ifndef _WIN32
        !           371:     int i;
        !           372:     for (i = 0; i < NSIG; i++)
        !           373:         signal(i, SIG_IGN);
        !           374: #else
        !           375:     signal(SIGABRT, SIG_IGN);
        !           376:     signal(SIGFPE, SIG_IGN);
        !           377:     signal(SIGILL, SIG_IGN);
        !           378:     signal(SIGINT, SIG_IGN);
        !           379:     signal(SIGSEGV, SIG_IGN);
        !           380:     signal(SIGTERM, SIG_IGN);
        !           381: #endif
        !           382: }
        !           383: 
        !           384: int
        !           385: md_shellescape(void)
        !           386: {
        !           387: #if (!defined(_WIN32) && !defined(__DJGPP__))
        !           388:     int ret_status;
        !           389:     int pid;
        !           390:     void (*myquit)(int);
        !           391:     void (*myend)(int);
        !           392: #endif
        !           393:     char *sh;
        !           394: 
        !           395:     sh = md_getshell();
        !           396: 
        !           397: #if defined(_WIN32)
        !           398:     return((int)_spawnl(_P_WAIT,sh,"shell",NULL,0));
        !           399: #elif defined(__DJGPP__)
        !           400:     return ( spawnl(P_WAIT,sh,"shell",NULL,0) );
        !           401: #else
        !           402:     while((pid = fork()) < 0)
        !           403:         sleep(1);
        !           404: 
        !           405:     if (pid == 0) /* Shell Process */
        !           406:     {
        !           407:         /*
        !           408:          * Set back to original user, just in case
        !           409:          */
        !           410:         setuid(getuid());
        !           411:         setgid(getgid());
        !           412:         execl(sh == NULL ? "/bin/sh" : sh, "shell", "-i", 0);
        !           413:         perror("No shelly");
        !           414:         _exit(-1);
        !           415:     }
        !           416:     else /* Application */
        !           417:     {
        !           418:        myend = signal(SIGINT, SIG_IGN);
        !           419: #ifdef SIGQUIT
        !           420:         myquit = signal(SIGQUIT, SIG_IGN);
        !           421: #endif  
        !           422:         while (wait(&ret_status) != pid)
        !           423:             continue;
        !           424:            
        !           425:         signal(SIGINT, myend);
        !           426: #ifdef SIGQUIT
        !           427:         signal(SIGQUIT, myquit);
        !           428: #endif
        !           429:     }
        !           430: 
        !           431:     return(ret_status);
        !           432: #endif
        !           433: }
        !           434: 
        !           435: char *
        !           436: md_getrealname(int uid)
        !           437: {
        !           438:     static char uidstr[20];
        !           439: #if !defined(_WIN32) && !defined(DJGPP)
        !           440:     struct passwd *pp;
        !           441: 
        !           442:        if ((pp = getpwuid(uid)) == NULL)
        !           443:     {
        !           444:         sprintf(uidstr,"%d", uid);
        !           445:         return(uidstr);
        !           446:     }
        !           447:        else
        !           448:            return(pp->pw_name);
        !           449: #else
        !           450:    sprintf(uidstr,"%d", uid);
        !           451:    return(uidstr);
        !           452: #endif
        !           453: }
        !           454: 
        !           455: extern char *xcrypt(const char *key, const char *setting);
        !           456: 
        !           457: char *
        !           458: md_crypt(char *key, char *salt)
        !           459: {
        !           460:     return( xcrypt(key,salt) );
        !           461: }
        !           462: 
        !           463: char *
        !           464: md_getpass(char *prompt)
        !           465: {
        !           466: #ifdef _WIN32
        !           467:     static char password_buffer[9];
        !           468:     char *p = password_buffer;
        !           469:     int c, count = 0;
        !           470:     int max_length = 9;
        !           471: 
        !           472:     fflush(stdout);
        !           473:     /* If we can't prompt, abort */
        !           474:     if (fputs(prompt, stderr) < 0)
        !           475:     {
        !           476:         *p = '\0';
        !           477:         return NULL;
        !           478:     }
        !           479: 
        !           480:     for(;;)
        !           481:     {
        !           482:         /* Get a character with no echo */
        !           483:         c = _getch();
        !           484: 
        !           485:         /* Exit on interrupt (^c or ^break) */
        !           486:         if (c == '\003' || c == 0x100)
        !           487:             exit(1);
        !           488: 
        !           489:         /* Terminate on end of line or file (^j, ^m, ^d, ^z) */
        !           490:         if (c == '\r' || c == '\n' || c == '\004' || c == '\032')
        !           491:             break;
        !           492: 
        !           493:         /* Back up on backspace */
        !           494:         if (c == '\b')
        !           495:         {
        !           496:             if (count)
        !           497:                 count--;
        !           498:             else if (p > password_buffer)
        !           499:                 p--;
        !           500:             continue;
        !           501:         }
        !           502: 
        !           503:         /* Ignore DOS extended characters */
        !           504:         if ((c & 0xff) != c)
        !           505:             continue;
        !           506: 
        !           507:         /* Add to password if it isn't full */
        !           508:         if (p < password_buffer + max_length - 1)
        !           509:             *p++ = c;
        !           510:         else
        !           511:             count++;
        !           512:     }
        !           513:    *p = '\0';
        !           514: 
        !           515:    fputc('\n', stderr);
        !           516: 
        !           517:    return password_buffer;
        !           518: #else
        !           519:    return( (char *) getpass(prompt) );
        !           520: #endif
        !           521: }
        !           522: 
        !           523: 
        !           524: int md_endian = 0x01020304;
        !           525: 
        !           526: unsigned long int
        !           527: md_ntohl(unsigned long int x)
        !           528: {
        !           529: #ifndef HAVE_ARPA_INET_H
        !           530:     if ( *((char *)&md_endian) == 0x01 )
        !           531:         return(x);
        !           532:     else
        !           533:         return( ((x & 0x000000ffU) << 24) |
        !           534:                 ((x & 0x0000ff00U) <<  8) |
        !           535:                 ((x & 0x00ff0000U) >>  8) |
        !           536:                 ((x & 0xff000000U) >> 24) );
        !           537: #else
        !           538:     return( ntohl(x) );
        !           539: #endif
        !           540: }
        !           541: 
        !           542: unsigned long int
        !           543: md_htonl(unsigned long int x)
        !           544: {
        !           545: #ifndef HAVE_ARPA_INET_H
        !           546:     if ( *((char *)&md_endian) == 0x01 )
        !           547:         return(x);
        !           548:     else
        !           549:         return( ((x & 0x000000ffU) << 24) |
        !           550:                 ((x & 0x0000ff00U) <<  8) |
        !           551:                 ((x & 0x00ff0000U) >>  8) |
        !           552:                 ((x & 0xff000000U) >> 24) );
        !           553: #else
        !           554:     return( htonl(x) );
        !           555: #endif
        !           556: }
        !           557: 
        !           558: int
        !           559: md_ucount(void)
        !           560: {
        !           561: #ifdef __DJGPP__
        !           562:     return(1);
        !           563: #elif defined(_WIN32)
        !           564:     return(1);
        !           565: #else
        !           566:     struct utmpx *up=NULL;
        !           567:     int count=0;
        !           568: 
        !           569:     setutxent();    
        !           570:     do
        !           571:     {
        !           572:        up = getutxent();
        !           573:        if (up && up->ut_type == USER_PROCESS)
        !           574:            count++;
        !           575:     } while(up != NULL);
        !           576:    
        !           577:    endutxent();
        !           578: 
        !           579:    return(count);
        !           580: #endif
        !           581: }
        !           582: 
        !           583: int
        !           584: md_getloadavg(double *avg)
        !           585: {
        !           586: #if defined(__GLIBC__) || defined(_BSD)
        !           587:     if (getloadavg(avg, 3) == -1)
        !           588: #endif
        !           589:     {
        !           590:        avg[0] = avg[1] = avg[2] = 0.0;
        !           591:        return -1;
        !           592:     }
        !           593: }
        !           594: 
        !           595: long
        !           596: md_random(void)
        !           597: {
        !           598: #ifdef _WIN32
        !           599:     return(rand());
        !           600: #else
        !           601:     return( random() );
        !           602: #endif
        !           603: }
        !           604: 
        !           605: void
        !           606: md_srandom(unsigned x)
        !           607: {
        !           608: #ifdef _WIN32
        !           609:     srand(x);
        !           610: #else
        !           611:     srandom(x);
        !           612: #endif
        !           613: }
        !           614: 
        !           615: int
        !           616: md_rand(void)
        !           617: {
        !           618: #ifdef _WIN32
        !           619:     return(rand());
        !           620: #else
        !           621:     return(lrand48() & 0x7fffffff);
        !           622: #endif
        !           623: }
        !           624: 
        !           625: void
        !           626: md_srand(int seed)
        !           627: {
        !           628: #ifdef _WIN32
        !           629:     srand(seed);
        !           630: #else
        !           631:     srand48(seed);
        !           632: #endif
        !           633: }
        !           634: 
        !           635: char *
        !           636: md_strdup(const char *s)
        !           637: {
        !           638: #ifdef _WIN32
        !           639:     return( _strdup(s) );
        !           640: #else
        !           641:     return(strdup(s));
        !           642: #endif
        !           643: }
        !           644: 
        !           645: long
        !           646: md_memused(void)
        !           647: {
        !           648: #ifdef _WIN32
        !           649:     MEMORYSTATUS stat;
        !           650: 
        !           651:     GlobalMemoryStatus(&stat);
        !           652: 
        !           653:     return((long)stat.dwTotalPageFile);
        !           654: #else
        !           655:     return( (long)sbrk(0) );
        !           656: #endif
        !           657: }
        !           658: 
        !           659: int
        !           660: md_erasechar(void)
        !           661: {
        !           662: #ifdef BSD
        !           663:     return(_tty.sg_erase); /* process erase character */
        !           664: #elif defined(USG5_0)
        !           665:     return(_tty.c_cc[VERASE]); /* process erase character */
        !           666: #else /* USG5_2 .... curses */
        !           667:     return( erasechar() ); /* process erase character */
        !           668: #endif
        !           669: }
        !           670: 
        !           671: int
        !           672: md_killchar(void)
        !           673: {
        !           674: #ifdef BSD
        !           675:     return(_tty.sg_kill);
        !           676: #elif defined(USG5_0)
        !           677:     return(_tty.c_cc[VKILL]);
        !           678: #else /* USG5_2 ..... curses */
        !           679:     return( killchar() );
        !           680: #endif
        !           681: }
        !           682: 
        !           683: /*
        !           684:  * unctrl:
        !           685:  *     Print a readable version of a certain character
        !           686:  */
        !           687: 
        !           688: char *
        !           689: md_unctrl(char ch)
        !           690: {
        !           691: #if USG5_0
        !           692:     extern char *_unctrl[];            /* Defined in curses library */
        !           693: 
        !           694:     return _unctrl[ch&0177];
        !           695: #else
        !           696:     return( (char *) unctrl(ch) );
        !           697: #endif
        !           698: }
        !           699: 
        !           700: void
        !           701: md_flushinp(void)
        !           702: {
        !           703: #ifdef BSD
        !           704:     ioctl(0, TIOCFLUSH);
        !           705: #elif defined(USG5_0)
        !           706:     ioctl(_tty_ch,TCFLSH,0)
        !           707: #else /* USG5_2.... curses */
        !           708:     flushinp();
        !           709: #endif
        !           710: }
        !           711: 
        !           712: /*
        !           713:     Cursor/Keypad Support
        !           714: 
        !           715:     Sadly Cursor/Keypad support is less straightforward than it should be.
        !           716: 
        !           717:     The various terminal emulators/consoles choose to differentiate the
        !           718:     cursor and keypad keys (with modifiers) in different ways (if at all!).
        !           719:     Furthermore they use different code set sequences for each key only
        !           720:     a subset of which the various curses libraries recognize. Partly due
        !           721:     to incomplete termcap/terminfo entries and partly due to inherent
        !           722:     limitations of those terminal capability databases.
        !           723: 
        !           724:     I give curses first crack at decoding the sequences. If it fails to decode
        !           725:     it we check for common ESC-prefixed sequences.
        !           726: 
        !           727:     All cursor/keypad results are translated into standard rogue movement
        !           728:     commands.
        !           729: 
        !           730:     Unmodified keys are translated to walk commands: hjklyubn
        !           731:     Modified (shift,control,alt) are translated to run commands: HJKLYUBN
        !           732: 
        !           733:     Console and supported (differentiated) keys
        !           734:     Interix:  Cursor Keys, Keypad, Ctl-Keypad
        !           735:     Cygwin:   Cursor Keys, Keypad, Alt-Cursor Keys
        !           736:     MSYS:     Cursor Keys, Keypad, Ctl-Cursor Keys, Ctl-Keypad
        !           737:     Win32:    Cursor Keys, Keypad, Ctl/Shift/Alt-Cursor Keys, Ctl/Alt-Keypad
        !           738:     DJGPP:    Cursor Keys, Keypad, Ctl/Shift/Alt-Cursor Keys, Ctl/Alt-Keypad
        !           739: 
        !           740:     Interix Console (raw, ncurses)
        !           741:     ==============================
        !           742:     normal      shift           ctrl        alt
        !           743:     ESC [D,     ESC F^,         ESC [D,     ESC [D          /# Left         #/
        !           744:     ESC [C,     ESC F$,         ESC [C,     ESC [C          /# Right        #/
        !           745:     ESC [A,     ESC F-,         local win,  ESC [A          /# Up           #/
        !           746:     ESC [B,     ESC F+,         local win,  ESC [B          /# Down         #/
        !           747:     ESC [H,     ESC [H,         ESC [H,     ESC [H          /# Home         #/
        !           748:     ESC [S,     local win,      ESC [S,     ESC [S          /# Page Up      #/
        !           749:     ESC [T,     local win,      ESC [T,     ESC [T          /# Page Down    #/
        !           750:     ESC [U,     ESC [U,         ESC [U,     ESC [U          /# End          #/
        !           751:     ESC [D,     ESC F^,         ESC [D,     O               /# Keypad Left  #/
        !           752:     ESC [C,     ESC F$,         ESC [C,     O               /# Keypad Right #/
        !           753:     ESC [A,     ESC [A,         ESC [-1,    O               /# Keypad Up    #/
        !           754:     ESC [B,     ESC [B,         ESC [-2,    O               /# Keypad Down  #/
        !           755:     ESC [H,     ESC [H,         ESC [-263,  O               /# Keypad Home  #/
        !           756:     ESC [S,     ESC [S,         ESC [-19,   O               /# Keypad PgUp  #/
        !           757:     ESC [T,     ESC [T,         ESC [-20,   O               /# Keypad PgDn  #/
        !           758:     ESC [U,     ESC [U,         ESC [-21,   O               /# Keypad End   #/
        !           759:     nothing,    nothing,        nothing,    O               /# Kaypad 5     #/
        !           760: 
        !           761:     Interix Console (term=interix, ncurses)
        !           762:     ==============================
        !           763:     KEY_LEFT,   ESC F^,         KEY_LEFT,   KEY_LEFT        /# Left         #/
        !           764:     KEY_RIGHT,  ESC F$,         KEY_RIGHT,  KEY_RIGHT       /# Right        #/
        !           765:     KEY_UP,     0x146,          local win,  KEY_UP          /# Up           #/
        !           766:     KEY_DOWN,   0x145,          local win,  KEY_DOWN        /# Down         #/
        !           767:     ESC [H,     ESC [H,         ESC [H,     ESC [H          /# Home         #/
        !           768:     KEY_PPAGE,  local win,      KEY_PPAGE,  KEY_PPAGE       /# Page Up      #/
        !           769:     KEY_NPAGE,  local win,      KEY_NPAGE,  KEY_NPAGE       /# Page Down    #/
        !           770:     KEY_LL,     KEY_LL,         KEY_LL,     KEY_LL          /# End          #/
        !           771:     KEY_LEFT,   ESC F^,         ESC [-4,    O               /# Keypad Left  #/
        !           772:     KEY_RIGHT,  ESC F$,         ESC [-3,    O               /# Keypad Right #/
        !           773:     KEY_UP,     KEY_UP,         ESC [-1,    O               /# Keypad Up    #/
        !           774:     KEY_DOWN,   KEY_DOWN,       ESC [-2,    O               /# Keypad Down  #/
        !           775:     ESC [H,     ESC [H,         ESC [-263,  O               /# Keypad Home  #/
        !           776:     KEY_PPAGE,  KEY_PPAGE,      ESC [-19,   O               /# Keypad PgUp  #/
        !           777:     KEY_NPAGE,  KEY_NPAGE,      ESC [-20,   O               /# Keypad PgDn  #/
        !           778:     KEY_LL,     KEY_LL,         ESC [-21,   O               /# Keypad End   #/
        !           779:     nothing,    nothing,        nothing,    O               /# Keypad 5     #/
        !           780: 
        !           781:     Cygwin Console (raw, ncurses)
        !           782:     ==============================
        !           783:     normal      shift           ctrl        alt
        !           784:     ESC [D,     ESC [D,         ESC [D,     ESC ESC [D      /# Left         #/
        !           785:     ESC [C,     ESC [C,         ESC [C,     ESC ESC [C      /# Rght         #/
        !           786:     ESC [A,     ESC [A,         ESC [A,     ESC ESC [A      /# Up           #/
        !           787:     ESC [B,     ESC [B,         ESC [B,     ESC ESC [B      /# Down         #/
        !           788:     ESC [1~,    ESC [1~,        ESC [1~,    ESC ESC [1~     /# Home         #/
        !           789:     ESC [5~,    ESC [5~,        ESC [5~,    ESC ESC [5~     /# Page Up      #/
        !           790:     ESC [6~,    ESC [6~,        ESC [6~,    ESC ESC [6~     /# Page Down    #/
        !           791:     ESC [4~,    ESC [4~,        ESC [4~,    ESC ESC [4~     /# End          #/
        !           792:     ESC [D,     ESC [D,         ESC [D,     ESC ESC [D,O    /# Keypad Left  #/
        !           793:     ESC [C,     ESC [C,         ESC [C,     ESC ESC [C,O    /# Keypad Right #/
        !           794:     ESC [A,     ESC [A,         ESC [A,     ESC ESC [A,O    /# Keypad Up    #/
        !           795:     ESC [B,     ESC [B,         ESC [B,     ESC ESC [B,O    /# Keypad Down  #/
        !           796:     ESC [1~,    ESC [1~,        ESC [1~,    ESC ESC [1~,O   /# Keypad Home  #/
        !           797:     ESC [5~,    ESC [5~,        ESC [5~,    ESC ESC [5~,O   /# Keypad PgUp  #/
        !           798:     ESC [6~,    ESC [6~,        ESC [6~,    ESC ESC [6~,O   /# Keypad PgDn  #/
        !           799:     ESC [4~,    ESC [4~,        ESC [4~,    ESC ESC [4~,O   /# Keypad End   #/
        !           800:     ESC [-71,   nothing,        nothing,    O               /# Keypad 5     #/
        !           801: 
        !           802:     Cygwin Console (term=cygwin, ncurses)
        !           803:     ==============================
        !           804:     KEY_LEFT,   KEY_LEFT,       KEY_LEFT,   ESC-260         /# Left         #/
        !           805:     KEY_RIGHT,  KEY_RIGHT,      KEY_RIGHT,  ESC-261         /# Rght         #/
        !           806:     KEY_UP,     KEY_UP,         KEY_UP,     ESC-259         /# Up           #/
        !           807:     KEY_DOWN,   KEY_DOWN,       KEY_DOWN,   ESC-258         /# Down         #/
        !           808:     KEY_HOME,   KEY_HOME,       KEY_HOME,   ESC-262         /# Home         #/
        !           809:     KEY_PPAGE,  KEY_PPAGE,      KEY_PPAGE,  ESC-339         /# Page Up      #/
        !           810:     KEY_NPAGE,  KEY_NPAGE,      KEY_NPAGE,  ESC-338         /# Page Down    #/
        !           811:     KEY_END,    KEY_END,        KEY_END,    ESC-360         /# End          #/
        !           812:     KEY_LEFT,   KEY_LEFT,       KEY_LEFT,   ESC-260,O       /# Keypad Left  #/
        !           813:     KEY_RIGHT,  KEY_RIGHT,      KEY_RIGHT,  ESC-261,O       /# Keypad Right #/
        !           814:     KEY_UP,     KEY_UP,         KEY_UP,     ESC-259,O       /# Keypad Up    #/
        !           815:     KEY_DOWN,   KEY_DOWN,       KEY_DOWN,   ESC-258,O       /# Keypad Down  #/
        !           816:     KEY_HOME,   KEY_HOME,       KEY_HOME,   ESC-262,O       /# Keypad Home  #/
        !           817:     KEY_PPAGE,  KEY_PPAGE,      KEY_PPAGE,  ESC-339,O       /# Keypad PgUp  #/
        !           818:     KEY_NPAGE,  KEY_NPAGE,      KEY_NPAGE,  ESC-338,O       /# Keypad PgDn  #/
        !           819:     KEY_END,    KEY_END,        KEY_END,    ESC-360,O       /# Keypad End   #/
        !           820:     ESC [G,     nothing,        nothing,    O               /# Keypad 5     #/
        !           821: 
        !           822:     MSYS Console (raw, ncurses)
        !           823:     ==============================
        !           824:     normal      shift           ctrl        alt
        !           825:     ESC OD,     ESC [d,         ESC Od      nothing         /# Left         #/
        !           826:     ESC OE,     ESC [e,         ESC Oe,     nothing         /# Right        #/
        !           827:     ESC OA,     ESC [a,         ESC Oa,     nothing         /# Up           #/
        !           828:     ESC OB,     ESC [b,         ESC Ob,     nothing         /# Down         #/
        !           829:     ESC [7~,    ESC [7$,        ESC [7^,    nothing         /# Home         #/
        !           830:     ESC [5~,    local window,   ESC [5^,    nothing         /# Page Up      #/
        !           831:     ESC [6~,    local window,   ESC [6^,    nothing         /# Page Down    #/
        !           832:     ESC [8~,    ESC [8$,        ESC [8^,    nothing         /# End          #/
        !           833:     ESC OD,     ESC [d,         ESC Od      O               /# Keypad Left  #/
        !           834:     ESC OE,     ESC [c,         ESC Oc,     O               /# Keypad Right #/
        !           835:     ESC OA,     ESC [a,         ESC Oa,     O               /# Keypad Up    #/
        !           836:     ESC OB,     ESC [b,         ESC Ob,     O               /# Keypad Down  #/
        !           837:     ESC [7~,    ESC [7$,        ESC [7^,    O               /# Keypad Home  #/
        !           838:     ESC [5~,    local window,   ESC [5^,    O               /# Keypad PgUp  #/
        !           839:     ESC [6~,    local window,   ESC [6^,    O               /# Keypad PgDn  #/
        !           840:     ESC [8~,    ESC [8$,        ESC [8^,    O               /# Keypad End   #/
        !           841:     11,         11,             11,         O               /# Keypad 5     #/
        !           842: 
        !           843:     MSYS Console (term=rxvt, ncurses)
        !           844:     ==============================
        !           845:     normal      shift           ctrl        alt
        !           846:     KEY_LEFT,   KEY_SLEFT,      514         nothing         /# Left         #/
        !           847:     KEY_RIGHT,  KEY_SRIGHT,     516,        nothing         /# Right        #/
        !           848:     KEY_UP,     518,            519,        nothing         /# Up           #/
        !           849:     KEY_DOWN,   511,            512,        nothing         /# Down         #/
        !           850:     KEY_HOME,   KEY_SHOME,      ESC [7^,    nothing         /# Home         #/
        !           851:     KEY_PPAGE,  local window,   ESC [5^,    nothing         /# Page Up      #/
        !           852:     KEY_NPAGE,  local window,   ESC [6^,    nothing         /# Page Down    #/
        !           853:     KEY_END,    KEY_SEND,       KEY_EOL,    nothing         /# End          #/
        !           854:     KEY_LEFT,   KEY_SLEFT,      514         O               /# Keypad Left  #/
        !           855:     KEY_RIGHT,  KEY_SRIGHT,     516,        O               /# Keypad Right #/
        !           856:     KEY_UP,     518,            519,        O               /# Keypad Up    #/
        !           857:     KEY_DOWN,   511,            512,        O               /# Keypad Down  #/
        !           858:     KEY_HOME,   KEY_SHOME,      ESC [7^,    O               /# Keypad Home  #/
        !           859:     KEY_PPAGE,  local window,   ESC [5^,    O               /# Keypad PgUp  #/
        !           860:     KEY_NPAGE,  local window,   ESC [6^,    O               /# Keypad PgDn  #/
        !           861:     KEY_END,    KEY_SEND,       KEY_EOL,    O               /# Keypad End   #/
        !           862:     11,         11,             11,         O               /# Keypad 5     #/
        !           863: 
        !           864:     Win32 Console (raw, pdcurses)
        !           865:    DJGPP Console (raw, pdcurses)
        !           866:    ==============================
        !           867:    normal      shift           ctrl        alt
        !           868:    260,        391,            443,        493             /# Left         #/
        !           869:    261,        400,            444,        492             /# Right        #/
        !           870:    259,        547,            480,        490             /# Up           #/
        !           871:    258,        548,            481,        491             /# Down         #/
        !           872:    262,        388,            447,        524             /# Home         #/
        !           873:    339,        396,            445,        526             /# Page Up      #/
        !           874:    338,        394,            446,        520             /# Page Down    #/
        !           875:    358,        384,            448,        518             /# End          #/
        !           876:    452,        52('4'),        511,        521             /# Keypad Left  #/
        !           877:    454,        54('6'),        513,        523             /# Keypad Right #/
        !           878:    450,        56('8'),        515,        525             /# Keypad Up    #/
        !           879:    456,        50('2'),        509,        519             /# Keypad Down  #/
        !           880:    449,        55('7'),        514,        524             /# Keypad Home  #/
        !           881:    451,        57('9'),        516,        526             /# Keypad PgUp  #/
        !           882:    457,        51('3'),        510,        520             /# Keypad PgDn  #/
        !           883:    455,        49('1'),        508,        518             /# Keypad End   #/
        !           884:    453,        53('5'),        512,        522             /# Keypad 5     #/
        !           885: 
        !           886:    Win32 Console (pdcurses, MSVC/MingW32)
        !           887:    DJGPP Console (pdcurses)
        !           888:    ==============================
        !           889:    normal      shift           ctrl        alt
        !           890:    KEY_LEFT,   KEY_SLEFT,      CTL_LEFT,   ALT_LEFT        /# Left         #/
        !           891:    KEY_RIGHT,  KEY_SRIGHT,     CTL_RIGHT,  ALT_RIGHT       /# Right        #/
        !           892:    KEY_UP,     KEY_SUP,        CTL_UP,     ALT_UP          /# Up           #/
        !           893:    KEY_DOWN,   KEY_SDOWN,      CTL_DOWN,   ALT_DOWN        /# Down         #/
        !           894:    KEY_HOME,   KEY_SHOME,      CTL_HOME,   ALT_HOME        /# Home         #/
        !           895:    KEY_PPAGE,  KEY_SPREVIOUS,  CTL_PGUP,   ALT_PGUP        /# Page Up      #/
        !           896:    KEY_NPAGE,  KEY_SNEXTE,     CTL_PGDN,   ALT_PGDN        /# Page Down    #/
        !           897:    KEY_END,    KEY_SEND,       CTL_END,    ALT_END         /# End          #/
        !           898:    KEY_B1,     52('4'),        CTL_PAD4,   ALT_PAD4        /# Keypad Left  #/
        !           899:    KEY_B3,     54('6'),        CTL_PAD6,   ALT_PAD6        /# Keypad Right #/
        !           900:    KEY_A2,     56('8'),        CTL_PAD8,   ALT_PAD8        /# Keypad Up    #/
        !           901:    KEY_C2,     50('2'),        CTL_PAD2,   ALT_PAD2        /# Keypad Down  #/
        !           902:    KEY_A1,     55('7'),        CTL_PAD7,   ALT_PAD7        /# Keypad Home  #/
        !           903:    KEY_A3,     57('9'),        CTL_PAD9,   ALT_PAD9        /# Keypad PgUp  #/
        !           904:    KEY_C3,     51('3'),        CTL_PAD3,   ALT_PAD3        /# Keypad PgDn  #/
        !           905:    KEY_C1,     49('1'),        CTL_PAD1,   ALT_PAD1        /# Keypad End   #/
        !           906:    KEY_B2,     53('5'),        CTL_PAD5,   ALT_PAD5        /# Keypad 5     #/
        !           907: 
        !           908:    Windows Telnet (raw)
        !           909:    ==============================
        !           910:    normal      shift           ctrl        alt
        !           911:    ESC [D,     ESC [D,         ESC [D,     ESC [D          /# Left         #/
        !           912:    ESC [C,     ESC [C,         ESC [C,     ESC [C          /# Right        #/
        !           913:    ESC [A,     ESC [A,         ESC [A,     ESC [A          /# Up           #/
        !           914:    ESC [B,     ESC [B,         ESC [B,     ESC [B          /# Down         #/
        !           915:    ESC [1~,    ESC [1~,        ESC [1~,    ESC [1~         /# Home         #/
        !           916:    ESC [5~,    ESC [5~,        ESC [5~,    ESC [5~         /# Page Up      #/
        !           917:    ESC [6~,    ESC [6~,        ESC [6~,    ESC [6~         /# Page Down    #/
        !           918:    ESC [4~,    ESC [4~,        ESC [4~,    ESC [4~         /# End          #/
        !           919:    ESC [D,     ESC [D,         ESC [D,     ESC [D          /# Keypad Left  #/
        !           920:    ESC [C,     ESC [C,         ESC [C,     ESC [C          /# Keypad Right #/
        !           921:    ESC [A,     ESC [A,         ESC [A,     ESC [A          /# Keypad Up    #/
        !           922:    ESC [B,     ESC [B,         ESC [B,     ESC [B          /# Keypad Down  #/
        !           923:    ESC [1~,    ESC [1~,        ESC [1~,    ESC [1~         /# Keypad Home  #/
        !           924:    ESC [5~,    ESC [5~,        ESC [5~,    ESC [5~         /# Keypad PgUp  #/
        !           925:    ESC [6~,    ESC [6~,        ESC [6~,    ESC [6~         /# Keypad PgDn  #/
        !           926:    ESC [4~,    ESC [4~,        ESC [4~,    ESC [4~         /# Keypad End   #/
        !           927:    nothing,    nothing,        nothing,    nothing         /# Keypad 5     #/
        !           928: 
        !           929:    Windows Telnet (term=xterm)
        !           930:    ==============================
        !           931:    normal      shift           ctrl        alt
        !           932:    KEY_LEFT,   KEY_LEFT,       KEY_LEFT,   KEY_LEFT        /# Left         #/
        !           933:    KEY_RIGHT,  KEY_RIGHT,      KEY_RIGHT,  KEY_RIGHT       /# Right        #/
        !           934:    KEY_UP,     KEY_UP,         KEY_UP,     KEY_UP          /# Up           #/
        !           935:    KEY_DOWN,   KEY_DOWN,       KEY_DOWN,   KEY_DOWN        /# Down         #/
        !           936:    ESC [1~,    ESC [1~,        ESC [1~,    ESC [1~         /# Home         #/
        !           937:    KEY_PPAGE,  KEY_PPAGE,      KEY_PPAGE,  KEY_PPAGE       /# Page Up      #/
        !           938:    KEY_NPAGE,  KEY_NPAGE,      KEY_NPAGE,  KEY_NPAGE       /# Page Down    #/
        !           939:    ESC [4~,    ESC [4~,        ESC [4~,    ESC [4~         /# End          #/
        !           940:     KEY_LEFT,   KEY_LEFT,       KEY_LEFT,   O               /# Keypad Left  #/
        !           941:     KEY_RIGHT,  KEY_RIGHT,      KEY_RIGHT,  O               /# Keypad Right #/
        !           942:     KEY_UP,     KEY_UP,         KEY_UP,     O               /# Keypad Up    #/
        !           943:     KEY_DOWN,   KEY_DOWN,       KEY_DOWN,   O               /# Keypad Down  #/
        !           944:     ESC [1~,    ESC [1~,        ESC [1~,    ESC [1~         /# Keypad Home  #/
        !           945:     KEY_PPAGE,  KEY_PPAGE,      KEY_PPAGE,  KEY_PPAGE       /# Keypad PgUp  #/
        !           946:     KEY_NPAGE,  KEY_NPAGE,      KEY_NPAGE,  KEY_NPAGE       /# Keypad PgDn  #/
        !           947:     ESC [4~,    ESC [4~,        ESC [4~,    O               /# Keypad End   #/
        !           948:     ESC [-71,   nothing,        nothing,    O               /# Keypad 5     #/
        !           949: 
        !           950:     PuTTY
        !           951:     ==============================
        !           952:     normal      shift           ctrl        alt
        !           953:     ESC [D,     ESC [D,         ESC OD,     ESC [D          /# Left         #/
        !           954:     ESC [C,     ESC [C,         ESC OC,     ESC [C          /# Right        #/
        !           955:     ESC [A,     ESC [A,         ESC OA,     ESC [A          /# Up           #/
        !           956:     ESC [B,     ESC [B,         ESC OB,     ESC [B          /# Down         #/
        !           957:     ESC [1~,    ESC [1~,        local win,  ESC [1~         /# Home         #/
        !           958:     ESC [5~,    local win,      local win,  ESC [5~         /# Page Up      #/
        !           959:     ESC [6~,    local win,      local win,  ESC [6~         /# Page Down    #/
        !           960:     ESC [4~,    ESC [4~,        local win,  ESC [4~         /# End          #/
        !           961:     ESC [D,     ESC [D,         ESC [D,     O               /# Keypad Left  #/
        !           962:     ESC [C,     ESC [C,         ESC [C,     O               /# Keypad Right #/
        !           963:     ESC [A,     ESC [A,         ESC [A,     O               /# Keypad Up    #/
        !           964:     ESC [B,     ESC [B,         ESC [B,     O               /# Keypad Down  #/
        !           965:     ESC [1~,    ESC [1~,        ESC [1~,    O               /# Keypad Home  #/
        !           966:     ESC [5~,    ESC [5~,        ESC [5~,    O               /# Keypad PgUp  #/
        !           967:     ESC [6~,    ESC [6~,        ESC [6~,    O               /# Keypad PgDn  #/
        !           968:     ESC [4~,    ESC [4~,        ESC [4~,    O               /# Keypad End   #/
        !           969:     nothing,    nothing,        nothing,    O               /# Keypad 5     #/
        !           970: 
        !           971:     PuTTY
        !           972:     ==============================
        !           973:     normal      shift           ctrl        alt
        !           974:     KEY_LEFT,   KEY_LEFT,       ESC OD,     ESC KEY_LEFT    /# Left         #/
        !           975:     KEY_RIGHT   KEY_RIGHT,      ESC OC,     ESC KEY_RIGHT   /# Right        #/
        !           976:     KEY_UP,     KEY_UP,         ESC OA,     ESC KEY_UP      /# Up           #/
        !           977:     KEY_DOWN,   KEY_DOWN,       ESC OB,     ESC KEY_DOWN    /# Down         #/
        !           978:     ESC [1~,    ESC [1~,        local win,  ESC ESC [1~     /# Home         #/
        !           979:     KEY_PPAGE   local win,      local win,  ESC KEY_PPAGE   /# Page Up      #/
        !           980:     KEY_NPAGE   local win,      local win,  ESC KEY_NPAGE   /# Page Down    #/
        !           981:     ESC [4~,    ESC [4~,        local win,  ESC ESC [4~     /# End          #/
        !           982:     ESC Ot,     ESC Ot,         ESC Ot,     O               /# Keypad Left  #/
        !           983:     ESC Ov,     ESC Ov,         ESC Ov,     O               /# Keypad Right #/
        !           984:     ESC Ox,     ESC Ox,         ESC Ox,     O               /# Keypad Up    #/
        !           985:     ESC Or,     ESC Or,         ESC Or,     O               /# Keypad Down  #/
        !           986:     ESC Ow,     ESC Ow,         ESC Ow,     O               /# Keypad Home  #/
        !           987:     ESC Oy,     ESC Oy,         ESC Oy,     O               /# Keypad PgUp  #/
        !           988:     ESC Os,     ESC Os,         ESC Os,     O               /# Keypad PgDn  #/
        !           989:     ESC Oq,     ESC Oq,         ESC Oq,     O               /# Keypad End   #/
        !           990:     ESC Ou,     ESC Ou,         ESC Ou,     O               /# Keypad 5     #/
        !           991: */
        !           992: 
        !           993: #define M_NORMAL 0
        !           994: #define M_ESC    1
        !           995: #define M_KEYPAD 2
        !           996: #define M_TRAIL  3
        !           997: 
        !           998: int undo[5];
        !           999: int uindex = -1;
        !          1000: 
        !          1001: int
        !          1002: reread(void)
        !          1003: {
        !          1004:     int redo;
        !          1005: 
        !          1006:     if (uindex < 0)
        !          1007:         return 0;
        !          1008: 
        !          1009:     redo = undo[0];
        !          1010:     undo[0] = undo[1];
        !          1011:     undo[1] = undo[2];
        !          1012:     undo[2] = undo[3];
        !          1013:     undo[3] = undo[4];
        !          1014:     uindex--;
        !          1015:     return redo;
        !          1016: }
        !          1017: 
        !          1018: void
        !          1019: unread(int c)
        !          1020: {
        !          1021:     if (uindex >= 4)
        !          1022:         abort();
        !          1023: 
        !          1024:     undo[++uindex] = c;
        !          1025: }
        !          1026: 
        !          1027: int
        !          1028: md_readchar(WINDOW *win)
        !          1029: {
        !          1030:     int ch = 0;
        !          1031:     int lastch = 0;
        !          1032:     int mode = M_NORMAL;
        !          1033:     int mode2 = M_NORMAL;
        !          1034:     int nodelayf = 0;
        !          1035:     int count = 0;
        !          1036:     extern void auto_save(int sig);
        !          1037: 
        !          1038:     for(;;)
        !          1039:     {
        !          1040:         if (mode == M_NORMAL && uindex >= 0)
        !          1041:        {
        !          1042:            ch = reread();
        !          1043:            break;
        !          1044:        }
        !          1045: 
        !          1046:         ch = wgetch(win);
        !          1047: 
        !          1048:         if (ch == ERR) /* timed out  or error */
        !          1049:         {
        !          1050:             if (nodelayf)               /* likely timed out, switch to */
        !          1051:             {                           /* normal mode and block on    */
        !          1052:                 mode = M_NORMAL;        /* next read                   */
        !          1053:                 nodelayf = 0;
        !          1054:                 nodelay(win,0);
        !          1055:             }
        !          1056:             else if (count > 10)        /* after 10 errors assume      */
        !          1057:                 auto_save(0);           /* input stream is broken and  */
        !          1058:             else                        /* auto save and exit          */
        !          1059:                 count++;
        !          1060: 
        !          1061:             continue;
        !          1062:         }
        !          1063: 
        !          1064:         count = 0;                      /* reset input error count     */
        !          1065: 
        !          1066:         if (mode == M_TRAIL)
        !          1067:         {
        !          1068:             if (ch == '^')              /* msys console  : 7,5,6,8: modified*/
        !          1069:                 ch = MOD_MOVE( toupper(lastch) );
        !          1070:             else if (ch == '~')              /* cygwin console: 1,5,6,4: normal  */
        !          1071:                 ch = tolower(lastch);   /* windows telnet: 1,5,6,4: normal  */
        !          1072:                                         /* msys console  : 7,5,6,8: normal  */
        !          1073:             else if (mode2 == M_ESC)         /* cygwin console: 1,5,6,4: modified*/
        !          1074:                 ch = MOD_MOVE( toupper(ch) );
        !          1075:            else
        !          1076:            {
        !          1077:                mode = M_NORMAL;
        !          1078:                unread(ch);
        !          1079:                continue;
        !          1080:             }
        !          1081: 
        !          1082:             break;
        !          1083:         }
        !          1084: 
        !          1085:         if (mode == M_ESC)
        !          1086:         {
        !          1087:             if (ch == 27)
        !          1088:             {
        !          1089:                 mode2 = M_ESC;
        !          1090:                 unread(ch);
        !          1091:                 continue;
        !          1092:             }
        !          1093: 
        !          1094:             if ((ch == 'F') || (ch == 'O') || (ch == '['))
        !          1095:             {
        !          1096:                 mode = M_KEYPAD;
        !          1097:                 unread(ch);
        !          1098:                 continue;
        !          1099:             }
        !          1100: 
        !          1101: 
        !          1102:             switch(ch)
        !          1103:             {
        !          1104:                 /* Cygwin Console   */
        !          1105:                 /* PuTTY            */
        !          1106:                 case KEY_LEFT : ch = MOD_MOVE('H'); break;
        !          1107:                 case KEY_RIGHT: ch = MOD_MOVE('L'); break;
        !          1108:                 case KEY_UP   : ch = MOD_MOVE('K'); break;
        !          1109:                 case KEY_DOWN : ch = MOD_MOVE('J'); break;
        !          1110:                 case KEY_HOME : ch = MOD_MOVE('Y'); break;
        !          1111:                 case KEY_PPAGE: ch = MOD_MOVE('U'); break;
        !          1112:                 case KEY_NPAGE: ch = MOD_MOVE('N'); break;
        !          1113:                 case KEY_END  : ch = MOD_MOVE('B'); break;
        !          1114: 
        !          1115:                 default: mode = M_NORMAL;
        !          1116:                          mode2 = M_NORMAL;
        !          1117:                          unread(ch);
        !          1118:                          continue;
        !          1119:             }
        !          1120: 
        !          1121:             break;
        !          1122:         }
        !          1123: 
        !          1124:         if (mode == M_KEYPAD)
        !          1125:         {
        !          1126:             switch(ch)
        !          1127:             {
        !          1128:                 /* ESC F - Interix Console codes */
        !          1129:                 case   '^': ch = MOD_MOVE('H'); break;      /* Shift-Left       */
        !          1130:                 case   '$': ch = MOD_MOVE('L'); break;      /* Shift-Right      */
        !          1131: 
        !          1132:                 /* ESC [ - Interix Console codes */
        !          1133:                 case   'H': ch = 'y'; break;            /* Home             */
        !          1134:                 case     1: ch = MOD_MOVE('K'); break;      /* Ctl-Keypad Up    */
        !          1135:                 case     2: ch = MOD_MOVE('J'); break;      /* Ctl-Keypad Down  */
        !          1136:                 case     3: ch = MOD_MOVE('L'); break;      /* Ctl-Keypad Right */
        !          1137:                 case     4: ch = MOD_MOVE('H'); break;      /* Ctl-Keypad Left  */
        !          1138:                 case   263: ch = MOD_MOVE('Y'); break;      /* Ctl-Keypad Home  */
        !          1139:                 case    19: ch = MOD_MOVE('U'); break;      /* Ctl-Keypad PgUp  */
        !          1140:                 case    20: ch = MOD_MOVE('N'); break;      /* Ctl-Keypad PgDn  */
        !          1141:                 case    21: ch = MOD_MOVE('B'); break;      /* Ctl-Keypad End   */
        !          1142: 
        !          1143:                 /* ESC [ - Cygwin Console codes */
        !          1144:                 case   'G': ch = '.'; break;            /* Keypad 5         */
        !          1145:                 case   '7': lastch = 'Y'; mode=M_TRAIL; break;  /* Ctl-Home */
        !          1146:                 case   '5': lastch = 'U'; mode=M_TRAIL; break;  /* Ctl-PgUp */
        !          1147:                 case   '6': lastch = 'N'; mode=M_TRAIL; break;  /* Ctl-PgDn */
        !          1148: 
        !          1149:                 /* ESC [ - Win32 Telnet, PuTTY */
        !          1150:                 case   '1': lastch = 'y'; mode=M_TRAIL; break;  /* Home     */
        !          1151:                 case   '4': lastch = 'b'; mode=M_TRAIL; break;  /* End      */
        !          1152: 
        !          1153:                 /* ESC [ - not understood by screen/tmux */
        !          1154:                 case   'E': ch = '.'; break;                   /* Keypad 5 */
        !          1155: 
        !          1156:                 /* ESC O - PuTTY */
        !          1157:                 case   'D': ch = MOD_MOVE('H'); break;
        !          1158:                 case   'C': ch = MOD_MOVE('L'); break;
        !          1159:                 case   'A': ch = MOD_MOVE('K'); break;
        !          1160:                 case   'B': ch = MOD_MOVE('J'); break;
        !          1161:                 case   't': ch = 'h'; break;
        !          1162:                 case   'v': ch = 'l'; break;
        !          1163:                 case   'x': ch = 'k'; break;
        !          1164:                 case   'r': ch = 'j'; break;
        !          1165:                 case   'w': ch = 'y'; break;
        !          1166:                 case   'y': ch = 'u'; break;
        !          1167:                 case   's': ch = 'n'; break;
        !          1168:                 case   'q': ch = 'b'; break;
        !          1169:                 case   'u': ch = '.'; break;
        !          1170:             }
        !          1171: 
        !          1172:             if (mode != M_KEYPAD)
        !          1173:            {
        !          1174:                unread(ch);
        !          1175:                continue;
        !          1176:            }
        !          1177:         }
        !          1178: 
        !          1179:         if (ch == 27)
        !          1180:         {
        !          1181:             nodelay(win,1);
        !          1182:             mode = M_ESC;
        !          1183:             nodelayf = 1;
        !          1184:             unread(ch);
        !          1185:             continue;
        !          1186:         }
        !          1187: 
        !          1188:         switch(ch)
        !          1189:         {
        !          1190:             case KEY_LEFT   : ch = 'h'; break;
        !          1191:             case KEY_DOWN   : ch = 'j'; break;
        !          1192:             case KEY_UP     : ch = 'k'; break;
        !          1193:             case KEY_RIGHT  : ch = 'l'; break;
        !          1194:             case KEY_HOME   : ch = 'y'; break;
        !          1195:             case KEY_PPAGE  : ch = 'u'; break;
        !          1196:             case KEY_END    : ch = 'b'; break;
        !          1197: #ifdef KEY_LL
        !          1198:             case KEY_LL     : ch = 'b'; break;
        !          1199: #endif
        !          1200:             case KEY_NPAGE  : ch = 'n'; break;
        !          1201:             case KEY_BEG    : ch = '.'; break;
        !          1202: 
        !          1203: #ifdef KEY_B1
        !          1204:             case KEY_B1     : ch = 'h'; break;
        !          1205:             case KEY_C2     : ch = 'j'; break;
        !          1206:             case KEY_A2     : ch = 'k'; break;
        !          1207:             case KEY_B3     : ch = 'l'; break;
        !          1208: #endif
        !          1209:             case KEY_A1     : ch = 'y'; break;
        !          1210:             case KEY_A3     : ch = 'u'; break;
        !          1211:             case KEY_C1     : ch = 'b'; break;
        !          1212:             case KEY_C3     : ch = 'n'; break;
        !          1213:             case KEY_B2            : ch = '.'; break;
        !          1214: 
        !          1215: #ifdef KEY_SLEFT
        !          1216:             case KEY_SRIGHT  : ch = MOD_MOVE('L'); break;
        !          1217:             case KEY_SLEFT   : ch = MOD_MOVE('H'); break;
        !          1218: #ifdef KEY_SUP
        !          1219:             case KEY_SUP     : ch = MOD_MOVE('K'); break;
        !          1220:             case KEY_SDOWN   : ch = MOD_MOVE('J'); break;
        !          1221: #endif
        !          1222:             case KEY_SHOME   : ch = MOD_MOVE('Y'); break;
        !          1223:             case KEY_SPREVIOUS:ch = MOD_MOVE('U'); break;
        !          1224:             case KEY_SEND    : ch = MOD_MOVE('B'); break;
        !          1225:             case KEY_SNEXT   : ch = MOD_MOVE('N'); break;
        !          1226: #endif
        !          1227:             case 0x146       : ch = MOD_MOVE('K'); break;   /* Shift-Up     */
        !          1228:             case 0x145       : ch = MOD_MOVE('J'); break;   /* Shift-Down   */
        !          1229: 
        !          1230: #ifdef CTL_RIGHT
        !          1231:             case CTL_RIGHT   : ch = MOD_MOVE('L'); break;
        !          1232:             case CTL_LEFT    : ch = MOD_MOVE('H'); break;
        !          1233:             case CTL_UP      : ch = MOD_MOVE('K'); break;
        !          1234:             case CTL_DOWN    : ch = MOD_MOVE('J'); break;
        !          1235:             case CTL_HOME    : ch = MOD_MOVE('Y'); break;
        !          1236:             case CTL_PGUP    : ch = MOD_MOVE('U'); break;
        !          1237:             case CTL_END     : ch = MOD_MOVE('B'); break;
        !          1238:             case CTL_PGDN    : ch = MOD_MOVE('N'); break;
        !          1239: #endif
        !          1240: #ifdef KEY_EOL
        !          1241:             case KEY_EOL     : ch = MOD_MOVE('B'); break;
        !          1242: #endif
        !          1243: 
        !          1244: #ifndef CTL_PAD1
        !          1245:             /* MSYS rxvt console */
        !          1246:             case 511         : ch = MOD_MOVE('J'); break; /* Shift Dn */
        !          1247:             case 512         : ch = MOD_MOVE('J'); break; /* Ctl Down */
        !          1248:             case 514         : ch = MOD_MOVE('H'); break; /* Ctl Left */
        !          1249:             case 516         : ch = MOD_MOVE('L'); break; /* Ctl Right*/
        !          1250:             case 518         : ch = MOD_MOVE('K'); break; /* Shift Up */
        !          1251:             case 519         : ch = MOD_MOVE('K'); break; /* Ctl Up   */
        !          1252: #endif
        !          1253: 
        !          1254: #ifdef CTL_PAD1
        !          1255:             case CTL_PAD1   : ch = MOD_MOVE('B'); break;
        !          1256:             case CTL_PAD2   : ch = MOD_MOVE('J'); break;
        !          1257:             case CTL_PAD3   : ch = MOD_MOVE('N'); break;
        !          1258:             case CTL_PAD4   : ch = MOD_MOVE('H'); break;
        !          1259:             case CTL_PAD5   : ch = '.'; break;
        !          1260:             case CTL_PAD6   : ch = MOD_MOVE('L'); break;
        !          1261:             case CTL_PAD7   : ch = MOD_MOVE('Y'); break;
        !          1262:             case CTL_PAD8   : ch = MOD_MOVE('K'); break;
        !          1263:             case CTL_PAD9   : ch = MOD_MOVE('U'); break;
        !          1264: #endif
        !          1265: 
        !          1266: #ifdef ALT_RIGHT
        !          1267:             case ALT_RIGHT  : ch = MOD_MOVE('L'); break;
        !          1268:             case ALT_LEFT   : ch = MOD_MOVE('H'); break;
        !          1269:             case ALT_DOWN   : ch = MOD_MOVE('J'); break;
        !          1270:             case ALT_HOME   : ch = MOD_MOVE('Y'); break;
        !          1271:             case ALT_PGUP   : ch = MOD_MOVE('U'); break;
        !          1272:             case ALT_END    : ch = MOD_MOVE('B'); break;
        !          1273:             case ALT_PGDN   : ch = MOD_MOVE('N'); break;
        !          1274: #endif
        !          1275: 
        !          1276: #ifdef ALT_PAD1
        !          1277:             case ALT_PAD1   : ch = MOD_MOVE('B'); break;
        !          1278:             case ALT_PAD2   : ch = MOD_MOVE('J'); break;
        !          1279:             case ALT_PAD3   : ch = MOD_MOVE('N'); break;
        !          1280:             case ALT_PAD4   : ch = MOD_MOVE('H'); break;
        !          1281:             case ALT_PAD5   : ch = '.'; break;
        !          1282:             case ALT_PAD6   : ch = MOD_MOVE('L'); break;
        !          1283:             case ALT_PAD7   : ch = MOD_MOVE('Y'); break;
        !          1284:             case ALT_PAD8   : ch = MOD_MOVE('K'); break;
        !          1285:             case ALT_PAD9   : ch = MOD_MOVE('U'); break;
        !          1286: #endif
        !          1287: #ifdef KEY_BACKSPACE
        !          1288:             case KEY_BACKSPACE: ch = md_erasechar(); break;
        !          1289: #endif
        !          1290:         }
        !          1291: 
        !          1292:         break;
        !          1293:     }
        !          1294: 
        !          1295:     if (nodelayf)
        !          1296:         nodelay(win,0);
        !          1297: 
        !          1298:     uindex = -1;
        !          1299: 
        !          1300:     return(ch & 0x7F);
        !          1301: }
        !          1302: 
        !          1303: unsigned int
        !          1304: md_random_seed(void)
        !          1305: {
        !          1306:     unsigned int seed;
        !          1307:     seed = (unsigned int) time((time_t *) NULL);
        !          1308: #ifdef _WIN32
        !          1309:     seed += _getpid();
        !          1310: #else
        !          1311:     seed += getpid();
        !          1312: #endif
        !          1313:     return seed;
        !          1314: }

CVSweb