pith/state.c

   1 #if !defined(lint) && !defined(DOS)
   2 static char rcsid[] = "$Id: state.c 1074 2008-06-04 00:08:43Z hubert@u.washington.edu $";
   3 #endif
   4
   5 /*
   6  * ========================================================================
   7  * Copyright 2013-2017 Eduardo Chappa
   8  * Copyright 2006-2008 University of Washington
   9  *
  10  * Licensed under the Apache License, Version 2.0 (the "License");
  11  * you may not use this file except in compliance with the License.
  12  * You may obtain a copy of the License at
  13  *
  14  *     http://www.apache.org/licenses/LICENSE-2.0
  15  *
  16  * ========================================================================
  17  */
  18
  19 /*======================================================================
  20      state.c
  21      Implements the Pine state management routines
  22   ====*/
  23
  24
  25 #include "../pith/headers.h"
  26 #include "../pith/state.h"
  27 #include "../pith/conf.h"
  28 #include "../pith/init.h"
  29 #include "../pith/sort.h"
  30 #include "../pith/atttype.h"
  31 #include "../pith/util.h"
  32 #include "../pith/mailindx.h"
  33 #include "../pith/remote.h"
  34 #include "../pith/list.h"
  35 #include "../pith/smime.h"
  36
  37
  38 /*
  39  * Globals referenced throughout pine...
  40  */
  41 struct pine *ps_global;                         /* THE global variable! */
  42
  43 #ifdef  DEBUG
  44 /*
  45  * Debug level and output file defined here, referenced globally.
  46  * The debug file is opened and initialized below...
  47  */
  48 int          debug        = DEFAULT_DEBUG;
  49 #endif
  50
  51
  52 /*----------------------------------------------------------------------
  53   General use big buffer. It is used in the following places:
  54     compose_mail:    while parsing header of postponed message
  55     append_message2: while writing header into folder
  56     q_status_messageX: while doing printf formatting
  57     addr_book: Used to return expanded address in. (Can only use here
  58                because mm_log doesn't q_status on PARSE errors !)
  59     alpine.c: When address specified on command line
  60     init.c: When expanding variable values
  61     and many many more...
  62
  63  ----*/
  64 char         tmp_20k_buf[SIZEOF_20KBUF];
  65
  66
  67 /*
  68  * new_pine_struct - allocate and fill in with default values a new pine struct
  69  */
  70 struct pine *
  71 new_pine_struct(void)
  72 {
  73     struct pine *p;
  74
  75     p                  = (struct pine *)fs_get(sizeof (struct pine));
  76     memset((void *) p, 0, sizeof(struct pine));
  77     p->def_sort        = SortArrival;
  78     p->sort_types[0]   = SortSubject;
  79     p->sort_types[1]   = SortArrival;
  80     p->sort_types[2]   = SortFrom;
  81     p->sort_types[3]   = SortTo;
  82     p->sort_types[4]   = SortCc;
  83     p->sort_types[5]   = SortDate;
  84     p->sort_types[6]   = SortSize;
  85     p->sort_types[7]   = SortSubject2;
  86     p->sort_types[8]   = SortScore;
  87     p->sort_types[9]   = SortThread;
  88     p->sort_types[10]  = EndofList;
  89 #ifdef SMIME
  90     /*
  91      * We need to have access to p->smime even before calling
  92      * smime_init() so that we can set do_encrypt and do_sign.
  93      */
  94     p->smime           = new_smime_struct();
  95 #endif /* SMIME */
  96     p->atmts           = (ATTACH_S *) fs_get(sizeof(ATTACH_S));
  97     p->atmts_allocated = 1;
  98     p->atmts->description = NULL;
  99     p->low_speed       = 1;
 100     p->init_context    = -1;
 101 /*    msgno_init(&p->msgmap, 0L, SortArrival, 0);*/
 102     init_init_vars(p);
 103
 104     return(p);
 105 }
 106
 107
 108
 109 /*
 110  * free_pine_struct -- free up allocated data in pine struct and then the
 111  *                     struct itself
 112  */
 113 void
 114 free_pine_struct(struct pine **pps)
 115 {
 116     if(!(pps && (*pps)))
 117       return;
 118
 119     if((*pps)->id != NULL)
 120       mail_free_idlist(&(*pps)->id);
 121
 122     if((*pps)->hostname != NULL)
 123       fs_give((void **)&(*pps)->hostname);
 124
 125     if((*pps)->localdomain != NULL)
 126       fs_give((void **)&(*pps)->localdomain);
 127
 128     if((*pps)->ttyo != NULL)
 129       fs_give((void **)&(*pps)->ttyo);
 130
 131     if((*pps)->home_dir != NULL)
 132       fs_give((void **)&(*pps)->home_dir);
 133
 134     if((*pps)->folders_dir != NULL)
 135       fs_give((void **)&(*pps)->folders_dir);
 136
 137     if((*pps)->ui.homedir)
 138       fs_give((void **)&(*pps)->ui.homedir);
 139
 140     if((*pps)->ui.login)
 141       fs_give((void **)&(*pps)->ui.login);
 142
 143     if((*pps)->ui.fullname)
 144       fs_give((void **)&(*pps)->ui.fullname);
 145
 146     free_index_format(&(*pps)->index_disp_format);
 147
 148     if((*pps)->conv_table){
 149         if((*pps)->conv_table->table)
 150           fs_give((void **) &(*pps)->conv_table->table);
 151
 152         if((*pps)->conv_table->from_charset)
 153           fs_give((void **) &(*pps)->conv_table->from_charset);
 154
 155         if((*pps)->conv_table->to_charset)
 156           fs_give((void **) &(*pps)->conv_table->to_charset);
 157
 158         fs_give((void **)&(*pps)->conv_table);
 159     }
 160
 161     if((*pps)->pinerc)
 162       fs_give((void **)&(*pps)->pinerc);
 163
 164 #if defined(DOS) || defined(OS2)
 165     if((*pps)->pine_dir)
 166       fs_give((void **)&(*pps)->pine_dir);
 167
 168     if((*pps)->aux_files_dir)
 169       fs_give((void **)&(*pps)->aux_files_dir);
 170 #endif
 171
 172     if((*pps)->display_charmap)
 173       fs_give((void **)&(*pps)->display_charmap);
 174
 175     if((*pps)->keyboard_charmap)
 176       fs_give((void **)&(*pps)->keyboard_charmap);
 177
 178     if((*pps)->posting_charmap)
 179       fs_give((void **)&(*pps)->posting_charmap);
 180
 181 #ifdef SMIME
 182     if((*pps)->pwdcertdir)
 183       fs_give((void **)&(*pps)->pwdcertdir);
 184
 185     if((*pps)->pwdcert){
 186       PERSONAL_CERT *pc;
 187
 188       pc = (PERSONAL_CERT *) (*pps)->pwdcert;
 189       free_personal_certs(&pc);
 190       (*pps)->pwdcert = NULL;
 191     }
 192
 193     if((*pps)->pwdcertlist){
 194         CertList *cert;
 195
 196         cert = (CertList *) (*pps)->pwdcertlist;
 197         free_certlist(&cert);
 198         (*pps)->pwdcertlist = NULL;
 199     }
 200
 201     if((*pps)->backuppassword){
 202         CertList *cert;
 203
 204         cert = (CertList *) (*pps)->backuppassword;
 205         free_certlist(&cert);
 206         (*pps)->backuppassword = NULL;
 207     }
 208 #endif /* SMIME */
 209
 210
 211 #ifdef PASSFILE
 212     if((*pps)->passfile)
 213       fs_give((void **)&(*pps)->passfile);
 214 #endif /* PASSFILE */
 215
 216     if((*pps)->hdr_colors)
 217       free_spec_colors(&(*pps)->hdr_colors);
 218
 219     if((*pps)->index_token_colors)
 220       free_spec_colors(&(*pps)->index_token_colors);
 221
 222     if((*pps)->keywords)
 223       free_keyword_list(&(*pps)->keywords);
 224
 225     if((*pps)->kw_colors)
 226       free_spec_colors(&(*pps)->kw_colors);
 227
 228     if((*pps)->atmts){
 229         int i;
 230
 231         for(i = 0; (*pps)->atmts[i].description; i++){
 232             fs_give((void **) &(*pps)->atmts[i].description);
 233             fs_give((void **) &(*pps)->atmts[i].number);
 234         }
 235
 236         fs_give((void **) &(*pps)->atmts);
 237     }
 238
 239     if((*pps)->msgmap)
 240       msgno_give(&(*pps)->msgmap);
 241
 242     free_vars(*pps);
 243
 244     fs_give((void **) pps);
 245 }
 246
 247
 248 void
 249 free_pinerc_strings(struct pine **pps)
 250 {
 251     if((*pps)->prc){
 252         if((*pps)->prc->outstanding_pinerc_changes)
 253           write_pinerc((*pps), Main, WRP_NONE);
 254
 255         if((*pps)->prc->rd)
 256           rd_close_remdata(&(*pps)->prc->rd);
 257
 258         free_pinerc_s(&(*pps)->prc);
 259     }
 260
 261     if((*pps)->pconf)
 262       free_pinerc_s(&(*pps)->pconf);
 263
 264     if((*pps)->post_prc){
 265         if((*pps)->post_prc->outstanding_pinerc_changes)
 266           write_pinerc((*pps), Post, WRP_NONE);
 267
 268         if((*pps)->post_prc->rd)
 269           rd_close_remdata(&(*pps)->post_prc->rd);
 270
 271         free_pinerc_s(&(*pps)->post_prc);
 272     }
 273 }
 274
 275
 276 /*
 277  * free_vars -- give back resources acquired when we defined the
 278  *              variables list
 279  */
 280 void
 281 free_vars(struct pine *ps)
 282 {
 283     register int i;
 284
 285     for(i = 0; ps && i <= V_LAST_VAR; i++)
 286       free_variable_values(&ps->vars[i]);
 287 }
 288
 289
 290 void
 291 free_variable_values(struct variable *var)
 292 {
 293     if(var){
 294         if(var->is_list){
 295             free_list_array(&var->current_val.l);
 296             free_list_array(&var->main_user_val.l);
 297             free_list_array(&var->post_user_val.l);
 298             free_list_array(&var->global_val.l);
 299             free_list_array(&var->fixed_val.l);
 300             free_list_array(&var->cmdline_val.l);
 301         }
 302         else{
 303             if(var->current_val.p)
 304               fs_give((void **)&var->current_val.p);
 305             if(var->main_user_val.p)
 306               fs_give((void **)&var->main_user_val.p);
 307             if(var->post_user_val.p)
 308               fs_give((void **)&var->post_user_val.p);
 309             if(var->global_val.p)
 310               fs_give((void **)&var->global_val.p);
 311             if(var->fixed_val.p)
 312               fs_give((void **)&var->fixed_val.p);
 313             if(var->cmdline_val.p)
 314               fs_give((void **)&var->cmdline_val.p);
 315         }
 316     }
 317 }
 318
 319
 320 PINERC_S *
 321 new_pinerc_s(char *name)
 322 {
 323     PINERC_S *prc = NULL;
 324
 325     if(name){
 326         prc = (PINERC_S *)fs_get(sizeof(*prc));
 327         memset((void *)prc, 0, sizeof(*prc));
 328         prc->name = cpystr(name);
 329         if(IS_REMOTE(name))
 330           prc->type = RemImap;
 331         else
 332           prc->type = Loc;
 333     }
 334
 335     return(prc);
 336 }
 337
 338
 339 void
 340 free_pinerc_s(PINERC_S **prc)
 341 {
 342     if(prc && *prc){
 343         if((*prc)->name)
 344           fs_give((void **)&(*prc)->name);
 345
 346         if((*prc)->rd)
 347           rd_free_remdata(&(*prc)->rd);
 348
 349         if((*prc)->pinerc_lines)
 350           free_pinerc_lines(&(*prc)->pinerc_lines);
 351
 352         fs_give((void **)prc);
 353     }
 354 }