summaryrefslogtreecommitdiff
path: root/pith/addrbook.c
diff options
context:
space:
mode:
Diffstat (limited to 'pith/addrbook.c')
-rw-r--r--pith/addrbook.c369
1 files changed, 369 insertions, 0 deletions
diff --git a/pith/addrbook.c b/pith/addrbook.c
new file mode 100644
index 00000000..9828e4c6
--- /dev/null
+++ b/pith/addrbook.c
@@ -0,0 +1,369 @@
+#if !defined(lint) && !defined(DOS)
+static char rcsid[] = "$Id: addrbook.c 90 2006-07-19 22:30:36Z hubert@u.washington.edu $";
+#endif
+
+/*
+ * ========================================================================
+ * Copyright 2006-2007 University of Washington
+ * Copyright 2013 Eduardo Chappa
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ * http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * ========================================================================
+ */
+
+/*======================================================================
+ addrbook.c
+ display format/support routines
+ ====*/
+
+#include "../c-client/c-client.h"
+
+#include <system.h>
+#include <general.h>
+
+#include "addrbook.h"
+#include "state.h"
+#include "adrbklib.h"
+#include "abdlc.h"
+#include "conf.h"
+#include "conftype.h"
+#include "status.h"
+#include "debug.h"
+#include "osdep/collate.h"
+
+
+/* internal prototypes */
+void parse_format(char *, COL_S *);
+
+
+
+
+/*
+ * We have to call this to set up the format of the columns. There is a
+ * separate format for each addrbook, so we need to call this for each
+ * addrbook. We call it when the pab's are built. It also depends on
+ * whether or not as.checkboxes is set, so if we go into a Select mode
+ * from the address book maintenance screen we need to re-call this. Since
+ * we can't go back out of ListMode we don't have that problem. Restore_state
+ * has to call it because of the as.checkboxes possibly being different in
+ * the two states.
+ */
+void
+addrbook_new_disp_form(PerAddrBook *pab, char **list, int addrbook_num,
+ int (*prefix_f)(PerAddrBook *, int *))
+{
+ char *last_one;
+ int column = 0;
+
+ dprint((9, "- init_disp_form(%s) -\n",
+ (pab && pab->abnick) ? pab->abnick : "?"));
+
+ memset((void *)pab->disp_form, 0, NFIELDS*sizeof(COL_S));
+ pab->disp_form[1].wtype = WeCalculate; /* so we don't get false AllAuto */
+
+ if(prefix_f)
+ as.do_bold = (*prefix_f)(pab, &column);
+
+ /* if custom format is specified */
+ if(list && list[0] && list[0][0]){
+ /* find the one for addrbook_num */
+ for(last_one = *list;
+ *list != NULL && addrbook_num;
+ addrbook_num--,list++)
+ last_one = *list;
+
+ /* If not enough to go around, last one repeats */
+ if(*list == NULL)
+ parse_format(last_one, &(pab->disp_form[column]));
+ else
+ parse_format(*list, &(pab->disp_form[column]));
+ }
+ else{ /* default */
+ /* If 2nd wtype is AllAuto, the widths are calculated old way */
+ pab->disp_form[1].wtype = AllAuto;
+
+ pab->disp_form[column++].type = Nickname;
+ pab->disp_form[column++].type = Fullname;
+ pab->disp_form[column++].type = Addr;
+ /* Fill in rest */
+ while(column < NFIELDS)
+ pab->disp_form[column++].type = Notused;
+ }
+}
+
+
+struct parse_tokens {
+ char *name;
+ ColumnType ctype;
+};
+
+struct parse_tokens ptokens[] = {
+ {"NICKNAME", Nickname},
+ {"FULLNAME", Fullname},
+ {"ADDRESS", Addr},
+ {"FCC", Filecopy},
+ {"COMMENT", Comment},
+ {"DEFAULT", Def},
+ {NULL, Notused}
+};
+
+/*
+ * Parse format_str and fill in disp_form structure based on what's there.
+ *
+ * Args: format_str -- The format string from pinerc.
+ * disp_form -- This is where we fill in the answer.
+ *
+ * The format string consists of special tokens which give the order of
+ * the columns to be displayed. The possible tokens are NICKNAME,
+ * FULLNAME, ADDRESS, FCC, COMMENT. If a token is followed by
+ * parens with an integer inside (FULLNAME(16)) then that means we
+ * make that variable that many characters wide. If it is a percentage, we
+ * allocate that percentage of the columns to that variable. If no
+ * parens, that means we calculate it for the user. The tokens are
+ * delimited by white space. A token of DEFAULT means to calculate the
+ * whole thing as we would if no spec was given. This makes it possible
+ * to specify default for one addrbook and something special for another.
+ */
+void
+parse_format(char *format_str, COL_S *disp_form)
+{
+ int column = 0;
+ char *p, *q;
+ struct parse_tokens *pt;
+ int nicknames, fullnames, addresses, not_allauto;
+ int warnings = 0;
+
+ p = format_str;
+ while(p && *p && column < NFIELDS){
+ p = skip_white_space(p); /* space for next word */
+
+ /* look for the ptoken this word matches */
+ for(pt = ptokens; pt->name; pt++)
+ if(!struncmp(pt->name, p, strlen(pt->name)))
+ break;
+
+ /* ignore unrecognized word */
+ if(!pt->name){
+ char *r;
+
+ if((r=strindex(p, SPACE)) != NULL)
+ *r = '\0';
+
+ dprint((2, "parse_format: ignoring unrecognized word \"%s\" in address-book-formats\n", p ? p : "?"));
+ q_status_message1(SM_ORDER, warnings++==0 ? 1 : 0, 4,
+ /* TRANSLATORS: an informative error message */
+ _("Ignoring unrecognized word \"%s\" in Address-Book-Formats"), p);
+ /* put back space */
+ if(r)
+ *r = SPACE;
+
+ /* skip unrecognized word */
+ while(p && *p && !isspace((unsigned char)(*p)))
+ p++;
+
+ continue;
+ }
+
+ disp_form[column].type = pt->ctype;
+
+ /* skip over name and look for parens */
+ p += strlen(pt->name);
+ if(*p == '('){
+ p++;
+ q = p;
+ while(p && *p && isdigit((unsigned char)*p))
+ p++;
+
+ if(p && *p && *p == ')' && p > q){
+ disp_form[column].wtype = Fixed;
+ disp_form[column].req_width = atoi(q);
+ }
+ else if(p && *p && *p == '%' && p > q){
+ disp_form[column].wtype = Percent;
+ disp_form[column].req_width = atoi(q);
+ }
+ else{
+ disp_form[column].wtype = WeCalculate;
+ if(disp_form[column].type == Nickname)
+ disp_form[column].req_width = 8;
+ else
+ disp_form[column].req_width = 3;
+ }
+ }
+ else{
+ disp_form[column].wtype = WeCalculate;
+ if(disp_form[column].type == Nickname)
+ disp_form[column].req_width = 8;
+ else
+ disp_form[column].req_width = 3;
+ }
+
+ if(disp_form[column].type == Def){
+ /* If any type is DEFAULT, the widths are calculated old way */
+assign_default:
+ column = 0;
+
+ disp_form[column].wtype = AllAuto;
+ disp_form[column++].type = Nickname;
+ disp_form[column].wtype = AllAuto;
+ disp_form[column++].type = Fullname;
+ disp_form[column].wtype = AllAuto;
+ disp_form[column++].type = Addr;
+ /* Fill in rest */
+ while(column < NFIELDS)
+ disp_form[column++].type = Notused;
+
+ return;
+ }
+
+ column++;
+ /* skip text at end of word */
+ while(p && *p && !isspace((unsigned char)(*p)))
+ p++;
+ }
+
+ if(column == 0){
+ q_status_message(SM_ORDER, 0, 4,
+ _("Address-Book-Formats has no recognizable words, using default format"));
+ goto assign_default;
+ }
+
+ /* Fill in rest */
+ while(column < NFIELDS)
+ disp_form[column++].type = Notused;
+
+ /* check to see if user is just re-ordering default fields */
+ nicknames = 0;
+ fullnames = 0;
+ addresses = 0;
+ not_allauto = 0;
+ for(column = 0; column < NFIELDS; column++){
+ if(disp_form[column].type != Notused
+ && disp_form[column].wtype != WeCalculate)
+ not_allauto++;
+
+ switch(disp_form[column].type){
+ case Nickname:
+ nicknames++;
+ break;
+
+ case Fullname:
+ fullnames++;
+ break;
+
+ case Addr:
+ addresses++;
+ break;
+
+ case Filecopy:
+ case Comment:
+ not_allauto++;
+ break;
+
+ default:
+ break;
+ }
+ }
+
+ /*
+ * Special case: if there is no address field specified, we put in
+ * a special field called WhenNoAddrDisplayed, which causes list
+ * entries to be displayable in all cases.
+ */
+ if(!addresses){
+ for(column = 0; column < NFIELDS; column++)
+ if(disp_form[column].type == Notused)
+ break;
+
+ if(column < NFIELDS){
+ disp_form[column].type = WhenNoAddrDisplayed;
+ disp_form[column].wtype = Special;
+ }
+ }
+
+ if(nicknames == 1 && fullnames == 1 && addresses == 1 && not_allauto == 0)
+ disp_form[0].wtype = AllAuto; /* set to do default widths */
+}
+
+
+/*
+ * Find the first selectable line greater than or equal to line. That is,
+ * the first line the cursor is allowed to start on.
+ * (If there are none >= line, it will find the highest one.)
+ *
+ * Returns the line number of the found line or NO_LINE if there isn't one.
+ */
+long
+first_selectable_line(long int line)
+{
+ long lineno;
+ register PerAddrBook *pab;
+ int i;
+
+ /* skip past non-selectable lines */
+ for(lineno=line;
+ !line_is_selectable(lineno) && dlist(lineno)->type != End;
+ lineno++)
+ ;/* do nothing */
+
+ if(line_is_selectable(lineno))
+ return(lineno);
+
+ /*
+ * There were no selectable lines from lineno on down. Trying looking
+ * back up the list.
+ */
+ for(lineno=line-1;
+ !line_is_selectable(lineno) && dlist(lineno)->type != Beginning;
+ lineno--)
+ ;/* do nothing */
+
+ if(line_is_selectable(lineno))
+ return(lineno);
+
+ /*
+ * No selectable lines at all.
+ * If some of the addrbooks are still not displayed, it is too
+ * early to set the no_op_possbl flag. Or, if some of the addrbooks
+ * are empty but writable, then we should not set it either.
+ */
+ for(i = 0; i < as.n_addrbk; i++){
+ pab = &as.adrbks[i];
+ if(pab->ostatus != Open &&
+ pab->ostatus != HalfOpen &&
+ pab->ostatus != ThreeQuartOpen)
+ return NO_LINE;
+
+ if(pab->access == ReadWrite && adrbk_count(pab->address_book) == 0)
+ return NO_LINE;
+ }
+
+ as.no_op_possbl++;
+ return NO_LINE;
+}
+
+
+/*
+ * Returns 1 if this line is of a type that can have a cursor on it.
+ */
+int
+line_is_selectable(long int lineno)
+{
+ register AddrScrn_Disp *dl;
+
+ if((dl = dlist(lineno)) && (dl->type == Text ||
+ dl->type == ListEmpty ||
+ dl->type == TitleCmb ||
+ dl->type == Beginning ||
+ dl->type == End)){
+
+ return 0;
+ }
+
+ return 1;
+}
generated by cgit v1.2.3-70-g09d2 (git 2.47.0) at 2024-11-05 19:29:04 +0000