diplodocus.org Git - nmh/blob - config/config.c

   1
   2 /*
   3  * config.c -- master nmh configuration file
   4  *
   5  * This code is Copyright (c) 2002, by the authors of nmh.  See the
   6  * COPYRIGHT file in the root directory of the nmh distribution for
   7  * complete copyright information.
   8  */
   9
  10 #include <h/mh.h>
  11 #include <pwd.h>
  12
  13 #define nmhbindir(file) NMHBINDIR#file
  14 #define nmhlibexecdir(file) NMHLIBEXECDIR#file
  15 #define nmhetcdir(file) NMHETCDIR#file
  16 #define nmhdocdir(file) NMHDOCDIR#file
  17
  18
  19 /*
  20  * Find the location of a format or configuration
  21  * file, and return its absolute pathname.
  22  *
  23  * 1) If already absolute pathname, then leave unchanged.
  24  * 2) Next, if it begins with ~user, then expand it.
  25  * 3) Next, check in nmh Mail directory.
  26  * 4) Next, check in nmh `etc' directory.
  27  *
  28  */
  29
  30 char *
  31 etcpath (char *file)
  32 {
  33     static char epath[PATH_MAX];
  34     char *cp;
  35     char *pp;
  36     struct passwd *pw;
  37
  38     context_read();
  39
  40     switch (*file) {
  41         case '/':
  42             /* If already absolute pathname, return it */
  43             return file;
  44
  45         case '~':
  46             /* Expand ~username */
  47             if ((cp = strchr(pp = file + 1, '/')))
  48                 *cp++ = '\0';
  49             if (*pp == '\0') {
  50                 pp = mypath;
  51             } else {
  52                 if ((pw = getpwnam (pp)))
  53                     pp = pw->pw_dir;
  54                 else {
  55                     if (cp)
  56                         *--cp = '/';
  57                     goto try_it;
  58                 }
  59             }
  60
  61             snprintf (epath, sizeof(epath), "%s/%s", pp, cp ? cp : "");
  62             if (cp)
  63                 *--cp = '/';
  64
  65             if (access (epath, R_OK) != NOTOK)
  66                 return epath;   /* else fall */
  67 try_it:
  68
  69         default:
  70             /* Check nmh Mail directory */
  71             if (access ((cp = m_mailpath (file)), R_OK) != NOTOK) {
  72                 /* Will leak because caller doesn't know cp was
  73                    dynamically allocated. */
  74                 return cp;
  75             } else {
  76                 free (cp);
  77             }
  78     }
  79
  80     /* Check nmh `etc' directory */
  81     snprintf (epath, sizeof(epath), nmhetcdir(/%s), file);
  82     return (access (epath, R_OK) != NOTOK ? epath : file);
  83 }
  84
  85
  86 /*
  87  * Standard yes/no switches structure
  88  */
  89
  90 struct swit anoyes[] = {
  91     { "no", 0, 0 },
  92     { "yes", 0, 1 },
  93     { NULL, 0, 0 }
  94 };
  95
  96 /*
  97  * nmh constants
  98  */
  99
 100 /* initial profile for new users */
 101 char *mh_defaults = nmhetcdir (/mh.profile);
 102
 103 /* default name of user profile */
 104 char *mh_profile = ".mh_profile";
 105
 106 /* name of credentials file, defaults to .netrc in either Path or $HOME. */
 107 char *credentials_file;
 108
 109 /* name of current message "sequence" */
 110 char *current = "cur";
 111
 112 /* standard component files */
 113 char *components = "components";                /* comp         */
 114 char *replcomps = "replcomps";                  /* repl         */
 115 char *replgroupcomps = "replgroupcomps";        /* repl -group  */
 116 char *forwcomps = "forwcomps";                  /* forw         */
 117 char *distcomps = "distcomps";                  /* dist         */
 118 char *rcvdistcomps = "rcvdistcomps";            /* rcvdist      */
 119 char *digestcomps = "digestcomps";              /* forw -digest */
 120
 121 /* standard format (filter) files */
 122 char *mhlformat = "mhl.format";                 /* show         */
 123 char *mhlreply = "mhl.reply";                   /* repl -filter */
 124 char *mhlforward = "mhl.forward";               /* forw -filter */
 125
 126 char *draft = "draft";
 127
 128 char *inbox = "Inbox";
 129 char *defaultfolder = "inbox";
 130
 131 char *pfolder = "Current-Folder";
 132 char *usequence = "Unseen-Sequence";
 133 char *psequence = "Previous-Sequence";
 134 char *nsequence = "Sequence-Negation";
 135
 136 /* profile entries for storage locations */
 137 char *nmhstorage = "nmh-storage";
 138 char *nmhcache = "nmh-cache";
 139 char *nmhprivcache = "nmh-private-cache";
 140
 141 /* profile entry for external ftp access command */
 142 char *nmhaccessftp = "nmh-access-ftp";
 143
 144 /* profile entry for external url access command */
 145 char *nmhaccessurl = "nmh-access-url";
 146
 147 char *mhbindir = NMHBINDIR;
 148 char *mhlibexecdir = NMHLIBEXECDIR;
 149 char *mhetcdir = NMHETCDIR;
 150 char *mhdocdir = NMHDOCDIR;
 151
 152 /*
 153  * nmh not-so constants
 154  */
 155
 156 /*
 157  * Default name for the nmh context file.
 158  */
 159 char *context = "context";
 160
 161 /*
 162  * Default name of file for public sequences.  If "\0" (an empty
 163  * "mh-sequences" profile entry), then nmh will use private sequences by
 164  * default.
 165  */
 166 char *mh_seq = ".mh_sequences";
 167
 168 /*
 169  * nmh globals
 170  */
 171
 172 char ctxflags;          /* status of user's context   */
 173 char *invo_name;        /* command invocation name    */
 174 char *mypath;           /* user's $HOME               */
 175 char *defpath;          /* pathname of user's profile */
 176 char *ctxpath;          /* pathname of user's context */
 177 struct node *m_defs;    /* profile/context structure  */
 178
 179 /*
 180  * nmh processes
 181  */
 182
 183 /*
 184  * This is the program to process MIME composition files
 185  */
 186 char *buildmimeproc = nmhbindir (/mhbuild);
 187 /*
 188  * This is the program to `cat' a file.
 189  */
 190 char *catproc = "/bin/cat";
 191
 192 /*
 193  * This program is usually called directly by users, but it is
 194  * also invoked by the post program to process an "Fcc", or by
 195  * comp/repl/forw/dist to refile a draft message.
 196  */
 197
 198 char *fileproc = nmhbindir (/refile);
 199
 200 /*
 201  * This program is used to optionally format the bodies of messages by
 202  * "mhl".
 203  */
 204
 205 char *formatproc = NULL;
 206
 207 /*
 208  * This program is called to incorporate messages into a folder.
 209  */
 210
 211 char *incproc = nmhbindir (/inc);
 212
 213 /*
 214  * This is the default program invoked by a "list" response
 215  * at the "What now?" prompt.  It is also used by the draft
 216  * folder facility in comp/dist/forw/repl to display the
 217  * draft message.
 218  */
 219
 220 char *lproc = NULL;
 221
 222 /*
 223  * This is the path for the Bell equivalent mail program.
 224  */
 225
 226 char *mailproc = nmhbindir (/mhmail);
 227
 228 /*
 229  * This is used by mhl as a front-end.  It is also used
 230  * by mhn as the default method of displaying message bodies
 231  * or message parts of type text/plain.
 232  */
 233
 234 char *moreproc = NULL;
 235
 236 /*
 237  * This is the program (mhl) used to filter messages.  It is
 238  * used by mhn to filter and display the message headers of
 239  * MIME messages.  It is used by repl/forw (with -filter)
 240  * to filter the message to which you are replying/forwarding.
 241  * It is used by send/post (with -filter) to filter the message
 242  * for "Bcc:" recipients.
 243  */
 244
 245 char *mhlproc = nmhlibexecdir (/mhl);
 246
 247 /*
 248  * This program is called to pack a folder.
 249  */
 250
 251 char *packproc = nmhbindir (/packf);
 252
 253 /*
 254  * This is the delivery program called by send to actually
 255  * deliver mail to users.  This is the interface to the MTS.
 256  */
 257
 258 char *postproc = nmhlibexecdir (/post);
 259
 260 /*
 261  * This is program is called by slocal to handle
 262  * the action `folder' or `+'.
 263  */
 264
 265 char *rcvstoreproc = nmhlibexecdir (/rcvstore);
 266
 267 /*
 268  * This program is called to remove a message by rmm or refile -nolink.
 269  * It's usually empty, which means to rename the file to a backup name.
 270  */
 271
 272 char *rmmproc = NULL;
 273
 274 /*
 275  * This program is usually called by the user's whatnowproc, but it
 276  * may also be called directly to send a message previously composed.
 277  */
 278
 279 char *sendproc = nmhbindir (/send);
 280
 281 /*
 282  * This is the path to the program used by "show"
 283  * to display non-text (MIME) messages.
 284  */
 285
 286 char *showmimeproc = nmhbindir (/mhshow);
 287
 288 /*
 289  * This is the default program called by "show" to filter
 290  * and display standard text (non-MIME) messages.  It can be
 291  * changed to a pager (such as "more" or "less") if you prefer
 292  * that such message not be filtered in any way.
 293  */
 294
 295 char *showproc = nmhlibexecdir (/mhl);
 296
 297 /*
 298  * This program is called after comp, et. al., have built a draft
 299  */
 300
 301 char *whatnowproc = nmhbindir (/whatnow);
 302
 303 /*
 304  * This program is called to list/validate the addresses in a message.
 305  */
 306
 307 char *whomproc = nmhbindir (/whom);
 308
 309 /*
 310  * This is the global nmh alias file.  It is somewhat obsolete, since
 311  * global aliases should be handled by the Mail Transport Agent (MTA).
 312  */
 313
 314 char *AliasFile = nmhetcdir (/MailAliases);
 315
 316 /*
 317  * File protections
 318  */
 319
 320 /*
 321  * Folders (directories) are created with this protection (mode)
 322  */
 323
 324 char *foldprot = "700";
 325
 326 /*
 327  * Every NEW message will be created with this protection.  When a
 328  * message is filed it retains its protection, so this only applies
 329  * to messages coming in through inc.
 330  */
 331
 332 char *msgprot = "600";
 333