PageRenderTime 27ms CodeModel.GetById 12ms RepoModel.GetById 0ms app.codeStats 0ms

/RogueSharp/mdport.c

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