Build VLC aliases cleanly (don't need to parse argv[0])
[vlc.git] / lxdialog / util.c
1 /*
2  *  util.c
3  *
4  *  ORIGINAL AUTHOR: Savio Lam (lam836@cs.cuhk.hk)
5  *  MODIFIED FOR LINUX KERNEL CONFIG BY: William Roadcap (roadcap@cfw.com)
6  *
7  *  This program is free software; you can redistribute it and/or
8  *  modify it under the terms of the GNU General Public License
9  *  as published by the Free Software Foundation; either version 2
10  *  of the License, or (at your option) any later version.
11  *
12  *  This program is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *  GNU General Public License for more details.
16  *
17  *  You should have received a copy of the GNU General Public License
18  *  along with this program; if not, write to the Free Software
19  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20  */
21
22 #include "dialog.h"
23
24
25 /* use colors by default? */
26 bool use_colors = 1;
27
28 const char *backtitle = NULL;
29
30 const char *dialog_result;
31
32 /* 
33  * Attribute values, default is for mono display
34  */
35 chtype attributes[] =
36 {
37     A_NORMAL,                   /* screen_attr */
38     A_NORMAL,                   /* shadow_attr */
39     A_NORMAL,                   /* dialog_attr */
40     A_BOLD,                     /* title_attr */
41     A_NORMAL,                   /* border_attr */
42     A_REVERSE,                  /* button_active_attr */
43     A_DIM,                      /* button_inactive_attr */
44     A_REVERSE,                  /* button_key_active_attr */
45     A_BOLD,                     /* button_key_inactive_attr */
46     A_REVERSE,                  /* button_label_active_attr */
47     A_NORMAL,                   /* button_label_inactive_attr */
48     A_NORMAL,                   /* inputbox_attr */
49     A_NORMAL,                   /* inputbox_border_attr */
50     A_NORMAL,                   /* searchbox_attr */
51     A_BOLD,                     /* searchbox_title_attr */
52     A_NORMAL,                   /* searchbox_border_attr */
53     A_BOLD,                     /* position_indicator_attr */
54     A_NORMAL,                   /* menubox_attr */
55     A_NORMAL,                   /* menubox_border_attr */
56     A_NORMAL,                   /* item_attr */
57     A_REVERSE,                  /* item_selected_attr */
58     A_BOLD,                     /* tag_attr */
59     A_REVERSE,                  /* tag_selected_attr */
60     A_BOLD,                     /* tag_key_attr */
61     A_REVERSE,                  /* tag_key_selected_attr */
62     A_BOLD,                     /* check_attr */
63     A_REVERSE,                  /* check_selected_attr */
64     A_BOLD,                     /* uarrow_attr */
65     A_BOLD                      /* darrow_attr */
66 };
67
68
69 #include "colors.h"
70
71 /*
72  * Table of color values
73  */
74 int color_table[][3] =
75 {
76     {SCREEN_FG, SCREEN_BG, SCREEN_HL},
77     {SHADOW_FG, SHADOW_BG, SHADOW_HL},
78     {DIALOG_FG, DIALOG_BG, DIALOG_HL},
79     {TITLE_FG, TITLE_BG, TITLE_HL},
80     {BORDER_FG, BORDER_BG, BORDER_HL},
81     {BUTTON_ACTIVE_FG, BUTTON_ACTIVE_BG, BUTTON_ACTIVE_HL},
82     {BUTTON_INACTIVE_FG, BUTTON_INACTIVE_BG, BUTTON_INACTIVE_HL},
83     {BUTTON_KEY_ACTIVE_FG, BUTTON_KEY_ACTIVE_BG, BUTTON_KEY_ACTIVE_HL},
84     {BUTTON_KEY_INACTIVE_FG, BUTTON_KEY_INACTIVE_BG, BUTTON_KEY_INACTIVE_HL},
85     {BUTTON_LABEL_ACTIVE_FG, BUTTON_LABEL_ACTIVE_BG, BUTTON_LABEL_ACTIVE_HL},
86     {BUTTON_LABEL_INACTIVE_FG, BUTTON_LABEL_INACTIVE_BG,
87      BUTTON_LABEL_INACTIVE_HL},
88     {INPUTBOX_FG, INPUTBOX_BG, INPUTBOX_HL},
89     {INPUTBOX_BORDER_FG, INPUTBOX_BORDER_BG, INPUTBOX_BORDER_HL},
90     {SEARCHBOX_FG, SEARCHBOX_BG, SEARCHBOX_HL},
91     {SEARCHBOX_TITLE_FG, SEARCHBOX_TITLE_BG, SEARCHBOX_TITLE_HL},
92     {SEARCHBOX_BORDER_FG, SEARCHBOX_BORDER_BG, SEARCHBOX_BORDER_HL},
93     {POSITION_INDICATOR_FG, POSITION_INDICATOR_BG, POSITION_INDICATOR_HL},
94     {MENUBOX_FG, MENUBOX_BG, MENUBOX_HL},
95     {MENUBOX_BORDER_FG, MENUBOX_BORDER_BG, MENUBOX_BORDER_HL},
96     {ITEM_FG, ITEM_BG, ITEM_HL},
97     {ITEM_SELECTED_FG, ITEM_SELECTED_BG, ITEM_SELECTED_HL},
98     {TAG_FG, TAG_BG, TAG_HL},
99     {TAG_SELECTED_FG, TAG_SELECTED_BG, TAG_SELECTED_HL},
100     {TAG_KEY_FG, TAG_KEY_BG, TAG_KEY_HL},
101     {TAG_KEY_SELECTED_FG, TAG_KEY_SELECTED_BG, TAG_KEY_SELECTED_HL},
102     {CHECK_FG, CHECK_BG, CHECK_HL},
103     {CHECK_SELECTED_FG, CHECK_SELECTED_BG, CHECK_SELECTED_HL},
104     {UARROW_FG, UARROW_BG, UARROW_HL},
105     {DARROW_FG, DARROW_BG, DARROW_HL},
106 };                              /* color_table */
107
108 /*
109  * Set window to attribute 'attr'
110  */
111 void
112 attr_clear (WINDOW * win, int height, int width, chtype attr)
113 {
114     int i, j;
115
116     wattrset (win, attr);
117     for (i = 0; i < height; i++) {
118         wmove (win, i, 0);
119         for (j = 0; j < width; j++)
120             waddch (win, ' ');
121     }
122     touchwin (win);
123 }
124
125 void dialog_clear (void)
126 {
127     attr_clear (stdscr, LINES, COLS, screen_attr);
128     /* Display background title if it exists ... - SLH */
129     if (backtitle != NULL) {
130         int i;
131
132         wattrset (stdscr, screen_attr);
133         mvwaddstr (stdscr, 0, 1, (char *)backtitle);
134         wmove (stdscr, 1, 1);
135         for (i = 1; i < COLS - 1; i++)
136             waddch (stdscr, ACS_HLINE);
137     }
138     wnoutrefresh (stdscr);
139 }
140
141 /*
142  * Do some initialization for dialog
143  */
144 void
145 init_dialog (void)
146 {
147     initscr ();                 /* Init curses */
148     keypad (stdscr, TRUE);
149     cbreak ();
150     noecho ();
151
152
153     if (use_colors)     /* Set up colors */
154         color_setup ();
155
156
157     dialog_clear ();
158 }
159
160 /*
161  * Setup for color display
162  */
163 void
164 color_setup (void)
165 {
166     int i;
167
168     if (has_colors ()) {        /* Terminal supports color? */
169         start_color ();
170
171         /* Initialize color pairs */
172         for (i = 0; i < ATTRIBUTE_COUNT; i++)
173             init_pair (i + 1, color_table[i][0], color_table[i][1]);
174
175         /* Setup color attributes */
176         for (i = 0; i < ATTRIBUTE_COUNT; i++)
177             attributes[i] = C_ATTR (color_table[i][2], i + 1);
178     }
179 }
180
181 /*
182  * End using dialog functions.
183  */
184 void
185 end_dialog (void)
186 {
187     endwin ();
188 }
189
190
191 /*
192  * Print a string of text in a window, automatically wrap around to the
193  * next line if the string is too long to fit on one line. Newline
194  * characters '\n' are replaced by spaces.  We start on a new line
195  * if there is no room for at least 4 nonblanks following a double-space.
196  */
197 void
198 print_autowrap (WINDOW * win, const char *prompt, int width, int y, int x)
199 {
200     int newl, cur_x, cur_y;
201     int i, prompt_len, room, wlen;
202     char tempstr[MAX_LEN + 1], *word, *sp, *sp2;
203
204     strcpy (tempstr, prompt);
205
206     prompt_len = strlen(tempstr);
207         
208     /*
209      * Remove newlines
210      */
211     for(i=0; i<prompt_len; i++) {
212         if(tempstr[i] == '\n') tempstr[i] = ' ';
213     }
214
215     if (prompt_len <= width - x * 2) {  /* If prompt is short */
216         wmove (win, y, (width - prompt_len) / 2);
217         waddstr (win, tempstr);
218     } else {
219         cur_x = x;
220         cur_y = y;
221         newl = 1;
222         word = tempstr;
223         while (word && *word) {
224             sp = index(word, ' ');
225             if (sp)
226                 *sp++ = 0;
227
228             /* Wrap to next line if either the word does not fit,
229                or it is the first word of a new sentence, and it is
230                short, and the next word does not fit. */
231             room = width - cur_x;
232             wlen = strlen(word);
233             if (wlen > room ||
234                (newl && wlen < 4 && sp && wlen+1+strlen(sp) > room
235                      && (!(sp2 = index(sp, ' ')) || wlen+1+(sp2-sp) > room))) {
236                 cur_y++;
237                 cur_x = x;
238             }
239             wmove (win, cur_y, cur_x);
240             waddstr (win, word);
241             getyx (win, cur_y, cur_x);
242             cur_x++;
243             if (sp && *sp == ' ') {
244                 cur_x++;        /* double space */
245                 while (*++sp == ' ');
246                 newl = 1;
247             } else
248                 newl = 0;
249             word = sp;
250         }
251     }
252 }
253
254 /*
255  * Print a button
256  */
257 void
258 print_button (WINDOW * win, const char *label, int y, int x, int selected)
259 {
260     int i, temp;
261
262     wmove (win, y, x);
263     wattrset (win, selected ? button_active_attr : button_inactive_attr);
264     waddstr (win, "<");
265     temp = strspn (label, " ");
266     label += temp;
267     wattrset (win, selected ? button_label_active_attr
268               : button_label_inactive_attr);
269     for (i = 0; i < temp; i++)
270         waddch (win, ' ');
271     wattrset (win, selected ? button_key_active_attr
272               : button_key_inactive_attr);
273     waddch (win, label[0]);
274     wattrset (win, selected ? button_label_active_attr
275               : button_label_inactive_attr);
276     waddstr (win, (char *)label + 1);
277     wattrset (win, selected ? button_active_attr : button_inactive_attr);
278     waddstr (win, ">");
279     wmove (win, y, x + temp + 1);
280 }
281
282 /*
283  * Draw a rectangular box with line drawing characters
284  */
285 void
286 draw_box (WINDOW * win, int y, int x, int height, int width,
287           chtype box, chtype border)
288 {
289     int i, j;
290
291     wattrset (win, 0);
292     for (i = 0; i < height; i++) {
293         wmove (win, y + i, x);
294         for (j = 0; j < width; j++)
295             if (!i && !j)
296                 waddch (win, border | ACS_ULCORNER);
297             else if (i == height - 1 && !j)
298                 waddch (win, border | ACS_LLCORNER);
299             else if (!i && j == width - 1)
300                 waddch (win, box | ACS_URCORNER);
301             else if (i == height - 1 && j == width - 1)
302                 waddch (win, box | ACS_LRCORNER);
303             else if (!i)
304                 waddch (win, border | ACS_HLINE);
305             else if (i == height - 1)
306                 waddch (win, box | ACS_HLINE);
307             else if (!j)
308                 waddch (win, border | ACS_VLINE);
309             else if (j == width - 1)
310                 waddch (win, box | ACS_VLINE);
311             else
312                 waddch (win, box | ' ');
313     }
314 }
315
316 /*
317  * Draw shadows along the right and bottom edge to give a more 3D look
318  * to the boxes
319  */
320 void
321 draw_shadow (WINDOW * win, int y, int x, int height, int width)
322 {
323     int i;
324
325     if (has_colors ()) {        /* Whether terminal supports color? */
326         wattrset (win, shadow_attr);
327         wmove (win, y + height, x + 2);
328         for (i = 0; i < width; i++)
329             waddch (win, winch (win) & A_CHARTEXT);
330         for (i = y + 1; i < y + height + 1; i++) {
331             wmove (win, i, x + width);
332             waddch (win, winch (win) & A_CHARTEXT);
333             waddch (win, winch (win) & A_CHARTEXT);
334         }
335         wnoutrefresh (win);
336     }
337 }
338
339 /*
340  *  Return the position of the first alphabetic character in a string.
341  */
342 int
343 first_alpha(const char *string, const char *exempt)
344 {
345         int i, in_paren=0, c;
346
347         for (i = 0; i < strlen(string); i++) {
348                 c = tolower(string[i]);
349
350                 if (strchr("<[(", c)) ++in_paren;
351                 if (strchr(">])", c)) --in_paren;
352
353                 if ((! in_paren) && isalpha(c) && 
354                      strchr(exempt, c) == 0)
355                         return i;
356         }
357
358         return 0;
359 }