]> pd.if.org Git - pd_readline/blobdiff - mg/ttykbd.c
Getting close to a basic working readline now.
[pd_readline] / mg / ttykbd.c
diff --git a/mg/ttykbd.c b/mg/ttykbd.c
deleted file mode 100644 (file)
index a160a3e..0000000
+++ /dev/null
@@ -1,89 +0,0 @@
-/*     $OpenBSD: ttykbd.c,v 1.16 2012/04/12 04:47:59 lum Exp $ */
-
-/* This file is in the public domain. */
-
-/*
- * Name:       MG 2a
- *             Terminfo keyboard driver using key files
- * Created:    22-Nov-1987 Mic Kaczmarczik (mic@emx.cc.utexas.edu)
- */
-
-#include "def.h"
-#include "kbd.h"
-
-#ifdef XKEYS
-#include <term.h>
-
-#ifdef  FKEYS
-/*
- * Get keyboard character.  Very simple if you use keymaps and keys files.
- * Bob was right -- the old XKEYS code is not the right solution.
- * FKEYS code is not useful other than to help debug FKEYS code in
- * extend.c.
- */
-
-char   *keystrings[] = {NULL};
-#endif /* FKEYS */
-
-/*
- * Turn on function keys using keypad_xmit, then load a keys file, if
- * available.  The keys file is located in the same manner as the startup
- * file is, depending on what startupfile() does on your system.
- */
-void
-ttykeymapinit(void)
-{
-       char    *cp;
-
-#ifdef FKEYS
-       /* Bind keypad function keys. */
-       if (key_left)
-               dobindkey(fundamental_map, "backward-char", key_left);
-       if (key_right)
-               dobindkey(fundamental_map, "forward-char", key_right);
-       if (key_up)
-               dobindkey(fundamental_map, "previous-line", key_up);
-       if (key_down)
-               dobindkey(fundamental_map, "next-line", key_down);
-       if (key_beg)
-               dobindkey(fundamental_map, "beginning-of-line", key_beg);
-       else if (key_home)
-               dobindkey(fundamental_map, "beginning-of-line", key_home);
-       if (key_end)
-               dobindkey(fundamental_map, "end-of-line", key_end);
-       if (key_npage)
-               dobindkey(fundamental_map, "scroll-up", key_npage);
-       if (key_ppage)
-               dobindkey(fundamental_map, "scroll-down", key_ppage);
-       if (key_dc)
-               dobindkey(fundamental_map, "delete-char", key_dc);
-#endif /* FKEYS */
-
-       if ((cp = getenv("TERM"))) {
-               if (((cp = startupfile(cp)) != NULL) && (load(cp) != TRUE))
-                       ewprintf("Error reading key initialization file");
-       }
-       if (keypad_xmit)
-               /* turn on keypad */
-               putpad(keypad_xmit, 1);
-}
-
-/*
- * Clean up the keyboard -- called by tttidy()
- */
-void
-ttykeymaptidy(void)
-{
-       if (keypad_local)
-               /* turn off keypad */
-               putpad(keypad_local, 1);
-}
-
-#else
-
-void
-ttykeymapinit(void)
-{
-}
-
-#endif /* XKEYS */