1 /****************************************************************************
2 * Copyright (c) 1999-2004,2006 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.28 2006/12/10 00:30:09 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);
139 strcpy(card->content + offset++, " ");
141 if (card->content != 0)
143 card->content = (char *) malloc(total + 1);
145 strcpy(card->content + offset, content);
152 CARD *card = add_title("");
153 add_content(card, "");
158 find_card(char *title)
162 for (card = all_cards; card != 0; card = card->link)
163 if (!strcmp(card->title, title))
170 read_data(char *fname)
176 if ((fp = fopen(fname, "r")) != 0) {
177 while (fgets(buffer, sizeof(buffer), fp)) {
179 if (isspace(UChar(*buffer))) {
181 card = add_title("");
182 add_content(card, buffer);
183 } else if ((card = find_card(buffer)) == 0) {
184 card = add_title(buffer);
191 /*******************************************************************************/
194 write_data(const char *fname)
200 if (!strcmp(fname, default_name))
201 fname = "cardfile.out";
203 if ((fp = fopen(fname, "w")) != 0) {
204 for (p = all_cards; p != 0; p = p->link) {
205 FIELD **f = form_fields(p->form);
206 for (n = 0; f[n] != 0; n++) {
207 char *s = field_buffer(f[n], 0);
209 && (s = strdup(s)) != 0) {
211 fprintf(fp, "%s%s\n", n ? "\t" : "", s);
220 /*******************************************************************************/
231 for (p = all_cards; p != 0; p = p->link)
238 * Shuffle the panels to keep them in a natural hierarchy.
241 order_cards(CARD * first, int depth)
244 if (depth && first->link)
245 order_cards(first->link, depth - 1);
246 if (isVisible(first))
247 top_panel(first->panel);
252 * Return the next card in the list
255 next_card(CARD * now)
257 if (now->link != 0) {
258 CARD *tst = now->link;
262 tst = next_card(tst);
268 * Return the previous card in the list
271 prev_card(CARD * now)
274 for (p = all_cards; p != 0; p = p->link) {
275 if (p->link == now) {
285 * Returns the first card in the list that we will display.
288 first_card(CARD * now)
291 now = next_card(now);
295 /*******************************************************************************/
298 form_virtualize(WINDOW *w)
314 return (REQ_DEL_PREV);
316 return (REQ_DEL_CHAR);
318 return (REQ_LEFT_CHAR);
320 return (REQ_RIGHT_CHAR);
324 return (REQ_NEXT_FIELD);
327 return (REQ_PREV_FIELD);
335 make_fields(CARD * p, int form_high, int form_wide)
337 FIELD **f = (FIELD **) calloc(3, sizeof(FIELD *));
339 f[0] = new_field(1, form_wide, 0, 0, 0, 0);
340 set_field_back(f[0], A_REVERSE);
341 set_field_buffer(f[0], 0, p->title);
342 field_opts_off(f[0], O_BLANK);
344 f[1] = new_field(form_high - 1, form_wide, 1, 0, 0, 0);
345 set_field_buffer(f[1], 0, p->content);
346 set_field_just(f[1], JUSTIFY_LEFT);
347 field_opts_off(f[1], O_BLANK);
358 addstr("^Q/ESC -- exit form ^W -- writes data to file\n");
359 addstr("^N -- go to next card ^P -- go to previous card\n");
360 addstr("Arrow keys move left/right within a field, up/down between fields");
363 #if (defined(KEY_RESIZE) && HAVE_WRESIZE) || NO_LEAKS
365 free_form_fields(FIELD ** f)
369 for (n = 0; f[n] != 0; ++n) {
376 /*******************************************************************************/
379 cardfile(char *fname)
392 int finished = FALSE;
396 /* decide how many cards we can display */
397 visible_cards = count_cards();
399 (panel_wide = COLS - (visible_cards * OFFSET_CARD)) < 10 ||
400 (panel_high = LINES - (visible_cards * OFFSET_CARD) - 5) < 5) {
403 form_wide = panel_wide - 2;
404 form_high = panel_high - 2;
405 y = (visible_cards - 1) * OFFSET_CARD;
408 /* make a panel for each CARD */
409 for (p = all_cards; p != 0; p = p->link) {
411 if ((win = newwin(panel_high, panel_wide, y, x)) == 0)
414 wbkgd(win, COLOR_PAIR(pair_2));
416 p->panel = new_panel(win);
419 p->form = new_form(make_fields(p, form_high, form_wide));
420 set_form_win(p->form, win);
421 set_form_sub(p->form, derwin(win, form_high, form_wide, 1, 1));
428 top_card = first_card(all_cards);
429 order_cards(top_card, visible_cards);
435 ch = form_virtualize(panel_window(top_card->panel));
436 switch (form_driver(top_card->form, ch)) {
439 case E_UNKNOWN_COMMAND:
445 top_card = prev_card(top_card);
446 order_cards(top_card, visible_cards);
449 top_card = next_card(top_card);
450 order_cards(top_card, visible_cards);
453 form_driver(top_card->form, REQ_VALIDATION);
456 #if defined(KEY_RESIZE) && HAVE_WRESIZE
458 /* resizeterm already did "something" reasonable, but it cannot
459 * know much about layout. So let's make it nicer.
461 panel_wide = COLS - (visible_cards * OFFSET_CARD);
462 panel_high = LINES - (visible_cards * OFFSET_CARD) - 5;
464 form_wide = panel_wide - 2;
465 form_high = panel_high - 2;
467 y = (visible_cards - 1) * OFFSET_CARD;
471 for (p = all_cards; p != 0; p = p->link) {
472 FIELD **oldf = form_fields(p->form);
473 WINDOW *olds = form_sub(p->form);
477 win = form_win(p->form);
479 /* move and resize the card as needed
480 * FIXME: if the windows are shrunk too much, this won't do
483 wresize(win, panel_high, panel_wide);
485 /* reconstruct each form. Forms are not resizable, and
486 * there appears to be no good way to reload the text in
491 unpost_form(p->form);
494 p->form = new_form(make_fields(p, form_high, form_wide));
495 set_form_win(p->form, win);
496 set_form_sub(p->form, derwin(win, form_high, form_wide,
500 free_form_fields(oldf);
521 while (all_cards != 0) {
526 all_cards = all_cards->link;
529 f = form_fields(p->form);
530 count = field_count(p->form);
532 unpost_form(p->form); /* ...so we can free it */
533 free_form(p->form); /* this also disconnects the fields */
549 static const char *msg[] =
551 "Usage: view [options] file"
554 ," -c use color if terminal supports it"
557 for (n = 0; n < SIZEOF(msg); n++)
558 fprintf(stderr, "%s\n", msg[n]);
559 ExitProgram(EXIT_FAILURE);
562 /*******************************************************************************/
565 main(int argc, char *argv[])
569 setlocale(LC_ALL, "");
571 while ((n = getopt(argc, argv, "c")) != EOF) {
588 init_pair(pair_1, COLOR_WHITE, COLOR_BLUE);
589 init_pair(pair_2, COLOR_WHITE, COLOR_CYAN);
590 bkgd(COLOR_PAIR(pair_1));
596 if (optind + 1 == argc) {
597 for (n = 1; n < argc; n++)
599 if (count_cards() == 0)
603 read_data(default_name);
604 if (count_cards() == 0)
606 cardfile(default_name);
611 ExitProgram(EXIT_SUCCESS);
617 printf("This program requires the curses form and panel libraries\n");
618 ExitProgram(EXIT_FAILURE);