1 /****************************************************************************
2 * Copyright (c) 1999-2006,2007 Free Software Foundation, Inc. *
4 * Permission is hereby granted, free of charge, to any person obtaining a *
5 * copy of this software and associated documentation files (the *
6 * "Software"), to deal in the Software without restriction, including *
7 * without limitation the rights to use, copy, modify, merge, publish, *
8 * distribute, distribute with modifications, sublicense, and/or sell *
9 * copies of the Software, and to permit persons to whom the Software is *
10 * furnished to do so, subject to the following conditions: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * Except as contained in this notice, the name(s) of the above copyright *
24 * holders shall not be used in advertising or otherwise to promote the *
25 * sale, use or other dealings in this Software without prior written *
27 ****************************************************************************/
30 * Author: Thomas E. Dickey
32 * $Id: cardfile.c,v 1.32 2007/08/11 16:34:27 tom Exp $
34 * File format: text beginning in column 1 is a title; other text is content.
37 #include <test.priv.h>
39 #if USE_LIBFORM && USE_LIBPANEL
44 #define VISIBLE_CARDS 10
49 #define isVisible(cardp) ((cardp)->panel != 0)
52 MY_CTRL_x = MAX_FORM_COMMAND
59 typedef struct _card {
67 static CARD *all_cards;
68 static bool try_color = FALSE;
69 static char default_name[] = "cardfile.dat";
72 #define strdup my_strdup
76 char *p = (char *) malloc(strlen(s) + 1);
81 #endif /* not HAVE_STRDUP */
84 skip(const char *buffer)
86 while (isspace(UChar(*buffer)))
94 unsigned n = strlen(buffer);
95 while (n-- && isspace(UChar(buffer[n])))
99 /*******************************************************************************/
102 add_title(const char *title)
106 for (p = all_cards, q = 0; p != 0; q = p, p = p->link) {
107 int cmp = strcmp(p->title, title);
114 card = (CARD *) calloc(1, sizeof(CARD));
115 card->title = strdup(title);
116 card->content = strdup("");
119 card->link = all_cards;
122 card->link = q->link;
130 add_content(CARD * card, const char *content)
132 unsigned total, offset;
134 content = skip(content);
135 if ((total = strlen(content)) != 0) {
136 if ((offset = strlen(card->content)) != 0) {
138 card->content = (char *) realloc(card->content, total + 1);
140 strcpy(card->content + offset++, " ");
142 if (card->content != 0)
144 card->content = (char *) malloc(total + 1);
147 strcpy(card->content + offset, content);
154 CARD *card = add_title("");
155 add_content(card, "");
160 find_card(char *title)
164 for (card = all_cards; card != 0; card = card->link)
165 if (!strcmp(card->title, title))
172 read_data(char *fname)
178 if ((fp = fopen(fname, "r")) != 0) {
179 while (fgets(buffer, sizeof(buffer), fp)) {
181 if (isspace(UChar(*buffer))) {
183 card = add_title("");
184 add_content(card, buffer);
185 } else if ((card = find_card(buffer)) == 0) {
186 card = add_title(buffer);
193 /*******************************************************************************/
196 write_data(const char *fname)
202 if (!strcmp(fname, default_name))
203 fname = "cardfile.out";
205 if ((fp = fopen(fname, "w")) != 0) {
206 for (p = all_cards; p != 0; p = p->link) {
207 FIELD **f = form_fields(p->form);
208 for (n = 0; f[n] != 0; n++) {
209 char *s = field_buffer(f[n], 0);
211 && (s = strdup(s)) != 0) {
213 fprintf(fp, "%s%s\n", n ? "\t" : "", s);
222 /*******************************************************************************/
233 for (p = all_cards; p != 0; p = p->link)
240 * Shuffle the panels to keep them in a natural hierarchy.
243 order_cards(CARD * first, int depth)
246 if (depth && first->link)
247 order_cards(first->link, depth - 1);
248 if (isVisible(first))
249 top_panel(first->panel);
254 * Return the next card in the list
257 next_card(CARD * now)
259 if (now->link != 0) {
260 CARD *tst = now->link;
264 tst = next_card(tst);
270 * Return the previous card in the list
273 prev_card(CARD * now)
276 for (p = all_cards; p != 0; p = p->link) {
277 if (p->link == now) {
287 * Returns the first card in the list that we will display.
290 first_card(CARD * now)
293 now = next_card(now);
297 /*******************************************************************************/
300 form_virtualize(WINDOW *w)
316 return (REQ_DEL_PREV);
318 return (REQ_DEL_CHAR);
320 return (REQ_LEFT_CHAR);
322 return (REQ_RIGHT_CHAR);
326 return (REQ_NEXT_FIELD);
329 return (REQ_PREV_FIELD);
337 make_fields(CARD * p, int form_high, int form_wide)
339 FIELD **f = (FIELD **) calloc(3, sizeof(FIELD *));
341 f[0] = new_field(1, form_wide, 0, 0, 0, 0);
342 set_field_back(f[0], A_REVERSE);
343 set_field_buffer(f[0], 0, p->title);
344 field_opts_off(f[0], O_BLANK);
346 f[1] = new_field(form_high - 1, form_wide, 1, 0, 0, 0);
347 set_field_buffer(f[1], 0, p->content);
348 set_field_just(f[1], JUSTIFY_LEFT);
349 field_opts_off(f[1], O_BLANK);
360 addstr("^Q/ESC -- exit form ^W -- writes data to file\n");
361 addstr("^N -- go to next card ^P -- go to previous card\n");
362 addstr("Arrow keys move left/right within a field, up/down between fields");
365 #if (defined(KEY_RESIZE) && HAVE_WRESIZE) || NO_LEAKS
367 free_form_fields(FIELD ** f)
371 for (n = 0; f[n] != 0; ++n) {
378 /*******************************************************************************/
381 cardfile(char *fname)
394 int finished = FALSE;
398 /* decide how many cards we can display */
399 visible_cards = count_cards();
401 (panel_wide = COLS - (visible_cards * OFFSET_CARD)) < 10 ||
402 (panel_high = LINES - (visible_cards * OFFSET_CARD) - 5) < 5) {
405 form_wide = panel_wide - 2;
406 form_high = panel_high - 2;
407 y = (visible_cards - 1) * OFFSET_CARD;
410 /* make a panel for each CARD */
411 for (p = all_cards; p != 0; p = p->link) {
413 if ((win = newwin(panel_high, panel_wide, y, x)) == 0)
416 wbkgd(win, COLOR_PAIR(pair_2));
418 p->panel = new_panel(win);
421 p->form = new_form(make_fields(p, form_high, form_wide));
422 set_form_win(p->form, win);
423 set_form_sub(p->form, derwin(win, form_high, form_wide, 1, 1));
430 top_card = first_card(all_cards);
431 order_cards(top_card, visible_cards);
437 ch = form_virtualize(panel_window(top_card->panel));
438 switch (form_driver(top_card->form, ch)) {
441 case E_UNKNOWN_COMMAND:
447 top_card = prev_card(top_card);
448 order_cards(top_card, visible_cards);
451 top_card = next_card(top_card);
452 order_cards(top_card, visible_cards);
455 form_driver(top_card->form, REQ_VALIDATION);
458 #if defined(KEY_RESIZE) && HAVE_WRESIZE
460 /* resizeterm already did "something" reasonable, but it cannot
461 * know much about layout. So let's make it nicer.
463 panel_wide = COLS - (visible_cards * OFFSET_CARD);
464 panel_high = LINES - (visible_cards * OFFSET_CARD) - 5;
466 form_wide = panel_wide - 2;
467 form_high = panel_high - 2;
469 y = (visible_cards - 1) * OFFSET_CARD;
473 for (p = all_cards; p != 0; p = p->link) {
474 FIELD **oldf = form_fields(p->form);
475 WINDOW *olds = form_sub(p->form);
479 win = form_win(p->form);
481 /* move and resize the card as needed
482 * FIXME: if the windows are shrunk too much, this won't do
485 wresize(win, panel_high, panel_wide);
487 /* reconstruct each form. Forms are not resizable, and
488 * there appears to be no good way to reload the text in
493 unpost_form(p->form);
496 p->form = new_form(make_fields(p, form_high, form_wide));
497 set_form_win(p->form, win);
498 set_form_sub(p->form, derwin(win, form_high, form_wide,
502 free_form_fields(oldf);
523 while (all_cards != 0) {
528 all_cards = all_cards->link;
531 f = form_fields(p->form);
532 count = field_count(p->form);
534 unpost_form(p->form); /* ...so we can free it */
535 free_form(p->form); /* this also disconnects the fields */
551 static const char *msg[] =
553 "Usage: view [options] file"
556 ," -c use color if terminal supports it"
559 for (n = 0; n < SIZEOF(msg); n++)
560 fprintf(stderr, "%s\n", msg[n]);
561 ExitProgram(EXIT_FAILURE);
564 /*******************************************************************************/
567 main(int argc, char *argv[])
571 setlocale(LC_ALL, "");
573 while ((n = getopt(argc, argv, "c")) != -1) {
590 init_pair(pair_1, COLOR_WHITE, COLOR_BLUE);
591 init_pair(pair_2, COLOR_WHITE, COLOR_CYAN);
592 bkgd(COLOR_PAIR(pair_1));
598 if (optind + 1 == argc) {
599 for (n = 1; n < argc; n++)
601 if (count_cards() == 0)
605 read_data(default_name);
606 if (count_cards() == 0)
608 cardfile(default_name);
613 ExitProgram(EXIT_SUCCESS);
619 printf("This program requires the curses form and panel libraries\n");
620 ExitProgram(EXIT_FAILURE);