Return to ttykbd.c CVS log

Up to [local] / src / usr.bin / mg

Annotation of src/usr.bin/mg/ttykbd.c, Revision 1.17

1.17    ! bcallah     1: /*     $OpenBSD: ttykbd.c,v 1.16 2012/04/12 04:47:59 lum Exp $ */
1.14      kjell       2:
                      3: /* This file is in the public domain. */
1.7       niklas      4:
1.1       deraadt     5: /*
                      6:  * Name:       MG 2a
1.2       millert     7:  *             Terminfo keyboard driver using key files
1.1       deraadt     8:  * Created:    22-Nov-1987 Mic Kaczmarczik (mic@emx.cc.utexas.edu)
                      9:  */
                     10:
1.6       millert    11: #include "def.h"
                     12: #include "kbd.h"
                     13:
                     14: #include <term.h>
1.1       deraadt    15:
                     16: /*
                     17:  * Get keyboard character.  Very simple if you use keymaps and keys files.
                     18:  */
                     19:
1.9       mickey     20: char   *keystrings[] = {NULL};
1.1       deraadt    21:
                     22: /*
1.2       millert    23:  * Turn on function keys using keypad_xmit, then load a keys file, if
                     24:  * available.  The keys file is located in the same manner as the startup
                     25:  * file is, depending on what startupfile() does on your system.
1.1       deraadt    26:  */
1.6       millert    27: void
1.11      cloder     28: ttykeymapinit(void)
1.1       deraadt    29: {
1.6       millert    30:        char    *cp;
                     31:
1.2       millert    32:        /* Bind keypad function keys. */
                     33:        if (key_left)
1.8       art        34:                dobindkey(fundamental_map, "backward-char", key_left);
1.2       millert    35:        if (key_right)
1.8       art        36:                dobindkey(fundamental_map, "forward-char", key_right);
1.2       millert    37:        if (key_up)
1.8       art        38:                dobindkey(fundamental_map, "previous-line", key_up);
1.2       millert    39:        if (key_down)
1.8       art        40:                dobindkey(fundamental_map, "next-line", key_down);
1.2       millert    41:        if (key_beg)
1.8       art        42:                dobindkey(fundamental_map, "beginning-of-line", key_beg);
1.4       millert    43:        else if (key_home)
1.8       art        44:                dobindkey(fundamental_map, "beginning-of-line", key_home);
1.2       millert    45:        if (key_end)
1.8       art        46:                dobindkey(fundamental_map, "end-of-line", key_end);
1.2       millert    47:        if (key_npage)
1.8       art        48:                dobindkey(fundamental_map, "scroll-up", key_npage);
1.2       millert    49:        if (key_ppage)
1.8       art        50:                dobindkey(fundamental_map, "scroll-down", key_ppage);
1.15      lum        51:        if (key_dc)
                     52:                dobindkey(fundamental_map, "delete-char", key_dc);
1.6       millert    53:
1.10      deraadt    54:        if ((cp = getenv("TERM"))) {
1.6       millert    55:                if (((cp = startupfile(cp)) != NULL) && (load(cp) != TRUE))
1.1       deraadt    56:                        ewprintf("Error reading key initialization file");
                     57:        }
1.6       millert    58:        if (keypad_xmit)
                     59:                /* turn on keypad */
1.2       millert    60:                putpad(keypad_xmit, 1);
1.1       deraadt    61: }
                     62:
                     63: /*
                     64:  * Clean up the keyboard -- called by tttidy()
                     65:  */
1.6       millert    66: void
1.11      cloder     67: ttykeymaptidy(void)
1.1       deraadt    68: {
1.2       millert    69:        if (keypad_local)
1.6       millert    70:                /* turn off keypad */
                     71:                putpad(keypad_local, 1);
1.12      deraadt    72: }
                     73: