]>
git.ipfire.org Git - thirdparty/bird.git/blob - client/birdc.c
2 * BIRD Client - Readline variant I/O
4 * (c) 1999--2004 Martin Mares <mj@ucw.cz>
6 * Can be freely distributed and used under the terms of the GNU GPL.
14 #include <readline/readline.h>
15 #include <readline/history.h>
18 #include "nest/bird.h"
19 #include "lib/resource.h"
20 #include "lib/string.h"
21 #include "client/client.h"
23 static int input_hidden_end
;
24 static int prompt_active
;
28 /* HACK: libreadline internals we need to access */
29 extern int _rl_vis_botlin
;
30 extern void _rl_move_vert(int);
33 add_history_dedup(char *cmd
)
35 /* Add history line if it differs from the last one */
36 HIST_ENTRY
*he
= history_get(history_length
);
37 if (!he
|| strcmp(he
->line
, cmd
))
42 input_got_line(char *cmd_buffer
)
52 add_history_dedup(cmd_buffer
);
53 submit_command(cmd_buffer
);
60 input_start_list(void)
62 /* Leave the currently edited line and make space for listing */
63 _rl_move_vert(_rl_vis_botlin
);
72 /* Reprint the currently edited line after listing */
78 input_complete(int arg UNUSED
, int key UNUSED
)
80 static int complete_flag
;
83 if (rl_last_func
!= input_complete
)
85 switch (cmd_complete(rl_line_buffer
, rl_point
, buf
, complete_flag
))
103 input_help(int arg
, int key UNUSED
)
105 int i
, in_string
, in_bracket
;
108 return rl_insert(arg
, '?');
110 in_string
= in_bracket
= 0;
111 for (i
= 0; i
< rl_point
; i
++)
114 if (rl_line_buffer
[i
] == '"')
115 in_string
= ! in_string
;
116 else if (! in_string
)
118 if (rl_line_buffer
[i
] == '[')
120 else if (rl_line_buffer
[i
] == ']')
125 /* `?' inside string or path -> insert */
126 if (in_string
|| in_bracket
)
127 return rl_insert(1, '?');
129 rl_begin_undo_group(); /* HACK: We want to display `?' at point position */
134 cmd_help(rl_line_buffer
, rl_point
);
135 rl_undo_command(1, 0);
143 rl_readline_name
= "birdc";
144 rl_add_defun("bird-complete", input_complete
, '\t');
145 rl_add_defun("bird-help", input_help
, '?');
146 rl_callback_handler_install("bird> ", input_got_line
);
148 // rl_get_screen_size();
154 // readline library does strange things when stdin is nonblocking.
155 // if (fcntl(0, F_SETFL, O_NONBLOCK) < 0)
162 /* need this, otherwise some lib seems to eat pending output when
163 the prompt is displayed */
165 tcdrain(STDOUT_FILENO
);
167 rl_end
= input_hidden_end
;
168 rl_expand_prompt("bird> ");
169 rl_forced_update_display();
177 input_hidden_end
= rl_end
;
179 rl_expand_prompt("");
186 input_notify(int prompt
)
188 if (prompt
== prompt_active
)
200 rl_callback_read_char();
220 rl_callback_handler_remove();