Mercurial > hg > early-roguelike

comparison rogue4/mdport.c @ 12:9535a08ddc39

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