Annotation of embedaddon/bird2/client/birdc.c, revision 1.1
1.1 ! misho 1: /*
! 2: * BIRD Client - Readline variant I/O
! 3: *
! 4: * (c) 1999--2004 Martin Mares <mj@ucw.cz>
! 5: *
! 6: * Can be freely distributed and used under the terms of the GNU GPL.
! 7: */
! 8:
! 9: #include <stdio.h>
! 10: #include <stdlib.h>
! 11: #include <unistd.h>
! 12: #include <termios.h>
! 13:
! 14: #include <readline/readline.h>
! 15: #include <readline/history.h>
! 16: #include <curses.h>
! 17:
! 18: #include "nest/bird.h"
! 19: #include "lib/resource.h"
! 20: #include "lib/string.h"
! 21: #include "client/client.h"
! 22:
! 23: static int input_hidden_end;
! 24: static int prompt_active;
! 25:
! 26: /*** Input ***/
! 27:
! 28: /* HACK: libreadline internals we need to access */
! 29: extern int _rl_vis_botlin;
! 30: extern void _rl_move_vert(int);
! 31:
! 32: #define HISTORY "/.birdc_history"
! 33: static char *history_file;
! 34:
! 35: static void
! 36: add_history_dedup(char *cmd)
! 37: {
! 38: /* Add history line if it differs from the last one */
! 39: HIST_ENTRY *he = history_get(history_length);
! 40: if (!he || strcmp(he->line, cmd))
! 41: add_history(cmd);
! 42: }
! 43:
! 44: static void
! 45: input_got_line(char *cmd_buffer)
! 46: {
! 47: if (!cmd_buffer)
! 48: {
! 49: cleanup();
! 50: exit(0);
! 51: }
! 52:
! 53: if (cmd_buffer[0])
! 54: {
! 55: add_history_dedup(cmd_buffer);
! 56: submit_command(cmd_buffer);
! 57: }
! 58:
! 59: free(cmd_buffer);
! 60: }
! 61:
! 62: void
! 63: input_start_list(void)
! 64: {
! 65: /* Leave the currently edited line and make space for listing */
! 66: _rl_move_vert(_rl_vis_botlin);
! 67: #ifdef HAVE_RL_CRLF
! 68: rl_crlf();
! 69: #endif
! 70: }
! 71:
! 72: void
! 73: input_stop_list(void)
! 74: {
! 75: /* Reprint the currently edited line after listing */
! 76: rl_on_new_line();
! 77: rl_redisplay();
! 78: }
! 79:
! 80: static int
! 81: input_complete(int arg UNUSED, int key UNUSED)
! 82: {
! 83: static int complete_flag;
! 84: char buf[256];
! 85:
! 86: if (rl_last_func != input_complete)
! 87: complete_flag = 0;
! 88: switch (cmd_complete(rl_line_buffer, rl_point, buf, complete_flag))
! 89: {
! 90: case 0:
! 91: complete_flag = 1;
! 92: break;
! 93: case 1:
! 94: rl_insert_text(buf);
! 95: break;
! 96: default:
! 97: complete_flag = 1;
! 98: #ifdef HAVE_RL_DING
! 99: rl_ding();
! 100: #endif
! 101: }
! 102: return 0;
! 103: }
! 104:
! 105: static int
! 106: input_help(int arg, int key UNUSED)
! 107: {
! 108: int i, in_string, in_bracket;
! 109:
! 110: if (arg != 1)
! 111: return rl_insert(arg, '?');
! 112:
! 113: in_string = in_bracket = 0;
! 114: for (i = 0; i < rl_point; i++)
! 115: {
! 116:
! 117: if (rl_line_buffer[i] == '"')
! 118: in_string = ! in_string;
! 119: else if (! in_string)
! 120: {
! 121: if (rl_line_buffer[i] == '[')
! 122: in_bracket++;
! 123: else if (rl_line_buffer[i] == ']')
! 124: in_bracket--;
! 125: }
! 126: }
! 127:
! 128: /* `?' inside string or path -> insert */
! 129: if (in_string || in_bracket)
! 130: return rl_insert(1, '?');
! 131:
! 132: rl_begin_undo_group(); /* HACK: We want to display `?' at point position */
! 133: rl_insert_text("?");
! 134: rl_redisplay();
! 135: rl_end_undo_group();
! 136: input_start_list();
! 137: cmd_help(rl_line_buffer, rl_point);
! 138: rl_undo_command(1, 0);
! 139: input_stop_list();
! 140: return 0;
! 141: }
! 142:
! 143: void
! 144: history_init(void)
! 145: {
! 146: const char *homedir = getenv("HOME");
! 147: if (!homedir)
! 148: homedir = ".";
! 149: history_file = malloc(strlen(homedir) + sizeof(HISTORY));
! 150: if (!history_file)
! 151: die("couldn't alloc enough memory for history file name");
! 152:
! 153: sprintf(history_file, "%s%s", homedir, HISTORY);
! 154: read_history(history_file);
! 155: }
! 156:
! 157: void
! 158: input_init(void)
! 159: {
! 160: if (interactive)
! 161: history_init();
! 162: rl_readline_name = "birdc";
! 163: rl_add_defun("bird-complete", input_complete, '\t');
! 164: rl_add_defun("bird-help", input_help, '?');
! 165: rl_callback_handler_install("bird> ", input_got_line);
! 166:
! 167: // rl_get_screen_size();
! 168: term_lns = LINES;
! 169: term_cls = COLS;
! 170:
! 171: prompt_active = 1;
! 172:
! 173: // readline library does strange things when stdin is nonblocking.
! 174: // if (fcntl(0, F_SETFL, O_NONBLOCK) < 0)
! 175: // DIE("fcntl");
! 176: }
! 177:
! 178: static void
! 179: input_reveal(void)
! 180: {
! 181: /* need this, otherwise some lib seems to eat pending output when
! 182: the prompt is displayed */
! 183: fflush(stdout);
! 184: tcdrain(STDOUT_FILENO);
! 185:
! 186: rl_end = input_hidden_end;
! 187: rl_expand_prompt("bird> ");
! 188: rl_forced_update_display();
! 189:
! 190: prompt_active = 1;
! 191: }
! 192:
! 193: static void
! 194: input_hide(void)
! 195: {
! 196: input_hidden_end = rl_end;
! 197: rl_end = 0;
! 198: rl_expand_prompt("");
! 199: rl_redisplay();
! 200:
! 201: prompt_active = 0;
! 202: }
! 203:
! 204: void
! 205: input_notify(int prompt)
! 206: {
! 207: if (prompt == prompt_active)
! 208: return;
! 209:
! 210: if (prompt)
! 211: input_reveal();
! 212: else
! 213: input_hide();
! 214: }
! 215:
! 216: void
! 217: input_read(void)
! 218: {
! 219: rl_callback_read_char();
! 220: }
! 221:
! 222: void
! 223: more_begin(void)
! 224: {
! 225: }
! 226:
! 227: void
! 228: more_end(void)
! 229: {
! 230: }
! 231:
! 232: void
! 233: cleanup(void)
! 234: {
! 235: if (init)
! 236: return;
! 237:
! 238: input_hide();
! 239: if (interactive)
! 240: write_history(history_file);
! 241: rl_callback_handler_remove();
! 242: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to birdc.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / bird2 / client