gui: Unify config file parsing.
[paraslash.git] / gui.c
1 /*
2  * Copyright (C) 1998-2014 Andre Noll <maan@systemlinux.org>
3  *
4  * Licensed under the GPL v2. For licencing details see COPYING.
5  */
6
7 /** \file gui.c Curses-based interface for paraslash. */
8
9 #include <regex.h>
10 #include <signal.h>
11 #include <sys/types.h>
12 #include <curses.h>
13 #include <locale.h>
14 #include <sys/time.h>
15
16 #include "gui.cmdline.h"
17 #include "para.h"
18 #include "gui.h"
19 #include "string.h"
20 #include "ringbuffer.h"
21 #include "fd.h"
22 #include "error.h"
23 #include "list.h"
24 #include "sched.h"
25 #include "signal.h"
26 #include "ggo.h"
27 #include "version.h"
28
29 /** define the array of error lists needed by para_gui */
30 INIT_GUI_ERRLISTS;
31 static char *stat_content[NUM_STAT_ITEMS];
32
33 static int signal_pipe;
34
35 static struct gui_window {
36         WINDOW *win;
37 } top, bot, sb, in, sep;
38
39 #define RINGBUFFER_SIZE 512
40 struct rb_entry {
41         char *msg;
42         size_t len;
43         int color;
44 };
45 static struct ringbuffer *bot_win_rb;
46
47 static unsigned scroll_position;
48
49 static pid_t cmd_pid;
50
51 static int command_fds[2] = {-1, -1};
52 static int stat_pipe = -1;
53 static struct gui_args_info conf;
54 static int loglevel;
55
56 enum {GETCH_MODE, COMMAND_MODE, EXTERNAL_MODE};
57
58
59 /**
60  * Codes for various colors.
61  *
62  * Each status item has its own color pair. The ones defined here start at a
63  * higher number so that they do not overlap with these.
64  */
65 enum gui_color_pair {
66         COLOR_STATUSBAR = NUM_STAT_ITEMS + 1,
67         COLOR_COMMAND,
68         COLOR_OUTPUT,
69         COLOR_MSG,
70         COLOR_ERRMSG,
71         COLOR_SEPARATOR,
72         COLOR_TOP,
73         COLOR_BOT,
74 };
75
76 struct gui_command {
77         const char *key;
78         const char *name;
79         const char *description;
80         void (*handler)(void);
81 };
82
83 static struct gui_theme theme;
84
85 static void com_help(void);
86 static void com_reread_conf(void);
87 static void com_enlarge_top_win(void);
88 static void com_shrink_top_win(void);
89 static void com_version(void);
90 __noreturn static void com_quit(void);
91 static void com_refresh(void);
92 static void com_ll_incr(void);
93 static void com_ll_decr(void);
94 static void com_prev_theme(void);
95 static void com_next_theme(void);
96 static void com_scroll_up(void);
97 static void com_scroll_down(void);
98 static void com_page_up(void);
99 static void com_page_down(void);
100 static void com_cancel_scrolling(void);
101 static void com_scroll_top(void);
102
103 static struct gui_command command_list[] = {
104         {
105                 .key = "?",
106                 .name = "help",
107                 .description = "print help",
108                 .handler = com_help
109         }, {
110                 .key = "+",
111                 .name = "enlarge_win",
112                 .description = "enlarge the top window",
113                 .handler = com_enlarge_top_win
114         }, {
115                 .key = "-",
116                 .name = "shrink_win",
117                 .description = "shrink the top window",
118                 .handler = com_shrink_top_win
119         }, {
120                 .key = "r",
121                 .name = "reread_conf",
122                 .description = "reread configuration file",
123                 .handler = com_reread_conf
124         }, {
125                 .key = "q",
126                 .name = "quit",
127                 .description = "exit para_gui",
128                 .handler = com_quit
129         }, {
130                 .key = "^L",
131                 .name = "refresh",
132                 .description = "redraw the screen",
133                 .handler = com_refresh
134         }, {
135                 .key = ".",
136                 .name = "next_theme",
137                 .description = "switch to next theme",
138                 .handler = com_next_theme
139         }, {
140                 .key = ",",
141                 .name = "prev_theme",
142                 .description = "switch to previous stream",
143                 .handler = com_prev_theme
144         }, {
145                 .key = ">",
146                 .name = "ll_incr",
147                 .description = "increase loglevel (decreases verbosity)",
148                 .handler = com_ll_incr
149         }, {
150                 .key = "<",
151                 .name = "ll_decr",
152                 .description = "decrease loglevel (increases verbosity)",
153                 .handler = com_ll_decr
154         }, {
155                 .key = "V",
156                 .name = "version",
157                 .description = "show the para_gui version",
158                 .handler = com_version
159         }, {
160                 .key = "<up>",
161                 .name = "scroll_up",
162                 .description = "scroll up one line",
163                 .handler = com_scroll_up
164         }, {
165                 .key = "<down>",
166                 .name = "scroll_down",
167                 .description = "scroll down one line",
168                 .handler = com_scroll_down
169         }, {
170                 .key = "<ppage>",
171                 .name = "page_up",
172                 .description = "scroll up one page",
173                 .handler = com_page_up
174         }, {
175                 .key = "<npage>",
176                 .name = "page_down",
177                 .description = "scroll down one page",
178                 .handler = com_page_down
179         }, {
180                 .key = "<home>",
181                 .name = "scroll_top",
182                 .description = "scroll to top of buffer",
183                 .handler = com_scroll_top
184         }, {
185                 .key = "<end>",
186                 .name = "cancel_scroll",
187                 .description = "deactivate scroll mode",
188                 .handler = com_cancel_scrolling
189         }, {
190                 .handler = NULL
191         }
192 };
193
194 static int find_cmd_byname(char *name)
195 {
196         int i;
197
198         for (i = 0; command_list[i].handler; i++)
199                 if (!strcmp(command_list[i].name, name))
200                         return i;
201         return -1;
202 }
203
204 /*
205  * Even though ncurses provides getmaxx and getmaxy, these functions/macros are
206  * not described in the XSI Curses standard.
207  */
208 static int get_num_lines(struct gui_window *w)
209 {
210         int lines;
211         __a_unused int cols; /* avoid "set but not used" warnings */
212
213         getmaxyx(w->win, lines, cols);
214         return lines;
215 }
216
217 static int get_num_cols(struct gui_window *w)
218 {
219         __a_unused int lines; /* avoid "set but not used" warnings */
220         int cols;
221
222         getmaxyx(w->win, lines, cols);
223         return cols;
224 }
225
226 /** Number of lines of the window are occupied by an output line. */
227 #define NUM_LINES(len) (1 + (len) / get_num_cols(&bot))
228
229 /* isendwin() returns false before initscr() was called */
230 static bool curses_active(void)
231 {
232         return top.win && !isendwin();
233 }
234
235 /* taken from mutt */
236 static char *km_keyname(int c)
237 {
238         static char buf[10];
239
240         if (c == KEY_UP) {
241                 sprintf(buf, "<up>");
242                 return buf;
243         }
244         if (c == KEY_DOWN) {
245                 sprintf(buf, "<down>");
246                 return buf;
247         }
248         if (c == KEY_LEFT) {
249                 sprintf(buf, "<left>");
250                 return buf;
251         }
252         if (c == KEY_RIGHT) {
253                 sprintf(buf, "<right>");
254                 return buf;
255         }
256         if (c == KEY_NPAGE) {
257                 sprintf(buf, "<npage>");
258                 return buf;
259         }
260         if (c == KEY_PPAGE) {
261                 sprintf(buf, "<ppage>");
262                 return buf;
263         }
264         if (c == KEY_HOME) {
265                 sprintf(buf, "<home>");
266                 return buf;
267         }
268         if (c == KEY_END) {
269                 sprintf(buf, "<end>");
270                 return buf;
271         }
272         if (c < 256 && c > -128 && iscntrl((unsigned char) c)) {
273                 if (c < 0)
274                         c += 256;
275                 if (c < 128) {
276                         buf[0] = '^';
277                         buf[1] = (c + '@') & 0x7f;
278                         buf[2] = 0;
279                 } else
280                         snprintf(buf, sizeof(buf), "\\%d%d%d", c >> 6,
281                                 (c >> 3) & 7, c & 7);
282         } else if (c >= KEY_F0 && c < KEY_F(256))
283                 sprintf(buf, "<F%d>", c - KEY_F0);
284         else if (isprint(c))
285                 snprintf(buf, sizeof(buf), "%c", (unsigned char) c);
286         else
287                 snprintf(buf, sizeof(buf), "\\x%hx", (unsigned short) c);
288         return buf;
289 }
290
291 /* Print given number of spaces to curses window. */
292 static void add_spaces(WINDOW* win, unsigned int num)
293 {
294         char space[] = "                                ";
295         unsigned sz = sizeof(space) - 1; /* number of spaces */
296
297         while (num >= sz)  {
298                 waddstr(win, space);
299                 num -= sz;
300         }
301         if (num > 0) {
302                 assert(num < sz);
303                 space[num] = '\0';
304                 waddstr(win, space);
305         }
306 }
307
308 /*
309  * print aligned string to curses window. This function always prints
310  * exactly len chars.
311  */
312 static int align_str(WINDOW* win, char *str, unsigned int len,
313                 unsigned int align)
314 {
315         int ret, i, num; /* of spaces */
316         size_t width;
317
318         if (!win || !str)
319                 return 0;
320         ret = strwidth(str, &width);
321         if (ret < 0) {
322                 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
323                 width = 0;
324                 str[0] = '\0';
325         }
326         num = len - width;
327         if (num < 0) {
328                 str[len] = '\0';
329                 num = 0;
330         }
331         /* replace control characters by spaces */
332         for (i = 0; i < len && str[i]; i++) {
333                 if (str[i] == '\n' || str[i] == '\r' || str[i] == '\f')
334                         str[i] = ' ';
335         }
336         if (align == LEFT) {
337                 waddstr(win, str);
338                 add_spaces(win, num);
339         } else if (align == RIGHT) {
340                 add_spaces(win, num);
341                 waddstr(win, str);
342         } else {
343                 add_spaces(win, num / 2);
344                 waddstr(win, str[0]? str: "");
345                 add_spaces(win, num - num / 2);
346         }
347         return 1;
348 }
349
350 __printf_2_3 static void print_in_bar(int color, const char *fmt,...)
351 {
352         char *msg;
353         va_list ap;
354
355         if (!curses_active())
356                 return;
357         wattron(in.win, COLOR_PAIR(color));
358         va_start(ap, fmt);
359         xvasprintf(&msg, fmt, ap);
360         va_end(ap);
361         wmove(in.win, 0, 0);
362         align_str(in.win, msg, get_num_cols(&in), LEFT);
363         free(msg);
364         wrefresh(in.win);
365 }
366
367 static void print_status_bar(void)
368 {
369         char *tmp;
370
371         tmp = para_strdup("para_gui " PACKAGE_VERSION " (hit ? for help)");
372         wmove(sb.win, 0, 0);
373         align_str(sb.win, tmp, get_num_cols(&sb), CENTER);
374         free(tmp);
375 }
376
377 /*
378  * get the number of the oldest rbe that is (partially) visible. On return,
379  * lines contains the sum of the number of lines of all visible entries. If the
380  * first one is only partially visible, lines is greater than bot.lines.
381  */
382 static int first_visible_rbe(unsigned *lines)
383 {
384         int i, bot_lines = get_num_lines(&bot);
385
386         *lines = 0;
387         for (i = scroll_position; i < RINGBUFFER_SIZE; i++) {
388                 struct rb_entry *rbe = ringbuffer_get(bot_win_rb, i);
389                 int rbe_lines;
390                 if (!rbe)
391                         return i - 1;
392                 rbe_lines = NUM_LINES(rbe->len);
393                 if (rbe_lines > bot_lines)
394                         return -1;
395                 *lines += rbe_lines;
396                 if (*lines >= bot_lines)
397                         return i;
398         }
399         return RINGBUFFER_SIZE - 1;
400 }
401
402 /*
403 returns number of first visible rbe, *lines is the number of lines drawn.
404  */
405 static int draw_top_rbe(unsigned *lines)
406 {
407         int bot_cols, bot_lines, ret, fvr = first_visible_rbe(lines);
408         struct rb_entry *rbe;
409         size_t bytes_to_skip, cells_to_skip, width;
410
411         if (fvr < 0)
412                 return -1;
413         wmove(bot.win, 0, 0);
414         rbe = ringbuffer_get(bot_win_rb, fvr);
415         if (!rbe)
416                 return -1;
417         getmaxyx(bot.win, bot_lines, bot_cols);
418         if (*lines > bot_lines) {
419                 /* rbe is partially visible multi-line */
420                 cells_to_skip = (*lines - bot_lines) * bot_cols;
421                 ret = skip_cells(rbe->msg, cells_to_skip, &bytes_to_skip);
422                 if (ret < 0)
423                         return ret;
424                 ret = strwidth(rbe->msg + bytes_to_skip, &width);
425                 if (ret < 0)
426                         return ret;
427         } else {
428                 bytes_to_skip = 0;
429                 width = rbe->len;
430         }
431         wattron(bot.win, COLOR_PAIR(rbe->color));
432         waddstr(bot.win, rbe->msg + bytes_to_skip);
433         *lines = NUM_LINES(width);
434         return fvr;
435 }
436
437 static void redraw_bot_win(void)
438 {
439         unsigned lines;
440         int i, bot_lines = get_num_lines(&bot);
441
442         wmove(bot.win, 0, 0);
443         wclear(bot.win);
444         i = draw_top_rbe(&lines);
445         if (i <= 0)
446                 goto out;
447         while (i > 0 && lines < bot_lines) {
448                 struct rb_entry *rbe = ringbuffer_get(bot_win_rb, --i);
449                 if (!rbe) {
450                         lines++;
451                         waddstr(bot.win, "\n");
452                         continue;
453                 }
454                 lines += NUM_LINES(rbe->len);
455                 wattron(bot.win, COLOR_PAIR(rbe->color));
456                 waddstr(bot.win, "\n");
457                 waddstr(bot.win, rbe->msg);
458         }
459 out:
460         wrefresh(bot.win);
461 }
462
463 static void rb_add_entry(int color, char *msg)
464 {
465         struct rb_entry *old, *new;
466         int x, y;
467         size_t len;
468
469         if (strwidth(msg, &len) < 0)
470                 return;
471         new = para_malloc(sizeof(struct rb_entry));
472         new->color = color;
473         new->len = len;
474         new->msg = msg;
475         old = ringbuffer_add(bot_win_rb, new);
476         if (old) {
477                 free(old->msg);
478                 free(old);
479         }
480         if (scroll_position) {
481                 /* discard current scrolling, like xterm does */
482                 scroll_position = 0;
483                 redraw_bot_win();
484                 return;
485         }
486         wattron(bot.win, COLOR_PAIR(color));
487         getyx(bot.win, y, x);
488         if (y || x)
489                 waddstr(bot.win, "\n");
490         waddstr(bot.win, msg);
491 }
492
493 /*
494  * print formated output to bot win and refresh
495  */
496 __printf_2_3 static void outputf(int color, const char* fmt,...)
497 {
498         char *msg;
499         va_list ap;
500
501         if (!curses_active())
502                 return;
503         va_start(ap, fmt);
504         xvasprintf(&msg, fmt, ap);
505         va_end(ap);
506         rb_add_entry(color, msg);
507         wrefresh(bot.win);
508 }
509
510 static int add_output_line(char *line, void *data)
511 {
512         int color = *(int *)data? COLOR_ERRMSG : COLOR_OUTPUT;
513
514         if (!curses_active())
515                 return 1;
516         rb_add_entry(color, para_strdup(line));
517         return 1;
518 }
519
520 static __printf_2_3 void curses_log(int ll, const char *fmt,...)
521 {
522         va_list ap;
523
524         if (ll < loglevel)
525                 return;
526         va_start(ap, fmt);
527         if (curses_active()) {
528                 int color = ll <= LL_NOTICE? COLOR_MSG : COLOR_ERRMSG;
529                 char *msg;
530                 unsigned bytes = xvasprintf(&msg, fmt, ap);
531                 if (bytes > 0 && msg[bytes - 1] == '\n')
532                         msg[bytes - 1] = '\0'; /* cut trailing newline */
533                 rb_add_entry(color, msg);
534                 wrefresh(bot.win);
535         } else if (cmd_pid <= 0) /* no external command running */
536                 vfprintf(stderr, fmt, ap);
537         va_end(ap);
538 }
539 __printf_2_3 void (*para_log)(int, const char*, ...) = curses_log;
540
541 static void setup_signal_handling(void)
542 {
543         signal_pipe = para_signal_init();
544         para_install_sighandler(SIGINT);
545         para_install_sighandler(SIGTERM);
546         para_install_sighandler(SIGCHLD);
547         para_install_sighandler(SIGWINCH);
548         para_install_sighandler(SIGUSR1);
549 }
550
551 static void shutdown_curses(void)
552 {
553         def_prog_mode();
554         endwin();
555 }
556
557 /* disable curses, print a message, kill running processes and exit */
558 __noreturn __printf_2_3 static void die(int exit_code, const char* fmt, ...)
559 {
560         va_list argp;
561
562         shutdown_curses();
563         va_start(argp, fmt);
564         vfprintf(stderr, fmt, argp);
565         va_end(argp);
566         /* kill every process in the process group and exit */
567         para_sigaction(SIGTERM, SIG_IGN);
568         kill(0, SIGTERM);
569         exit(exit_code);
570 }
571
572 /*
573  * Print stat item #i to curses window
574  */
575 static void print_stat_item(int i)
576 {
577         char *tmp;
578         struct stat_item_data d = theme.data[i];
579         char *c = stat_content[i];
580         int top_lines = get_num_lines(&top);
581
582         if (!curses_active() || !d.len || !c)
583                 return;
584         tmp = make_message("%s%s%s", d.prefix, c, d.postfix);
585         wmove(top.win, d.y * top_lines / 100, d.x * COLS / 100);
586         wrefresh(top.win);
587         wattron(top.win, COLOR_PAIR(i + 1));
588         align_str(top.win, tmp, d.len * COLS / 100, d.align);
589         free(tmp);
590         wrefresh(top.win);
591 }
592
593 static int update_item(int item_num, char *buf)
594 {
595         char **c = stat_content + item_num;
596
597         free(*c);
598         if (buf && buf[0])
599                 goto dup;
600         switch (item_num) {
601         case SI_ARTIST:
602                 *c = para_strdup("(artist tag not set)");
603                 goto print;
604         case SI_TITLE:
605                 *c = para_strdup("(title tag not set)");
606                 goto print;
607         case SI_YEAR:
608                 *c = para_strdup("????");
609                 goto print;
610         case SI_ALBUM:
611                 *c = para_strdup("(album tag not set)");
612                 goto print;
613         case SI_COMMENT:
614                 *c = para_strdup("(comment tag not set)");
615                 goto print;
616         }
617 dup:
618         *c = para_strdup(buf);
619 print:
620         print_stat_item(item_num);
621         return 1;
622 }
623
624 static int read_stat_pipe(fd_set *rfds)
625 {
626         static char *buf;
627         static int bufsize, loaded;
628         int ret, ret2;
629         size_t sz;
630
631         if (stat_pipe < 0)
632                 return 0;
633         if (loaded >= bufsize) {
634                 if (bufsize > 1000 * 1000) {
635                         loaded = 0;
636                         return 0;
637                 }
638                 bufsize += bufsize + 1000;
639                 buf = para_realloc(buf, bufsize);
640         }
641         assert(loaded < bufsize);
642         ret = read_nonblock(stat_pipe, buf + loaded, bufsize - loaded,
643                 rfds, &sz);
644         loaded += sz;
645         ret2 = for_each_stat_item(buf, loaded, update_item);
646         if (ret < 0 || ret2 < 0) {
647                 loaded = 0;
648                 return ret2 < 0? ret2 : ret;
649         }
650         sz = ret2; /* what is left */
651         if (sz > 0 && sz < loaded)
652                 memmove(buf, buf + loaded - sz, sz);
653         loaded = sz;
654         return 1;
655 }
656
657 static void print_all_items(void)
658 {
659         int i;
660
661         if (!curses_active())
662                 return;
663         FOR_EACH_STATUS_ITEM(i)
664                 print_stat_item(i);
665 }
666
667 static void clear_all_items(void)
668 {
669         int i;
670
671         FOR_EACH_STATUS_ITEM(i) {
672                 free(stat_content[i]);
673                 stat_content[i] = para_strdup("");
674         }
675 }
676
677 /*
678  * init all windows
679  */
680 static void init_wins(int top_lines)
681 {
682         int top_y = 0, bot_y = top_lines + 1, sb_y = LINES - 2,
683                 in_y = LINES - 1, sep_y = top_lines;
684         int bot_lines = LINES - top_lines - 3, sb_lines = 1, in_lines = 1,
685                 sep_lines = 1;
686
687         assume_default_colors(theme.default_fg, theme.default_bg);
688         if (top.win) {
689                 wresize(top.win, top_lines, COLS);
690                 mvwin(top.win, top_y, 0);
691
692                 wresize(sb.win, sb_lines, COLS);
693                 mvwin(sb.win, sb_y, 0);
694
695                 wresize(sep.win, sep_lines, COLS);
696                 mvwin(sep.win, sep_y, 0);
697
698                 wresize(bot.win, bot_lines, COLS);
699                 mvwin(bot.win, bot_y, 0);
700
701                 wresize(in.win, in_lines, COLS);
702                 mvwin(in.win, in_y, 0);
703         } else {
704                 sep.win = newwin(sep_lines, COLS, sep_y, 0);
705                 top.win = newwin(top_lines, COLS, top_y, 0);
706                 bot.win = newwin(bot_lines, COLS, bot_y, 0);
707                 sb.win = newwin(sb_lines, COLS, sb_y, 0);
708                 in.win = newwin(in_lines, COLS, in_y, 0);
709                 if (!top.win || !bot.win || !sb.win || !in.win || !sep.win)
710                         die(EXIT_FAILURE, "Error: Cannot create curses windows\n");
711                 wclear(bot.win);
712                 wclear(sb.win);
713                 wclear(in.win);
714                 scrollok(bot.win, 1);
715                 wattron(sb.win, COLOR_PAIR(COLOR_STATUSBAR));
716                 wattron(sep.win, COLOR_PAIR(COLOR_SEPARATOR));
717                 wattron(bot.win, COLOR_PAIR(COLOR_BOT));
718                 wattron(top.win, COLOR_PAIR(COLOR_TOP));
719                 nodelay(top.win, 1);
720                 nodelay(bot.win, 1);
721                 nodelay(sb.win, 1);
722                 nodelay(in.win, 0);
723
724                 keypad(top.win, 1);
725                 keypad(bot.win, 1);
726                 keypad(sb.win, 1);
727                 keypad(in.win, 1);
728         }
729         wmove(sep.win, 0, 0);
730         whline(sep.win, theme.sep_char, COLS);
731         wclear(top.win);
732         print_all_items();
733         //wclear(bot.win);
734         wnoutrefresh(top.win);
735         wnoutrefresh(bot.win);
736         print_status_bar();
737         wnoutrefresh(sb.win);
738         wnoutrefresh(in.win);
739         wnoutrefresh(sep.win);
740         doupdate();
741 }
742
743 static void init_pair_or_die(short pair, short f, short b)
744 {
745         if (init_pair(pair, f, b) == ERR)
746                 die(EXIT_FAILURE, "fatal: init_pair() failed\n");
747 }
748
749 static void init_colors_or_die(void)
750 {
751         int i;
752
753         if (!has_colors())
754                 die(EXIT_FAILURE, "fatal: No color term\n");
755         if (start_color() == ERR)
756                 die(EXIT_FAILURE, "fatal: failed to start colors\n");
757         FOR_EACH_STATUS_ITEM(i)
758                 if (theme.data[i].len)
759                         init_pair_or_die(i + 1, theme.data[i].fg,
760                                 theme.data[i].bg);
761         init_pair_or_die(COLOR_STATUSBAR, theme.sb_fg, theme.sb_bg);
762         init_pair_or_die(COLOR_COMMAND, theme.cmd_fg, theme.cmd_bg);
763         init_pair_or_die(COLOR_OUTPUT, theme.output_fg, theme.output_bg);
764         init_pair_or_die(COLOR_MSG, theme.msg_fg, theme.msg_bg);
765         init_pair_or_die(COLOR_ERRMSG, theme.err_msg_fg, theme.err_msg_bg);
766         init_pair_or_die(COLOR_SEPARATOR, theme.sep_fg, theme.sep_bg);
767         init_pair_or_die(COLOR_TOP, theme.default_fg, theme.default_bg);
768         init_pair_or_die(COLOR_BOT, theme.default_fg, theme.default_bg);
769 }
770
771 /* (Re-)initialize the curses library. */
772 static void init_curses(void)
773 {
774         if (curses_active())
775                 return;
776         if (top.win && refresh() == ERR) /* refresh is really needed */
777                 die(EXIT_FAILURE, "refresh() failed\n");
778         if (LINES < theme.lines_min || COLS < theme.cols_min)
779                 die(EXIT_FAILURE, "Terminal (%dx%d) too small"
780                         " (need at least %dx%d)\n", COLS, LINES,
781                         theme.cols_min, theme.lines_min);
782         curs_set(0); /* make cursor invisible, ignore errors */
783         nonl(); /* do not NL->CR/NL on output, always returns OK */
784         /* don't echo input */
785         if (noecho() == ERR)
786                 die(EXIT_FAILURE, "fatal: noecho() failed\n");
787         /* take input chars one at a time, no wait for \n */
788         if (cbreak() == ERR)
789                 die(EXIT_FAILURE, "fatal: cbreak() failed\n");
790         init_colors_or_die();
791         clear(); /* ignore non-fatal errors */
792         init_wins(theme.top_lines_default);
793         // noecho(); /* don't echo input */
794 }
795
796 static void check_sigchld(void)
797 {
798         int ret;
799         pid_t pid;
800
801 reap_next_child:
802         ret = para_reap_child(&pid);
803         if (ret <= 0)
804                 return;
805         if (pid == cmd_pid)
806                 cmd_pid = 0;
807         goto reap_next_child;
808 }
809
810 /*
811  * This sucker modifies its first argument. *handler and *arg are
812  * pointers to 0-terminated strings (inside line). Crap.
813  */
814 static int split_key_map(char *line, char **handler, char **arg)
815 {
816         if (!(*handler = strchr(line + 1, ':')))
817                 goto err_out;
818         **handler = '\0';
819         (*handler)++;
820         if (!(*arg = strchr(*handler, ':')))
821                 goto err_out;
822         **arg = '\0';
823         (*arg)++;
824         return 1;
825 err_out:
826         return 0;
827 }
828
829 static void check_key_map_args_or_die(void)
830 {
831         int i;
832         char *tmp = NULL;
833
834         for (i = 0; i < conf.key_map_given; ++i) {
835                 char *handler, *arg;
836
837                 free(tmp);
838                 tmp = para_strdup(conf.key_map_arg[i]);
839                 if (!split_key_map(tmp, &handler, &arg))
840                         break;
841                 if (strlen(handler) != 1)
842                         break;
843                 if (*handler != 'x' && *handler != 'd' && *handler != 'i'
844                                 && *handler != 'p')
845                         break;
846                 if (*handler != 'i')
847                         continue;
848                 if (find_cmd_byname(arg) < 0)
849                         break;
850         }
851         if (i != conf.key_map_given)
852                 die(EXIT_FAILURE, "invalid key map: %s\n", conf.key_map_arg[i]);
853         free(tmp);
854 }
855
856 static void parse_config_file_or_die(bool override)
857 {
858         bool err;
859         char *config_file;
860         struct gui_cmdline_parser_params params = {
861                 .override = override,
862                 .initialize = 0,
863                 .check_required = !override,
864                 .check_ambiguity = 0,
865                 .print_errors = 1,
866         };
867
868         if (conf.config_file_given)
869                 config_file = para_strdup(conf.config_file_arg);
870         else {
871                 char *home = para_homedir();
872                 config_file = make_message("%s/.paraslash/gui.conf", home);
873                 free(home);
874         }
875         if (!file_exists(config_file)) {
876                 if (!conf.config_file_given)
877                         err = false;
878                 else {
879                         PARA_EMERG_LOG("config file %s does not exist\n",
880                                 config_file);
881                         err = true;
882                 }
883                 goto out;
884         }
885         gui_cmdline_parser_config_file(config_file, &conf, &params);
886         loglevel = get_loglevel_by_name(conf.loglevel_arg);
887         check_key_map_args_or_die();
888         theme_init(conf.theme_arg, &theme);
889         err = false;
890 out:
891         free(config_file);
892         if (err)
893                 exit(EXIT_FAILURE);
894 }
895
896 /*
897  * React to various signal-related events
898  */
899 static void handle_signal(int sig)
900 {
901         switch (sig) {
902         case SIGTERM:
903                 die(EXIT_FAILURE, "only the good die young (caught SIGTERM)\n");
904                 return;
905         case SIGWINCH:
906                 if (curses_active()) {
907                         shutdown_curses();
908                         init_curses();
909                         redraw_bot_win();
910                 }
911                 return;
912         case SIGINT:
913                 PARA_WARNING_LOG("caught SIGINT, reset\n");
914                 /* Nothing to do. SIGINT killed our child which gets noticed
915                  * by do_select and resets everything.
916                  */
917                 return;
918         case SIGUSR1:
919                 PARA_NOTICE_LOG("got SIGUSR1, rereading configuration\n");
920                 com_reread_conf();
921                 return;
922         case SIGCHLD:
923                 check_sigchld();
924                 return;
925         }
926 }
927
928 static void status_pre_select(fd_set *rfds, int *max_fileno, struct timeval *tv)
929 {
930         static struct timeval next_exec, atm, diff;
931         int ret, fds[3] = {0, 1, 0};
932         pid_t pid;
933
934         if (stat_pipe >= 0)
935                 goto success;
936         /* Avoid busy loop */
937         gettimeofday(&atm, NULL);
938         if (tv_diff(&next_exec, &atm, &diff) > 0) {
939                 if (tv_diff(&diff, tv, NULL) < 0)
940                         *tv = diff;
941                 return;
942         }
943         next_exec.tv_sec = atm.tv_sec + 2;
944         ret = para_exec_cmdline_pid(&pid, conf.stat_cmd_arg, fds);
945         if (ret < 0)
946                 return;
947         ret = mark_fd_nonblocking(fds[1]);
948         if (ret < 0) {
949                 close(fds[1]);
950                 return;
951         }
952         stat_pipe = fds[1];
953 success:
954         para_fd_set(stat_pipe, rfds, max_fileno);
955 }
956
957 #define COMMAND_BUF_SIZE 32768
958
959 /*
960  * This is the core select loop. Besides the (internal) signal
961  * pipe, the following other fds are checked according to the mode:
962  *
963  * GETCH_MODE: check stdin, return when key is pressed
964  *
965  * COMMAND_MODE: check command fds and stdin. Return when peer has closed both
966  * stdout and stderr or when any key is pressed.
967  *
968  * EXTERNAL_MODE: Check only signal pipe. Used when an external command
969  * is running. During that time curses is disabled.  Returns when
970  * cmd_pid == 0.
971  */
972 static int do_select(int mode)
973 {
974         fd_set rfds;
975         int ret, i, max_fileno;
976         char command_buf[2][COMMAND_BUF_SIZE] = {"", ""};
977         int cbo[2] = {0, 0}; /* command buf offsets */
978         struct timeval tv;
979         unsigned flags[2] = {0, 0}; /* for for_each_line() */
980
981 repeat:
982         tv.tv_sec = conf.timeout_arg  / 1000;
983         tv.tv_usec = (conf.timeout_arg % 1000) * 1000;
984 //      ret = refresh_status();
985         FD_ZERO(&rfds);
986         max_fileno = 0;
987         status_pre_select(&rfds, &max_fileno, &tv);
988         /* signal pipe */
989         para_fd_set(signal_pipe, &rfds, &max_fileno);
990         /* command pipe only for COMMAND_MODE */
991         if (mode == COMMAND_MODE) {
992                 if (command_fds[0] >= 0)
993                         para_fd_set(command_fds[0], &rfds, &max_fileno);
994                 if (command_fds[1] >= 0)
995                         para_fd_set(command_fds[1], &rfds, &max_fileno);
996         }
997         if (mode == GETCH_MODE || mode == COMMAND_MODE)
998                 para_fd_set(STDIN_FILENO, &rfds, &max_fileno);
999         ret = para_select(max_fileno + 1, &rfds, NULL, &tv);
1000         if (ret <= 0)
1001                 goto check_return; /* skip fd checks */
1002         /* signals */
1003         ret = para_next_signal(&rfds);
1004         if (ret > 0)
1005                 handle_signal(ret);
1006         /* read command pipe if ready */
1007         if (mode == COMMAND_MODE) {
1008                 for (i = 0; i < 2; i++) {
1009                         size_t sz;
1010                         if (command_fds[i] < 0)
1011                                 continue;
1012                         ret = read_nonblock(command_fds[i],
1013                                 command_buf[i] + cbo[i],
1014                                 COMMAND_BUF_SIZE - 1 - cbo[i], &rfds, &sz);
1015                         cbo[i] += sz;
1016                         sz = cbo[i];
1017                         cbo[i] = for_each_line(flags[i], command_buf[i], cbo[i],
1018                                 add_output_line, &i);
1019                         if (sz != cbo[i]) { /* at least one line found */
1020                                 wrefresh(bot.win);
1021                                 flags[i] = 0;
1022                         }
1023                         if (ret < 0) {
1024                                 PARA_NOTICE_LOG("closing command fd %d: %s\n",
1025                                         i, para_strerror(-ret));
1026                                 close(command_fds[i]);
1027                                 command_fds[i] = -1;
1028                                 flags[i] = 0;
1029                                 cbo[i] = 0;
1030                                 if (command_fds[!i] < 0) /* both fds closed */
1031                                         return 0;
1032                         }
1033                         if (cbo[i] == COMMAND_BUF_SIZE - 1) {
1034                                 PARA_NOTICE_LOG("discarding overlong line\n");
1035                                 cbo[i] = 0;
1036                                 flags[i] = FELF_DISCARD_FIRST;
1037                         }
1038                 }
1039         }
1040         ret = read_stat_pipe(&rfds);
1041         if (ret < 0) {
1042                 PARA_NOTICE_LOG("closing stat pipe: %s\n", para_strerror(-ret));
1043                 close(stat_pipe);
1044                 stat_pipe = -1;
1045                 clear_all_items();
1046                 free(stat_content[SI_BASENAME]);
1047                 stat_content[SI_BASENAME] =
1048                         para_strdup("stat command terminated!?");
1049                 print_all_items();
1050         }
1051 check_return:
1052         switch (mode) {
1053         case COMMAND_MODE:
1054                 ret = wgetch(top.win);
1055                 if (ret != ERR && ret != KEY_RESIZE) {
1056                         if (cmd_pid)
1057                                 kill(cmd_pid, SIGTERM);
1058                         return -1;
1059                 }
1060                 break;
1061         case GETCH_MODE:
1062                 ret = wgetch(top.win);
1063                 if (ret != ERR && ret != KEY_RESIZE)
1064                         return ret;
1065                 break;
1066         case EXTERNAL_MODE:
1067                 if (cmd_pid == 0)
1068                         return 0;
1069         }
1070         goto repeat;
1071 }
1072
1073 /* read from command pipe and print data to bot window */
1074 static void exec_and_display_cmd(const char *cmd)
1075 {
1076         int ret, fds[3] = {0, 1, 1};
1077
1078         outputf(COLOR_COMMAND, "%s", cmd);
1079         ret = para_exec_cmdline_pid(&cmd_pid, cmd, fds);
1080         if (ret < 0)
1081                 return;
1082         ret = mark_fd_nonblocking(fds[1]);
1083         if (ret < 0)
1084                 goto fail;
1085         ret = mark_fd_nonblocking(fds[2]);
1086         if (ret < 0)
1087                 goto fail;
1088         command_fds[0] = fds[1];
1089         command_fds[1] = fds[2];
1090         if (do_select(COMMAND_MODE) >= 0)
1091                 PARA_INFO_LOG("command complete\n");
1092         else
1093                 PARA_NOTICE_LOG("command aborted\n");
1094         print_in_bar(COLOR_MSG, " ");
1095         return;
1096 fail:
1097         PARA_ERROR_LOG("%s\n", para_strerror(-ret));
1098         close(command_fds[0]);
1099         close(command_fds[1]);
1100 }
1101
1102 static void para_cmd(char *cmd)
1103 {
1104         char *c;
1105
1106         print_in_bar(COLOR_MSG, "executing client command, hit any key to abort\n");
1107         c = make_message(BINDIR "/para_client -- %s", cmd);
1108         exec_and_display_cmd(c);
1109         free(c);
1110 }
1111
1112 static void display_cmd(char *cmd)
1113 {
1114         print_in_bar(COLOR_MSG, "executing display command, hit any key to abort");
1115         exec_and_display_cmd(cmd);
1116 }
1117
1118 /*
1119  * shutdown curses and stat pipe before executing external commands
1120  */
1121 static void external_cmd(char *cmd)
1122 {
1123         int fds[3] = {-1, -1, -1};
1124
1125         if (cmd_pid)
1126                 return;
1127         shutdown_curses();
1128         if (para_exec_cmdline_pid(&cmd_pid, cmd, fds) < 0)
1129                 return;
1130         do_select(EXTERNAL_MODE);
1131         init_curses();
1132 }
1133
1134 static void print_scroll_msg(void)
1135 {
1136         unsigned lines_total, filled = ringbuffer_filled(bot_win_rb);
1137         int first_rbe = first_visible_rbe(&lines_total);
1138
1139         print_in_bar(COLOR_MSG, "scrolled view: %d-%d/%d\n", filled - first_rbe,
1140                 filled - scroll_position, ringbuffer_filled(bot_win_rb));
1141 }
1142
1143 static void com_scroll_top(void)
1144 {
1145         int i = RINGBUFFER_SIZE - 1, bot_lines = get_num_lines(&bot);
1146         unsigned lines = 0;
1147
1148         while (i > 0 && !ringbuffer_get(bot_win_rb, i))
1149                 i--;
1150         /* i is oldest entry */
1151         for (; lines < bot_lines && i >= 0; i--) {
1152                 struct rb_entry *rbe = ringbuffer_get(bot_win_rb, i);
1153                 if (!rbe)
1154                         break;
1155                 lines += NUM_LINES(rbe->len);
1156         }
1157         i++;
1158         if (lines > 0 && scroll_position != i) {
1159                 scroll_position = i;
1160                 redraw_bot_win();
1161                 print_scroll_msg();
1162                 return;
1163         }
1164         print_in_bar(COLOR_ERRMSG, "top of buffer is shown\n");
1165 }
1166
1167 static void com_cancel_scrolling(void)
1168 {
1169
1170         if (scroll_position == 0) {
1171                 print_in_bar(COLOR_ERRMSG, "bottom of buffer is shown\n");
1172                 return;
1173         }
1174         scroll_position = 0;
1175         redraw_bot_win();
1176 }
1177
1178 static void com_page_down(void)
1179 {
1180         unsigned lines = 0;
1181         int i = scroll_position, bot_lines = get_num_lines(&bot);
1182
1183         while (lines < bot_lines && --i > 0) {
1184                 struct rb_entry *rbe = ringbuffer_get(bot_win_rb, i);
1185                 if (!rbe)
1186                         break;
1187                 lines += NUM_LINES(rbe->len);
1188         }
1189         if (lines) {
1190                 scroll_position = i;
1191                 redraw_bot_win();
1192                 print_scroll_msg();
1193                 return;
1194         }
1195         print_in_bar(COLOR_ERRMSG, "bottom of buffer is shown\n");
1196 }
1197
1198 static void com_page_up(void)
1199 {
1200         unsigned lines;
1201         int fvr = first_visible_rbe(&lines), bot_lines = get_num_lines(&bot);
1202
1203         if (fvr < 0 || fvr + 1 >= ringbuffer_filled(bot_win_rb)) {
1204                 print_in_bar(COLOR_ERRMSG, "top of buffer is shown\n");
1205                 return;
1206         }
1207         scroll_position = fvr + 1;
1208         for (; scroll_position > 0; scroll_position--) {
1209                 first_visible_rbe(&lines);
1210                 if (lines == bot_lines)
1211                         break;
1212         }
1213         redraw_bot_win();
1214         print_scroll_msg();
1215 }
1216
1217 static void com_scroll_down(void)
1218 {
1219         struct rb_entry *rbe;
1220         int rbe_lines, bot_lines = get_num_lines(&bot);
1221
1222         if (!scroll_position) {
1223                 print_in_bar(COLOR_ERRMSG, "bottom of buffer is shown\n");
1224                 return;
1225         }
1226         scroll_position--;
1227         rbe = ringbuffer_get(bot_win_rb, scroll_position);
1228         rbe_lines = NUM_LINES(rbe->len);
1229         wscrl(bot.win, rbe_lines);
1230         wmove(bot.win, bot_lines - rbe_lines, 0);
1231         wattron(bot.win, COLOR_PAIR(rbe->color));
1232         waddstr(bot.win, rbe->msg);
1233         wrefresh(bot.win);
1234         print_scroll_msg();
1235 }
1236
1237 static void com_scroll_up(void)
1238 {
1239         struct rb_entry *rbe = NULL;
1240         unsigned lines;
1241         int i, first_rbe, num_scroll;
1242
1243         /* the entry that is going to vanish */
1244         rbe = ringbuffer_get(bot_win_rb, scroll_position);
1245         if (!rbe)
1246                 goto err_out;
1247         num_scroll = NUM_LINES(rbe->len);
1248         first_rbe = first_visible_rbe(&lines);
1249         if (first_rbe < 0 || (first_rbe == ringbuffer_filled(bot_win_rb) - 1))
1250                 goto err_out;
1251         scroll_position++;
1252         wscrl(bot.win, -num_scroll);
1253         i = draw_top_rbe(&lines);
1254         if (i < 0)
1255                 goto err_out;
1256         while (i > 0 && lines < num_scroll) {
1257                 int rbe_lines;
1258                 rbe = ringbuffer_get(bot_win_rb, --i);
1259                 if (!rbe)
1260                         break;
1261                 rbe_lines = NUM_LINES(rbe->len);
1262                 lines += rbe_lines;
1263                 wattron(bot.win, COLOR_PAIR(rbe->color));
1264                 waddstr(bot.win, "\n");
1265                 waddstr(bot.win, rbe->msg);
1266                 if (!i)
1267                         break;
1268                 i--;
1269         }
1270         wrefresh(bot.win);
1271         print_scroll_msg();
1272         return;
1273 err_out:
1274         print_in_bar(COLOR_ERRMSG, "top of buffer is shown\n");
1275 }
1276
1277 static void com_ll_decr(void)
1278 {
1279         if (loglevel <= LL_DEBUG) {
1280                 print_in_bar(COLOR_ERRMSG,
1281                         "loglevel already at maximal verbosity\n");
1282                 return;
1283         }
1284         loglevel--;
1285         print_in_bar(COLOR_MSG, "loglevel set to %d\n", loglevel);
1286 }
1287
1288 static void com_ll_incr(void)
1289 {
1290         if (loglevel >= LL_EMERG) {
1291                 print_in_bar(COLOR_ERRMSG,
1292                         "loglevel already at minimal verbosity\n");
1293                 return;
1294         }
1295         loglevel++;
1296         print_in_bar(COLOR_MSG, "loglevel set to %d\n", loglevel);
1297 }
1298
1299 /*
1300  * reread configuration, terminate on errors
1301  */
1302 static void com_reread_conf(void)
1303 {
1304         /*
1305          * gengetopt might print to stderr and exit on errors. So we have to
1306          * shutdown curses first.
1307          */
1308         shutdown_curses();
1309         parse_config_file_or_die(true /* override */);
1310         init_curses();
1311         print_in_bar(COLOR_MSG, "config file reloaded\n");
1312 }
1313
1314 static void com_help(void)
1315 {
1316         int i;
1317
1318         for (i = 0; i < conf.key_map_given; ++i) {
1319                 char *handler, *arg, *tmp = para_strdup(conf.key_map_arg[i]);
1320                 const char *handler_text = "???", *desc = NULL;
1321
1322                 if (!split_key_map(tmp, &handler, &arg)) {
1323                         free(tmp);
1324                         return;
1325                 }
1326                 switch (*handler) {
1327                         case 'i':
1328                                 handler_text = "internal";
1329                                 desc = command_list[find_cmd_byname(arg)].description;
1330                                 break;
1331                         case 'x': handler_text = "external"; break;
1332                         case 'd': handler_text = "display "; break;
1333                         case 'p': handler_text = "para    "; break;
1334                 }
1335                 outputf(COLOR_MSG, "%s\t%s\t%s%s\t%s", tmp, handler_text, arg,
1336                         strlen(arg) < 8? "\t" : "",
1337                         desc? desc : "");
1338                 free(tmp);
1339         }
1340         for (i = 0; command_list[i].handler; i++) {
1341                 struct gui_command gc = command_list[i];
1342
1343                 outputf(COLOR_MSG, "%s\tinternal\t%s\t%s%s", gc.key, gc.name,
1344                         strlen(gc.name) < 8? "\t" : "",
1345                         gc.description);
1346         }
1347         print_in_bar(COLOR_MSG, "try \"para_gui -h\" or \"para_client help\" "
1348                 "for more info");
1349 }
1350
1351 static void com_shrink_top_win(void)
1352 {
1353         int top_lines = get_num_lines(&top);
1354
1355         if (top_lines <= theme.top_lines_min) {
1356                 PARA_WARNING_LOG("can not decrease top window\n");
1357                 return;
1358         }
1359         init_wins(top_lines - 1);
1360         print_in_bar(COLOR_MSG, "%s", "decreased top window");
1361 }
1362
1363 static void com_enlarge_top_win(void)
1364 {
1365         int top_lines = get_num_lines(&top), bot_lines = get_num_lines(&bot);
1366
1367         if (bot_lines < 3) {
1368                 PARA_WARNING_LOG("can not increase top window\n");
1369                 return;
1370         }
1371         init_wins(top_lines + 1);
1372         print_in_bar(COLOR_MSG, "increased top window");
1373 }
1374
1375 static void com_version(void)
1376 {
1377         print_in_bar(COLOR_MSG, "%s", version_single_line("gui"));
1378 }
1379
1380 __noreturn static void com_quit(void)
1381 {
1382         die(EXIT_SUCCESS, "%s", "");
1383 }
1384
1385 static void com_refresh(void)
1386 {
1387         shutdown_curses();
1388         init_curses();
1389 }
1390
1391 static void com_next_theme(void)
1392 {
1393         theme_next(&theme);
1394         com_refresh();
1395 }
1396
1397 static void com_prev_theme(void)
1398 {
1399         theme_prev(&theme);
1400         com_refresh();
1401 }
1402
1403 static void handle_command(int c)
1404 {
1405         int i;
1406
1407         /* first check user-defined key bindings */
1408         for (i = 0; i < conf.key_map_given; ++i) {
1409                 char *tmp, *handler, *arg;
1410
1411                 tmp = para_strdup(conf.key_map_arg[i]);
1412                 if (!split_key_map(tmp, &handler, &arg)) {
1413                         free(tmp);
1414                         return;
1415                 }
1416                 if (strcmp(tmp, km_keyname(c))) {
1417                         free(tmp);
1418                         continue;
1419                 }
1420                 if (*handler == 'd')
1421                         display_cmd(arg);
1422                 else if (*handler == 'x')
1423                         external_cmd(arg);
1424                 else if (*handler == 'p')
1425                         para_cmd(arg);
1426                 else if (*handler == 'i') {
1427                         int num = find_cmd_byname(arg);
1428                         if (num >= 0)
1429                                 command_list[num].handler();
1430                 }
1431                 free(tmp);
1432                 return;
1433         }
1434         /* not found, check internal key bindings */
1435         for (i = 0; command_list[i].handler; i++) {
1436                 if (!strcmp(km_keyname(c), command_list[i].key)) {
1437                         command_list[i].handler();
1438                         return;
1439                 }
1440         }
1441         print_in_bar(COLOR_ERRMSG, "key '%s' is not bound, press ? for help",
1442                 km_keyname(c));
1443 }
1444
1445 __noreturn static void print_help_and_die(void)
1446 {
1447         struct ggo_help h = DEFINE_GGO_HELP(gui);
1448         bool d = conf.detailed_help_given;
1449
1450         ggo_print_help(&h, d? GPH_STANDARD_FLAGS_DETAILED : GPH_STANDARD_FLAGS);
1451         exit(0);
1452 }
1453
1454 int main(int argc, char *argv[])
1455 {
1456         int ret;
1457
1458         gui_cmdline_parser(argc, argv, &conf); /* exits on errors */
1459         loglevel = get_loglevel_by_name(conf.loglevel_arg);
1460         version_handle_flag("gui", conf.version_given);
1461         if (conf.help_given || conf.detailed_help_given)
1462                 print_help_and_die();
1463         parse_config_file_or_die(false /* override */);
1464         setup_signal_handling();
1465         bot_win_rb = ringbuffer_new(RINGBUFFER_SIZE);
1466         setlocale(LC_CTYPE, "");
1467         initscr(); /* needed only once, always successful */
1468         init_curses();
1469         for (;;) {
1470                 print_status_bar();
1471                 ret = do_select(GETCH_MODE);
1472                 if (!ret)
1473                         continue;
1474                 print_in_bar(COLOR_MSG, " ");
1475                 handle_command(ret);
1476         }
1477 }