1 #if !defined(lint) && !defined(DOS)
2 static char rcsid
[] = "$Id: conf.c 1266 2009-07-14 18:39:12Z hubert@u.washington.edu $";
6 * ========================================================================
7 * Copyright 2013-2014 Eduardo Chappa
8 * Copyright 2006-2009 University of Washington
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
14 * http://www.apache.org/licenses/LICENSE-2.0
16 * ========================================================================
19 /*======================================================================
21 Implements the Pine configuration management routines
25 #include "../pith/headers.h"
26 #include "../pith/init.h"
27 #include "../pith/conf.h"
28 #include "../pith/state.h"
29 #include "../pith/remote.h"
30 #include "../pith/keyword.h"
31 #include "../pith/mailview.h"
32 #include "../pith/list.h"
33 #include "../pith/status.h"
34 #include "../pith/ldap.h"
35 #include "../pith/folder.h"
36 #include "../pith/thread.h"
37 #include "../pith/news.h"
38 #include "../pith/util.h"
39 #include "../pith/pattern.h"
40 #include "../pith/color.h"
41 #include "../pith/options.h"
42 #include "../pith/busy.h"
43 #include "../pith/readfile.h"
44 #include "../pith/hist.h"
45 #include "../pith/mailindx.h"
46 #include "../pith/tempfile.h"
47 #include "../pith/icache.h"
48 #include "../pith/sort.h"
49 #include "../pith/smime.h"
50 #include "../pith/charconv/utf8.h"
52 #include "../pico/osdep/mswin.h"
56 #define TO_BAIL_THRESHOLD 60
62 void convert_configvars_to_utf8(struct variable
*, char *);
63 void convert_configvar_to_utf8(struct variable
*, char *);
64 void set_current_pattern_vals(struct pine
*);
65 void convert_pattern_data(void);
66 void convert_filts_pattern_data(void);
67 void convert_scores_pattern_data(void);
68 void convert_pinerc_patterns(long);
69 void convert_pinerc_filts_patterns(long);
70 void convert_pinerc_scores_patterns(long);
71 void set_old_growth_bits(struct pine
*, int);
72 int var_is_in_rest_of_file(char *, char *);
73 char *skip_over_this_var(char *, char *);
74 char *native_nl(char *);
75 void set_color_val(struct variable
*, int);
76 int copy_localfile_to_remotefldr(RemType
, char *, char *, char *, char **);
77 char *backcompat_convert_from_utf8(char **, size_t, char *);
79 char *transformed_color(char *);
80 int convert_pc_gray_names(struct pine
*, PINERC_S
*, EditWhich
);
81 int unix_color_style_in_pinerc(PINERC_S
*);
82 char *pcpine_general_help(char *);
83 char *pcpine_help(HelpType
); /* defined in alpine/help */
87 /* hook too allow caller to decide what to do about failure */
88 int (*pith_opt_remote_pinerc_failure
)(void);
91 /*------------------------------------
92 Some definitions to keep the static "variable" array below
93 a bit more readable...
95 CONF_TXT_T cf_text_comment
[] = "#\n# Alpine configuration file\n#\n# This file sets the configuration options used by Alpine and PC-Alpine. These\n# options are usually set from within Alpine or PC-Alpine. There may be a\n# system-wide configuration file which sets the defaults for some of the\n# variables. On Unix, run alpine -conf to see how system defaults have been set.\n# For variables that accept multiple values, list elements are\
96 separated by\n# commas. A line beginning with a space or tab is considered to be a\n# continuation of the previous line. For a variable to be unset its value must\n# be blank. To set a variable to the empty string its value should be \"\".\n# You can override system defaults by setting a variable to the empty string.\n# Lines beginning with \"#\" are comments, and ignored by Alpine.\n";
99 CONF_TXT_T cf_text_personal_name
[] = "Over-rides your full name from Unix password file. Required for PC-Alpine.";
101 CONF_TXT_T cf_text_user_id
[] = "Your login/e-mail user name";
103 CONF_TXT_T cf_text_user_domain
[] = "Sets domain part of From: and local addresses in outgoing mail.";
105 CONF_TXT_T cf_text_smtp_server
[] = "List of SMTP servers for sending mail. If blank: Unix Alpine uses sendmail.";
107 CONF_TXT_T cf_text_nntp_server
[] = "NNTP server for posting news. Also sets news-collections for news reading.";
111 CONF_TXT_T cf_text_publiccertdir
[] = "Public certificates are kept in files in this directory. The files should\n# contain certificates in PEM format. The name of each file should look\n# like <emailaddress>.crt. The default directory is .alpine-smime/public.";
113 CONF_TXT_T cf_text_privatekeydir
[] = "Private keys are kept in files in this directory. The files are in PEM format.\n# The name of a file should look like <emailaddress>.key.\n# The default directory is .alpine-smime/private.";
115 CONF_TXT_T cf_text_cacertdir
[] = "Certificate Authority certificates (in addition to the normal CACerts for the\n# system) are kept in files in this directory. The files are in PEM format.\n# Filenames should end with .crt. The default directory is .alpine-smime/ca.";
117 CONF_TXT_T cf_text_publiccertcontainer
[] = "If this option is set then public certificates are kept in a single container\n# \"file\" similar to a remote configuration file instead of in the\n# smime-publiccert-directory. The value can be a remote or local folder\n# specification like for a non-standard pinerc value. The default\n# is that it is not set.";
119 CONF_TXT_T cf_text_privatekeycontainer
[] = "If this option is set then private keys are kept in a single container\n# \"file\" similar to a remote configuration file instead of in the\n# private-key-directory. The value can be a remote or local folder\n# specification like for a non-standard pinerc value. The default\n# is that it is not set.";
121 CONF_TXT_T cf_text_cacertcontainer
[] = "If this option is set then CAcerts are kept in a single container\n# \"file\" similar to a remote configuration file instead of in the\n# ca-cert-directory. The value can be a remote or local folder\n# specification like for a non-standard pinerc value. The default\n# is that it is not set.";
126 CONF_TXT_T cf_text_ldap_server
[] = "LDAP servers for looking up addresses.";
127 #endif /* ENABLE_LDAP */
129 CONF_TXT_T cf_text_rss_news
[] = "RSS News feed";
131 CONF_TXT_T cf_text_rss_weather
[] = "RSS Weather feed";
133 CONF_TXT_T cf_text_wp_indexheight
[] = "Web Alpine index table row height";
135 CONF_TXT_T cf_text_wp_indexlines
[] = "Web Alpine number of index lines in table";
137 CONF_TXT_T cf_text_wp_aggstate
[] = "Web Alpine aggregate operations tab state";
139 CONF_TXT_T cf_text_wp_state
[] = "Web Alpine various aspects of cross-session state";
141 CONF_TXT_T cf_text_wp_columns
[] = "Web Alpine preferred width for message display in characters";
143 CONF_TXT_T cf_text_inbox_path
[] = "Path of (local or remote) INBOX, e.g. ={mail.somewhere.edu}inbox\n# Normal Unix default is the local INBOX (usually /usr/spool/mail/$USER).";
145 CONF_TXT_T cf_text_incoming_folders
[] = "List of incoming msg folders besides INBOX, e.g. ={host2}inbox, {host3}inbox\n# Syntax: optnl-label {optnl-imap-host-name}folder-path";
147 CONF_TXT_T cf_text_folder_collections
[] = "List of directories where saved-message folders may be. First one is\n# the default for Saves. Example: Main {host1}mail/[], Desktop mail\\[]\n# Syntax: optnl-label {optnl-imap-hostname}optnl-directory-path[]";
149 CONF_TXT_T cf_text_news_collections
[] = "List, only needed if nntp-server not set, or news is on a different host\n# than used for NNTP posting. Examples: News *[] or News *{host3/nntp}[]\n# Syntax: optnl-label *{news-host/protocol}[]";
151 CONF_TXT_T cf_text_pruned_folders
[] = "List of folders, assumed to be in first folder collection,\n# offered for pruning each month. For example: mumble";
153 CONF_TXT_T cf_text_default_fcc
[] = "Over-rides default path for sent-mail folder, e.g. =old-mail (using first\n# folder collection dir) or ={host2}sent-mail or =\"\" (to suppress saving).\n# Default: sent-mail (Unix) or SENTMAIL.MTX (PC) in default folder collection.";
155 CONF_TXT_T cf_text_default_saved
[] = "Over-rides default path for saved-msg folder, e.g. =saved-messages (using 1st\n# folder collection dir) or ={host2}saved-mail or =\"\" (to suppress saving).\n# Default: saved-messages (Unix) or SAVEMAIL.MTX (PC) in default collection.";
157 CONF_TXT_T cf_text_postponed_folder
[] = "Over-rides default path for postponed messages folder, e.g. =pm (which uses\n# first folder collection dir) or ={host4}pm (using home dir on host4).\n# Default: postponed-msgs (Unix) or POSTPOND.MTX (PC) in default fldr coltn.";
159 CONF_TXT_T cf_text_mail_directory
[] = "Alpine compares this value with the first folder collection directory.\n# If they match (or no folder collections are defined), and the directory\n# does not exist, Alpine will create and use it. Default: ~/mail";
161 CONF_TXT_T cf_text_read_message_folder
[] = "If set, specifies where already-read messages will be moved upon quitting.";
163 CONF_TXT_T cf_text_form_letter_folder
[] = "If set, specifies where form letters should be stored.";
165 CONF_TXT_T cf_text_trash_folder
[] = "If set, specifies where trash is moved to in Web Alpine.";
167 CONF_TXT_T cf_text_signature_file
[] = "Over-rides default path for signature file. Default is ~/.signature";
169 CONF_TXT_T cf_text_literal_sig
[] = "Contains the actual signature contents as opposed to the signature filename.\n# If defined, this overrides the signature-file. Default is undefined.";
171 CONF_TXT_T cf_text_global_address_book
[] = "List of file or path names for global/shared addressbook(s).\n# Default: none\n# Syntax: optnl-label path-name";
173 CONF_TXT_T cf_text_address_book
[] = "List of file or path names for personal addressbook(s).\n# Default: ~/.addressbook (Unix) or \\PINE\\ADDRBOOK (PC)\n# Syntax: optnl-label path-name";
175 CONF_TXT_T cf_text_feature_list
[] = "List of features; see Alpine's Setup/options menu for the current set.\n# e.g. feature-list= select-without-confirm, signature-at-bottom\n# Default condition for all of the features is no-.";
177 CONF_TXT_T cf_text_initial_keystroke_list
[] = "Alpine executes these keys upon startup (e.g. to view msg 13: i,j,1,3,CR,v)";
179 CONF_TXT_T cf_text_default_composer_hdrs
[] = "Only show these headers (by default) when composing messages";
181 CONF_TXT_T cf_text_customized_hdrs
[] = "Add these customized headers (and possible default values) when composing";
183 CONF_TXT_T cf_text_view_headers
[] = "When viewing messages, include this list of headers";
185 CONF_TXT_T cf_text_view_margin_left
[] = "When viewing messages, number of blank spaces between left display edge and text";
187 CONF_TXT_T cf_text_view_margin_right
[] = "When viewing messages, number of blank spaces between right display edge and text";
189 CONF_TXT_T cf_text_quote_suppression
[] = "When viewing messages, number of lines of quote displayed before suppressing";
191 CONF_TXT_T cf_text_wordsep
[] = "When these characters appear in the middle of a word in the composer\n# the forward word function will stop at the first text following (as happens\n# with SPACE characters by default)";
193 CONF_TXT_T cf_text_color_style
[] = "Controls display of color";
195 CONF_TXT_T cf_text_current_indexline_style
[] = "Controls display of color for current index line";
197 CONF_TXT_T cf_text_titlebar_color_style
[] = "Controls display of color for the titlebar at top of screen";
199 CONF_TXT_T cf_text_view_hdr_color
[] = "When viewing messages, these are the header colors";
201 CONF_TXT_T cf_text_index_token_color
[] = "Colors in which tokens will be displayed in the index screen";
203 CONF_TXT_T cf_text_save_msg_name_rule
[] = "Determines default folder name for Saves...\n# Choices: default-folder, by-sender, by-from, by-recipient, last-folder-used.\n# Default: \"default-folder\", i.e. \"saved-messages\" (Unix) or \"SAVEMAIL\" (PC).";
205 CONF_TXT_T cf_text_fcc_name_rule
[] = "Determines default name for Fcc...\n# Choices: default-fcc, by-recipient, last-fcc-used.\n# Default: \"default-fcc\" (see also \"default-fcc=\" variable.)";
207 CONF_TXT_T cf_text_sort_key
[] = "Sets presentation order of messages in Index. Choices:\n# Subject, From, Arrival, Date, Size, To, Cc, OrderedSubj, Score, and Thread.\n# Order may be reversed by appending /Reverse. Default: \"Arrival\".";
209 CONF_TXT_T cf_text_addrbook_sort_rule
[] = "Sets presentation order of address book entries. Choices: dont-sort,\n# fullname-with-lists-last, fullname, nickname-with-lists-last, nickname\n# Default: \"fullname-with-lists-last\".";
211 CONF_TXT_T cf_text_folder_sort_rule
[] = "Sets presentation order of folder list entries. Choices: alphabetical,\n# alpha-with-dirs-last, alpha-with-dirs-first.\n# Default: \"alpha-with-directories-last\".";
213 CONF_TXT_T cf_text_old_char_set
[] = "Character-set is obsolete, use display-character-set, keyboard-character-set,\n# and posting-character-set.";
215 CONF_TXT_T cf_text_disp_char_set
[] = "Reflects capabilities of the display you have.\n# If unset, the default is taken from your locale. That is usually the right\n# thing to use. Typical alternatives include UTF-8, ISO-8859-x, and EUC-JP\n# (where x is a number between 1 and 9).";
217 CONF_TXT_T cf_text_key_char_set
[] = "Reflects capabilities of the keyboard you have.\n# If unset, the default is to use the same value\n# used for the display-character-set.";
219 CONF_TXT_T cf_text_post_character_set
[] = "Defaults to UTF-8. This is used for outgoing messages.\n# It is usually correct to leave this unset.";
221 CONF_TXT_T cf_text_unk_character_set
[] = "Defaults to nothing, which is equivalent to US-ASCII. This is used for\n# unlabeled incoming messages. It is ok to leave this unset but if you receive\n# unlabeled mail that is usually in some known character set, set that here.";
223 CONF_TXT_T cf_text_editor
[] = "Specifies the program invoked by ^_ in the Composer,\n# or the \"enable-alternate-editor-implicitly\" feature.";
225 CONF_TXT_T cf_text_speller
[] = "Specifies the program invoked by ^T in the Composer.";
227 CONF_TXT_T cf_text_deadlets
[] = "Specifies the number of dead letter files to keep when canceling.";
229 CONF_TXT_T cf_text_fillcol
[] = "Specifies the column of the screen where the composer should wrap.";
231 CONF_TXT_T cf_text_replystr
[] = "Specifies the string to insert when replying to a message.";
233 CONF_TXT_T cf_text_quotereplstr
[] = "Specifies the string to replace quotes with when viewing a message.";
235 CONF_TXT_T cf_text_replyintro
[] = "Specifies the introduction to insert when replying to a message.";
237 CONF_TXT_T cf_text_emptyhdr
[] = "Specifies the string to use when sending a message with no to or cc.";
239 CONF_TXT_T cf_text_image_viewer
[] = "Program to view images (e.g. GIF or TIFF attachments).";
241 CONF_TXT_T cf_text_browser
[] = "List of programs to open Internet URLs (e.g. http or ftp references).";
243 CONF_TXT_T cf_text_inc_startup
[] = "Sets message which cursor begins on. Choices: first-unseen, first-recent,\n# first-important, first-important-or-unseen, first-important-or-recent,\n# first, last. Default: \"first-unseen\".";
245 CONF_TXT_T cf_pruning_rule
[] = "Allows a default answer for the prune folder questions. Choices: yes-ask,\n# yes-no, no-ask, no-no, ask-ask, ask-no. Default: \"ask-ask\".";
247 CONF_TXT_T cf_reopen_rule
[] = "Controls behavior when reopening an already open folder.";
249 CONF_TXT_T cf_text_thread_disp_style
[] = "Style that MESSAGE INDEX is displayed in when threading.";
251 CONF_TXT_T cf_text_thread_index_style
[] = "Style of THREAD INDEX or default MESSAGE INDEX when threading.";
253 CONF_TXT_T cf_text_thread_more_char
[] = "When threading, character used to indicate collapsed messages underneath.";
255 CONF_TXT_T cf_text_thread_exp_char
[] = "When threading, character used to indicate expanded messages underneath.";
257 CONF_TXT_T cf_text_thread_lastreply_char
[] = "When threading, character used to indicate this is the last reply\n# to the parent of this message.";
259 CONF_TXT_T cf_text_use_only_domain_name
[] = "If \"user-domain\" not set, strips hostname in FROM address. (Unix only)";
261 CONF_TXT_T cf_text_printer
[] = "Your default printer selection";
263 CONF_TXT_T cf_text_personal_print_command
[] = "List of special print commands";
265 CONF_TXT_T cf_text_personal_print_cat
[] = "Which category default print command is in";
267 CONF_TXT_T cf_text_standard_printer
[] = "The system wide standard printers";
269 CONF_TXT_T cf_text_last_time_prune_quest
[] = "Set by Alpine; controls beginning-of-month sent-mail pruning.";
271 CONF_TXT_T cf_text_last_version_used
[] = "Set by Alpine; controls display of \"new version\" message.";
273 CONF_TXT_T cf_text_disable_drivers
[] = "List of mail drivers to disable.";
275 CONF_TXT_T cf_text_disable_auths
[] = "List of SASL authenticators to disable.";
277 CONF_TXT_T cf_text_remote_abook_metafile
[] = "Set by Alpine; contains data for caching remote address books.";
279 CONF_TXT_T cf_text_old_patterns
[] = "Patterns is obsolete, use patterns-xxx";
281 CONF_TXT_T cf_text_old_filters
[] = "Patterns-filters is obsolete, use patterns-filters2";
283 CONF_TXT_T cf_text_old_scores
[] = "Patterns-scores is obsolete, use patterns-scores2";
285 CONF_TXT_T cf_text_patterns
[] = "Patterns and their actions are stored here.";
287 CONF_TXT_T cf_text_remote_abook_history
[] = "How many extra copies of remote address book should be kept. Default: 3";
289 CONF_TXT_T cf_text_remote_abook_validity
[] = "Minimum number of minutes between checks for remote address book changes.\n# 0 means never check except when opening a remote address book.\n# -1 means never check. Default: 5";
291 CONF_TXT_T cf_text_bugs_fullname
[] = "Full name for bug report address used by \"Report Bug\" command";
293 CONF_TXT_T cf_text_bugs_address
[] = "Email address used to send bug reports";
295 CONF_TXT_T cf_text_bugs_extras
[] = "Program/Script used by \"Report Bug\" command. No default.";
297 CONF_TXT_T cf_text_suggest_fullname
[] = "Full name for suggestion address used by \"Report Bug\" command";
299 CONF_TXT_T cf_text_suggest_address
[] = "Email address used to send suggestions";
301 CONF_TXT_T cf_text_local_fullname
[] = "Full name for \"local support\" address used by \"Report Bug\" command.\n# Default: Local Support";
303 CONF_TXT_T cf_text_local_address
[] = "Email address used to send to \"local support\".\n# Default: postmaster";
305 CONF_TXT_T cf_text_forced_abook
[] = "Force these address book entries into all writable personal address books.\n# Syntax is forced-abook-entry=nickname|fullname|address\n# This is a comma-separated list of entries, each with syntax above.\n# Existing entries with same nickname are not replaced.\n# Example: help|Help Desk|help@ourdomain.com";
307 CONF_TXT_T cf_text_kblock_passwd
[] = "This is a number between 1 and 5. It is the number of times a user will\n# have to enter a password when they run the keyboard lock command in the\n# main menu. Default is 1.";
309 CONF_TXT_T cf_text_sendmail_path
[] = "This names the path to an alternative program, and any necessary arguments,\n# to be used in posting mail messages. Example:\n# /usr/lib/sendmail -oem -t -oi\n# or,\n# /usr/local/bin/sendit.sh\n# The latter a script found in Alpine distribution's contrib/util directory.\n# NOTE: The program MUST read the message to be posted on standard input,\n# AND operate in the style of sendmail's \"-t\" option.";
311 CONF_TXT_T cf_text_oper_dir
[] = "This names the root of the tree to which the user is restricted when reading\n# and writing folders and files. For example, on Unix ~/work confines the\n# user to the subtree beginning with their work subdirectory.\n# (Note: this alone is not sufficient for preventing access. You will also\n# need to restrict shell access and so on, see Alpine Technical Notes.)\n# Default: not set (so no restriction)";
313 CONF_TXT_T cf_text_in_fltr
[] = "This variable takes a list of programs that message text is piped into\n# after MIME decoding, prior to display.";
315 CONF_TXT_T cf_text_out_fltr
[] = "This defines a program that message text is piped into before MIME\n# encoding, prior to sending";
317 CONF_TXT_T cf_text_alt_addrs
[] = "A list of alternate addresses the user is known by";
319 CONF_TXT_T cf_text_keywords
[] = "A list of keywords for use in categorizing messages";
321 CONF_TXT_T cf_text_kw_colors
[] = "Colors used to display keywords in the index";
323 CONF_TXT_T cf_text_kw_braces
[] = "Characters which surround keywords in SUBJKEY token.\n# Default is \"{\" \"} \"";
325 CONF_TXT_T cf_text_opening_sep
[] = "Characters between subject and opening text in SUBJECTTEXT token.\n# Default is \" - \"";
327 CONF_TXT_T cf_text_abook_formats
[] = "This is a list of formats for address books. Each entry in the list is made\n# up of space-delimited tokens telling which fields are displayed and in\n# which order. See help text";
329 CONF_TXT_T cf_text_index_format
[] = "This gives a format for displaying the index. It is made\n# up of space-delimited tokens telling which fields are displayed and in\n# which order. See help text";
331 CONF_TXT_T cf_text_overlap
[] = "The number of lines of overlap when scrolling through message text";
333 CONF_TXT_T cf_text_maxremstreams
[] = "The maximum number of non-stayopen remote connections that Alpine will use";
335 CONF_TXT_T cf_text_permlocked
[] = "A list of folders that should be left open once opened (INBOX is implicit)";
337 CONF_TXT_T cf_text_margin
[] = "Number of lines from top and bottom of screen where single\n# line scrolling occurs.";
339 CONF_TXT_T cf_text_stat_msg_delay
[] = "The number of seconds to sleep after writing a status message";
341 CONF_TXT_T cf_text_busy_cue_rate
[] = "Number of times per-second to update busy cue messages";
343 CONF_TXT_T cf_text_psleep
[] = "UNIX ONLY (except MAC OSX): When an attachment is opened, this variable controls the number\n#of seconds to wait between checks if the user has ended viewing the attachment.\n#minimun value: 60 seconds, maximum value: 600 seconds (10 minutes). Default: 60 seconds";
345 CONF_TXT_T cf_text_mailcheck
[] = "The approximate number of seconds between checks for new mail";
347 CONF_TXT_T cf_text_mailchecknoncurr
[] = "The approximate number of seconds between checks for new mail in folders\n# other than the current folder and inbox.\n# Default is same as mail-check-interval";
349 CONF_TXT_T cf_text_maildropcheck
[] = "The minimum number of seconds between checks for new mail in a Mail Drop.\n# This is always effectively at least as large as the mail-check-interval";
351 CONF_TXT_T cf_text_nntprange
[] = "For newsgroups accessed using NNTP, only messages numbered in the range\n# lastmsg-range+1 to lastmsg will be considered";
353 CONF_TXT_T cf_text_news_active
[] = "Path and filename of news configuration's active file.\n# The default is typically \"/usr/lib/news/active\".";
355 CONF_TXT_T cf_text_news_spooldir
[] = "Directory containing system's news data.\n# The default is typically \"/usr/spool/news\"";
357 CONF_TXT_T cf_text_upload_cmd
[] = "Path and filename of the program used to upload text from your terminal\n# emulator's into Alpine's composer.";
359 CONF_TXT_T cf_text_upload_prefix
[] = "Text sent to terminal emulator prior to invoking the program defined by\n# the upload-command variable.\n# Note: _FILE_ will be replaced with the temporary file used in the upload.";
361 CONF_TXT_T cf_text_download_cmd
[] = "Path and filename of the program used to download text via your terminal\n# emulator from Alpine's export and save commands.";
363 CONF_TXT_T cf_text_download_prefix
[] = "Text sent to terminal emulator prior to invoking the program defined by\n# the download-command variable.\n# Note: _FILE_ will be replaced with the temporary file used in the download.";
365 CONF_TXT_T cf_text_goto_default
[] = "Sets the default folder and collection offered at the Goto Command's prompt.";
367 CONF_TXT_T cf_text_mailcap_path
[] = "Sets the search path for the mailcap configuration file.\n# NOTE: colon delimited under UNIX, semi-colon delimited under DOS/Windows/OS2.";
369 CONF_TXT_T cf_text_mimetype_path
[] = "Sets the search path for the mimetypes configuration file.\n# NOTE: colon delimited under UNIX, semi-colon delimited under DOS/Windows/OS2.";
371 CONF_TXT_T cf_text_newmail_fifo_path
[] = "Sets the filename for the newmail fifo (named pipe). Unix only.";
373 CONF_TXT_T cf_text_nmw_width
[] = "Sets the width for the NewMail screen.";
375 CONF_TXT_T cf_text_user_input_timeo
[] = "If no user input for this many hours, Alpine will exit if in an idle loop\n# waiting for a new command. If set to zero (the default), then there will\n# be no timeout.";
377 CONF_TXT_T cf_text_debug_mem
[] = "Debug-memory is obsolete";
379 CONF_TXT_T cf_text_tcp_open_timeo
[] = "Sets the time in seconds that Alpine will attempt to open a network\n# connection. The default is 30, the minimum is 5, and the maximum is\n# system defined (typically 75).";
381 CONF_TXT_T cf_text_tcp_read_timeo
[] = "Network read warning timeout. The default is 15, the minimum is 5, and the\n# maximum is 1000.";
383 CONF_TXT_T cf_text_tcp_write_timeo
[] = "Network write warning timeout. The default is 0 (unset), the minimum\n# is 5 (if not 0), and the maximum is 1000.";
385 CONF_TXT_T cf_text_tcp_query_timeo
[] = "If this much time has elapsed at the time of a tcp read or write\n# timeout, Alpine will ask if you want to break the connection.\n# Default is 60 seconds, minimum is 5, maximum is 1000.";
387 CONF_TXT_T cf_text_rsh_open_timeo
[] = "Sets the time in seconds that Alpine will attempt to open a UNIX remote\n# shell connection. The default is 15, min is 5, and max is unlimited.\n# Zero disables rsh altogether.";
389 CONF_TXT_T cf_text_rsh_path
[] = "Sets the name of the command used to open a UNIX remote shell connection.\n# The default is typically /usr/ucb/rsh.";
391 CONF_TXT_T cf_text_rsh_command
[] = "Sets the format of the command used to open a UNIX remote\n# shell connection. The default is \"%s %s -l %s exec /etc/r%sd\"\n# NOTE: the 4 (four) \"%s\" entries MUST exist in the provided command\n# where the first is for the command's path, the second is for the\n# host to connect to, the third is for the user to connect as, and the\n# fourth is for the connection method (typically \"imap\")";
393 CONF_TXT_T cf_text_ssh_open_timeo
[] = "Sets the time in seconds that Alpine will attempt to open a UNIX secure\n# shell connection. The default is 15, min is 5, and max is unlimited.\n# Zero disables ssh altogether.";
395 CONF_TXT_T cf_text_inc_check_timeo
[] = "Sets the time in seconds that Alpine will attempt to open a network\n# connection when checking for new unseen messages in an incoming folder.\n# The default is 5.";
397 CONF_TXT_T cf_text_inc_check_interval
[] = "Sets the approximate number of seconds between checks for unseen messages\n# in incoming folders. The default is 180.";
399 CONF_TXT_T cf_text_inc_second_check_interval
[] = "Sets the approximate number of seconds between checks for unseen messages\n# for other than local or IMAP folders. The default is 180.";
401 CONF_TXT_T cf_text_inc_check_list
[] = "List of incoming folders to check for unseen messages. The default if left\n# blank is to check all incoming folders.";
403 CONF_TXT_T cf_text_ssh_path
[] = "Sets the name of the command used to open a UNIX secure shell connection.\n# Typically this is /usr/bin/ssh.";
405 CONF_TXT_T cf_text_ssh_command
[] = "Sets the format of the command used to open a UNIX secure\n# shell connection. The default is \"%s %s -l %s exec /etc/r%sd\"\n# NOTE: the 4 (four) \"%s\" entries MUST exist in the provided command\n# where the first is for the command's path, the second is for the\n# host to connect to, the third is for the user to connect as, and the\n# fourth is for the connection method (typically \"imap\")";
407 CONF_TXT_T cf_text_version_threshold
[] = "Sets the version number Alpine will use as a threshold for offering\n# its new version message on startup.";
409 CONF_TXT_T cf_text_archived_folders
[] = "List of folder pairs; the first indicates a folder to archive, and the\n# second indicates the folder read messages in the first should\n# be moved to.";
411 CONF_TXT_T cf_text_elm_style_save
[] = "Elm-style-save is obsolete, use saved-msg-name-rule";
413 CONF_TXT_T cf_text_header_in_reply
[] = "Header-in-reply is obsolete, use include-header-in-reply in feature-list";
415 CONF_TXT_T cf_text_feature_level
[] = "Feature-level is obsolete, use feature-list";
417 CONF_TXT_T cf_text_old_style_reply
[] = "Old-style-reply is obsolete, use signature-at-bottom in feature-list";
419 CONF_TXT_T cf_text_compose_mime
[] = "Compose-mime is obsolete";
421 CONF_TXT_T cf_text_show_all_characters
[] = "Show-all-characters is obsolete";
423 CONF_TXT_T cf_text_save_by_sender
[] = "Save-by-sender is obsolete, use saved-msg-name-rule";
425 CONF_TXT_T cf_text_file_dir
[] = "Default directory used for Attachment handling (attach and save)\n# and Export command output";
427 CONF_TXT_T cf_text_folder_extension
[] = "Folder-extension is obsolete";
429 CONF_TXT_T cf_text_normal_foreground_color
[] = "Choose: black, blue, green, cyan, red, magenta, yellow, or white.";
431 CONF_TXT_T cf_text_window_position
[] = "Window position in the format: CxR+X+Y\n# Where C and R are the window size in characters and X and Y are the\n# screen position of the top left corner of the window.\n# This is no longer used unless position is not set in registry.";
433 CONF_TXT_T cf_text_newsrc_path
[] = "Full path and name of NEWSRC file";
436 /*----------------------------------------------------------------------
437 These are the variables that control a number of pine functions. They
438 come out of the .pinerc and the /usr/local/lib/pine.conf files. Some can
439 be set by the user while in Alpine. Eventually all the local ones should
440 be so and maybe the global ones too.
442 Each variable can have a command-line, user, global, and current value.
443 All of these values are malloc'd. The user value is the one read out of
444 the user's .pinerc, the global value is the one from the system pine
445 configuration file. There are often defaults for the global values, set
446 at the start of init_vars(). Perhaps someday there will be group values.
447 The current value is the one that is actually in use.
449 /* name is_changed_val
455 is_global | | | | | |
456 is_user | | | | | | |
457 been_written | | | | | | | |
458 is_used | | | | | | | | |
459 is_obsolete | | | | | | | | | |
460 | | | | | | | | | | |
461 (on following line) description | | | | | | | | | | |
462 | | | | | | | | | | | |
463 | | | | | | | | | | | | */
464 static struct variable variables
[] = {
465 {"personal-name", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
466 NULL
, cf_text_personal_name
},
468 #if defined(DOS) || defined(OS2)
469 /* Have to have this on DOS, PC's, Macs, etc... */
470 "user-id", 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0,
471 #else /* Don't allow on UNIX machines for some security */
472 "user-id", 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0,
474 "User ID", cf_text_user_id
},
475 {"user-domain", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
476 NULL
, cf_text_user_domain
},
477 {"smtp-server", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
478 "SMTP Server (for sending)", cf_text_smtp_server
},
479 {"nntp-server", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
480 "NNTP Server (for news)", cf_text_nntp_server
},
481 {"inbox-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
482 NULL
, cf_text_inbox_path
},
483 {"incoming-archive-folders", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
484 NULL
, cf_text_archived_folders
},
485 {"pruned-folders", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
486 NULL
, cf_text_pruned_folders
},
487 {"default-fcc", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
488 "Default Fcc (File carbon copy)", cf_text_default_fcc
},
489 {"default-saved-msg-folder", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
490 "Default Saved Message Folder", cf_text_default_saved
},
491 {"postponed-folder", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
492 NULL
, cf_text_postponed_folder
},
493 {"read-message-folder", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
494 NULL
, cf_text_read_message_folder
},
495 {"form-letter-folder", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
496 NULL
, cf_text_form_letter_folder
},
497 {"trash-folder", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
498 NULL
, cf_text_trash_folder
},
499 {"literal-signature", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
500 NULL
, cf_text_literal_sig
},
501 {"signature-file", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
502 NULL
, cf_text_signature_file
},
503 {"feature-list", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
504 NULL
, cf_text_feature_list
},
505 {"initial-keystroke-list", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
506 NULL
, cf_text_initial_keystroke_list
},
507 {"default-composer-hdrs", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
508 "Default Composer Headers", cf_text_default_composer_hdrs
},
509 {"customized-hdrs", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
510 "Customized Headers", cf_text_customized_hdrs
},
511 {"viewer-hdrs", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
512 "Viewer Headers", cf_text_view_headers
},
513 {"viewer-margin-left", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
514 NULL
, cf_text_view_margin_left
},
515 {"viewer-margin-right", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
516 NULL
, cf_text_view_margin_right
},
517 {"quote-suppression-threshold", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
518 NULL
, cf_text_quote_suppression
},
519 {"saved-msg-name-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
520 "Saved Message Name Rule", cf_text_save_msg_name_rule
},
521 {"fcc-name-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
522 NULL
, cf_text_fcc_name_rule
},
523 {"sort-key", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
524 NULL
, cf_text_sort_key
},
525 {"addrbook-sort-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
526 "Address Book Sort Rule", cf_text_addrbook_sort_rule
},
527 {"folder-sort-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
528 NULL
, cf_text_folder_sort_rule
},
529 {"goto-default-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
530 NULL
, cf_text_goto_default
},
531 {"incoming-startup-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
532 NULL
, cf_text_inc_startup
},
533 {"pruning-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
534 NULL
, cf_pruning_rule
},
535 {"folder-reopen-rule", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
536 NULL
, cf_reopen_rule
},
537 {"threading-display-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
538 NULL
, cf_text_thread_disp_style
},
539 {"threading-index-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
540 NULL
, cf_text_thread_index_style
},
541 {"threading-indicator-character", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
542 NULL
, cf_text_thread_more_char
},
543 {"threading-expanded-character", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
544 NULL
, cf_text_thread_exp_char
},
545 {"threading-lastreply-character", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
546 "Threading Last Reply Character", cf_text_thread_lastreply_char
},
548 {"display-character-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
549 NULL
, cf_text_disp_char_set
},
550 {"character-set", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
551 NULL
, cf_text_old_char_set
},
552 {"keyboard-character-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
553 NULL
, cf_text_key_char_set
},
554 #endif /* ! _WINDOWS */
555 {"posting-character-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
556 NULL
, cf_text_post_character_set
},
557 {"unknown-character-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
558 NULL
, cf_text_unk_character_set
},
559 {"editor", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
560 NULL
, cf_text_editor
},
561 {"speller", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
562 NULL
, cf_text_speller
},
563 {"composer-wrap-column", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
564 NULL
, cf_text_fillcol
},
565 {"reply-indent-string", 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0,
566 NULL
, cf_text_replystr
},
567 {"reply-leadin", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
568 NULL
, cf_text_replyintro
},
569 {"quote-replace-string", 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0,
570 NULL
, cf_text_quotereplstr
},
571 {"composer-word-separators", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
572 NULL
, cf_text_wordsep
},
573 {"empty-header-message", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
574 NULL
, cf_text_emptyhdr
},
575 {"image-viewer", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
576 NULL
, cf_text_image_viewer
},
577 {"use-only-domain-name", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
578 NULL
, cf_text_use_only_domain_name
},
579 {"bugs-fullname", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
580 NULL
, cf_text_bugs_fullname
},
581 {"bugs-address", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
582 NULL
, cf_text_bugs_address
},
583 {"bugs-additional-data", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
584 NULL
, cf_text_bugs_extras
},
585 {"suggest-fullname", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
586 NULL
, cf_text_suggest_fullname
},
587 {"suggest-address", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
588 NULL
, cf_text_suggest_address
},
589 {"local-fullname", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
590 NULL
, cf_text_local_fullname
},
591 {"local-address", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
592 NULL
, cf_text_local_address
},
593 {"forced-abook-entry", 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0,
594 NULL
, cf_text_forced_abook
},
595 {"kblock-passwd-count", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
596 NULL
, cf_text_kblock_passwd
},
597 {"display-filters", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
598 NULL
, cf_text_in_fltr
},
599 {"sending-filters", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
600 NULL
, cf_text_out_fltr
},
601 {"alt-addresses", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
602 "Alternate Addresses", cf_text_alt_addrs
},
603 {"keywords", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
604 NULL
, cf_text_keywords
},
605 {"keyword-surrounding-chars", 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0,
606 "Keyword Surrounding Characters", cf_text_kw_braces
},
607 {"opening-text-separator-chars", 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0,
608 "Opening Text Separator Characters", cf_text_opening_sep
},
609 {"addressbook-formats", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
610 "Address Book Formats", cf_text_abook_formats
},
611 {"index-format", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
612 NULL
, cf_text_index_format
},
613 {"viewer-overlap", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
614 NULL
, cf_text_overlap
},
615 {"scroll-margin", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
616 NULL
, cf_text_margin
},
617 {"status-message-delay", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
618 NULL
, cf_text_stat_msg_delay
},
619 {"busy-cue-rate", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
620 NULL
, cf_text_busy_cue_rate
},
621 {"mailcap-check-interval", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
622 NULL
, cf_text_psleep
},
623 {"mail-check-interval", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
624 NULL
, cf_text_mailcheck
},
625 {"mail-check-interval-noncurrent", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
626 NULL
, cf_text_mailchecknoncurr
},
627 {"maildrop-check-minimum", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
628 NULL
, cf_text_maildropcheck
},
629 {"nntp-range", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
630 "NNTP Range", cf_text_nntprange
},
631 {"newsrc-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
632 NULL
, cf_text_newsrc_path
},
633 {"news-active-file-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
634 NULL
, cf_text_news_active
},
635 {"news-spool-directory", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
636 NULL
, cf_text_news_spooldir
},
637 {"upload-command", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
638 NULL
, cf_text_upload_cmd
},
639 {"upload-command-prefix", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
640 NULL
, cf_text_upload_prefix
},
641 {"download-command", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
642 NULL
, cf_text_download_cmd
},
643 {"download-command-prefix", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
644 NULL
, cf_text_download_prefix
},
645 {"mailcap-search-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
646 NULL
, cf_text_mailcap_path
},
647 {"mimetype-search-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
648 NULL
, cf_text_mimetype_path
},
649 {"url-viewers", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
650 "URL-Viewers", cf_text_browser
},
651 {"max-remote-connections", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
652 "Maximum Remote Connections", cf_text_maxremstreams
},
653 {"stay-open-folders", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
654 "Stayopen Folders", cf_text_permlocked
},
655 {"incoming-check-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
656 NULL
, cf_text_inc_check_timeo
},
657 {"incoming-check-interval", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
658 NULL
, cf_text_inc_check_interval
},
659 {"incoming-check-interval-secondary", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
660 NULL
, cf_text_inc_second_check_interval
},
661 {"incoming-check-list", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
662 NULL
, cf_text_inc_check_list
},
663 {"dead-letter-files", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
664 NULL
, cf_text_deadlets
},
665 #if !defined(DOS) && !defined(OS2) && !defined(LEAVEOUTFIFO)
666 {"newmail-fifo-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
667 "NewMail FIFO Path", cf_text_newmail_fifo_path
},
669 {"newmail-window-width", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
670 "NewMail Window Width", cf_text_nmw_width
},
672 * Starting here, the variables are hidden in the Setup/Config screen.
673 * They are exposed if feature expose-hidden-config is set.
675 {"incoming-folders", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
676 NULL
, cf_text_incoming_folders
},
677 {"mail-directory", 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
678 NULL
, cf_text_mail_directory
},
679 {"folder-collections", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
680 NULL
, cf_text_folder_collections
},
681 {"news-collections", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
682 NULL
, cf_text_news_collections
},
683 {"address-book", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
684 NULL
, cf_text_address_book
},
685 {"global-address-book", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
686 NULL
, cf_text_global_address_book
},
687 {"standard-printer", 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0,
688 NULL
, cf_text_standard_printer
},
689 {"last-time-prune-questioned", 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0,
690 NULL
, cf_text_last_time_prune_quest
},
691 {"last-version-used", 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0,
692 NULL
, cf_text_last_version_used
},
693 {"sendmail-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
694 NULL
, cf_text_sendmail_path
},
695 {"operating-dir", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
696 NULL
, cf_text_oper_dir
},
697 {"user-input-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
698 NULL
, cf_text_user_input_timeo
},
701 {"debug-memory", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
702 NULL
, cf_text_debug_mem
},
704 {"tcp-open-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
705 "TCP Open Timeout", cf_text_tcp_open_timeo
},
706 {"tcp-read-warning-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
707 "TCP Read Warning Timeout", cf_text_tcp_read_timeo
},
708 {"tcp-write-warning-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
709 "TCP Write Warning Timeout", cf_text_tcp_write_timeo
},
710 {"tcp-query-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
711 "TCP Query Timeout", cf_text_tcp_query_timeo
},
712 {"rsh-command", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
713 NULL
, cf_text_rsh_command
},
714 {"rsh-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
715 NULL
, cf_text_rsh_path
},
716 {"rsh-open-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
717 NULL
, cf_text_rsh_open_timeo
},
718 {"ssh-command", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
719 NULL
, cf_text_ssh_command
},
720 {"ssh-path", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
721 NULL
, cf_text_ssh_path
},
722 {"ssh-open-timeout", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
723 NULL
, cf_text_ssh_open_timeo
},
724 {"new-version-threshold", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
725 NULL
, cf_text_version_threshold
},
726 {"disable-these-drivers", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
727 NULL
, cf_text_disable_drivers
},
728 {"disable-these-authenticators", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
729 NULL
, cf_text_disable_auths
},
730 {"remote-abook-metafile", 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0,
731 NULL
, cf_text_remote_abook_metafile
},
732 {"remote-abook-history", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
733 NULL
, cf_text_remote_abook_history
},
734 {"remote-abook-validity", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
735 NULL
, cf_text_remote_abook_validity
},
736 {"printer", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
737 NULL
, cf_text_printer
},
738 {"personal-print-command", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
739 NULL
, cf_text_personal_print_command
},
740 {"personal-print-category", 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0,
741 NULL
, cf_text_personal_print_cat
},
742 {"patterns", 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
743 NULL
, cf_text_old_patterns
},
744 {"patterns-roles", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
745 NULL
, cf_text_patterns
},
746 {"patterns-filters2", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
747 "Patterns Filters", cf_text_patterns
},
748 {"patterns-filters", 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
749 NULL
, cf_text_old_filters
},
750 {"patterns-scores2", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
751 "Patterns Scores", cf_text_patterns
},
752 {"patterns-scores", 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
753 NULL
, cf_text_old_scores
},
754 {"patterns-indexcolors", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
755 NULL
, cf_text_patterns
},
756 {"patterns-other", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
757 NULL
, cf_text_patterns
},
758 {"patterns-search", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
759 NULL
, cf_text_patterns
},
761 {"elm-style-save", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
762 NULL
, cf_text_elm_style_save
},
763 {"header-in-reply", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
764 NULL
, cf_text_header_in_reply
},
765 {"feature-level", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
766 NULL
, cf_text_feature_level
},
767 {"old-style-reply", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
768 NULL
, cf_text_old_style_reply
},
769 {"compose-mime", 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
770 NULL
, cf_text_compose_mime
},
771 {"show-all-characters", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
772 NULL
, cf_text_show_all_characters
},
773 {"save-by-sender", 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
774 NULL
, cf_text_save_by_sender
},
775 #if defined(DOS) || defined(OS2)
776 {"file-directory", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
777 NULL
, cf_text_file_dir
},
778 {"folder-extension", 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0,
779 NULL
, cf_text_folder_extension
},
782 {"color-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
783 NULL
, cf_text_color_style
},
785 {"current-indexline-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
786 NULL
, cf_text_current_indexline_style
},
787 {"titlebar-color-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
788 NULL
, cf_text_titlebar_color_style
},
789 {"normal-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
790 NULL
, cf_text_normal_foreground_color
},
791 {"normal-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
792 {"reverse-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
793 {"reverse-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
794 {"title-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
795 {"title-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
796 {"title-closed-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
797 {"title-closed-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
798 {"folder-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
799 {"folder-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
800 {"directory-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
801 {"directory-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
802 {"folder-list-text-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
803 {"folder-list-text-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
804 {"status-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
805 {"status-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
806 {"keylabel-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
807 {"keylabel-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
808 {"keyname-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
809 {"keyname-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
810 {"selectable-item-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
811 {"selectable-item-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
812 {"meta-message-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
813 {"meta-message-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
814 {"quote1-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
815 {"quote1-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
816 {"quote2-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
817 {"quote2-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
818 {"quote3-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
819 {"quote3-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
820 {"incoming-unseen-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
821 {"incoming-unseen-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
822 {"signature-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
823 {"signature-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
824 {"prompt-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
825 {"prompt-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
826 {"header-general-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
827 {"header-general-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
828 {"index-to-me-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
829 {"index-to-me-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
830 {"index-important-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
831 {"index-important-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
832 {"index-deleted-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
833 {"index-deleted-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
834 {"index-answered-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
835 {"index-answered-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
836 {"index-new-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
837 {"index-new-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
838 {"index-recent-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
839 {"index-recent-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
840 {"index-forward-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
841 {"index-forward-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
842 {"index-unseen-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
843 {"index-unseen-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
844 {"index-highpriority-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
845 {"index-highpriority-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
846 {"index-lowpriority-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
847 {"index-lowpriority-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
848 {"index-arrow-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
849 {"index-arrow-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
850 {"index-subject-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
851 {"index-subject-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
852 {"index-from-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
853 {"index-from-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
854 {"index-opening-foreground-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
855 {"index-opening-background-color", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0},
856 {"index-token-colors", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
857 NULL
, cf_text_index_token_color
},
858 {"viewer-hdr-colors", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
859 "Viewer Header Colors", cf_text_view_hdr_color
},
860 {"keyword-colors", 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0,
861 NULL
, cf_text_kw_colors
},
863 {"font-name", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
864 NULL
, "name and size of font."},
865 {"font-size", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
866 {"font-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
867 {"font-char-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
868 {"print-font-name", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
869 NULL
, "name and size of printer font."},
870 {"print-font-size", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
871 {"print-font-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
872 {"print-font-char-set", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
873 {"window-position", 0, 1, 0, 1, 1, 0, 0, 0, 1, 1, 0,
874 NULL
, cf_text_window_position
},
875 {"cursor-style", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, NULL
},
876 #endif /* _WINDOWS */
878 {"smime-public-cert-directory", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
879 "S/MIME - Public Cert Directory", cf_text_publiccertdir
},
880 {"smime-public-cert-container", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
881 "S/MIME - Public Cert Container", cf_text_publiccertcontainer
},
882 {"smime-private-key-directory", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
883 "S/MIME - Private Key Directory", cf_text_privatekeydir
},
884 {"smime-private-key-container", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
885 "S/MIME - Private Key Container", cf_text_privatekeycontainer
},
886 {"smime-cacert-directory", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
887 "S/MIME - Cert Authority Directory", cf_text_cacertdir
},
888 {"smime-cacert-container", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
889 "S/MIME - Cert Authority Container", cf_text_cacertcontainer
},
892 {"ldap-servers", 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0,
893 "LDAP Servers", cf_text_ldap_server
},
894 #endif /* ENABLE_LDAP */
895 {"rss-news", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
896 "WEB ALPINE - RSS News", cf_text_rss_news
},
897 {"rss-weather", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
898 "WEB ALPINE - RSS Weather", cf_text_rss_weather
},
899 {"wp-indexheight", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
900 "WEB ALPINE - Index Height", cf_text_wp_indexheight
},
901 {"wp-indexlines", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
902 "WEB ALPINE - Index Lines", cf_text_wp_indexlines
},
903 {"wp-aggstate", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
904 "WEB ALPINE - Aggregate State", cf_text_wp_aggstate
},
905 {"wp-state", 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0,
906 "WEB ALPINE - Cross Session State", cf_text_wp_state
},
907 {"wp-columns", 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0,
908 "WEB ALPINE - Columns", cf_text_wp_columns
},
909 {NULL
, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, NULL
,NULL
}
914 var_from_name(char *name
)
919 if(!(name
&& name
[0]))
922 for(i
= 0; (v
= &variables
[i
]) && v
->name
; i
++)
923 if(!strucmp(v
->name
,name
))
931 init_init_vars(struct pine
*ps
)
933 ps
->vars
= variables
;
937 #define DSIZE (25000)
938 /* this is just like dprint except it prints to a char * */
940 #define mprint(n,x) { \
951 * this was split out from init_vars so we can get at the
952 * pinerc location sooner.
955 init_pinerc(struct pine
*ps
, char **debug_out
)
957 char buf
[MAXPATH
+1], *p
, *db
;
958 #if defined(DOS) || defined(OS2)
959 char buf2
[MAXPATH
+1], l_pinerc
[MAXPATH
+1];
960 int nopinerc
= 0, confregset
= -1;
961 register struct variable
*vars
= ps
->vars
;
966 * Since this routine is called before we've had a chance to set up
967 * the debug file for output, we put the debugging into memory and
968 * pass it back to the caller for use after init_debug(). We just
969 * allocate plenty of space.
972 db
= *debug_out
= (char *)fs_get(DSIZE
* sizeof(char));
977 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "\n -- init_pinerc --\n\n"));
979 #if defined(DOS) || defined(OS2)
981 * Rules for the config/support file locations under DOS are:
983 * 1) The location of the PINERC is searched for in the following
984 * order of precedence:
985 * - File pointed to by '-p' command line option
986 * - File pointed to by PINERC environment variable
988 * - same dir as argv[0]
990 * 2) The HOME environment variable, if not set, defaults to
991 * root of the current working drive (see alpine.c)
993 * 3) The default for external files (PINE.SIG and ADDRBOOK) is the
994 * same directory as the pinerc
996 * 4) The support files (PINE.HLP and PINE.NDX) are expected to be in
997 * the same directory as PINE.EXE.
1001 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1002 "Personal config \"%.100s\" comes from command line\n",
1003 (ps
->prc
&& ps
->prc
->name
) ? ps
->prc
->name
: "<no name>"));
1006 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1007 "Personal config not set on cmdline, checking for $PINERC\n"));
1011 * First, if prc hasn't been set by a command-line -p, check to see
1012 * if PINERC is in the environment. If so, treat it just like we
1013 * would have treated it if it were a command-line arg.
1015 if(!ps
->prc
&& (p
= getenv("PINERC")) && *p
){
1016 char path
[MAXPATH
], dir
[MAXPATH
];
1018 if(IS_REMOTE(p
) || is_absolute_path(p
)){
1019 strncpy(path
, p
, sizeof(path
)-1);
1020 path
[sizeof(path
)-1] = '\0';
1023 getcwd(dir
, sizeof(dir
));
1024 build_path(path
, dir
, p
, sizeof(path
));
1028 ps
->pinerc
= cpystr(path
);
1030 ps
->prc
= new_pinerc_s(path
);
1033 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1034 " yes, personal config \"%.100s\" comes from $PINERC\n",
1035 (ps
->prc
&& ps
->prc
->name
) ? ps
->prc
->name
: "<no name>"));
1040 * Pinerc used to be the name of the pinerc file. Then we added
1041 * the possibility of the pinerc file being remote, and we replaced
1042 * the variable pinerc with the structure prc. Unfortunately, some
1043 * parts of pine rely on the fact that pinerc is the name of the
1044 * pinerc _file_, and use the directory that the pinerc file is located
1045 * in for their own purposes. We want to preserve that so things will
1046 * keep working. So, even if the real pinerc is remote, we need to
1047 * put the name of a pinerc file in the pinerc variable so that the
1048 * directory which contains that file is writable. The file itself
1049 * doesn't have to exist for this purpose, since we are really only
1050 * using the name of the directory containing the file. Twisted.
1051 * (Alternatively, we could fix all of the code that uses the pinerc
1052 * variable for this purpose to use a new variable which really is
1053 * just a directory.) hubert 2000-sep
1055 * There are 3 cases. If pinerc is already set that means that the user
1056 * gave either a -p pinerc or an environment pinerc that is a local file,
1057 * and we are done. If pinerc is not set, then either prc is set or not.
1058 * If prc is set then the -p arg or PINERC value is a remote pinerc.
1059 * In that case we need to find a local directory to use, and put that
1060 * directory in the pinerc variable (with a fake filename tagged on).
1061 * If prc is not set, then user hasn't told us anything so we have to
1062 * try to find the default pinerc file by looking down the path of
1063 * possibilities. When we find it, we'll also use that directory.
1069 if(ps
->prc
){ /* remote pinerc case */
1071 * We don't give them an l_pinerc unless they tell us where
1074 if(ps
->aux_files_dir
)
1075 build_path(l_pinerc
, ps
->aux_files_dir
, SYSTEM_PINERC
,
1079 * Search for a writable directory.
1080 * Mimic what happens in !prc for local case, except we
1081 * don't need to look for the actual file.
1084 /* check if $HOME\PINE is writable */
1085 build_path(buf2
, ps
->home_dir
, DF_PINEDIR
, sizeof(buf2
));
1086 if(is_writable_dir(buf2
) == 0)
1087 build_path(l_pinerc
, buf2
, SYSTEM_PINERC
, sizeof(l_pinerc
));
1088 else{ /* $HOME\PINE not a writable dir */
1089 /* use this unless registry redirects us */
1090 build_path(l_pinerc
, ps
->pine_dir
, SYSTEM_PINERC
,
1093 /* if in registry, use that value */
1094 if(mswin_reg(MSWR_OP_GET
, MSWR_PINE_RC
, buf2
, sizeof(buf2
))
1095 && !IS_REMOTE(buf2
)){
1096 strncpy(l_pinerc
, buf2
, sizeof(l_pinerc
)-1);
1097 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1103 else{ /* searching for pinerc file to use */
1105 * Buf2 is $HOME\PINE. If $HOME is not explicitly set,
1106 * it defaults to the current working drive (often C:).
1107 * See alpine.c to see how it is initially set.
1110 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, searching...\n"));
1111 build_path(buf2
, ps
->home_dir
, DF_PINEDIR
, sizeof(buf2
));
1112 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1113 " checking for writable %.100s dir \"%.100s\" off of homedir\n",
1115 if(is_writable_dir(buf2
) == 0){
1117 * $HOME\PINE exists and is writable.
1118 * See if $HOME\PINE\PINERC exists.
1120 build_path(buf
, buf2
, SYSTEM_PINERC
, sizeof(buf
));
1121 strncpy(l_pinerc
, buf
, sizeof(l_pinerc
)-1);
1122 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1123 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " yes, now checking for file \"%.100s\"\n",
1125 if(can_access(buf
, ACCESS_EXISTS
) == 0){ /* found it! */
1127 * Buf is what we were looking for.
1128 * It is local and can be used for the directory, too.
1130 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found it\n"));
1134 * No $HOME\PINE\PINERC, look for
1135 * one in same dir as PINE.EXE.
1137 build_path(buf2
, ps
->pine_dir
, SYSTEM_PINERC
,
1139 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1140 " no, checking for \"%.100s\" in pine.exe dir\n",
1142 if(can_access(buf2
, ACCESS_EXISTS
) == 0){
1144 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found it\n"));
1145 strncpy(buf
, buf2
, sizeof(buf
)-1);
1146 buf
[sizeof(buf
)-1] = '\0';
1147 strncpy(l_pinerc
, buf2
, sizeof(l_pinerc
)-1);
1148 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1152 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, checking in registry\n"));
1153 if(mswin_reg(MSWR_OP_GET
, MSWR_PINE_RC
,
1154 buf2
, sizeof(buf2
))){
1155 strncpy(buf
, buf2
, sizeof(buf
)-1);
1156 buf
[sizeof(buf
)-1] = '\0';
1157 if(!IS_REMOTE(buf2
)){
1158 strncpy(l_pinerc
, buf2
, sizeof(l_pinerc
)-1);
1159 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1162 * Now buf is the pinerc to be used, l_pinerc is
1163 * the directory, which may be either same as buf
1164 * or it may be $HOME\PINE if registry gives us
1167 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found \"%.100s\" in registry\n",
1172 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " not found, asking user\n"));
1175 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " not found\n"));
1181 * Buf is the pinerc (could be remote if from registry)
1182 * and l_pinerc is the local pinerc, which may not exist.
1185 else{ /* $HOME\PINE not a writable dir */
1187 * We notice that the order of checking in the registry
1188 * and checking in the ALPINE.EXE directory are different
1189 * in this case versus the is_writable_dir(buf2) case, and
1190 * that does sort of look like a bug. However,
1191 * we don't think this is a bug since we did it on purpose
1192 * a long time ago. So even though we can't remember why
1193 * it is this way, we think we would rediscover why if we
1194 * changed it! So we won't change it.
1198 * Change the default to use to the ALPINE.EXE directory.
1200 build_path(buf
, ps
->pine_dir
, SYSTEM_PINERC
, sizeof(buf
));
1201 strncpy(l_pinerc
, buf
, sizeof(l_pinerc
)-1);
1202 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1204 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, not writable, checking in registry\n"));
1205 /* if in registry, use that value */
1206 if(mswin_reg(MSWR_OP_GET
, MSWR_PINE_RC
, buf2
, sizeof(buf2
))){
1207 strncpy(buf
, buf2
, sizeof(buf
)-1);
1208 buf
[sizeof(buf
)-1] = '\0';
1209 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found \"%.100s\" in registry\n",
1211 if(!IS_REMOTE(buf
)){
1212 strncpy(l_pinerc
, buf
, sizeof(l_pinerc
)-1);
1213 l_pinerc
[sizeof(l_pinerc
)-1] = '\0';
1217 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1218 " no, checking for \"%.100s\" in alpine.exe dir\n",
1221 if(can_access(buf
, ACCESS_EXISTS
) == 0){
1222 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found it\n"));
1226 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " not found, asking user\n"));
1230 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1231 " no, checking for \"%.100s\" in alpine.exe dir\n",
1234 if(can_access(buf
, ACCESS_EXISTS
) == 0){
1235 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " found it\n"));
1238 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " not found, creating it\n"));
1244 * When we get here we have buf set to the name of the
1245 * pinerc, which could be local or remote. We have l_pinerc
1246 * set to the same as buf if buf is local, and set to another
1247 * name otherwise, hopefully contained in a writable directory.
1250 if(nopinerc
|| ps_global
->install_flag
){
1251 char buf3
[MAXPATH
+1];
1254 strncpy(buf3
, buf
, MAXPATH
);
1255 buf3
[MAXPATH
] = '\0';
1256 if(os_config_dialog(buf3
, MAXPATH
,
1257 &confregset
, nopinerc
) == 0){
1258 strncpy(buf
, buf3
, MAXPATH
);
1259 buf
[MAXPATH
] = '\0';
1260 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " not found, creating it\n"));
1261 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " user says use \"%.100s\"\n", buf
));
1262 if(!IS_REMOTE(buf
)){
1263 strncpy(l_pinerc
, buf
, MAXPATH
);
1264 l_pinerc
[MAXPATH
] = '\0';
1272 ps
->prc
= new_pinerc_s(buf
);
1275 ps
->pinerc
= cpystr(l_pinerc
);
1278 #if defined(DOS) || defined(OS2)
1280 * The goal here is to set the auxiliary directory in the pinerc variable.
1281 * We are making the assumption that any reference to the pinerc variable
1282 * after this point is used only as a directory in which to store things,
1283 * with the prc variable being the preferred place to store pinerc location.
1284 * If -aux isn't set, then there is no change. -jpf 08/2001
1286 if(ps
->aux_files_dir
){
1288 build_path(l_pinerc
, ps
->aux_files_dir
, SYSTEM_PINERC
,
1290 if(ps
->pinerc
) fs_give((void **)&ps
->pinerc
);
1291 ps
->pinerc
= cpystr(l_pinerc
);
1292 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Setting aux_files_dir to \"%.100s\"\n",
1293 ps
->aux_files_dir
));
1298 if(confregset
&& (ps
->update_registry
!= UREG_NEVER_SET
))
1299 mswin_reg(MSWR_OP_SET
| ((ps
->update_registry
== UREG_ALWAYS_SET
)
1300 || confregset
== 1 ? MSWR_OP_FORCE
: 0),
1302 (ps
->prc
&& ps
->prc
->name
) ?
1303 ps
->prc
->name
: ps
->pinerc
, (size_t)NULL
);
1307 * Now that we know the default for the PINERC, build NEWSRC default.
1308 * Backward compatibility makes this kind of funky. If what the
1309 * c-client thinks the NEWSRC should be exists *AND* it doesn't
1310 * already exist in the PINERC's dir, use c-client's default, otherwise
1311 * use the one next to the PINERC...
1313 p
= last_cmpnt(ps
->pinerc
);
1316 strncpy(buf
, ps
->pinerc
, MIN(p
- ps
->pinerc
, sizeof(buf
)-1));
1317 buf
[MIN(p
- ps
->pinerc
, sizeof(buf
)-1)] = '\0';
1320 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Using directory \"%.100s\" for auxiliary files\n", buf
));
1321 strncat(buf
, "NEWSRC", sizeof(buf
)-1-strlen(buf
));
1323 if(!(p
= (void *) mail_parameters(NULL
, GET_NEWSRC
, (void *)NULL
))
1324 || can_access(p
, ACCESS_EXISTS
) < 0
1325 || can_access(buf
, ACCESS_EXISTS
) == 0){
1326 mail_parameters(NULL
, SET_NEWSRC
, (void *)buf
);
1327 GLO_NEWSRC_PATH
= cpystr(buf
);
1330 GLO_NEWSRC_PATH
= cpystr(p
);
1333 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Global config \"%.100s\" comes from command line\n",
1334 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<no name>"));
1337 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1338 "Global config not set on cmdline, checking for $PINECONF\n"));
1341 if(!ps
->pconf
&& (p
= getenv("PINECONF"))){
1342 ps
->pconf
= new_pinerc_s(p
);
1344 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1345 " yes, global config \"%.100s\" comes from $PINECONF\n",
1346 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<no name>"));
1351 && mswin_reg(MSWR_OP_GET
, MSWR_PINE_CONF
, buf2
, sizeof(buf2
))){
1352 ps
->pconf
= new_pinerc_s(buf2
);
1354 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1355 " yes, global config \"%.100s\" comes from Registry\n",
1356 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<no name>"));
1361 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, there is no global config\n"));
1364 else if (ps
->pconf
&& ps
->pconf
->name
&&
1365 (ps
->update_registry
!= UREG_NEVER_SET
)){
1366 mswin_reg(MSWR_OP_SET
| ((ps
->update_registry
== UREG_ALWAYS_SET
)
1367 ? MSWR_OP_FORCE
: 0),
1369 ps
->pconf
->name
, (size_t)NULL
);
1374 ps
->prc
= new_pinerc_s(ps
->pinerc
);
1377 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1378 "Exceptions config \"%.100s\" comes from command line\n",
1382 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1383 "Exceptions config not set on cmdline, checking for $PINERCEX\n"));
1387 * Exceptions is done slightly differently from pinerc. Instead of setting
1388 * post_prc in args.c we just set the string and use it here. We do
1389 * that so that we can put it in the same directory as the pinerc if
1390 * exceptions is a relative name, and pinerc may not be set until here.
1392 * First, just like for pinerc, check environment variable if it wasn't
1393 * set on the command line.
1395 if(!ps
->exceptions
&& (p
= getenv("PINERCEX")) && *p
){
1396 ps
->exceptions
= cpystr(p
);
1398 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1399 " yes, exceptions config \"%.100s\" comes from $PINERCEX\n",
1405 * If still not set, try specific file in same dir as pinerc.
1406 * Only use it if the file exists.
1408 if(!ps
->exceptions
){
1409 p
= last_cmpnt(ps
->pinerc
);
1412 strncpy(buf
, ps
->pinerc
, MIN(p
- ps
->pinerc
, sizeof(buf
)-1));
1413 buf
[MIN(p
- ps
->pinerc
, sizeof(buf
)-1)] = '\0';
1416 strncat(buf
, "PINERCEX", sizeof(buf
)-1-strlen(buf
));
1418 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1419 " no, checking for default \"%.100s\" in pinerc dir\n", buf
));
1420 if(can_access(buf
, ACCESS_EXISTS
) == 0) /* found it! */
1421 ps
->exceptions
= cpystr(buf
);
1424 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1425 " yes, exceptions config \"%.100s\" comes from default\n",
1429 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, there is no exceptions config\n"));
1436 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Global config \"%.100s\" comes from command line\n",
1437 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<no name>"));
1441 ps
->pconf
= new_pinerc_s(SYSTEM_PINERC
);
1443 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Global config \"%.100s\" is default\n",
1444 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<no name>"));
1449 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "No global config!\n"));
1453 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Personal config \"%.100s\" comes from command line\n",
1454 (ps
->prc
&& ps
->prc
->name
) ? ps
->prc
->name
: "<no name>"));
1458 build_path(buf
, ps
->home_dir
, ".pinerc", sizeof(buf
));
1459 ps
->pinerc
= cpystr(buf
);
1463 ps
->prc
= new_pinerc_s(ps
->pinerc
);
1465 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Personal config \"%.100s\" is default\n",
1466 (ps
->prc
&& ps
->prc
->name
) ? ps
->prc
->name
: "<no name>"));
1471 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "No personal config!\n"));
1475 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1476 "Exceptions config \"%.100s\" comes from command line\n",
1481 * If not set, try specific file in same dir as pinerc.
1482 * Only use it if the file exists.
1484 if(!ps
->exceptions
){
1485 p
= last_cmpnt(ps
->pinerc
);
1488 strncpy(buf
, ps
->pinerc
, MIN(p
- ps
->pinerc
, sizeof(buf
)-1));
1489 buf
[MIN(p
- ps
->pinerc
, sizeof(buf
)-1)] = '\0';
1492 strncat(buf
, ".pinercex", sizeof(buf
)-1-strlen(buf
));
1493 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "Exceptions config not set on cmdline\n checking for default \"%.100s\" in pinerc dir\n", buf
));
1495 if(can_access(buf
, ACCESS_EXISTS
) == 0) /* found it! */
1496 ps
->exceptions
= cpystr(buf
);
1499 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)),
1500 " yes, exceptions config \"%.100s\" is default\n",
1504 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " no, there is no exceptions config\n"));
1512 if(!IS_REMOTE(ps
->exceptions
) &&
1513 !is_absolute_path(ps
->exceptions
)){
1514 #if defined(DOS) || defined(OS2)
1515 p
= last_cmpnt(ps
->pinerc
);
1518 strncpy(buf
, ps
->pinerc
, MIN(p
- ps
->pinerc
, sizeof(buf
)-1));
1519 buf
[MIN(p
- ps
->pinerc
, sizeof(buf
)-1)] = '\0';
1522 strncat(buf
, ps
->exceptions
, sizeof(buf
)-1-strlen(buf
));
1524 build_path(buf
, ps
->home_dir
, ps
->exceptions
, sizeof(buf
));
1528 strncpy(buf
, ps
->exceptions
, sizeof(buf
)-1);
1529 buf
[sizeof(buf
)-1] = '\0';
1532 ps
->post_prc
= new_pinerc_s(buf
);
1534 fs_give((void **)&ps
->exceptions
);
1537 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "\n Global config: %.100s\n",
1538 (ps
->pconf
&& ps
->pconf
->name
) ? ps
->pconf
->name
: "<none>"));
1539 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " Personal config: %.100s\n",
1540 (ps
->prc
&& ps
->prc
->name
) ? ps
->prc
->name
: "<none>"));
1541 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " Exceptions config: %.100s\n",
1542 (ps
->post_prc
&& ps
->post_prc
->name
) ? ps
->post_prc
->name
1544 #if !defined(DOS) && !defined(OS2)
1545 if(SYSTEM_PINERC_FIXED
){
1546 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), " Fixed config: %.100s\n", SYSTEM_PINERC_FIXED
));
1550 mprint(2, (db
, DSIZE
-(db
-(*debug_out
)), "\n"));
1554 /*----------------------------------------------------------------------
1555 Initialize the variables
1557 Args: ps -- The usual pine structure
1561 This reads the system pine configuration file and the user's pine
1562 configuration file ".pinerc" and places the results in the variables
1563 structure. It sorts out what was read and sets a few other variables
1564 based on the contents.
1567 init_vars(struct pine
*ps
, void (*cmds_f
) (struct pine
*, char **))
1569 char buf
[MAXPATH
+1], *p
, *q
, **s
;
1570 register struct variable
*vars
= ps
->vars
;
1571 int obs_header_in_reply
= 0, /* the obs_ variables are to */
1572 obs_old_style_reply
= 0, /* support backwards compatibility */
1573 obs_save_by_sender
, i
, def_sort_rev
;
1575 PINERC_S
*fixedprc
= NULL
;
1576 FeatureLevel obs_feature_level
;
1577 char *fromcharset
= NULL
;
1580 dprint((5, "init_vars:\n"));
1582 /*--- The defaults here are defined in os-xxx.h so they can vary
1585 GLO_PRINTER
= cpystr(DF_DEFAULT_PRINTER
);
1586 GLO_ELM_STYLE_SAVE
= cpystr(DF_ELM_STYLE_SAVE
);
1587 GLO_SAVE_BY_SENDER
= cpystr(DF_SAVE_BY_SENDER
);
1588 GLO_HEADER_IN_REPLY
= cpystr(DF_HEADER_IN_REPLY
);
1589 GLO_INBOX_PATH
= cpystr("inbox");
1590 GLO_DEFAULT_FCC
= cpystr(DF_DEFAULT_FCC
);
1591 GLO_DEFAULT_SAVE_FOLDER
= cpystr(DEFAULT_SAVE
);
1592 GLO_POSTPONED_FOLDER
= cpystr(POSTPONED_MSGS
);
1593 GLO_TRASH_FOLDER
= cpystr(TRASH_FOLDER
);
1594 GLO_USE_ONLY_DOMAIN_NAME
= cpystr(DF_USE_ONLY_DOMAIN_NAME
);
1595 GLO_FEATURE_LEVEL
= cpystr("sappling");
1596 GLO_OLD_STYLE_REPLY
= cpystr(DF_OLD_STYLE_REPLY
);
1597 GLO_SORT_KEY
= cpystr(DF_SORT_KEY
);
1598 GLO_SAVED_MSG_NAME_RULE
= cpystr(DF_SAVED_MSG_NAME_RULE
);
1599 GLO_FCC_RULE
= cpystr(DF_FCC_RULE
);
1600 GLO_AB_SORT_RULE
= cpystr(DF_AB_SORT_RULE
);
1601 GLO_FLD_SORT_RULE
= cpystr(DF_FLD_SORT_RULE
);
1602 GLO_SIGNATURE_FILE
= cpystr(DF_SIGNATURE_FILE
);
1603 GLO_MAIL_DIRECTORY
= cpystr(DF_MAIL_DIRECTORY
);
1604 GLO_REMOTE_ABOOK_HISTORY
= cpystr(DF_REMOTE_ABOOK_HISTORY
);
1605 GLO_REMOTE_ABOOK_VALIDITY
= cpystr(DF_REMOTE_ABOOK_VALIDITY
);
1606 GLO_GOTO_DEFAULT_RULE
= cpystr(DF_GOTO_DEFAULT_RULE
);
1607 GLO_INCOMING_STARTUP
= cpystr(DF_INCOMING_STARTUP
);
1608 GLO_PRUNING_RULE
= cpystr(DF_PRUNING_RULE
);
1609 GLO_REOPEN_RULE
= cpystr(DF_REOPEN_RULE
);
1610 GLO_THREAD_DISP_STYLE
= cpystr(DF_THREAD_DISP_STYLE
);
1611 GLO_THREAD_INDEX_STYLE
= cpystr(DF_THREAD_INDEX_STYLE
);
1612 GLO_THREAD_MORE_CHAR
= cpystr(DF_THREAD_MORE_CHAR
);
1613 GLO_THREAD_EXP_CHAR
= cpystr(DF_THREAD_EXP_CHAR
);
1614 GLO_THREAD_LASTREPLY_CHAR
= cpystr(DF_THREAD_LASTREPLY_CHAR
);
1615 GLO_BUGS_FULLNAME
= cpystr("Sorry No Address");
1616 GLO_BUGS_ADDRESS
= cpystr("nobody");
1617 GLO_SUGGEST_FULLNAME
= cpystr("Sorry No Address");
1618 GLO_SUGGEST_ADDRESS
= cpystr("nobody");
1619 GLO_LOCAL_FULLNAME
= cpystr(DF_LOCAL_FULLNAME
);
1620 GLO_LOCAL_ADDRESS
= cpystr(DF_LOCAL_ADDRESS
);
1621 GLO_OVERLAP
= cpystr(DF_OVERLAP
);
1622 GLO_SLEEP
= cpystr("60");
1623 GLO_MAXREMSTREAM
= cpystr(DF_MAXREMSTREAM
);
1624 GLO_MARGIN
= cpystr(DF_MARGIN
);
1625 GLO_FILLCOL
= cpystr(DF_FILLCOL
);
1626 GLO_DEADLETS
= cpystr(DF_DEADLETS
);
1627 GLO_NMW_WIDTH
= cpystr(DF_NMW_WIDTH
);
1628 GLO_REPLY_STRING
= cpystr("> ");
1629 GLO_REPLY_INTRO
= cpystr(DEFAULT_REPLY_INTRO
);
1630 GLO_EMPTY_HDR_MSG
= cpystr("undisclosed-recipients");
1631 GLO_STATUS_MSG_DELAY
= cpystr("0");
1632 GLO_ACTIVE_MSG_INTERVAL
= cpystr("12");
1633 GLO_USERINPUTTIMEO
= cpystr("0");
1634 GLO_INCCHECKTIMEO
= cpystr("5");
1635 GLO_INCCHECKINTERVAL
= cpystr("180");
1636 GLO_INC2NDCHECKINTERVAL
= cpystr("180");
1637 GLO_MAILCHECK
= cpystr(DF_MAILCHECK
);
1638 GLO_MAILCHECKNONCURR
= cpystr("0");
1639 GLO_MAILDROPCHECK
= cpystr(DF_MAILDROPCHECK
);
1640 GLO_NNTPRANGE
= cpystr("0");
1641 GLO_KBLOCK_PASSWD_COUNT
= cpystr(DF_KBLOCK_PASSWD_COUNT
);
1642 GLO_INDEX_COLOR_STYLE
= cpystr("flip-colors");
1643 GLO_TITLEBAR_COLOR_STYLE
= cpystr("default");
1644 GLO_POST_CHAR_SET
= cpystr("UTF-8");
1645 #ifdef DF_FOLDER_EXTENSION
1646 GLO_FOLDER_EXTENSION
= cpystr(DF_FOLDER_EXTENSION
);
1648 #ifdef DF_SMTP_SERVER
1649 GLO_SMTP_SERVER
= parse_list(DF_SMTP_SERVER
, 1,
1650 PL_REMSURRQUOT
, NULL
);
1654 GLO_SSHPATH
= cpystr(DF_SSHPATH
);
1657 GLO_SSHCMD
= cpystr(DF_SSHCMD
);
1661 GLO_COLOR_STYLE
= cpystr("no-color");
1662 GLO_NORM_FORE_COLOR
= cpystr(DEFAULT_NORM_FORE_RGB
);
1663 GLO_NORM_BACK_COLOR
= cpystr(DEFAULT_NORM_BACK_RGB
);
1665 GLO_TITLE_FORE_COLOR
= cpystr(DEFAULT_TITLE_FORE_RGB
);
1666 GLO_TITLE_BACK_COLOR
= cpystr(DEFAULT_TITLE_BACK_RGB
);
1667 GLO_TITLECLOSED_FORE_COLOR
= cpystr(DEFAULT_TITLECLOSED_FORE_RGB
);
1668 GLO_TITLECLOSED_BACK_COLOR
= cpystr(DEFAULT_TITLECLOSED_BACK_RGB
);
1669 GLO_FOLDER_FORE_COLOR
= cpystr(DEFAULT_NORM_FORE_RGB
);
1670 GLO_DIRECTORY_FORE_COLOR
= cpystr(DEFAULT_NORM_FORE_RGB
);
1671 GLO_FOLDER_LIST_FORE_COLOR
= cpystr(DEFAULT_NORM_FORE_RGB
);
1672 GLO_METAMSG_FORE_COLOR
= cpystr(DEFAULT_METAMSG_FORE_RGB
);
1673 GLO_METAMSG_BACK_COLOR
= cpystr(DEFAULT_METAMSG_BACK_RGB
);
1674 GLO_QUOTE1_FORE_COLOR
= cpystr(DEFAULT_QUOTE1_FORE_RGB
);
1675 GLO_QUOTE1_BACK_COLOR
= cpystr(DEFAULT_QUOTE1_BACK_RGB
);
1676 GLO_QUOTE2_FORE_COLOR
= cpystr(DEFAULT_QUOTE2_FORE_RGB
);
1677 GLO_QUOTE2_BACK_COLOR
= cpystr(DEFAULT_QUOTE2_BACK_RGB
);
1678 GLO_QUOTE3_FORE_COLOR
= cpystr(DEFAULT_QUOTE3_FORE_RGB
);
1679 GLO_QUOTE3_BACK_COLOR
= cpystr(DEFAULT_QUOTE3_BACK_RGB
);
1680 GLO_SIGNATURE_FORE_COLOR
= cpystr(DEFAULT_SIGNATURE_FORE_RGB
);
1681 GLO_SIGNATURE_BACK_COLOR
= cpystr(DEFAULT_SIGNATURE_BACK_RGB
);
1682 GLO_IND_PLUS_FORE_COLOR
= cpystr(DEFAULT_IND_PLUS_FORE_RGB
);
1683 GLO_IND_PLUS_BACK_COLOR
= cpystr(DEFAULT_IND_PLUS_BACK_RGB
);
1684 GLO_IND_IMP_FORE_COLOR
= cpystr(DEFAULT_IND_IMP_FORE_RGB
);
1685 GLO_IND_IMP_BACK_COLOR
= cpystr(DEFAULT_IND_IMP_BACK_RGB
);
1686 GLO_IND_ANS_FORE_COLOR
= cpystr(DEFAULT_IND_ANS_FORE_RGB
);
1687 GLO_IND_ANS_BACK_COLOR
= cpystr(DEFAULT_IND_ANS_BACK_RGB
);
1688 GLO_IND_NEW_FORE_COLOR
= cpystr(DEFAULT_IND_NEW_FORE_RGB
);
1689 GLO_IND_NEW_BACK_COLOR
= cpystr(DEFAULT_IND_NEW_BACK_RGB
);
1690 GLO_IND_OP_FORE_COLOR
= cpystr(DEFAULT_IND_OP_FORE_RGB
);
1691 GLO_IND_OP_BACK_COLOR
= cpystr(DEFAULT_IND_OP_BACK_RGB
);
1692 GLO_VIEW_MARGIN_LEFT
= cpystr("0");
1693 GLO_VIEW_MARGIN_RIGHT
= cpystr(DF_VIEW_MARGIN_RIGHT
);
1694 GLO_QUOTE_SUPPRESSION
= cpystr(DF_QUOTE_SUPPRESSION
);
1695 GLO_KW_BRACES
= cpystr("\"{\" \"} \"");
1696 GLO_OPENING_SEP
= cpystr(" - ");
1697 GLO_WP_INDEXHEIGHT
= cpystr("24");
1698 GLO_WP_AGGSTATE
= cpystr("1");
1699 GLO_WP_STATE
= cpystr("");
1700 #ifdef DF_VAR_SPELLER
1701 GLO_SPELLER
= cpystr(DF_VAR_SPELLER
);
1704 GLO_PUBLICCERT_DIR
= cpystr(DF_PUBLICCERT_DIR
);
1705 GLO_PRIVATEKEY_DIR
= cpystr(DF_PRIVATEKEY_DIR
);
1706 GLO_CACERT_DIR
= cpystr(DF_CACERT_DIR
);
1710 * Default first value for addrbook list if none set.
1711 * We also want to be sure to set global_val to the default
1712 * if is_fixed, so that address-book= will cause the default to happen.
1714 if(!GLO_ADDRESSBOOK
&& !FIX_ADDRESSBOOK
)
1715 GLO_ADDRESSBOOK
= parse_list(DF_ADDRESSBOOK
, 1, 0, NULL
);
1718 * Default first value if none set.
1720 if(!GLO_STANDARD_PRINTER
&& !FIX_STANDARD_PRINTER
)
1721 GLO_STANDARD_PRINTER
= parse_list(DF_STANDARD_PRINTER
, 1, 0, NULL
);
1724 * Defining this default sshpath should cause ssh to be preferred over rsh
1725 * when attempting imapd preauth calls.
1729 && is_absolute_path(DF_SSHPATH
)
1730 && can_access(DF_SSHPATH
, EXECUTE_ACCESS
) == 0){
1731 mail_parameters(NULL
, SET_SSHPATH
, (void *) DF_SSHPATH
);
1735 * It isn't usually necessary to define this.
1739 mail_parameters(NULL
, SET_SSHCOMMAND
, (void *) DF_SSHCMD
);
1743 #if !defined(DOS) && !defined(OS2)
1745 * This is here instead of in init_pinerc so that we can get by without
1746 * having a global fixedprc, since we don't need it anymore after this.
1748 fixedprc
= new_pinerc_s(SYSTEM_PINERC_FIXED
);
1752 read_pinerc(ps
->pconf
, vars
, ParseGlobal
);
1753 if(ps
->pconf
->type
!= Loc
)
1754 rd_close_remote(ps
->pconf
->rd
);
1758 read_pinerc(ps
->prc
, vars
, ParsePers
);
1759 if(ps
->prc
->type
!= Loc
)
1760 rd_close_remote(ps
->prc
->rd
);
1764 read_pinerc(ps
->post_prc
, vars
, ParsePersPost
);
1765 if(ps
->post_prc
->type
!= Loc
)
1766 rd_close_remote(ps
->post_prc
->rd
);
1770 read_pinerc(fixedprc
, vars
, ParseFixed
);
1771 free_pinerc_s(&fixedprc
);
1774 ps
->ew_for_except_vars
= ps
->post_prc
? Post
: Main
;
1776 if(ps
->exit_if_no_pinerc
&& ps
->first_time_user
){
1778 /* TRANSLATORS: -bail is a literal option name, don't change it. */
1779 exceptional_exit(_("Exiting because -bail option is set and config file doesn't exist."), -1);
1783 * Convert everything having to do with the config to UTF-8
1784 * in order to avoid having to worry about it all over the
1786 * Set the character-set first so that we may use that in
1787 * the conversion process.
1789 set_collation(0, 1);
1792 #if (HAVE_LANGINFO_H && defined(CODESET))
1794 if(output_charset_is_supported(nl_langinfo_codeset_wrapper()))
1795 ps
->GLO_CHAR_SET
= cpystr(nl_langinfo_codeset_wrapper());
1797 ps
->GLO_CHAR_SET
= cpystr("UTF-8");
1798 dprint((1,"nl_langinfo(CODESET) returns unrecognized value=\"%s\", using UTF-8 as default\n", (p
=nl_langinfo(CODESET
)) ? p
: ""));
1801 ps
->GLO_CHAR_SET
= cpystr("UTF-8");
1804 set_current_val(&vars
[V_CHAR_SET
], TRUE
, TRUE
);
1805 set_current_val(&vars
[V_OLD_CHAR_SET
], TRUE
, TRUE
);
1806 set_current_val(&vars
[V_KEY_CHAR_SET
], TRUE
, TRUE
);
1807 #endif /* ! _WINDOWS */
1809 set_current_val(&vars
[V_POST_CHAR_SET
], TRUE
, TRUE
);
1812 * Also set up the feature list because we need the
1813 * Use-System-Translation feature to set up the charmaps.
1816 /* way obsolete, backwards compatibility */
1817 set_current_val(&vars
[V_FEATURE_LEVEL
], TRUE
, TRUE
);
1818 if(strucmp(VAR_FEATURE_LEVEL
, "seedling") == 0)
1819 obs_feature_level
= Seedling
;
1820 else if(strucmp(VAR_FEATURE_LEVEL
, "old-growth") == 0)
1821 obs_feature_level
= Seasoned
;
1823 obs_feature_level
= Sapling
;
1825 /* obsolete, backwards compatibility */
1826 set_current_val(&vars
[V_OLD_STYLE_REPLY
], TRUE
, TRUE
);
1827 obs_old_style_reply
= !strucmp(VAR_OLD_STYLE_REPLY
, "yes");
1829 set_feature_list_current_val(&vars
[V_FEATURE_LIST
]);
1830 process_feature_list(ps
, VAR_FEATURE_LIST
,
1831 (obs_feature_level
== Seasoned
) ? 1 : 0,
1832 obs_header_in_reply
, obs_old_style_reply
);
1836 * Redo set_collation call with correct value for collation,
1837 * but we're hardwiring ctype on now. That's because nl_langinfo()
1838 * call needs it and system-dependent wcwidth and wcrtomb functions
1841 set_collation(F_OFF(F_DISABLE_SETLOCALE_COLLATE
, ps_global
), 1);
1844 * Set up to send the correct sequence of bytes to the display terminal.
1847 if(reset_character_set_stuff(&err
) == -1)
1848 panic(err
? err
: "trouble with character set setup");
1850 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, err
);
1851 fs_give((void **) &err
);
1855 * Now we use the configvars from above to convert the rest
1856 * to UTF-8. That should be ok because the ones above should
1859 if(ps
->keyboard_charmap
&& strucmp(ps
->keyboard_charmap
, "UTF-8")
1860 && strucmp(ps
->keyboard_charmap
, "US-ASCII"))
1861 fromcharset
= ps
->keyboard_charmap
;
1862 else if(ps
->display_charmap
&& strucmp(ps
->display_charmap
, "UTF-8")
1863 && strucmp(ps
->display_charmap
, "US-ASCII"))
1864 fromcharset
= ps
->display_charmap
;
1866 else if(VAR_OLD_CHAR_SET
&& strucmp(VAR_OLD_CHAR_SET
, "UTF-8")
1867 && strucmp(VAR_OLD_CHAR_SET
, "US-ASCII"))
1868 fromcharset
= VAR_OLD_CHAR_SET
;
1869 #endif /* ! _WINDOWS */
1871 convert_configvars_to_utf8(vars
, fromcharset
);
1874 * If we already set this while reading the remote pinerc, don't
1877 if(!VAR_REMOTE_ABOOK_METADATA
|| !VAR_REMOTE_ABOOK_METADATA
[0])
1878 set_current_val(&vars
[V_REMOTE_ABOOK_METADATA
], TRUE
, TRUE
);
1881 * mail-directory variable is obsolete, put its value in
1882 * default folder-collection list
1884 set_current_val(&vars
[V_MAIL_DIRECTORY
], TRUE
, TRUE
);
1885 if(!GLO_FOLDER_SPEC
){
1886 build_path(tmp_20k_buf
, VAR_MAIL_DIRECTORY
, "[]", SIZEOF_20KBUF
);
1887 GLO_FOLDER_SPEC
= parse_list(tmp_20k_buf
, 1, 0, NULL
);
1890 set_current_val(&vars
[V_FOLDER_SPEC
], TRUE
, TRUE
);
1892 set_current_val(&vars
[V_NNTP_SERVER
], TRUE
, TRUE
);
1893 for(i
= 0; VAR_NNTP_SERVER
&& VAR_NNTP_SERVER
[i
]; i
++)
1894 removing_quotes(VAR_NNTP_SERVER
[i
]);
1896 set_news_spec_current_val(TRUE
, TRUE
);
1898 set_current_val(&vars
[V_INBOX_PATH
], TRUE
, TRUE
);
1900 set_current_val(&vars
[V_USER_DOMAIN
], TRUE
, TRUE
);
1902 && VAR_USER_DOMAIN
[0]
1903 && (p
= strrindex(VAR_USER_DOMAIN
, '@'))){
1907 snprintf(tmp_20k_buf
, SIZEOF_20KBUF
,
1908 "User-domain (%s) cannot contain \"@\", using \"%s\"",
1909 VAR_USER_DOMAIN
, p
);
1910 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
1911 q
= VAR_USER_DOMAIN
;
1912 while((*q
++ = *p
++) != '\0')
1916 snprintf(tmp_20k_buf
, SIZEOF_20KBUF
,
1917 "User-domain (%s) cannot contain \"@\", deleting",
1919 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
1920 if(ps
->vars
[V_USER_DOMAIN
].post_user_val
.p
){
1921 fs_give((void **)&ps
->vars
[V_USER_DOMAIN
].post_user_val
.p
);
1922 set_current_val(&vars
[V_USER_DOMAIN
], TRUE
, TRUE
);
1926 && VAR_USER_DOMAIN
[0]
1927 && (p
= strrindex(VAR_USER_DOMAIN
, '@'))){
1928 if(ps
->vars
[V_USER_DOMAIN
].main_user_val
.p
){
1929 fs_give((void **)&ps
->vars
[V_USER_DOMAIN
].main_user_val
.p
);
1930 set_current_val(&vars
[V_USER_DOMAIN
], TRUE
, TRUE
);
1936 set_current_val(&vars
[V_USE_ONLY_DOMAIN_NAME
], TRUE
, TRUE
);
1937 set_current_val(&vars
[V_REPLY_STRING
], TRUE
, TRUE
);
1938 set_current_val(&vars
[V_WORDSEPS
], TRUE
, TRUE
);
1939 set_current_val(&vars
[V_QUOTE_REPLACE_STRING
], TRUE
, TRUE
);
1940 set_current_val(&vars
[V_REPLY_INTRO
], TRUE
, TRUE
);
1941 set_current_val(&vars
[V_EMPTY_HDR_MSG
], TRUE
, TRUE
);
1944 set_current_val(&vars
[V_LDAP_SERVERS
], TRUE
, TRUE
);
1945 #endif /* ENABLE_LDAP */
1947 /* obsolete, backwards compatibility */
1948 set_current_val(&vars
[V_HEADER_IN_REPLY
], TRUE
, TRUE
);
1949 obs_header_in_reply
=!strucmp(VAR_HEADER_IN_REPLY
, "yes");
1951 set_current_val(&vars
[V_PERSONAL_PRINT_COMMAND
], TRUE
, TRUE
);
1952 set_current_val(&vars
[V_STANDARD_PRINTER
], TRUE
, TRUE
);
1953 set_current_val(&vars
[V_PRINTER
], TRUE
, TRUE
);
1954 if(vars
[V_PERSONAL_PRINT_COMMAND
].is_fixed
&& !vars
[V_PRINTER
].is_fixed
)
1955 printer_value_check_and_adjust();
1957 set_current_val(&vars
[V_LAST_TIME_PRUNE_QUESTION
], TRUE
, TRUE
);
1958 if(VAR_LAST_TIME_PRUNE_QUESTION
!= NULL
){
1959 /* The month value in the file runs from 1-12, the variable here
1960 runs from 0-11; the value in the file used to be 0-11, but we're
1961 fixing it in January */
1962 ps
->last_expire_year
= atoi(VAR_LAST_TIME_PRUNE_QUESTION
);
1963 ps
->last_expire_month
=
1964 atoi(strindex(VAR_LAST_TIME_PRUNE_QUESTION
, '.') + 1);
1965 if(ps
->last_expire_month
== 0){
1966 /* Fix for 0 because of old bug */
1967 snprintf(buf
, sizeof(buf
), "%d.%d", ps_global
->last_expire_year
,
1968 ps_global
->last_expire_month
+ 1);
1969 set_variable(V_LAST_TIME_PRUNE_QUESTION
, buf
, 1, 1, Main
);
1971 ps
->last_expire_month
--;
1974 ps
->last_expire_year
= -1;
1975 ps
->last_expire_month
= -1;
1978 set_current_val(&vars
[V_BUGS_FULLNAME
], TRUE
, TRUE
);
1979 set_current_val(&vars
[V_BUGS_ADDRESS
], TRUE
, TRUE
);
1980 set_current_val(&vars
[V_SUGGEST_FULLNAME
], TRUE
, TRUE
);
1981 set_current_val(&vars
[V_SUGGEST_ADDRESS
], TRUE
, TRUE
);
1982 set_current_val(&vars
[V_LOCAL_FULLNAME
], TRUE
, TRUE
);
1983 set_current_val(&vars
[V_LOCAL_ADDRESS
], TRUE
, TRUE
);
1984 set_current_val(&vars
[V_BUGS_EXTRAS
], TRUE
, TRUE
);
1985 set_current_val(&vars
[V_KBLOCK_PASSWD_COUNT
], TRUE
, TRUE
);
1986 set_current_val(&vars
[V_DEFAULT_FCC
], TRUE
, TRUE
);
1987 set_current_val(&vars
[V_POSTPONED_FOLDER
], TRUE
, TRUE
);
1988 set_current_val(&vars
[V_TRASH_FOLDER
], TRUE
, TRUE
);
1989 set_current_val(&vars
[V_READ_MESSAGE_FOLDER
], TRUE
, TRUE
);
1990 set_current_val(&vars
[V_FORM_FOLDER
], TRUE
, TRUE
);
1991 set_current_val(&vars
[V_EDITOR
], TRUE
, TRUE
);
1992 set_current_val(&vars
[V_SPELLER
], TRUE
, TRUE
);
1993 set_current_val(&vars
[V_IMAGE_VIEWER
], TRUE
, TRUE
);
1994 set_current_val(&vars
[V_BROWSER
], TRUE
, TRUE
);
1995 set_current_val(&vars
[V_SMTP_SERVER
], TRUE
, TRUE
);
1996 set_current_val(&vars
[V_COMP_HDRS
], TRUE
, TRUE
);
1997 set_current_val(&vars
[V_CUSTOM_HDRS
], TRUE
, TRUE
);
1998 set_current_val(&vars
[V_SENDMAIL_PATH
], TRUE
, TRUE
);
1999 set_current_val(&vars
[V_DISPLAY_FILTERS
], TRUE
, TRUE
);
2000 set_current_val(&vars
[V_SEND_FILTER
], TRUE
, TRUE
);
2001 set_current_val(&vars
[V_ALT_ADDRS
], TRUE
, TRUE
);
2002 set_current_val(&vars
[V_ABOOK_FORMATS
], TRUE
, TRUE
);
2003 set_current_val(&vars
[V_KW_BRACES
], TRUE
, TRUE
);
2004 set_current_val(&vars
[V_OPENING_SEP
], TRUE
, TRUE
);
2005 set_current_val(&vars
[V_UNK_CHAR_SET
], TRUE
, TRUE
);
2007 set_current_val(&vars
[V_PUBLICCERT_DIR
], TRUE
, TRUE
);
2008 set_current_val(&vars
[V_PUBLICCERT_CONTAINER
], TRUE
, TRUE
);
2009 set_current_val(&vars
[V_PRIVATEKEY_DIR
], TRUE
, TRUE
);
2010 set_current_val(&vars
[V_PRIVATEKEY_CONTAINER
], TRUE
, TRUE
);
2011 set_current_val(&vars
[V_CACERT_DIR
], TRUE
, TRUE
);
2012 set_current_val(&vars
[V_CACERT_CONTAINER
], TRUE
, TRUE
);
2015 set_current_val(&vars
[V_KEYWORDS
], TRUE
, TRUE
);
2016 ps_global
->keywords
= init_keyword_list(VAR_KEYWORDS
);
2018 set_current_val(&vars
[V_OPER_DIR
], TRUE
, TRUE
);
2019 if(VAR_OPER_DIR
&& !VAR_OPER_DIR
[0]){
2020 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5,
2021 "Setting operating-dir to the empty string is not allowed. Will be ignored.");
2022 fs_give((void **)&VAR_OPER_DIR
);
2024 fs_give((void **)&FIX_OPER_DIR
);
2026 fs_give((void **)&GLO_OPER_DIR
);
2028 fs_give((void **)&COM_OPER_DIR
);
2029 if(ps_global
->vars
[V_OPER_DIR
].post_user_val
.p
)
2030 fs_give((void **)&ps_global
->vars
[V_OPER_DIR
].post_user_val
.p
);
2031 if(ps_global
->vars
[V_OPER_DIR
].main_user_val
.p
)
2032 fs_give((void **)&ps_global
->vars
[V_OPER_DIR
].main_user_val
.p
);
2035 set_current_val(&vars
[V_PERSONAL_PRINT_CATEGORY
], TRUE
, TRUE
);
2036 ps
->printer_category
= -1;
2037 if(VAR_PERSONAL_PRINT_CATEGORY
!= NULL
)
2038 ps
->printer_category
= atoi(VAR_PERSONAL_PRINT_CATEGORY
);
2040 if(ps
->printer_category
< 1 || ps
->printer_category
> 3){
2042 char aname
[100], wname
[100];
2044 strncpy(aname
, ANSI_PRINTER
, sizeof(aname
));
2045 aname
[sizeof(aname
)-1] = '\0';
2046 strncat(aname
, "-no-formfeed", sizeof(aname
)-strlen(aname
)-1);
2047 strncpy(wname
, WYSE_PRINTER
, sizeof(wname
));
2048 wname
[sizeof(wname
)-1] = '\0';
2049 strncat(wname
, "-no-formfeed", sizeof(wname
)-strlen(wname
)-1);
2050 if(strucmp(VAR_PRINTER
, ANSI_PRINTER
) == 0
2051 || strucmp(VAR_PRINTER
, aname
) == 0
2052 || strucmp(VAR_PRINTER
, WYSE_PRINTER
) == 0
2053 || strucmp(VAR_PRINTER
, wname
) == 0)
2054 ps
->printer_category
= 1;
2055 else if(VAR_STANDARD_PRINTER
&& VAR_STANDARD_PRINTER
[0]){
2056 for(tt
= VAR_STANDARD_PRINTER
; *tt
; tt
++)
2057 if(strucmp(VAR_PRINTER
, *tt
) == 0)
2061 ps
->printer_category
= 2;
2064 /* didn't find it yet */
2065 if(ps
->printer_category
< 1 || ps
->printer_category
> 3){
2066 if(VAR_PERSONAL_PRINT_COMMAND
&& VAR_PERSONAL_PRINT_COMMAND
[0]){
2067 for(tt
= VAR_PERSONAL_PRINT_COMMAND
; *tt
; tt
++)
2068 if(strucmp(VAR_PRINTER
, *tt
) == 0)
2072 ps
->printer_category
= 3;
2077 set_current_val(&vars
[V_SLEEP
], TRUE
, TRUE
);
2079 if(SVAR_SLEEP(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2080 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2084 set_current_val(&vars
[V_OVERLAP
], TRUE
, TRUE
);
2085 ps
->viewer_overlap
= i
= atoi(DF_OVERLAP
);
2086 if(SVAR_OVERLAP(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2087 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2089 ps
->viewer_overlap
= i
;
2091 set_current_val(&vars
[V_MARGIN
], TRUE
, TRUE
);
2092 ps
->scroll_margin
= i
= atoi(DF_MARGIN
);
2093 if(SVAR_MARGIN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2094 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2096 ps
->scroll_margin
= i
;
2098 set_current_val(&vars
[V_FILLCOL
], TRUE
, TRUE
);
2099 ps
->composer_fillcol
= i
= atoi(DF_FILLCOL
);
2100 if(SVAR_FILLCOL(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2101 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2103 ps
->composer_fillcol
= i
;
2105 set_current_val(&vars
[V_QUOTE_SUPPRESSION
], TRUE
, TRUE
);
2106 ps
->quote_suppression_threshold
= i
= atoi(DF_QUOTE_SUPPRESSION
);
2107 if(SVAR_QUOTE_SUPPRESSION(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2108 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2110 if(i
> 0 && i
< Q_SUPP_LIMIT
){
2111 snprintf(tmp_20k_buf
, SIZEOF_20KBUF
,
2112 "Ignoring Quote-Suppression-Threshold value of %.50s, see help",
2113 VAR_QUOTE_SUPPRESSION
);
2114 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2117 if(i
< 0 && i
!= Q_DEL_ALL
)
2118 ps
->quote_suppression_threshold
= -i
;
2120 ps
->quote_suppression_threshold
= i
;
2124 set_current_val(&vars
[V_DEADLETS
], TRUE
, TRUE
);
2125 ps
->deadlets
= i
= atoi(DF_DEADLETS
);
2126 if(SVAR_DEADLETS(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2127 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2131 set_current_val(&vars
[V_STATUS_MSG_DELAY
], TRUE
, TRUE
);
2132 ps
->status_msg_delay
= i
= 0;
2133 if(SVAR_MSGDLAY(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2134 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2136 ps
->status_msg_delay
= i
;
2138 set_current_val(&vars
[V_ACTIVE_MSG_INTERVAL
], TRUE
, TRUE
);
2139 ps
->active_status_interval
= i
= 8;
2140 if(SVAR_ACTIVEINTERVAL(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2141 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2143 ps
->active_status_interval
= i
;
2145 set_current_val(&vars
[V_REMOTE_ABOOK_HISTORY
], TRUE
, TRUE
);
2146 ps
->remote_abook_history
= i
= atoi(DF_REMOTE_ABOOK_HISTORY
);
2147 if(SVAR_AB_HIST(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2148 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2150 ps
->remote_abook_history
= i
;
2152 set_current_val(&vars
[V_REMOTE_ABOOK_VALIDITY
], TRUE
, TRUE
);
2153 ps
->remote_abook_validity
= i
= atoi(DF_REMOTE_ABOOK_VALIDITY
);
2154 if(SVAR_AB_VALID(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2155 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2157 ps
->remote_abook_validity
= i
;
2159 set_current_val(&vars
[V_USERINPUTTIMEO
], TRUE
, TRUE
);
2160 ps
->hours_to_timeout
= i
= 0;
2161 if(SVAR_USER_INPUT(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2162 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2164 ps
->hours_to_timeout
= i
;
2166 /* timeo is a regular extern int because it is referenced in pico */
2167 set_current_val(&vars
[V_MAILCHECK
], TRUE
, TRUE
);
2168 set_input_timeout(i
= 15);
2169 if(SVAR_MAILCHK(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2170 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2172 set_input_timeout(i
);
2174 set_current_val(&vars
[V_MAILCHECKNONCURR
], TRUE
, TRUE
);
2175 ps
->check_interval_for_noncurr
= i
= 0;
2176 if(SVAR_MAILCHKNONCURR(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2177 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2179 ps
->check_interval_for_noncurr
= i
;
2188 set_current_val(&vars
[V_TCPOPENTIMEO
], TRUE
, TRUE
);
2189 /* this is just for the error, we don't save the result */
2190 if(VAR_TCPOPENTIMEO
&& SVAR_TCP_OPEN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2191 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2194 set_current_val(&vars
[V_TCPREADWARNTIMEO
], TRUE
, TRUE
);
2195 /* this is just for the error, we don't save the result */
2196 if(VAR_TCPREADWARNTIMEO
&& SVAR_TCP_READWARN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2197 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2200 set_current_val(&vars
[V_TCPWRITEWARNTIMEO
], TRUE
, TRUE
);
2201 /* this is just for the error, we don't save the result */
2202 if(VAR_TCPWRITEWARNTIMEO
&& SVAR_TCP_WRITEWARN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2203 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2206 set_current_val(&vars
[V_RSHOPENTIMEO
], TRUE
, TRUE
);
2207 /* this is just for the error, we don't save the result */
2208 if(VAR_RSHOPENTIMEO
&& SVAR_RSH_OPEN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2209 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2212 set_current_val(&vars
[V_SSHOPENTIMEO
], TRUE
, TRUE
);
2213 /* this is just for the error, we don't save the result */
2214 if(VAR_SSHOPENTIMEO
&& SVAR_SSH_OPEN(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2215 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2217 set_current_val(&vars
[V_INCCHECKLIST
], TRUE
, TRUE
);
2219 set_current_val(&vars
[V_INCCHECKTIMEO
], TRUE
, TRUE
);
2220 ps
->inc_check_timeout
= i
= 5;
2221 if(SVAR_INC_CHECK_TIMEO(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2222 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2224 ps
->inc_check_timeout
= i
;
2226 set_current_val(&vars
[V_INCCHECKINTERVAL
], TRUE
, TRUE
);
2227 ps
->inc_check_interval
= i
= 180;
2228 if(SVAR_INC_CHECK_INTERV(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2229 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2231 ps
->inc_check_interval
= i
;
2233 set_current_val(&vars
[V_INC2NDCHECKINTERVAL
], TRUE
, TRUE
);
2234 ps
->inc_second_check_interval
= i
= 180;
2235 if(SVAR_INC_2NDCHECK_INTERV(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2236 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2238 ps
->inc_second_check_interval
= i
;
2241 set_current_val(&vars
[V_MAILDROPCHECK
], TRUE
, TRUE
);
2242 /* this is just for the error, we don't save the result */
2243 if(VAR_MAILDROPCHECK
&& SVAR_MAILDCHK(ps
, rvl
, tmp_20k_buf
, SIZEOF_20KBUF
))
2244 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2247 set_current_val(&vars
[V_NNTPRANGE
], TRUE
, TRUE
);
2248 /* this is just for the error, we don't save the result */
2249 if(VAR_NNTPRANGE
&& SVAR_NNTPRANGE(ps
, rvl
, tmp_20k_buf
, SIZEOF_20KBUF
))
2250 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2252 set_current_val(&vars
[V_TCPQUERYTIMEO
], TRUE
, TRUE
);
2253 ps
->tcp_query_timeout
= i
= TO_BAIL_THRESHOLD
;
2254 if(VAR_TCPQUERYTIMEO
&& SVAR_TCP_QUERY(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2255 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2257 ps
->tcp_query_timeout
= i
;
2259 set_current_val(&vars
[V_NEWSRC_PATH
], TRUE
, TRUE
);
2260 if(VAR_NEWSRC_PATH
&& VAR_NEWSRC_PATH
[0])
2261 mail_parameters(NULL
, SET_NEWSRC
, (void *)VAR_NEWSRC_PATH
);
2263 set_current_val(&vars
[V_NEWS_ACTIVE_PATH
], TRUE
, TRUE
);
2264 if(VAR_NEWS_ACTIVE_PATH
)
2265 mail_parameters(NULL
, SET_NEWSACTIVE
,
2266 (void *)VAR_NEWS_ACTIVE_PATH
);
2268 set_current_val(&vars
[V_NEWS_SPOOL_DIR
], TRUE
, TRUE
);
2269 if(VAR_NEWS_SPOOL_DIR
)
2270 mail_parameters(NULL
, SET_NEWSSPOOL
,
2271 (void *)VAR_NEWS_SPOOL_DIR
);
2273 /* guarantee a save default */
2274 set_current_val(&vars
[V_DEFAULT_SAVE_FOLDER
], TRUE
, TRUE
);
2275 if(!VAR_DEFAULT_SAVE_FOLDER
|| !VAR_DEFAULT_SAVE_FOLDER
[0])
2276 set_variable(V_DEFAULT_SAVE_FOLDER
,
2277 (GLO_DEFAULT_SAVE_FOLDER
&& GLO_DEFAULT_SAVE_FOLDER
[0])
2278 ? GLO_DEFAULT_SAVE_FOLDER
2279 : DEFAULT_SAVE
, 1, 0, Main
);
2281 set_current_val(&vars
[V_SIGNATURE_FILE
], TRUE
, TRUE
);
2282 set_current_val(&vars
[V_LITERAL_SIG
], TRUE
, TRUE
);
2283 set_current_val(&vars
[V_GLOB_ADDRBOOK
], TRUE
, TRUE
);
2284 set_current_val(&vars
[V_ADDRESSBOOK
], TRUE
, TRUE
);
2285 set_current_val(&vars
[V_FORCED_ABOOK_ENTRY
], TRUE
, TRUE
);
2286 set_current_val(&vars
[V_DISABLE_DRIVERS
], TRUE
, TRUE
);
2287 set_current_val(&vars
[V_DISABLE_AUTHS
], TRUE
, TRUE
);
2289 set_current_val(&vars
[V_VIEW_HEADERS
], TRUE
, TRUE
);
2290 /* strip spaces and colons */
2291 if(ps
->VAR_VIEW_HEADERS
){
2292 for(s
= ps
->VAR_VIEW_HEADERS
; (q
= *s
) != NULL
; s
++){
2294 removing_leading_white_space(q
);
2295 /* look for colon or space or end */
2296 for(p
= q
; *p
&& !isspace((unsigned char)*p
) && *p
!= ':'; p
++)
2300 if(strucmp(q
, ALL_EXCEPT
) == 0)
2301 ps
->view_all_except
= 1;
2306 set_current_val(&vars
[V_VIEW_MARGIN_LEFT
], TRUE
, TRUE
);
2307 set_current_val(&vars
[V_VIEW_MARGIN_RIGHT
], TRUE
, TRUE
);
2308 set_current_val(&vars
[V_UPLOAD_CMD
], TRUE
, TRUE
);
2309 set_current_val(&vars
[V_UPLOAD_CMD_PREFIX
], TRUE
, TRUE
);
2310 set_current_val(&vars
[V_DOWNLOAD_CMD
], TRUE
, TRUE
);
2311 set_current_val(&vars
[V_DOWNLOAD_CMD_PREFIX
], TRUE
, TRUE
);
2312 set_current_val(&vars
[V_MAILCAP_PATH
], TRUE
, TRUE
);
2313 set_current_val(&vars
[V_MIMETYPE_PATH
], TRUE
, TRUE
);
2314 #if !defined(DOS) && !defined(OS2) && !defined(LEAVEOUTFIFO)
2315 set_current_val(&vars
[V_FIFOPATH
], TRUE
, TRUE
);
2318 set_current_val(&vars
[V_RSHPATH
], TRUE
, TRUE
);
2320 && is_absolute_path(VAR_RSHPATH
)
2321 && can_access(VAR_RSHPATH
, EXECUTE_ACCESS
) == 0){
2322 mail_parameters(NULL
, SET_RSHPATH
, (void *) VAR_RSHPATH
);
2325 set_current_val(&vars
[V_RSHCMD
], TRUE
, TRUE
);
2327 mail_parameters(NULL
, SET_RSHCOMMAND
, (void *) VAR_RSHCMD
);
2330 set_current_val(&vars
[V_SSHPATH
], TRUE
, TRUE
);
2332 if(is_absolute_path(VAR_SSHPATH
)
2333 && can_access(VAR_SSHPATH
, EXECUTE_ACCESS
) == 0){
2334 mail_parameters(NULL
, SET_SSHPATH
, (void *) VAR_SSHPATH
);
2337 mail_parameters(NULL
, SET_SSHPATH
, (void *) NULL
);
2341 set_current_val(&vars
[V_SSHCMD
], TRUE
, TRUE
);
2344 mail_parameters(NULL
, SET_SSHCOMMAND
, (void *) VAR_SSHCMD
);
2347 mail_parameters(NULL
, SET_SSHCOMMAND
, (void *) NULL
);
2351 #if defined(DOS) || defined(OS2)
2353 set_current_val(&vars
[V_FILE_DIR
], TRUE
, TRUE
);
2356 set_current_val(&vars
[V_FONT_NAME
], TRUE
, TRUE
);
2357 set_current_val(&vars
[V_FONT_SIZE
], TRUE
, TRUE
);
2358 set_current_val(&vars
[V_FONT_STYLE
], TRUE
, TRUE
);
2359 set_current_val(&vars
[V_FONT_CHAR_SET
], TRUE
, TRUE
);
2360 set_current_val(&vars
[V_CURSOR_STYLE
], TRUE
, TRUE
);
2361 set_current_val(&vars
[V_WINDOW_POSITION
], TRUE
, TRUE
);
2363 if(F_OFF(F_STORE_WINPOS_IN_CONFIG
, ps_global
)){
2364 /* if win position is in the registry, use it */
2365 if(mswin_reg(MSWR_OP_GET
, MSWR_PINE_POS
, buf
, sizeof(buf
))){
2366 if(VAR_WINDOW_POSITION
)
2367 fs_give((void **)&VAR_WINDOW_POSITION
);
2369 VAR_WINDOW_POSITION
= cpystr(buf
);
2371 else if(VAR_WINDOW_POSITION
2372 && (ps
->update_registry
!= UREG_NEVER_SET
)){
2373 /* otherwise, put it there */
2374 mswin_reg(MSWR_OP_SET
| ((ps
->update_registry
== UREG_ALWAYS_SET
)
2375 ? MSWR_OP_FORCE
: 0),
2377 VAR_WINDOW_POSITION
, (size_t)NULL
);
2381 mswin_setwindow (VAR_FONT_NAME
, VAR_FONT_SIZE
,
2382 VAR_FONT_STYLE
, VAR_WINDOW_POSITION
,
2383 VAR_CURSOR_STYLE
, VAR_FONT_CHAR_SET
);
2385 /* this is no longer used */
2386 if(VAR_WINDOW_POSITION
)
2387 fs_give((void **)&VAR_WINDOW_POSITION
);
2389 set_current_val(&vars
[V_PRINT_FONT_NAME
], TRUE
, TRUE
);
2390 set_current_val(&vars
[V_PRINT_FONT_SIZE
], TRUE
, TRUE
);
2391 set_current_val(&vars
[V_PRINT_FONT_STYLE
], TRUE
, TRUE
);
2392 set_current_val(&vars
[V_PRINT_FONT_CHAR_SET
], TRUE
, TRUE
);
2393 mswin_setprintfont (VAR_PRINT_FONT_NAME
,
2394 VAR_PRINT_FONT_SIZE
,
2395 VAR_PRINT_FONT_STYLE
,
2396 VAR_PRINT_FONT_CHAR_SET
);
2398 mswin_setgenhelptextcallback(pcpine_general_help
);
2400 mswin_setclosetext ("Use the \"Q\" command to exit Alpine.");
2403 char foreColor
[64], backColor
[64];
2405 mswin_getwindow(NULL
, 0, NULL
, 0, NULL
, 0, NULL
, 0,
2406 foreColor
, sizeof(foreColor
), backColor
, sizeof(backColor
),
2408 if(!GLO_NORM_FORE_COLOR
)
2409 GLO_NORM_FORE_COLOR
= cpystr(foreColor
);
2411 if(!GLO_NORM_BACK_COLOR
)
2412 GLO_NORM_BACK_COLOR
= cpystr(backColor
);
2414 #endif /* _WINDOWS */
2418 * We want the version number to start out as 1.0 for Alpine, but
2419 * we also want to use the same old config file that was used
2420 * with Pine. The Pine version numbers made it up to 4.64 and we
2421 * want Alpine's 1.0 to be larger than 4.64 so we keep a separate
2422 * internal version number which is the real version number
2423 * plus 4. That's what gets written in LAST_VERS_USED.
2425 strncpy(ps
->vers_internal
, ALPINE_VERSION
, sizeof(ps
->vers_internal
));
2426 ps
->vers_internal
[sizeof(ps
->vers_internal
)-1] = '\0';
2427 if(isdigit(ps
->vers_internal
[0]) && ps
->vers_internal
[0] < '6')
2428 ps
->vers_internal
[0] = ps
->vers_internal
[0] + 4;
2430 set_current_val(&vars
[V_LAST_VERS_USED
], TRUE
, TRUE
);
2431 /* Check for special cases first */
2432 if(VAR_LAST_VERS_USED
2433 && (isdigit(ps
->vers_internal
[0])
2434 && ps
->vers_internal
[1] == '.'
2435 && isdigit((unsigned char)ps
->vers_internal
[2])
2436 && isdigit((unsigned char)ps
->vers_internal
[3])
2437 && isalpha((unsigned char)ps
->vers_internal
[4])
2438 && strncmp(VAR_LAST_VERS_USED
, ps
->vers_internal
, 4) >= 0)){
2439 ps
->show_new_version
= 0;
2441 /* Otherwise just do lexicographic comparision... */
2442 else if(VAR_LAST_VERS_USED
2443 && strcmp(VAR_LAST_VERS_USED
, ps
->vers_internal
) >= 0){
2444 ps
->show_new_version
= 0;
2449 * If this is the first time we've run a version > 4.40, and there
2450 * is evidence that the config file has not been used by unix pine,
2451 * then we convert color008 to colorlgr, color009 to colormgr, and
2452 * color010 to colordgr. If the config file is being used by
2453 * unix pine then color009 may really supposed to be red, etc.
2454 * Same if we've already run 4.41 or higher. We don't have to do
2455 * anything if we are new to alpine.
2457 ps
->pre441
= (VAR_LAST_VERS_USED
2458 && strcmp(VAR_LAST_VERS_USED
, "4.40") <= 0);
2459 #endif /* _WINDOWS */
2462 * Don't offer the new version message if we're told not to.
2464 set_current_val(&vars
[V_NEW_VER_QUELL
], TRUE
, TRUE
);
2465 ps
->show_new_version
= !(VAR_NEW_VER_QUELL
2466 && strcmp(ps
->vers_internal
,
2467 VAR_NEW_VER_QUELL
) < 0);
2470 if(!ps_global
->install_flag
)
2471 #endif /* _WINDOWS */
2473 if(VAR_LAST_VERS_USED
){
2474 strncpy(ps_global
->pine_pre_vers
, VAR_LAST_VERS_USED
,
2475 sizeof(ps_global
->pine_pre_vers
));
2476 ps_global
->pine_pre_vers
[sizeof(ps_global
->pine_pre_vers
)-1] = '\0';
2479 set_variable(V_LAST_VERS_USED
, ps
->vers_internal
, 1, 1,
2480 ps_global
->ew_for_except_vars
);
2484 /* Obsolete, backwards compatibility */
2485 set_current_val(&vars
[V_ELM_STYLE_SAVE
], TRUE
, TRUE
);
2487 set_current_val(&vars
[V_SAVE_BY_SENDER
], TRUE
, TRUE
);
2488 if(!strucmp(VAR_ELM_STYLE_SAVE
, "yes"))
2489 set_variable(V_SAVE_BY_SENDER
, "yes", 1, 1, Main
);
2490 obs_save_by_sender
= !strucmp(VAR_SAVE_BY_SENDER
, "yes");
2492 set_current_pattern_vals(ps
);
2494 set_current_val(&vars
[V_INDEX_FORMAT
], TRUE
, TRUE
);
2495 init_index_format(VAR_INDEX_FORMAT
, &ps
->index_disp_format
);
2497 /* this should come after pre441 is set or not */
2498 set_current_color_vals(ps
);
2500 set_current_val(&vars
[V_RSS_NEWS
], TRUE
, TRUE
);
2501 set_current_val(&vars
[V_RSS_WEATHER
], TRUE
, TRUE
);
2502 set_current_val(&vars
[V_WP_INDEXHEIGHT
], TRUE
, TRUE
);
2503 set_current_val(&vars
[V_WP_INDEXLINES
], TRUE
, TRUE
);
2504 set_current_val(&vars
[V_WP_AGGSTATE
], TRUE
, TRUE
);
2505 set_current_val(&vars
[V_WP_STATE
], TRUE
, TRUE
);
2506 set_current_val(&vars
[V_WP_COLUMNS
], TRUE
, TRUE
);
2508 set_current_val(&vars
[V_PRUNED_FOLDERS
], TRUE
, TRUE
);
2509 set_current_val(&vars
[V_ARCHIVED_FOLDERS
], TRUE
, TRUE
);
2510 set_current_val(&vars
[V_INCOMING_FOLDERS
], TRUE
, TRUE
);
2511 set_current_val(&vars
[V_SORT_KEY
], TRUE
, TRUE
);
2512 if(decode_sort(VAR_SORT_KEY
, &ps
->def_sort
, &def_sort_rev
) == -1){
2513 snprintf(tmp_20k_buf
, SIZEOF_20KBUF
, "Sort type \"%.200s\" is invalid", VAR_SORT_KEY
);
2514 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2515 ps
->def_sort
= SortArrival
;
2516 ps
->def_sort_rev
= 0;
2519 ps
->def_sort_rev
= def_sort_rev
;
2521 cur_rule_value(&vars
[V_SAVED_MSG_NAME_RULE
], TRUE
, TRUE
);
2522 {NAMEVAL_S
*v
; int i
;
2523 for(i
= 0; (v
= save_msg_rules(i
)); i
++)
2524 if(v
->value
== ps_global
->save_msg_rule
)
2527 /* if save_msg_rule is not default, or is explicitly set to default */
2528 if((ps_global
->save_msg_rule
!= SAV_RULE_DEFLT
) ||
2530 (!strucmp(ps_global
->vars
[V_SAVED_MSG_NAME_RULE
].post_user_val
.p
,
2532 !strucmp(ps_global
->vars
[V_SAVED_MSG_NAME_RULE
].main_user_val
.p
,
2534 obs_save_by_sender
= 0; /* don't overwrite */
2537 cur_rule_value(&vars
[V_FCC_RULE
], TRUE
, TRUE
);
2538 cur_rule_value(&vars
[V_AB_SORT_RULE
], TRUE
, TRUE
);
2541 cur_rule_value(&vars
[V_COLOR_STYLE
], TRUE
, TRUE
);
2544 cur_rule_value(&vars
[V_INDEX_COLOR_STYLE
], TRUE
, TRUE
);
2545 cur_rule_value(&vars
[V_TITLEBAR_COLOR_STYLE
], TRUE
, TRUE
);
2546 cur_rule_value(&vars
[V_FLD_SORT_RULE
], TRUE
, TRUE
);
2547 cur_rule_value(&vars
[V_INCOMING_STARTUP
], TRUE
, TRUE
);
2548 cur_rule_value(&vars
[V_PRUNING_RULE
], TRUE
, TRUE
);
2549 cur_rule_value(&vars
[V_REOPEN_RULE
], TRUE
, TRUE
);
2550 cur_rule_value(&vars
[V_GOTO_DEFAULT_RULE
], TRUE
, TRUE
);
2551 cur_rule_value(&vars
[V_THREAD_DISP_STYLE
], TRUE
, TRUE
);
2552 cur_rule_value(&vars
[V_THREAD_INDEX_STYLE
], TRUE
, TRUE
);
2554 set_current_val(&vars
[V_THREAD_MORE_CHAR
], TRUE
, TRUE
);
2555 if(VAR_THREAD_MORE_CHAR
[0] && VAR_THREAD_MORE_CHAR
[1]){
2556 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5,
2557 _("Only using first character of threading-indicator-character option"));
2558 VAR_THREAD_MORE_CHAR
[1] = '\0';
2561 set_current_val(&vars
[V_THREAD_EXP_CHAR
], TRUE
, TRUE
);
2562 if(VAR_THREAD_EXP_CHAR
[0] && VAR_THREAD_EXP_CHAR
[1]){
2563 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5,
2564 _("Only using first character of threading-expanded-character option"));
2565 VAR_THREAD_EXP_CHAR
[1] = '\0';
2568 set_current_val(&vars
[V_THREAD_LASTREPLY_CHAR
], TRUE
, TRUE
);
2569 if(!VAR_THREAD_LASTREPLY_CHAR
[0])
2570 VAR_THREAD_LASTREPLY_CHAR
= cpystr(DF_THREAD_LASTREPLY_CHAR
);
2572 if(VAR_THREAD_LASTREPLY_CHAR
[0] && VAR_THREAD_LASTREPLY_CHAR
[1]){
2573 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5,
2574 _("Only using first character of threading-lastreply-character option"));
2575 VAR_THREAD_LASTREPLY_CHAR
[1] = '\0';
2578 set_current_val(&vars
[V_MAXREMSTREAM
], TRUE
, TRUE
);
2579 ps
->s_pool
.max_remstream
= i
= atoi(DF_MAXREMSTREAM
);
2580 if(SVAR_MAXREMSTREAM(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2581 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2583 ps
->s_pool
.max_remstream
= i
;
2585 set_current_val(&vars
[V_PERMLOCKED
], TRUE
, TRUE
);
2587 set_current_val(&vars
[V_NMW_WIDTH
], TRUE
, TRUE
);
2588 ps
->nmw_width
= i
= atoi(DF_NMW_WIDTH
);
2589 if(SVAR_NMW_WIDTH(ps
, i
, tmp_20k_buf
, SIZEOF_20KBUF
))
2590 init_error(ps
, SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
2594 /* backwards compatibility */
2595 if(obs_save_by_sender
){
2596 ps
->save_msg_rule
= SAV_RULE_FROM
;
2597 set_variable(V_SAVED_MSG_NAME_RULE
, "by-from", 1, 1, Main
);
2600 /* this should come after process_feature_list because of use_fkeys */
2601 if(!ps
->start_in_index
)
2602 set_current_val(&vars
[V_INIT_CMD_LIST
], FALSE
, TRUE
);
2603 if(VAR_INIT_CMD_LIST
&& VAR_INIT_CMD_LIST
[0] && VAR_INIT_CMD_LIST
[0][0])
2605 (*cmds_f
)(ps
, VAR_INIT_CMD_LIST
);
2608 mswin_set_quit_confirm (F_OFF(F_QUIT_WO_CONFIRM
, ps_global
));
2609 #endif /* _WINDOWS */
2612 dump_configuration(0);
2618 convert_configvars_to_utf8(struct variable
*vars
, char *fromcharset
)
2623 * Make sure that everything is UTF-8.
2625 for(v
= vars
; v
->name
; v
++)
2626 convert_configvar_to_utf8(v
, fromcharset
);
2631 convert_configvar_to_utf8(struct variable
*v
, char *fromcharset
)
2633 char **p
, *conv
, **valptr
;
2637 * Make sure that everything is UTF-8.
2640 for(i
= 0; i
< 7; i
++){
2642 case 1: valptr
= v
->current_val
.l
; break;
2643 case 0: valptr
= v
->main_user_val
.l
; break;
2644 case 2: valptr
= v
->changed_val
.l
; break;
2645 case 3: valptr
= v
->post_user_val
.l
; break;
2646 case 4: valptr
= v
->global_val
.l
; break;
2647 case 5: valptr
= v
->fixed_val
.l
; break;
2648 case 6: valptr
= v
->cmdline_val
.l
; break;
2649 default: panic("bad case in convert_configvar");
2653 for(p
= valptr
; *p
; p
++){
2655 conv
= convert_to_utf8(*p
, fromcharset
, 0);
2657 fs_give((void **) p
);
2666 for(i
= 0; i
< 7; i
++){
2668 case 1: valptr
= &v
->current_val
.p
; break;
2669 case 0: valptr
= &v
->main_user_val
.p
; break;
2670 case 2: valptr
= &v
->changed_val
.p
; break;
2671 case 3: valptr
= &v
->post_user_val
.p
; break;
2672 case 4: valptr
= &v
->global_val
.p
; break;
2673 case 5: valptr
= &v
->fixed_val
.p
; break;
2674 case 6: valptr
= &v
->cmdline_val
.p
; break;
2675 default: panic("bad case in convert_configvar");
2678 if(valptr
&& *valptr
&& (*valptr
)[0]){
2679 conv
= convert_to_utf8(*valptr
, fromcharset
, 0);
2681 fs_give((void **) valptr
);
2692 * Standard feature name sections
2695 feature_list_section(FEATURE_S
*feature
)
2697 #define PREF_NONE -1
2698 static char *feat_sect
[] = {
2700 /* TRANSLATORS: section heading in configuration screen */
2701 N_("Advanced User Preferences"),
2703 /* TRANSLATORS: section heading in configuration screen */
2704 N_("Folder Preferences"),
2706 /* TRANSLATORS: section heading in configuration screen */
2707 N_("Address Book Preferences"),
2709 /* TRANSLATORS: section heading in configuration screen */
2710 N_("Composer Preferences"),
2712 /* TRANSLATORS: section heading in configuration screen */
2713 N_("News Preferences"),
2715 /* TRANSLATORS: section heading in configuration screen */
2716 N_("Viewer Preferences"),
2718 /* TRANSLATORS: section heading in configuration screen */
2719 N_("Advanced Command Preferences"),
2721 /* TRANSLATORS: section heading in configuration screen */
2722 N_("Printer Preferences"),
2724 /* TRANSLATORS: section heading in configuration screen */
2725 N_("Reply Preferences"),
2727 /* TRANSLATORS: section heading in configuration screen */
2728 N_("Sending Preferences"),
2729 #define PREF_INDX 10
2730 /* TRANSLATORS: section heading in configuration screen */
2731 N_("Message Index Preferences"),
2732 #define PREF_HIDDEN 11
2736 return((feature
&& feature
->section
> PREF_NONE
2737 && feature
->section
< (sizeof(feat_sect
)/sizeof(feat_sect
[0])))
2738 ? _(feat_sect
[feature
->section
]) : NULL
);
2742 /* any os-specific exclusions */
2743 #if defined(DOS) || defined(OS2)
2744 #define PREF_OS_LWSD PREF_NONE
2745 #define PREF_OS_LCLK PREF_NONE
2746 #define PREF_OS_STSP PREF_NONE
2747 #define PREF_OS_SPWN PREF_NONE
2748 #define PREF_OS_XNML PREF_NONE
2749 #define PREF_OS_USFK PREF_MISC
2750 #define PREF_OS_MOUSE PREF_NONE
2752 #define PREF_OS_LWSD PREF_MISC
2753 #define PREF_OS_LCLK PREF_COMP
2754 #define PREF_OS_STSP PREF_MISC
2755 #define PREF_OS_SPWN PREF_MISC
2756 #define PREF_OS_XNML PREF_MISC
2757 #define PREF_OS_USFK PREF_NONE
2758 #define PREF_OS_MOUSE PREF_MISC
2763 * Standard way to get at feature list members...
2766 feature_list(int index
)
2769 * This list is alphabatized by feature string, but the
2770 * macro values need not be ordered.
2772 static FEATURE_S feat_list
[] = {
2773 /* Composer prefs */
2774 {"allow-changing-from", NULL
,
2775 F_ALLOW_CHANGING_FROM
, h_config_allow_chg_from
, PREF_COMP
, 1},
2776 {"alternate-compose-menu", NULL
,
2777 F_ALT_COMPOSE_MENU
, h_config_alt_compose_menu
, PREF_COMP
, 0},
2778 {"alternate-role-menu", "Alternate Role (#) Menu",
2779 F_ALT_ROLE_MENU
, h_config_alt_role_menu
, PREF_COMP
, 0},
2780 {"compose-cancel-confirm-uses-yes", NULL
,
2781 F_CANCEL_CONFIRM
, h_config_cancel_confirm
, PREF_COMP
, 0},
2782 {"compose-rejects-unqualified-addrs", "Compose Rejects Unqualified Addresses",
2783 F_COMPOSE_REJECTS_UNQUAL
, h_config_compose_rejects_unqual
, PREF_COMP
, 0},
2784 {"compose-send-offers-first-filter", NULL
,
2785 F_FIRST_SEND_FILTER_DFLT
, h_config_send_filter_dflt
, PREF_COMP
, 0},
2786 {"compose-cut-from-cursor", "Ctrl-K Cuts From Cursor",
2787 F_DEL_FROM_DOT
, h_config_del_from_dot
, PREF_COMP
, 0},
2788 {"compose-maps-delete-key-to-ctrl-d", "Delete Key Maps to Ctrl-D",
2789 F_COMPOSE_MAPS_DEL
, h_config_compose_maps_del
, PREF_COMP
, 0},
2790 {"quell-dead-letter-on-cancel", "Do Not Save to Deadletter on Cancel",
2791 F_QUELL_DEAD_LETTER
, h_config_quell_dead_letter
, PREF_COMP
, 0},
2792 {"enable-alternate-editor-cmd", "Enable Alternate Editor Command",
2793 F_ENABLE_ALT_ED
, h_config_enable_alt_ed
, PREF_COMP
, 1},
2794 {"enable-alternate-editor-implicitly", NULL
,
2795 F_ALT_ED_NOW
, h_config_alt_ed_now
, PREF_COMP
, 0},
2796 {"enable-search-and-replace", "Enable Search and Replace",
2797 F_ENABLE_SEARCH_AND_REPL
, h_config_enable_search_and_repl
, PREF_COMP
, 1},
2798 {"enable-sigdashes", NULL
,
2799 F_ENABLE_SIGDASHES
, h_config_sigdashes
, PREF_COMP
, 0},
2800 {"quell-mailchecks-composing-except-inbox", "Prevent Mailchecks While Composing Except for INBOX",
2801 F_QUELL_PINGS_COMPOSING
, h_config_quell_checks_comp
, PREF_COMP
, 0},
2802 {"quell-mailchecks-composing-inbox", "Prevent Mailchecks While Composing for INBOX",
2803 F_QUELL_PINGS_COMPOSING_INBOX
, h_config_quell_checks_comp_inbox
, PREF_COMP
, 0},
2804 {"quell-user-lookup-in-passwd-file", "Prevent User Lookup in Password File",
2805 F_QUELL_LOCAL_LOOKUP
, h_config_quell_local_lookup
, PREF_OS_LCLK
, 0},
2806 {"spell-check-before-sending", NULL
,
2807 F_ALWAYS_SPELL_CHECK
, h_config_always_spell_check
, PREF_COMP
, 0},
2810 {"copy-to-address-to-from-if-it-is-us", "Copy To Address to From if it is Us",
2811 F_COPY_TO_TO_FROM
, h_config_copy_to_to_from
, PREF_RPLY
, 0},
2812 {"enable-reply-indent-string-editing", NULL
,
2813 F_ENABLE_EDIT_REPLY_INDENT
, h_config_prefix_editing
, PREF_RPLY
, 0},
2814 {"include-attachments-in-reply", "Include Attachments in Reply",
2815 F_ATTACHMENTS_IN_REPLY
, h_config_attach_in_reply
, PREF_RPLY
, 0},
2816 {"include-header-in-reply", "Include Header in Reply",
2817 F_INCLUDE_HEADER
, h_config_include_header
, PREF_RPLY
, 0},
2818 {"include-text-in-reply", "Include Text in Reply",
2819 F_AUTO_INCLUDE_IN_REPLY
, h_config_auto_include_reply
, PREF_RPLY
, 0},
2820 {"reply-always-uses-reply-to", "Reply Always Uses Reply-To",
2821 F_AUTO_REPLY_TO
, h_config_auto_reply_to
, PREF_RPLY
, 0},
2822 {"signature-at-bottom", "Signature at Bottom",
2823 F_SIG_AT_BOTTOM
, h_config_sig_at_bottom
, PREF_RPLY
, 0},
2824 {"strip-from-sigdashes-on-reply", "Strip From Sigdashes on Reply",
2825 F_ENABLE_STRIP_SIGDASHES
, h_config_strip_sigdashes
, PREF_RPLY
, 0},
2826 {"forward-as-attachment", "Forward messages as attachments",
2827 F_FORWARD_AS_ATTACHMENT
, h_config_forward_as_attachment
, PREF_RPLY
, 0},
2828 {"preserve-original-fields", NULL
,
2829 F_PRESERVE_ORIGINAL_FIELD
, h_config_preserve_field
, PREF_RPLY
, 0},
2832 {"disable-sender", "Do Not Generate Sender Header",
2833 F_DISABLE_SENDER
, h_config_disable_sender
, PREF_SEND
, 0},
2834 {"use-sender-not-x-sender", "Use Sender Instead of X-X-Sender",
2835 F_USE_SENDER_NOT_X
, h_config_use_sender_not_x
, PREF_SEND
, 0},
2836 {"quell-flowed-text", "Do Not Send Flowed Text",
2837 F_QUELL_FLOWED_TEXT
, h_config_quell_flowed_text
, PREF_SEND
, 0},
2838 {"downgrade-multipart-to-text", "Downgrade Multipart to Text",
2839 F_COMPOSE_ALWAYS_DOWNGRADE
, h_downgrade_multipart_to_text
, PREF_SEND
, 0},
2840 {"enable-8bit-esmtp-negotiation", "Enable 8bit ESMTP Negotiation",
2841 F_ENABLE_8BIT
, h_config_8bit_smtp
, PREF_SEND
, 1},
2842 #ifdef BACKGROUND_POST
2843 {"enable-background-sending", NULL
,
2844 F_BACKGROUND_POST
, h_config_compose_bg_post
, PREF_SEND
, 0},
2846 {"enable-delivery-status-notification", NULL
,
2847 F_DSN
, h_config_compose_dsn
, PREF_SEND
, 0},
2848 {"enable-verbose-smtp-posting", "Enable Verbose SMTP Posting",
2849 F_VERBOSE_POST
, h_config_verbose_post
, PREF_SEND
, 0},
2850 {"fcc-without-attachments", "Fcc Does Not Include Attachments",
2851 F_NO_FCC_ATTACH
, h_config_no_fcc_attach
, PREF_SEND
, 0},
2852 {"fcc-on-bounce", "Include Fcc When Bouncing Messages",
2853 F_FCC_ON_BOUNCE
, h_config_fcc_on_bounce
, PREF_SEND
, 0},
2854 {"mark-fcc-seen", NULL
,
2855 F_MARK_FCC_SEEN
, h_config_mark_fcc_seen
, PREF_SEND
, 0},
2856 {"fcc-only-without-confirm", "Send to Fcc Only Without Confirming",
2857 F_AUTO_FCC_ONLY
, h_config_auto_fcc_only
, PREF_SEND
, 0},
2858 {"send-without-confirm", "Send Without Confirming",
2859 F_SEND_WO_CONFIRM
, h_config_send_wo_confirm
, PREF_SEND
, 0},
2860 {"strip-whitespace-before-send", "Strip Whitespace Before Sending",
2861 F_STRIP_WS_BEFORE_SEND
, h_config_strip_ws_before_send
, PREF_SEND
, 0},
2862 {"warn-if-blank-fcc", "Warn if Blank Fcc",
2863 F_WARN_ABOUT_NO_FCC
, h_config_warn_if_fcc_blank
, PREF_SEND
, 0},
2864 {"warn-if-blank-subject", "Warn if Blank Subject",
2865 F_WARN_ABOUT_NO_SUBJECT
, h_config_warn_if_subj_blank
, PREF_SEND
, 0},
2866 {"warn-if-blank-to-and-cc-and-newsgroups", "Warn if Blank To and CC and Newsgroups",
2867 F_WARN_ABOUT_NO_TO_OR_CC
, h_config_warn_if_no_to_or_cc
, PREF_SEND
, 0},
2870 {"combined-folder-display", NULL
,
2871 F_CMBND_FOLDER_DISP
, h_config_combined_folder_display
, PREF_FLDR
, 0},
2872 {"combined-subdirectory-display", NULL
,
2873 F_CMBND_SUBDIR_DISP
, h_config_combined_subdir_display
, PREF_FLDR
, 0},
2874 {"enable-lame-list-mode", "Compensate for Deficient IMAP servers",
2875 F_FIX_BROKEN_LIST
, h_config_lame_list_mode
, PREF_FLDR
, 0},
2876 {"enable-dot-folders", "Enable Hidden Folders",
2877 F_ENABLE_DOT_FOLDERS
, h_config_enable_dot_folders
, PREF_FLDR
, 0},
2878 {"enable-incoming-folders", "Enable Incoming Folders Collection",
2879 F_ENABLE_INCOMING
, h_config_enable_incoming
, PREF_FLDR
, 0},
2880 {"enable-incoming-folders-checking", NULL
,
2881 F_ENABLE_INCOMING_CHECKING
, h_config_enable_incoming_checking
, PREF_FLDR
, 0},
2882 {"incoming-checking-includes-total", NULL
,
2883 F_INCOMING_CHECKING_TOTAL
, h_config_incoming_checking_total
, PREF_FLDR
, 0},
2884 {"incoming-checking-uses-recent", NULL
,
2885 F_INCOMING_CHECKING_RECENT
, h_config_incoming_checking_recent
, PREF_FLDR
, 0},
2886 {"expanded-view-of-folders", "Expanded View of Folders",
2887 F_EXPANDED_FOLDERS
, h_config_expanded_folders
, PREF_FLDR
, 0},
2888 {"quell-empty-directories", "Hide Empty Directories",
2889 F_QUELL_EMPTY_DIRS
, h_config_quell_empty_dirs
, PREF_FLDR
, 0},
2890 {"separate-folder-and-directory-entries", "Separate Folder and Directory Entries",
2891 F_SEPARATE_FLDR_AS_DIR
, h_config_separate_fold_dir_view
, PREF_FLDR
, 0},
2892 {"single-column-folder-list", NULL
,
2893 F_SINGLE_FOLDER_LIST
, h_config_single_list
, PREF_FLDR
, 0},
2894 {"sort-default-fcc-alpha", "Sort Default Fcc Folder Alphabetically",
2895 F_SORT_DEFAULT_FCC_ALPHA
, h_config_sort_fcc_alpha
, PREF_FLDR
, 0},
2896 {"sort-default-save-alpha", "Sort Default Save Folder Alphabetically",
2897 F_SORT_DEFAULT_SAVE_ALPHA
, h_config_sort_save_alpha
, PREF_FLDR
, 0},
2898 {"vertical-folder-list", "Use Vertical Folder List",
2899 F_VERTICAL_FOLDER_LIST
, h_config_vertical_list
, PREF_FLDR
, 0},
2902 {"combined-addrbook-display", "Combined Address Book Display",
2903 F_CMBND_ABOOK_DISP
, h_config_combined_abook_display
, PREF_ADDR
, 0},
2904 {"expanded-view-of-addressbooks", "Expanded View of Address Books",
2905 F_EXPANDED_ADDRBOOKS
, h_config_expanded_addrbooks
, PREF_ADDR
, 0},
2906 {"expanded-view-of-distribution-lists", "Expanded View of Distribution Lists",
2907 F_EXPANDED_DISTLISTS
, h_config_expanded_distlists
, PREF_ADDR
, 0},
2909 {"ldap-result-to-addrbook-add", "LDAP Result to Addressbook Add",
2910 F_ADD_LDAP_TO_ABOOK
, h_config_add_ldap
, PREF_ADDR
, 0},
2914 {"auto-open-next-unread", NULL
,
2915 F_AUTO_OPEN_NEXT_UNREAD
, h_config_auto_open_unread
, PREF_INDX
, 0},
2916 {"continue-tab-without-confirm", "Continue NextNew Without Confirming",
2917 F_TAB_NO_CONFIRM
, h_config_tab_no_prompt
, PREF_INDX
, 0},
2918 {"convert-dates-to-localtime", NULL
,
2919 F_DATES_TO_LOCAL
, h_config_dates_to_local
, PREF_INDX
, 0},
2920 {"delete-skips-deleted", NULL
,
2921 F_DEL_SKIPS_DEL
, h_config_del_skips_del
, PREF_INDX
, 1},
2922 {"disable-index-locale-dates", NULL
,
2923 F_DISABLE_INDEX_LOCALE_DATES
, h_config_disable_index_locale_dates
, PREF_INDX
, 0},
2924 {"enable-cruise-mode", NULL
,
2925 F_ENABLE_SPACE_AS_TAB
, h_config_cruise_mode
, PREF_INDX
, 0},
2926 {"enable-cruise-mode-delete", "Enable Cruise Mode With Deleting",
2927 F_ENABLE_TAB_DELETES
, h_config_cruise_mode_delete
, PREF_INDX
, 0},
2928 {"mark-for-cc", "Mark for CC",
2929 F_MARK_FOR_CC
, h_config_mark_for_cc
, PREF_INDX
, 1},
2930 {"next-thread-without-confirm", "Read Next Thread Without Confirming",
2931 F_NEXT_THRD_WO_CONFIRM
, h_config_next_thrd_wo_confirm
, PREF_INDX
, 0},
2932 {"return-to-inbox-without-confirm", "Return to INBOX Without Confirming",
2933 F_RET_INBOX_NO_CONFIRM
, h_config_inbox_no_confirm
, PREF_INDX
, 0},
2934 {"show-sort", "Show Sort in Titlebar",
2935 F_SHOW_SORT
, h_config_show_sort
, PREF_INDX
, 0},
2936 {"tab-uses-unseen-for-next-folder", "Tab Uses Unseen for Next Folder",
2937 F_TAB_USES_UNSEEN
, h_config_tab_uses_unseen
, PREF_INDX
, 0},
2938 {"tab-visits-next-new-message-only", NULL
,
2939 F_TAB_TO_NEW
, h_config_tab_new_only
, PREF_INDX
, 0},
2940 {"thread-index-shows-important-color", NULL
,
2941 F_COLOR_LINE_IMPORTANT
, h_config_color_thrd_import
, PREF_INDX
, 0},
2942 {"thread-sorts-by-arrival", "Thread Sorts by Arrival",
2943 F_THREAD_SORTS_BY_ARRIVAL
, h_config_thread_sorts_by_arrival
, PREF_INDX
, 0},
2946 {"enable-msg-view-addresses", "Enable Message View Address Links",
2947 F_SCAN_ADDR
, h_config_enable_view_addresses
, PREF_VIEW
, 0},
2948 {"enable-msg-view-attachments", "Enable Message View Attachment Links",
2949 F_VIEW_SEL_ATTACH
, h_config_enable_view_attach
, PREF_VIEW
, 0},
2950 {"enable-msg-view-urls", "Enable Message View URL Links",
2951 F_VIEW_SEL_URL
, h_config_enable_view_url
, PREF_VIEW
, 1},
2952 {"enable-msg-view-web-hostnames", "Enable Message View Web Hostname Links",
2953 F_VIEW_SEL_URL_HOST
, h_config_enable_view_web_host
, PREF_VIEW
, 1},
2954 {"enable-msg-view-forced-arrows", "Enable Message View Forced Arrows",
2955 F_FORCE_ARROWS
, h_config_enable_view_arrows
, PREF_VIEW
, 0},
2956 /* set to TRUE for windows */
2957 {"pass-c1-control-characters-as-is", NULL
,
2958 F_PASS_C1_CONTROL_CHARS
, h_config_pass_c1_control
, PREF_VIEW
, 0},
2959 {"pass-control-characters-as-is", NULL
,
2960 F_PASS_CONTROL_CHARS
, h_config_pass_control
, PREF_VIEW
, 0},
2961 {"prefer-plain-text", NULL
,
2962 F_PREFER_PLAIN_TEXT
, h_config_prefer_plain_text
, PREF_VIEW
, 0},
2963 {"quell-charset-warning", "Suppress Character Set Warning",
2964 F_QUELL_CHARSET_WARNING
, h_config_quell_charset_warning
, PREF_VIEW
, 0},
2965 {"quell-server-after-link-in-html", "Suppress Server After Link in HTML",
2966 F_QUELL_HOST_AFTER_URL
, h_config_quell_host_after_url
, PREF_VIEW
, 0},
2969 {"compose-sets-newsgroup-without-confirm", "Compose Sets Newsgroup Without Confirming",
2970 F_COMPOSE_TO_NEWSGRP
, h_config_compose_news_wo_conf
, PREF_NEWS
, 0},
2971 {"enable-8bit-nntp-posting", "Enable 8bit NNTP Posting",
2972 F_ENABLE_8BIT_NNTP
, h_config_8bit_nntp
, PREF_NEWS
, 0},
2973 {"enable-multiple-newsrcs", NULL
,
2974 F_ENABLE_MULNEWSRCS
, h_config_enable_mulnewsrcs
, PREF_NEWS
, 0},
2975 {"mult-newsrc-hostnames-as-typed", "Multiple Newsrc Hostnames as Typed",
2976 F_MULNEWSRC_HOSTNAMES_AS_TYPED
, h_config_mulnews_as_typed
, PREF_NEWS
, 0},
2977 {"hide-nntp-path", "Hide NNTP Path",
2978 F_HIDE_NNTP_PATH
, h_config_hide_nntp_path
, PREF_NEWS
, 0},
2979 {"news-approximates-new-status", NULL
,
2980 F_FAKE_NEW_IN_NEWS
, h_config_news_uses_recent
, PREF_NEWS
, 1},
2981 {"news-deletes-across-groups", NULL
,
2982 F_NEWS_CROSS_DELETE
, h_config_news_cross_deletes
, PREF_NEWS
, 0},
2983 {"news-offers-catchup-on-close", "News Offers Catchup on Close",
2984 F_NEWS_CATCHUP
, h_config_news_catchup
, PREF_NEWS
, 0},
2985 {"news-post-without-validation", NULL
,
2986 F_NO_NEWS_VALIDATION
, h_config_post_wo_validation
, PREF_NEWS
, 0},
2987 {"news-read-in-newsrc-order", "News Read in Newsrc Order",
2988 F_READ_IN_NEWSRC_ORDER
, h_config_read_in_newsrc_order
, PREF_NEWS
, 0},
2989 {"nntp-search-uses-overview", "NNTP Search Uses Overview",
2990 F_NNTP_SEARCH_USES_OVERVIEW
, h_config_nntp_search_uses_overview
, PREF_NEWS
, 1},
2991 {"predict-nntp-server", "Predict NNTP Server",
2992 F_PREDICT_NNTP_SERVER
, h_config_predict_nntp_server
, PREF_NEWS
, 0},
2993 {"quell-extra-post-prompt", "Suppress Extra Posting Prompt",
2994 F_QUELL_EXTRA_POST_PROMPT
, h_config_quell_post_prompt
, PREF_NEWS
, 0},
2997 {"enable-print-via-y-command", NULL
,
2998 F_ENABLE_PRYNT
, h_config_enable_y_print
, PREF_PRNT
, 0},
2999 {"print-formfeed-between-messages", NULL
,
3000 F_AGG_PRINT_FF
, h_config_ff_between_msgs
, PREF_PRNT
, 0},
3001 {"print-includes-from-line", NULL
,
3002 F_FROM_DELIM_IN_PRINT
, h_config_print_from
, PREF_PRNT
, 0},
3003 {"print-index-enabled", NULL
,
3004 F_PRINT_INDEX
, h_config_print_index
, PREF_PRNT
, 0},
3005 {"print-offers-custom-cmd-prompt", "Print Offers Custom Command Prompt",
3006 F_CUSTOM_PRINT
, h_config_custom_print
, PREF_PRNT
, 0},
3009 {"enable-aggregate-command-set", NULL
,
3010 F_ENABLE_AGG_OPS
, h_config_enable_agg_ops
, PREF_ACMD
, 1},
3011 {"enable-arrow-navigation", NULL
,
3012 F_ARROW_NAV
, h_config_arrow_nav
, PREF_ACMD
, 1},
3013 {"enable-arrow-navigation-relaxed", NULL
,
3014 F_RELAXED_ARROW_NAV
, h_config_relaxed_arrow_nav
, PREF_ACMD
, 1},
3015 {"enable-bounce-cmd", "Enable Bounce Command",
3016 F_ENABLE_BOUNCE
, h_config_enable_bounce
, PREF_ACMD
, 1},
3017 {"enable-exit-via-lessthan-command", NULL
,
3018 F_ENABLE_LESSTHAN_EXIT
, h_config_enable_lessthan_exit
, PREF_ACMD
, 1},
3019 {"enable-flag-cmd", "Enable Flag Command",
3020 F_ENABLE_FLAG
, h_config_enable_flag
, PREF_ACMD
, 1},
3021 {"enable-flag-screen-implicitly", NULL
,
3022 F_FLAG_SCREEN_DFLT
, h_config_flag_screen_default
, PREF_ACMD
, 0},
3023 {"enable-flag-screen-keyword-shortcut", NULL
,
3024 F_FLAG_SCREEN_KW_SHORTCUT
, h_config_flag_screen_kw_shortcut
,PREF_ACMD
, 1},
3025 {"enable-full-header-and-text", "Enable Full Header and Text",
3026 F_ENABLE_FULL_HDR_AND_TEXT
, h_config_enable_full_hdr_and_text
, PREF_ACMD
, 0},
3027 {"enable-full-header-cmd", "Enable Full Header Command",
3028 F_ENABLE_FULL_HDR
, h_config_enable_full_hdr
, PREF_ACMD
, 1},
3029 {"enable-goto-in-file-browser", "Enable Goto in File Browser",
3030 F_ALLOW_GOTO
, h_config_allow_goto
, PREF_ACMD
, 1},
3031 {"enable-jump-shortcut", NULL
,
3032 F_ENABLE_JUMP
, h_config_enable_jump
, PREF_ACMD
, 1},
3033 {"enable-partial-match-lists", NULL
,
3034 F_ENABLE_SUB_LISTS
, h_config_sub_lists
, PREF_ACMD
, 1},
3035 {"enable-tab-completion", NULL
,
3036 F_ENABLE_TAB_COMPLETE
, h_config_enable_tab_complete
, PREF_ACMD
, 1},
3037 {"enable-unix-pipe-cmd", "Enable Unix Pipe Command",
3038 F_ENABLE_PIPE
, h_config_enable_pipe
, PREF_ACMD
, 1},
3039 {"quell-full-header-auto-reset", "Suppress Full Header Auto Reset",
3040 F_QUELL_FULL_HDR_RESET
, h_config_quell_full_hdr_reset
, PREF_ACMD
, 0},
3042 /* Adv user prefs */
3043 #if !defined(DOS) && !defined(OS2)
3044 {"allow-talk", NULL
,
3045 F_ALLOW_TALK
, h_config_allow_talk
, PREF_MISC
, 0},
3047 {"assume-slow-link", NULL
,
3048 F_FORCE_LOW_SPEED
, h_config_force_low_speed
, PREF_OS_LWSD
, 0},
3049 {"auto-move-read-msgs", "Auto Move Read Messages",
3050 F_AUTO_READ_MSGS
, h_config_auto_read_msgs
, PREF_MISC
, 0},
3051 {"auto-unselect-after-apply", NULL
,
3052 F_AUTO_UNSELECT
, h_config_auto_unselect
, PREF_MISC
, 0},
3053 {"auto-unzoom-after-apply", NULL
,
3054 F_AUTO_UNZOOM
, h_config_auto_unzoom
, PREF_MISC
, 1},
3055 {"auto-zoom-after-select", NULL
,
3056 F_AUTO_ZOOM
, h_config_auto_zoom
, PREF_MISC
, 1},
3057 {"busy-cue-spinner-only", NULL
,
3058 F_USE_BORING_SPINNER
, h_config_use_boring_spinner
, PREF_MISC
, 0},
3059 {"check-newmail-when-quitting", NULL
,
3060 F_CHECK_MAIL_ONQUIT
, h_config_check_mail_onquit
, PREF_MISC
, 0},
3061 {"confirm-role-even-for-default", "Confirm Role Even for Default",
3062 F_ROLE_CONFIRM_DEFAULT
, h_config_confirm_role
, PREF_MISC
, 0},
3063 {"disable-keymenu", NULL
,
3064 F_BLANK_KEYMENU
, h_config_blank_keymenu
, PREF_MISC
, 0},
3065 {"disable-password-caching", NULL
,
3066 F_DISABLE_PASSWORD_CACHING
, h_config_disable_password_caching
,
3068 {"disable-regular-expression-matching-for-alternate-addresses", NULL
,
3069 F_DISABLE_REGEX
, h_config_disable_regex
, PREF_MISC
, 0},
3070 {"disable-save-input-history", NULL
,
3071 F_DISABLE_SAVE_INPUT_HISTORY
, h_config_input_history
, PREF_MISC
, 0},
3072 {"disable-take-fullname-in-addresses", "Disable Take Fullname in Addresses",
3073 F_DISABLE_TAKE_FULLNAMES
, h_config_take_fullname
, PREF_MISC
, 0},
3074 {"disable-take-last-comma-first", NULL
,
3075 F_DISABLE_TAKE_LASTFIRST
, h_config_take_lastfirst
, PREF_MISC
, 0},
3076 {"disable-terminal-reset-for-display-filters", "Disable Terminal Reset for Display Filters",
3077 F_DISABLE_TERM_RESET_DISP
, h_config_disable_reset_disp
, PREF_MISC
, 0},
3078 {"enable-dot-files", NULL
,
3079 F_ENABLE_DOT_FILES
, h_config_enable_dot_files
, PREF_MISC
, 0},
3080 {"enable-fast-recent-test", NULL
,
3081 F_ENABLE_FAST_RECENT
, h_config_fast_recent
, PREF_MISC
, 0},
3082 {"enable-mail-check-cue", NULL
,
3083 F_SHOW_DELAY_CUE
, h_config_show_delay_cue
, PREF_MISC
, 0},
3084 {"enable-mailcap-param-substitution", "Enable Mailcap Parameter Substitution",
3085 F_DO_MAILCAP_PARAM_SUBST
, h_config_mailcap_params
, PREF_MISC
, 0},
3086 {"enable-mouse-in-xterm", "Enable Mouse in Xterm",
3087 F_ENABLE_MOUSE
, h_config_enable_mouse
, PREF_OS_MOUSE
, 0},
3088 {"enable-newmail-in-xterm-icon", "Enable Newmail in Xterm Icon",
3089 F_ENABLE_XTERM_NEWMAIL
, h_config_enable_xterm_newmail
, PREF_OS_XNML
, 0},
3090 {"enable-newmail-short-text-in-icon", "Enable Newmail Short Text in Icon",
3091 F_ENABLE_NEWMAIL_SHORT_TEXT
, h_config_enable_newmail_short_text
, PREF_OS_XNML
, 0},
3092 {"enable-suspend", NULL
,
3093 F_CAN_SUSPEND
, h_config_can_suspend
, PREF_MISC
, 0},
3094 {"enable-take-export", NULL
,
3095 F_ENABLE_TAKE_EXPORT
, h_config_enable_take_export
, PREF_MISC
, 0},
3096 {"enable-rules-under-take", "Enable Take Rules",
3097 F_ENABLE_ROLE_TAKE
, h_config_enable_role_take
, PREF_MISC
, 0},
3099 {"enable-tray-icon", NULL
,
3100 F_ENABLE_TRAYICON
, h_config_tray_icon
, PREF_MISC
, 0},
3102 {"expose-hidden-config", NULL
,
3103 F_EXPOSE_HIDDEN_CONFIG
, h_config_expose_hidden_config
, PREF_MISC
, 0},
3104 {"expunge-only-manually", NULL
,
3105 F_EXPUNGE_MANUALLY
, h_config_expunge_manually
, PREF_MISC
, 0},
3106 {"expunge-without-confirm", "Expunge Without Confirming",
3107 F_AUTO_EXPUNGE
, h_config_auto_expunge
, PREF_MISC
, 0},
3108 {"expunge-without-confirm-everywhere", "Expunge Without Confirming Everywhere",
3109 F_FULL_AUTO_EXPUNGE
, h_config_full_auto_expunge
, PREF_MISC
, 0},
3110 {"force-arrow-cursor", NULL
,
3111 F_FORCE_ARROW
, h_config_force_arrow
, PREF_MISC
, 0},
3112 {"maildrops-preserve-state", NULL
,
3113 F_MAILDROPS_PRESERVE_STATE
, h_config_maildrops_preserve_state
,
3115 {"offer-expunge-of-inbox", "Offer Expunge of INBOX",
3116 F_EXPUNGE_INBOX
, h_config_expunge_inbox
, PREF_MISC
, 0},
3117 {"offer-expunge-of-stayopen-folders", "Offer Expunge of Stayopen Folders",
3118 F_EXPUNGE_STAYOPENS
, h_config_expunge_stayopens
, PREF_MISC
, 0},
3119 {"preopen-stayopen-folders", NULL
,
3120 F_PREOPEN_STAYOPENS
, h_config_preopen_stayopens
, PREF_MISC
, 0},
3121 {"preserve-start-stop-characters", "Preserve Start/Stop Characters",
3122 F_PRESERVE_START_STOP
, h_config_preserve_start_stop
, PREF_OS_STSP
, 0},
3123 {"quell-folder-internal-msg", "Prevent Folder Internal Message",
3124 F_QUELL_INTERNAL_MSG
, h_config_quell_folder_internal_msg
, PREF_MISC
, 0},
3125 {"quell-partial-fetching", "Prevent Partial Fetching",
3126 F_QUELL_PARTIAL_FETCH
, h_config_quell_partial
, PREF_MISC
, 0},
3127 {"prune-uses-yyyy-mm", "Prune Uses YYYY-MM",
3128 F_PRUNE_USES_ISO
, h_config_prune_uses_iso
, PREF_MISC
, 0},
3129 {"quit-without-confirm", "Quit Without Confirming",
3130 F_QUIT_WO_CONFIRM
, h_config_quit_wo_confirm
, PREF_MISC
, 0},
3131 {"quote-replace-nonflowed", NULL
,
3132 F_QUOTE_REPLACE_NOFLOW
, h_config_quote_replace_noflow
, PREF_MISC
, 0},
3133 {"save-aggregates-copy-sequence", "Save Combines Copies (may be out of order)",
3134 F_AGG_SEQ_COPY
, h_config_save_aggregates
, PREF_MISC
, 1},
3135 {"save-partial-msg-without-confirm", "Save Partial Message Without Confirming",
3136 F_SAVE_PARTIAL_WO_CONFIRM
, h_config_save_part_wo_confirm
, PREF_MISC
, 0},
3137 {"save-will-advance", NULL
,
3138 F_SAVE_ADVANCES
, h_config_save_advances
, PREF_MISC
, 0},
3139 {"save-will-not-delete", NULL
,
3140 F_SAVE_WONT_DELETE
, h_config_save_wont_delete
, PREF_MISC
, 0},
3141 {"save-will-quote-leading-froms", NULL
,
3142 F_QUOTE_ALL_FROMS
, h_config_quote_all_froms
, PREF_MISC
, 0},
3143 {"scramble-message-id", "Scramble the Message-ID When Sending",
3144 F_ROT13_MESSAGE_ID
, h_config_scramble_message_id
, PREF_MISC
, 0},
3145 {"select-without-confirm", "Select Ctrl-T Foldername Without Confirming",
3146 F_SELECT_WO_CONFIRM
, h_config_select_wo_confirm
, PREF_MISC
, 0},
3147 {"show-cursor", NULL
,
3148 F_SHOW_CURSOR
, h_config_show_cursor
, PREF_MISC
, 0},
3149 {"show-plain-text-internally", NULL
,
3150 F_SHOW_TEXTPLAIN_INT
, h_config_textplain_int
, PREF_MISC
, 0},
3151 {"show-selected-in-boldface", "Show Selected in Boldface",
3152 F_SELECTED_SHOWN_BOLD
, h_config_select_in_bold
, PREF_MISC
, 0},
3153 {"slash-collapses-entire-thread", NULL
,
3154 F_SLASH_COLL_ENTIRE
, h_config_slash_coll_entire
, PREF_MISC
, 0},
3156 {"store-window-position-in-config", "Store Window Position in Config",
3157 F_STORE_WINPOS_IN_CONFIG
, h_config_winpos_in_config
, PREF_MISC
, 0},
3159 {"suppress-asterisks-in-password-prompt", "Suppress Asterisks in Password Prompt",
3160 F_QUELL_ASTERISKS
, h_config_quell_asterisks
,
3162 {"quell-attachment-extension-warn", "Suppress Attachment Extension Warning",
3163 F_QUELL_ATTACH_EXT_WARN
, h_config_quell_attach_ext_warn
,
3165 {"quell-attachment-extra-prompt", "Suppress Attachment Extra Prompt",
3166 F_QUELL_ATTACH_EXTRA_PROMPT
, h_config_quell_attach_extra_prompt
,
3168 {"quell-berkeley-format-timezone", "Suppress Berkeley Format Timezone",
3169 F_QUELL_BEZERK_TIMEZONE
, h_config_no_bezerk_zone
, PREF_MISC
, 0},
3170 {"quell-content-id", "Suppress Content-ID",
3171 F_QUELL_CONTENT_ID
, h_config_quell_content_id
, PREF_MISC
, 0},
3172 {"quell-filtering-done-message", "Suppress Filtering Done Message",
3173 F_QUELL_FILTER_DONE_MSG
, h_config_quell_filtering_done_message
,
3175 {"quell-filtering-messages", "Suppress Filtering Messages",
3176 F_QUELL_FILTER_MSGS
, h_config_quell_filtering_messages
,
3178 {"quell-imap-envelope-update", "Suppress IMAP Envelope Update",
3179 F_QUELL_IMAP_ENV_CB
, h_config_quell_imap_env
, PREF_MISC
, 0},
3180 {"quell-lock-failure-warnings", "Suppress Lock Failure Warnings",
3181 F_QUELL_LOCK_FAILURE_MSGS
, h_config_quell_lock_failure_warnings
,
3183 {"quell-maildomain-warning", "Suppress Maildomain Warning",
3184 F_QUELL_MAILDOMAIN_WARNING
, h_config_quell_domain_warn
, PREF_MISC
, 0},
3185 {"quell-news-envelope-update", "Suppress News Envelope Update",
3186 F_QUELL_NEWS_ENV_CB
, h_config_quell_news_env
, PREF_MISC
, 0},
3188 {"quell-ssl-largeblocks", "Prevent SSL Largeblocks",
3189 F_QUELL_SSL_LARGEBLOCKS
, h_config_quell_ssl_largeblocks
, PREF_MISC
, 0},
3191 {"quell-status-message-beeping", "Suppress Status Message Beeping",
3192 F_QUELL_BEEPS
, h_config_quell_beeps
, PREF_MISC
, 0},
3193 {"quell-timezone-comment-when-sending", "Suppress Timezone Comment When Sending",
3194 F_QUELL_TIMEZONE
, h_config_quell_tz_comment
, PREF_MISC
, 0},
3195 {"suppress-user-agent-when-sending", NULL
,
3196 F_QUELL_USERAGENT
, h_config_suppress_user_agent
, PREF_MISC
, 0},
3197 {"tab-checks-recent", "Tab Checks for Recent Messages",
3198 F_TAB_CHK_RECENT
, h_config_tab_checks_recent
, PREF_MISC
, 0},
3199 {"termdef-takes-precedence", NULL
,
3200 F_TCAP_WINS
, h_config_termcap_wins
, PREF_MISC
, 0},
3201 {"try-alternative-authentication-driver-first", NULL
,
3202 F_PREFER_ALT_AUTH
, h_config_alt_auth
, PREF_MISC
, 0},
3203 {"unselect-will-not-advance", NULL
,
3204 F_UNSELECT_WONT_ADVANCE
, h_config_unsel_wont_advance
, PREF_MISC
, 0},
3205 {"use-current-dir", "Use Current Directory",
3206 F_USE_CURRENT_DIR
, h_config_use_current_dir
, PREF_MISC
, 0},
3207 {"use-function-keys", NULL
,
3208 F_USE_FK
, h_config_use_fk
, PREF_OS_USFK
, 0},
3209 {"use-regular-startup-rule-for-stayopen-folders", "Use Regular Startup Rule for Stayopen Folders",
3210 F_STARTUP_STAYOPEN
, h_config_use_reg_start_for_stayopen
, PREF_MISC
, 0},
3211 {"use-resent-to-in-rules", "Use Resent-To in Rules",
3212 F_USE_RESENTTO
, h_config_use_resentto
, PREF_MISC
, 0},
3213 {"use-subshell-for-suspend", "Use Subshell for Suspend",
3214 F_SUSPEND_SPAWNS
, h_config_suspend_spawns
, PREF_OS_SPWN
, 0},
3216 {"use-system-translation", NULL
,
3217 F_USE_SYSTEM_TRANS
, h_config_use_system_translation
, PREF_MISC
, 0},
3220 /* Hidden Features */
3221 {"old-growth", NULL
,
3222 F_OLD_GROWTH
, NO_HELP
, PREF_NONE
, 0},
3223 {"disable-config-cmd", NULL
,
3224 F_DISABLE_CONFIG_SCREEN
, h_config_disable_config_cmd
, PREF_HIDDEN
, 0},
3225 {"disable-keyboard-lock-cmd", NULL
,
3226 F_DISABLE_KBLOCK_CMD
, h_config_disable_kb_lock
, PREF_HIDDEN
, 0},
3227 {"disable-password-cmd", NULL
,
3228 F_DISABLE_PASSWORD_CMD
, h_config_disable_password_cmd
, PREF_HIDDEN
, 0},
3229 {"disable-pipes-in-sigs", NULL
,
3230 F_DISABLE_PIPES_IN_SIGS
, h_config_disable_pipes_in_sigs
, PREF_HIDDEN
, 0},
3231 {"disable-pipes-in-templates", NULL
,
3232 F_DISABLE_PIPES_IN_TEMPLATES
, h_config_disable_pipes_in_templates
,
3234 {"disable-roles-setup-cmd", NULL
,
3235 F_DISABLE_ROLES_SETUP
, h_config_disable_roles_setup
, PREF_HIDDEN
, 0},
3236 {"disable-roles-sig-edit", NULL
,
3237 F_DISABLE_ROLES_SIGEDIT
, h_config_disable_roles_sigedit
, PREF_HIDDEN
, 0},
3238 {"disable-roles-template-edit", NULL
,
3239 F_DISABLE_ROLES_TEMPLEDIT
, h_config_disable_roles_templateedit
,
3241 {"disable-setlocale-collate", NULL
,
3242 F_DISABLE_SETLOCALE_COLLATE
, h_config_disable_collate
, PREF_HIDDEN
, 0},
3243 {"disable-shared-namespaces", NULL
,
3244 F_DISABLE_SHARED_NAMESPACES
, h_config_disable_shared
, PREF_HIDDEN
, 0},
3245 {"disable-signature-edit-cmd", NULL
,
3246 F_DISABLE_SIGEDIT_CMD
, h_config_disable_signature_edit
, PREF_HIDDEN
, 0},
3247 {"new-thread-on-blank-subject", "New Thread on Blank Subject",
3248 F_NEW_THREAD_ON_BLANK_SUBJECT
, h_config_new_thread_blank_subject
, PREF_HIDDEN
, 1},
3249 {"quell-personal-name-prompt", NULL
,
3250 F_QUELL_PERSONAL_NAME_PROMPT
, h_config_quell_personal_name_prompt
, PREF_HIDDEN
, 0},
3251 {"quell-user-id-prompt", "Quell User ID Prompt",
3252 F_QUELL_USER_ID_PROMPT
, h_config_quell_user_id_prompt
, PREF_HIDDEN
, 0},
3254 {"smime-dont-do-smime", "S/MIME -- Turn off S/MIME",
3255 F_DONT_DO_SMIME
, h_config_smime_dont_do_smime
, PREF_HIDDEN
, 0},
3256 {"smime-encrypt-by-default", "S/MIME -- Encrypt by Default",
3257 F_ENCRYPT_DEFAULT_ON
, h_config_smime_encrypt_by_default
, PREF_HIDDEN
, 0},
3258 {"smime-remember-passphrase", "S/MIME -- Remember S/MIME Passphrase",
3259 F_REMEMBER_SMIME_PASSPHRASE
, h_config_smime_remember_passphrase
, PREF_HIDDEN
, 0},
3260 {"smime-sign-by-default", "S/MIME -- Sign by Default",
3261 F_SIGN_DEFAULT_ON
, h_config_smime_sign_by_default
, PREF_HIDDEN
, 0},
3262 #ifdef APPLEKEYCHAIN
3263 {"publiccerts-in-keychain", "S/MIME -- Public Certs in MacOS Keychain",
3264 F_PUBLICCERTS_IN_KEYCHAIN
, h_config_smime_pubcerts_in_keychain
, PREF_HIDDEN
, 0},
3267 {"selectable-item-nobold", NULL
,
3268 F_SLCTBL_ITEM_NOBOLD
, NO_HELP
, PREF_NONE
, 0},
3269 {"send-confirms-only-expanded", NULL
, /* exposed in Web Alpine */
3270 F_SEND_CONFIRM_ON_EXPAND
, h_config_send_confirms_only_expanded
, PREF_HIDDEN
, 0},
3271 {"enable-jump-cmd", NULL
, /* exposed in Web Alpine */
3272 F_ENABLE_JUMP_CMD
, h_config_enable_jump_command
, PREF_HIDDEN
, 0},
3273 {"enable-newmail-sound", NULL
, /* exposed in Web Alpine */
3274 F_ENABLE_NEWMAIL_SOUND
, h_config_enable_newmail_sound
, PREF_HIDDEN
, 0},
3275 {"render-html-internally", NULL
, /* exposed in Web Alpine */
3276 F_RENDER_HTML_INTERNALLY
, h_config_render_html_internally
, PREF_HIDDEN
, 0}
3279 return((index
>= 0 && index
< (sizeof(feat_list
)/sizeof(feat_list
[0])))
3280 ? &feat_list
[index
] : NULL
);
3285 * feature_list_index -- return index of given feature id in
3289 feature_list_index(int id
)
3294 for(i
= 0; (feature
= feature_list(i
)); i
++)
3295 if(id
== feature
->id
)
3303 * feature_list_name -- return the given feature id's corresponding name
3306 feature_list_name(int id
)
3310 return((f
= feature_list(feature_list_index(id
))) ? f
->name
: "");
3315 feature_list_id(char *name
)
3320 for(i
= 0; (f
= feature_list(i
)); i
++)
3321 if(!strucmp(f
->name
, name
))
3329 * feature_list_help -- return the given feature id's corresponding help
3332 feature_list_help(int id
)
3336 return((f
= feature_list(feature_list_index(id
))) ? f
->help
: NO_HELP
);
3341 * All the arguments past "list" are the backwards compatibility hacks.
3344 process_feature_list(struct pine
*ps
, char **list
, int old_growth
, int hir
, int osr
)
3348 *lvalue
[BM_SIZE
* 8];
3355 /* clear all previous settings and reset them to default */
3356 for(i
= 0; (feat
= feature_list(i
)) != NULL
; i
++)
3357 F_SET(feat
->id
, ps
, feat
->defval
);
3359 /* backwards compatibility */
3361 F_TURN_ON(F_INCLUDE_HEADER
, ps
);
3365 F_TURN_ON(F_SIG_AT_BOTTOM
, ps
);
3369 set_old_growth_bits(ps
, 0);
3371 /* now run through the list (global, user, and cmd_line lists are here) */
3373 for(p
= list
; (q
= *p
) != NULL
; p
++){
3374 if(struncmp(q
, "no-", 3) == 0){
3381 for(i
= 0; (feat
= feature_list(i
)) != NULL
; i
++){
3382 if(strucmp(q
, feat
->name
) == 0){
3383 if(feat
->id
== F_OLD_GROWTH
){
3384 set_old_growth_bits(ps
, yorn
);
3386 F_SET(feat
->id
, ps
, yorn
);
3392 /* if it wasn't in that list */
3394 dprint((1,"Unrecognized feature in feature-list (%s%s)\n",
3395 (yorn
? "" : "no-"), q
? q
: "?"));
3400 * Turn on gratuitous '>From ' quoting, if requested...
3402 mail_parameters(NULL
, SET_FROMWIDGET
,
3403 F_ON(F_QUOTE_ALL_FROMS
, ps
) ? VOIDT
: NIL
);
3406 * Turn off .lock creation complaints...
3408 if(F_ON(F_QUELL_LOCK_FAILURE_MSGS
, ps
))
3409 mail_parameters(NULL
, SET_LOCKEACCESERROR
, (void *) 0);
3412 * Turn on quelling of pseudo message.
3414 if(F_ON(F_QUELL_INTERNAL_MSG
,ps_global
))
3415 mail_parameters(NULL
, SET_USERHASNOLIFE
, (void *) 1);
3417 l
= F_ON(F_MULNEWSRC_HOSTNAMES_AS_TYPED
,ps_global
) ? 0L : 1L;
3418 mail_parameters(NULL
, SET_NEWSRCCANONHOST
, (void *) l
);
3420 ps
->pass_ctrl_chars
= F_ON(F_PASS_CONTROL_CHARS
,ps_global
) ? 1 : 0;
3421 ps
->pass_c1_ctrl_chars
= F_ON(F_PASS_C1_CONTROL_CHARS
,ps_global
) ? 1 : 0;
3424 if(F_ON(F_QUELL_BEZERK_TIMEZONE
,ps_global
))
3425 mail_parameters(NULL
, SET_NOTIMEZONES
, (void *) 1);
3428 if(F_ON(F_USE_FK
, ps
))
3429 ps
->orig_use_fkeys
= 1;
3431 /* Will we have to build a new list? */
3432 if(!(old_growth
|| hir
|| osr
))
3436 * Build a new list for feature-list. The only reason we ever need to
3437 * do this is if one of the obsolete options is being converted
3438 * into a feature-list item, and it isn't already included in the user's
3442 for(p
= LVAL(&ps
->vars
[V_FEATURE_LIST
], Main
);
3443 p
&& (q
= *p
); p
++){
3444 /* already have it or cancelled it, don't need to add later */
3445 if(hir
&& (strucmp(q
, "include-header-in-reply") == 0 ||
3446 strucmp(q
, "no-include-header-in-reply") == 0)){
3448 }else if(osr
&& (strucmp(q
, "signature-at-bottom") == 0 ||
3449 strucmp(q
, "no-signature-at-bottom") == 0)){
3451 }else if(old_growth
&& (strucmp(q
, "old-growth") == 0 ||
3452 strucmp(q
, "no-old-growth") == 0)){
3455 lvalue
[i
++] = cpystr(q
);
3458 /* check to see if we still need to build a new list */
3459 if(!(old_growth
|| hir
|| osr
))
3463 lvalue
[i
++] = "include-header-in-reply";
3465 lvalue
[i
++] = "signature-at-bottom";
3467 lvalue
[i
++] = "old-growth";
3469 set_variable_list(V_FEATURE_LIST
, lvalue
, TRUE
, Main
);
3474 set_current_pattern_vals(struct pine
*ps
)
3476 struct variable
*vars
= ps
->vars
;
3478 set_current_val(&vars
[V_PATTERNS
], TRUE
, TRUE
);
3479 set_current_val(&vars
[V_PAT_ROLES
], TRUE
, TRUE
);
3480 set_current_val(&vars
[V_PAT_FILTS
], TRUE
, TRUE
);
3481 set_current_val(&vars
[V_PAT_FILTS_OLD
], TRUE
, TRUE
);
3482 set_current_val(&vars
[V_PAT_SCORES
], TRUE
, TRUE
);
3483 set_current_val(&vars
[V_PAT_SCORES_OLD
], TRUE
, TRUE
);
3484 set_current_val(&vars
[V_PAT_INCOLS
], TRUE
, TRUE
);
3485 set_current_val(&vars
[V_PAT_OTHER
], TRUE
, TRUE
);
3486 set_current_val(&vars
[V_PAT_SRCH
], TRUE
, TRUE
);
3489 * If old pattern variable (V_PATTERNS) is set and the new ones aren't
3490 * in the config file, then convert the old data into the new variables.
3491 * It isn't quite that simple, though, because we don't store unset
3492 * variables in remote pinercs. Check for the variables but if we
3493 * don't find any of them, also check the version number. This change was
3494 * made in version 4.30. We could just check that except that we're
3495 * worried somebody will make an incompatible version number change in
3496 * their local version, and will break this. So we check both the
3497 * version # and the var_in_pinerc things to be safer.
3499 if(vars
[V_PATTERNS
].current_val
.l
3500 && vars
[V_PATTERNS
].current_val
.l
[0]
3501 && !var_in_pinerc(vars
[V_PAT_ROLES
].name
)
3502 && !var_in_pinerc(vars
[V_PAT_FILTS
].name
)
3503 && !var_in_pinerc(vars
[V_PAT_FILTS_OLD
].name
)
3504 && !var_in_pinerc(vars
[V_PAT_SCORES
].name
)
3505 && !var_in_pinerc(vars
[V_PAT_SCORES_OLD
].name
)
3506 && !var_in_pinerc(vars
[V_PAT_INCOLS
].name
)
3507 && isdigit((unsigned char) ps
->pine_pre_vers
[0])
3508 && ps
->pine_pre_vers
[1] == '.'
3509 && isdigit((unsigned char) ps
->pine_pre_vers
[2])
3510 && isdigit((unsigned char) ps
->pine_pre_vers
[3])
3511 && strncmp(ps
->pine_pre_vers
, "4.30", 4) < 0){
3512 convert_pattern_data();
3516 * Otherwise, if FILTS_OLD is set and FILTS isn't in the config file,
3517 * convert FILTS_OLD to FILTS. Same for SCORES.
3518 * The reason FILTS was changed was so we could change the
3519 * semantics of how rules work when there are pieces in the rule that
3520 * we don't understand. At the same time as the FILTS change we added
3521 * a rule to detect 8bitSubjects. So a user might have a filter that
3522 * deletes messages with 8bitSubjects. The problem is that that same
3523 * filter in a FILTS_OLD pine would match because it would ignore the
3524 * 8bitSubject part of the pattern and match on the rest. So we changed
3525 * the semantics so that rules with unknown bits would be ignored
3526 * instead of used. We had to change variable names at the same time
3527 * because we were adding the 8bit thing and the old pines are still
3528 * out there. Filters and Scores can both be dangerous. Roles, Colors,
3529 * and Other seem less dangerous so not worth adding a new variable.
3530 * This was changed in 4.50.
3533 if(vars
[V_PAT_FILTS_OLD
].current_val
.l
3534 && vars
[V_PAT_FILTS_OLD
].current_val
.l
[0]
3535 && !var_in_pinerc(vars
[V_PAT_FILTS
].name
)
3536 && !var_in_pinerc(vars
[V_PAT_SCORES
].name
)
3537 && isdigit((unsigned char) ps
->pine_pre_vers
[0])
3538 && ps
->pine_pre_vers
[1] == '.'
3539 && isdigit((unsigned char) ps
->pine_pre_vers
[2])
3540 && isdigit((unsigned char) ps
->pine_pre_vers
[3])
3541 && strncmp(ps
->pine_pre_vers
, "4.50", 4) < 0){
3542 convert_filts_pattern_data();
3545 if(vars
[V_PAT_SCORES_OLD
].current_val
.l
3546 && vars
[V_PAT_SCORES_OLD
].current_val
.l
[0]
3547 && !var_in_pinerc(vars
[V_PAT_FILTS
].name
)
3548 && !var_in_pinerc(vars
[V_PAT_SCORES
].name
)
3549 && isdigit((unsigned char) ps
->pine_pre_vers
[0])
3550 && ps
->pine_pre_vers
[1] == '.'
3551 && isdigit((unsigned char) ps
->pine_pre_vers
[2])
3552 && isdigit((unsigned char) ps
->pine_pre_vers
[3])
3553 && strncmp(ps
->pine_pre_vers
, "4.50", 4) < 0){
3554 convert_scores_pattern_data();
3558 if(vars
[V_PAT_ROLES
].post_user_val
.l
)
3559 ps_global
->ew_for_role_take
= Post
;
3561 ps_global
->ew_for_role_take
= Main
;
3563 if(vars
[V_PAT_FILTS
].post_user_val
.l
)
3564 ps_global
->ew_for_filter_take
= Post
;
3566 ps_global
->ew_for_filter_take
= Main
;
3568 if(vars
[V_PAT_SCORES
].post_user_val
.l
)
3569 ps_global
->ew_for_score_take
= Post
;
3571 ps_global
->ew_for_score_take
= Main
;
3573 if(vars
[V_PAT_INCOLS
].post_user_val
.l
)
3574 ps_global
->ew_for_incol_take
= Post
;
3576 ps_global
->ew_for_incol_take
= Main
;
3578 if(vars
[V_PAT_OTHER
].post_user_val
.l
)
3579 ps_global
->ew_for_other_take
= Post
;
3581 ps_global
->ew_for_other_take
= Main
;
3583 if(vars
[V_PAT_SRCH
].post_user_val
.l
)
3584 ps_global
->ew_for_srch_take
= Post
;
3586 ps_global
->ew_for_srch_take
= Main
;
3591 * Foreach of the config files;
3592 * transfer the data to the new variables.
3595 convert_pattern_data(void)
3597 convert_pinerc_patterns(PAT_USE_MAIN
);
3598 convert_pinerc_patterns(PAT_USE_POST
);
3603 convert_filts_pattern_data(void)
3605 convert_pinerc_filts_patterns(PAT_USE_MAIN
);
3606 convert_pinerc_filts_patterns(PAT_USE_POST
);
3611 convert_scores_pattern_data(void)
3613 convert_pinerc_scores_patterns(PAT_USE_MAIN
);
3614 convert_pinerc_scores_patterns(PAT_USE_POST
);
3619 * Foreach of the four variables, transfer the data for this config file
3620 * from the old patterns variable. We don't have to convert OTHER patterns
3621 * or SRCH patterns because they didn't exist in pines without patterns-other.
3623 * If the original variable had patlines with type File then we convert
3624 * all of the individual patterns to type Lit, because each pattern can
3625 * be of any category. Lit patterns are better tested, anyway.
3628 convert_pinerc_patterns(long int use_flags
)
3636 old_rflags
= (ROLE_OLD_PAT
| use_flags
);
3639 if(any_patterns(old_rflags
, &pstate
)){
3640 dprint((2, "converting old patterns to new (%s)\n", (use_flags
== PAT_USE_MAIN
) ? "Main" : "Post"));
3641 for(pat
= first_pattern(&pstate
);
3643 pat
= next_pattern(&pstate
)){
3644 if((act
= pat
->action
) != NULL
){
3645 if(act
->is_a_role
&&
3646 add_to_pattern(pat
, ROLE_DO_ROLES
| use_flags
))
3647 rflags
|= ROLE_DO_ROLES
;
3648 if(act
->is_a_incol
&&
3649 add_to_pattern(pat
, ROLE_DO_INCOLS
| use_flags
))
3650 rflags
|= ROLE_DO_INCOLS
;
3651 if(act
->is_a_score
&&
3652 add_to_pattern(pat
, ROLE_DO_SCORES
| use_flags
))
3653 rflags
|= ROLE_DO_SCORES
;
3654 if(act
->is_a_filter
&&
3655 add_to_pattern(pat
, ROLE_DO_FILTER
| use_flags
))
3656 rflags
|= ROLE_DO_FILTER
;
3661 if(write_patterns(rflags
| use_flags
))
3663 "Trouble converting patterns to new variable\n"));
3669 * If the original variable had patlines with type File then we convert
3670 * all of the individual patterns to type Lit, because each pattern can
3671 * be of any category. Lit patterns are better tested, anyway.
3674 convert_pinerc_filts_patterns(long int use_flags
)
3682 old_rflags
= (ROLE_OLD_FILT
| use_flags
);
3685 if(any_patterns(old_rflags
, &pstate
)){
3686 dprint((2, "converting old filter patterns to new (%s)\n", (use_flags
== PAT_USE_MAIN
) ? "Main" : "Post"));
3687 for(pat
= first_pattern(&pstate
);
3689 pat
= next_pattern(&pstate
)){
3690 if((act
= pat
->action
) != NULL
){
3691 if(act
->is_a_filter
&&
3692 add_to_pattern(pat
, ROLE_DO_FILTER
| use_flags
))
3693 rflags
|= ROLE_DO_FILTER
;
3698 if(write_patterns(rflags
| use_flags
))
3700 "Trouble converting filter patterns to new variable\n"));
3706 * If the original variable had patlines with type File then we convert
3707 * all of the individual patterns to type Lit, because each pattern can
3708 * be of any category. Lit patterns are better tested, anyway.
3711 convert_pinerc_scores_patterns(long int use_flags
)
3719 old_rflags
= (ROLE_OLD_SCORE
| use_flags
);
3722 if(any_patterns(old_rflags
, &pstate
)){
3723 dprint((2, "converting old scores patterns to new (%s)\n", (use_flags
== PAT_USE_MAIN
) ? "Main" : "Post"));
3724 for(pat
= first_pattern(&pstate
);
3726 pat
= next_pattern(&pstate
)){
3727 if((act
= pat
->action
) != NULL
){
3728 if(act
->is_a_score
&&
3729 add_to_pattern(pat
, ROLE_DO_SCORES
| use_flags
))
3730 rflags
|= ROLE_DO_SCORES
;
3735 if(write_patterns(rflags
| use_flags
))
3737 "Trouble converting scores patterns to new variable\n"));
3743 * set_old_growth_bits - Command used to set or unset old growth set
3747 set_old_growth_bits(struct pine
*ps
, int val
)
3751 for(i
= 1; i
<= F_FEATURE_LIST_COUNT
; i
++)
3752 if(test_old_growth_bits(ps
, i
))
3759 * test_old_growth_bits - Test to see if all the old growth bits are on,
3760 * *or* if a particular feature index is in the old
3763 * WEIRD ALERT: if index == F_OLD_GROWTH bit values are tested
3764 * otherwise a bits existence in the set is tested!!!
3766 * BUG: this will break if an old growth feature number is ever >= 32.
3769 test_old_growth_bits(struct pine
*ps
, int index
)
3772 * this list defines F_OLD_GROWTH set
3774 static unsigned long old_growth_bits
= ((1 << F_ENABLE_FULL_HDR
) |
3775 (1 << F_ENABLE_PIPE
) |
3776 (1 << F_ENABLE_TAB_COMPLETE
) |
3777 (1 << F_QUIT_WO_CONFIRM
) |
3778 (1 << F_ENABLE_JUMP
) |
3779 (1 << F_ENABLE_ALT_ED
) |
3780 (1 << F_ENABLE_BOUNCE
) |
3781 (1 << F_ENABLE_AGG_OPS
) |
3782 (1 << F_ENABLE_FLAG
) |
3783 (1 << F_CAN_SUSPEND
));
3787 if(index
== F_OLD_GROWTH
){
3788 for(index
= 1; index
<= F_FEATURE_LIST_COUNT
; index
++)
3789 if(((1 << index
) & old_growth_bits
) && F_OFF(index
, ps
))
3795 return((1 << index
) & old_growth_bits
);
3800 * Side effect is that the appropriate global variable is set, and the
3801 * appropriate current_val is set.
3804 cur_rule_value(struct variable
*var
, int expand
, int cmdline
)
3809 set_current_val(var
, expand
, cmdline
);
3811 if(var
== &ps_global
->vars
[V_SAVED_MSG_NAME_RULE
]){
3812 if(ps_global
->VAR_SAVED_MSG_NAME_RULE
)
3813 for(i
= 0; (v
= save_msg_rules(i
)); i
++)
3814 if(!strucmp(ps_global
->VAR_SAVED_MSG_NAME_RULE
, S_OR_L(v
))){
3815 ps_global
->save_msg_rule
= v
->value
;
3820 else if(var
== &ps_global
->vars
[V_COLOR_STYLE
]){
3821 if(ps_global
->VAR_COLOR_STYLE
)
3822 for(i
= 0; (v
= col_style(i
)); i
++)
3823 if(!strucmp(ps_global
->VAR_COLOR_STYLE
, S_OR_L(v
))){
3824 ps_global
->color_style
= v
->value
;
3829 else if(var
== &ps_global
->vars
[V_INDEX_COLOR_STYLE
]){
3830 if(ps_global
->VAR_INDEX_COLOR_STYLE
)
3831 for(i
= 0; (v
= index_col_style(i
)); i
++)
3832 if(!strucmp(ps_global
->VAR_INDEX_COLOR_STYLE
, S_OR_L(v
))){
3833 ps_global
->index_color_style
= v
->value
;
3837 else if(var
== &ps_global
->vars
[V_TITLEBAR_COLOR_STYLE
]){
3838 if(ps_global
->VAR_TITLEBAR_COLOR_STYLE
)
3839 for(i
= 0; (v
= titlebar_col_style(i
)); i
++)
3840 if(!strucmp(ps_global
->VAR_TITLEBAR_COLOR_STYLE
, S_OR_L(v
))){
3841 ps_global
->titlebar_color_style
= v
->value
;
3845 else if(var
== &ps_global
->vars
[V_FCC_RULE
]){
3846 if(ps_global
->VAR_FCC_RULE
)
3847 for(i
= 0; (v
= fcc_rules(i
)); i
++)
3848 if(!strucmp(ps_global
->VAR_FCC_RULE
, S_OR_L(v
))){
3849 ps_global
->fcc_rule
= v
->value
;
3853 else if(var
== &ps_global
->vars
[V_GOTO_DEFAULT_RULE
]){
3854 if(ps_global
->VAR_GOTO_DEFAULT_RULE
)
3855 for(i
= 0; (v
= goto_rules(i
)); i
++)
3856 if(!strucmp(ps_global
->VAR_GOTO_DEFAULT_RULE
, S_OR_L(v
))){
3857 ps_global
->goto_default_rule
= v
->value
;
3861 else if(var
== &ps_global
->vars
[V_INCOMING_STARTUP
]){
3862 if(ps_global
->VAR_INCOMING_STARTUP
)
3863 for(i
= 0; (v
= incoming_startup_rules(i
)); i
++)
3864 if(!strucmp(ps_global
->VAR_INCOMING_STARTUP
, S_OR_L(v
))){
3865 ps_global
->inc_startup_rule
= v
->value
;
3869 else if(var
== &ps_global
->vars
[V_PRUNING_RULE
]){
3870 if(ps_global
->VAR_PRUNING_RULE
)
3871 for(i
= 0; (v
= pruning_rules(i
)); i
++)
3872 if(!strucmp(ps_global
->VAR_PRUNING_RULE
, S_OR_L(v
))){
3873 ps_global
->pruning_rule
= v
->value
;
3877 else if(var
== &ps_global
->vars
[V_REOPEN_RULE
]){
3878 if(ps_global
->VAR_REOPEN_RULE
)
3879 for(i
= 0; (v
= reopen_rules(i
)); i
++)
3880 if(!strucmp(ps_global
->VAR_REOPEN_RULE
, S_OR_L(v
))){
3881 ps_global
->reopen_rule
= v
->value
;
3885 else if(var
== &ps_global
->vars
[V_FLD_SORT_RULE
]){
3886 if(ps_global
->VAR_FLD_SORT_RULE
)
3887 for(i
= 0; (v
= fld_sort_rules(i
)); i
++)
3888 if(!strucmp(ps_global
->VAR_FLD_SORT_RULE
, S_OR_L(v
))){
3889 ps_global
->fld_sort_rule
= v
->value
;
3893 else if(var
== &ps_global
->vars
[V_AB_SORT_RULE
]){
3894 if(ps_global
->VAR_AB_SORT_RULE
)
3895 for(i
= 0; (v
= ab_sort_rules(i
)); i
++)
3896 if(!strucmp(ps_global
->VAR_AB_SORT_RULE
, S_OR_L(v
))){
3897 ps_global
->ab_sort_rule
= v
->value
;
3901 else if(var
== &ps_global
->vars
[V_THREAD_DISP_STYLE
]){
3902 if(ps_global
->VAR_THREAD_DISP_STYLE
)
3903 for(i
= 0; (v
= thread_disp_styles(i
)); i
++)
3904 if(!strucmp(ps_global
->VAR_THREAD_DISP_STYLE
, S_OR_L(v
))){
3905 ps_global
->thread_disp_style
= v
->value
;
3909 else if(var
== &ps_global
->vars
[V_THREAD_INDEX_STYLE
]){
3910 if(ps_global
->VAR_THREAD_INDEX_STYLE
)
3911 for(i
= 0; (v
= thread_index_styles(i
)); i
++)
3912 if(!strucmp(ps_global
->VAR_THREAD_INDEX_STYLE
, S_OR_L(v
))){
3913 ps_global
->thread_index_style
= v
->value
;
3921 * Standard way to get at save message rules...
3924 save_msg_rules(int index
)
3926 static NAMEVAL_S save_rules
[] = {
3927 {"by-from", NULL
, SAV_RULE_FROM
},
3928 {"by-nick-of-from", NULL
, SAV_RULE_NICK_FROM_DEF
},
3929 {"by-nick-of-from-then-from", NULL
, SAV_RULE_NICK_FROM
},
3930 {"by-fcc-of-from", NULL
, SAV_RULE_FCC_FROM_DEF
},
3931 {"by-fcc-of-from-then-from", NULL
, SAV_RULE_FCC_FROM
},
3932 {"by-realname-of-from", NULL
, SAV_RULE_RN_FROM_DEF
},
3933 {"by-realname-of-from-then-from", NULL
, SAV_RULE_RN_FROM
},
3934 {"by-sender", NULL
, SAV_RULE_SENDER
},
3935 {"by-nick-of-sender", NULL
, SAV_RULE_NICK_SENDER_DEF
},
3936 {"by-nick-of-sender-then-sender", NULL
, SAV_RULE_NICK_SENDER
},
3937 {"by-fcc-of-sender", NULL
, SAV_RULE_FCC_SENDER_DEF
},
3938 {"by-fcc-of-sender-then-sender", NULL
, SAV_RULE_FCC_SENDER
},
3939 {"by-realname-of-sender", NULL
, SAV_RULE_RN_SENDER_DEF
},
3940 {"by-realname-of-sender-then-sender", NULL
, SAV_RULE_RN_SENDER
},
3941 {"by-recipient", NULL
, SAV_RULE_RECIP
},
3942 {"by-nick-of-recip", NULL
, SAV_RULE_NICK_RECIP_DEF
},
3943 {"by-nick-of-recip-then-recip", NULL
, SAV_RULE_NICK_RECIP
},
3944 {"by-fcc-of-recip", NULL
, SAV_RULE_FCC_RECIP_DEF
},
3945 {"by-fcc-of-recip-then-recip", NULL
, SAV_RULE_FCC_RECIP
},
3946 {"by-realname-of-recip", NULL
, SAV_RULE_RN_RECIP_DEF
},
3947 {"by-realname-of-recip-then-recip", NULL
, SAV_RULE_RN_RECIP
},
3948 {"by-replyto", NULL
, SAV_RULE_REPLYTO
},
3949 {"by-nick-of-replyto", NULL
, SAV_RULE_NICK_REPLYTO_DEF
},
3950 {"by-nick-of-replyto-then-replyto", NULL
, SAV_RULE_NICK_REPLYTO
},
3951 {"by-fcc-of-replyto", NULL
, SAV_RULE_FCC_REPLYTO_DEF
},
3952 {"by-fcc-of-replyto-then-replyto", NULL
, SAV_RULE_FCC_REPLYTO
},
3953 {"by-realname-of-replyto", NULL
, SAV_RULE_RN_REPLYTO_DEF
},
3954 {"by-realname-of-replyto-then-replyto", NULL
, SAV_RULE_RN_REPLYTO
},
3955 {"last-folder-used", NULL
, SAV_RULE_LAST
},
3956 {"default-folder", NULL
, SAV_RULE_DEFLT
}
3959 return((index
>= 0 && index
< (sizeof(save_rules
)/sizeof(save_rules
[0])))
3960 ? &save_rules
[index
] : NULL
);
3965 * Standard way to get at fcc rules...
3968 fcc_rules(int index
)
3970 static NAMEVAL_S f_rules
[] = {
3971 {"default-fcc", NULL
, FCC_RULE_DEFLT
},
3972 {"last-fcc-used", NULL
, FCC_RULE_LAST
},
3973 {"by-recipient", NULL
, FCC_RULE_RECIP
},
3974 {"by-nickname", NULL
, FCC_RULE_NICK
},
3975 {"by-nick-then-recip", NULL
, FCC_RULE_NICK_RECIP
},
3976 {"current-folder", NULL
, FCC_RULE_CURRENT
}
3979 return((index
>= 0 && index
< (sizeof(f_rules
)/sizeof(f_rules
[0])))
3980 ? &f_rules
[index
] : NULL
);
3985 * Standard way to get at addrbook sort rules...
3988 ab_sort_rules(int index
)
3990 static NAMEVAL_S ab_rules
[] = {
3991 {"fullname-with-lists-last", NULL
, AB_SORT_RULE_FULL_LISTS
},
3992 {"fullname", NULL
, AB_SORT_RULE_FULL
},
3993 {"nickname-with-lists-last", NULL
, AB_SORT_RULE_NICK_LISTS
},
3994 {"nickname", NULL
, AB_SORT_RULE_NICK
},
3995 {"dont-sort", NULL
, AB_SORT_RULE_NONE
}
3998 return((index
>= 0 && index
< (sizeof(ab_rules
)/sizeof(ab_rules
[0])))
3999 ? &ab_rules
[index
] : NULL
);
4004 * Standard way to get at color styles.
4007 col_style(int index
)
4009 static NAMEVAL_S col_styles
[] = {
4010 {"no-color", NULL
, COL_NONE
},
4011 {"use-termdef", NULL
, COL_TERMDEF
},
4012 {"force-ansi-8color", NULL
, COL_ANSI8
},
4013 {"force-ansi-16color", NULL
, COL_ANSI16
},
4014 {"force-xterm-256color", NULL
, COL_ANSI256
}
4017 return((index
>= 0 && index
< (sizeof(col_styles
)/sizeof(col_styles
[0])))
4018 ? &col_styles
[index
] : NULL
);
4023 * Standard way to get at index color styles.
4026 index_col_style(int index
)
4028 static NAMEVAL_S ind_col_styles
[] = {
4029 {"flip-colors", NULL
, IND_COL_FLIP
},
4030 {"reverse", NULL
, IND_COL_REV
},
4031 {"reverse-fg", NULL
, IND_COL_FG
},
4032 {"reverse-fg-no-ambiguity", NULL
, IND_COL_FG_NOAMBIG
},
4033 {"reverse-bg", NULL
, IND_COL_BG
},
4034 {"reverse-bg-no-ambiguity", NULL
, IND_COL_BG_NOAMBIG
}
4037 return((index
>= 0 && index
< (sizeof(ind_col_styles
)/sizeof(ind_col_styles
[0]))) ? &ind_col_styles
[index
] : NULL
);
4042 * Standard way to get at titlebar color styles.
4045 titlebar_col_style(int index
)
4047 static NAMEVAL_S tbar_col_styles
[] = {
4048 {"default", NULL
, TBAR_COLOR_DEFAULT
},
4049 {"indexline", NULL
, TBAR_COLOR_INDEXLINE
},
4050 {"reverse-indexline", NULL
, TBAR_COLOR_REV_INDEXLINE
}
4053 return((index
>= 0 && index
< (sizeof(tbar_col_styles
)/sizeof(tbar_col_styles
[0]))) ? &tbar_col_styles
[index
] : NULL
);
4058 * Standard way to get at folder sort rules...
4061 fld_sort_rules(int index
)
4063 static NAMEVAL_S fdl_rules
[] = {
4064 {"alphabetical", NULL
, FLD_SORT_ALPHA
},
4065 {"alpha-with-dirs-last", NULL
, FLD_SORT_ALPHA_DIR_LAST
},
4066 {"alpha-with-dirs-first", NULL
, FLD_SORT_ALPHA_DIR_FIRST
}
4069 return((index
>= 0 && index
< (sizeof(fdl_rules
)/sizeof(fdl_rules
[0])))
4070 ? &fdl_rules
[index
] : NULL
);
4075 * Standard way to get at incoming startup rules...
4078 incoming_startup_rules(int index
)
4080 static NAMEVAL_S is_rules
[] = {
4081 {"first-unseen", NULL
, IS_FIRST_UNSEEN
},
4082 {"first-recent", NULL
, IS_FIRST_RECENT
},
4083 {"first-important", NULL
, IS_FIRST_IMPORTANT
},
4084 {"first-important-or-unseen", NULL
, IS_FIRST_IMPORTANT_OR_UNSEEN
},
4085 {"first-important-or-recent", NULL
, IS_FIRST_IMPORTANT_OR_RECENT
},
4086 {"first", NULL
, IS_FIRST
},
4087 {"last", NULL
, IS_LAST
}
4090 return((index
>= 0 && index
< (sizeof(is_rules
)/sizeof(is_rules
[0])))
4091 ? &is_rules
[index
] : NULL
);
4096 startup_rules(int index
)
4098 static NAMEVAL_S is2_rules
[] = {
4099 {"first-unseen", NULL
, IS_FIRST_UNSEEN
},
4100 {"first-recent", NULL
, IS_FIRST_RECENT
},
4101 {"first-important", NULL
, IS_FIRST_IMPORTANT
},
4102 {"first-important-or-unseen", NULL
, IS_FIRST_IMPORTANT_OR_UNSEEN
},
4103 {"first-important-or-recent", NULL
, IS_FIRST_IMPORTANT_OR_RECENT
},
4104 {"first", NULL
, IS_FIRST
},
4105 {"last", NULL
, IS_LAST
},
4106 {"default", NULL
, IS_NOTSET
}
4109 return((index
>= 0 && index
< (sizeof(is2_rules
)/sizeof(is2_rules
[0])))
4110 ? &is2_rules
[index
] : NULL
);
4115 * Standard way to get at pruning-rule values.
4118 pruning_rules(int index
)
4120 static NAMEVAL_S pr_rules
[] = {
4121 {"ask about rename, ask about deleting","ask-ask", PRUNE_ASK_AND_ASK
},
4122 {"ask about rename, don't delete", "ask-no", PRUNE_ASK_AND_NO
},
4123 {"always rename, ask about deleting", "yes-ask", PRUNE_YES_AND_ASK
},
4124 {"always rename, don't delete", "yes-no", PRUNE_YES_AND_NO
},
4125 {"don't rename, ask about deleting", "no-ask", PRUNE_NO_AND_ASK
},
4126 {"don't rename, don't delete", "no-no", PRUNE_NO_AND_NO
}
4129 return((index
>= 0 && index
< (sizeof(pr_rules
)/sizeof(pr_rules
[0])))
4130 ? &pr_rules
[index
] : NULL
);
4135 * Standard way to get at reopen-rule values.
4138 reopen_rules(int index
)
4140 static NAMEVAL_S ro_rules
[] = {
4141 /* TRANSLATORS: short description of a feature option */
4142 {"Always reopen", "yes-yes",
4144 /* TRANSLATORS: short description of a feature option, default in brackets */
4145 {"Yes for POP/NNTP, Ask about other remote [Yes]", "yes-ask-y",
4147 /* TRANSLATORS: short description of a feature option, default in brackets */
4148 {"Yes for POP/NNTP, Ask about other remote [No]", "yes-ask-n",
4150 /* TRANSLATORS: short description of a feature option */
4151 {"Yes for POP/NNTP, No for other remote", "yes-no",
4153 /* TRANSLATORS: short description of a feature option, default in brackets */
4154 {"Always ask [Yes]", "ask-ask-y",
4156 /* TRANSLATORS: short description of a feature option, default in brackets */
4157 {"Always ask [No]", "ask-ask-n",
4159 /* TRANSLATORS: short description of a feature option, default in brackets */
4160 {"Ask about POP/NNTP [Yes], No for other remote", "ask-no-y",
4162 /* TRANSLATORS: short description of a feature option, default in brackets */
4163 {"Ask about POP/NNTP [No], No for other remote", "ask-no-n",
4165 /* TRANSLATORS: short description of a feature option */
4166 {"Never reopen", "no-no",
4170 return((index
>= 0 && index
< (sizeof(ro_rules
)/sizeof(ro_rules
[0])))
4171 ? &ro_rules
[index
] : NULL
);
4176 * Standard way to get at thread_disp_style values.
4179 thread_disp_styles(int index
)
4181 static NAMEVAL_S td_styles
[] = {
4182 {"none", "none", THREAD_NONE
},
4183 {"show-thread-structure", "struct", THREAD_STRUCT
},
4184 {"mutt-like", "mutt", THREAD_MUTTLIKE
},
4185 {"indent-subject-1", "subj1", THREAD_INDENT_SUBJ1
},
4186 {"indent-subject-2", "subj2", THREAD_INDENT_SUBJ2
},
4187 {"indent-from-1", "from1", THREAD_INDENT_FROM1
},
4188 {"indent-from-2", "from2", THREAD_INDENT_FROM2
},
4189 {"show-structure-in-from", "struct-from", THREAD_STRUCT_FROM
}
4192 return((index
>= 0 && index
< (sizeof(td_styles
)/sizeof(td_styles
[0])))
4193 ? &td_styles
[index
] : NULL
);
4198 * Standard way to get at thread_index_style values.
4201 thread_index_styles(int index
)
4203 static NAMEVAL_S ti_styles
[] = {
4204 {"regular-index-with-expanded-threads", "exp", THRDINDX_EXP
},
4205 {"regular-index-with-collapsed-threads","coll", THRDINDX_COLL
},
4206 {"separate-index-screen-always", "sep", THRDINDX_SEP
},
4207 {"separate-index-screen-except-for-single-messages","sep-auto",
4211 return((index
>= 0 && index
< (sizeof(ti_styles
)/sizeof(ti_styles
[0])))
4212 ? &ti_styles
[index
] : NULL
);
4217 * Standard way to get at goto default rules...
4220 goto_rules(int index
)
4222 static NAMEVAL_S g_rules
[] = {
4223 {"folder-in-first-collection", NULL
, GOTO_FIRST_CLCTN
},
4224 {"inbox-or-folder-in-first-collection", NULL
, GOTO_INBOX_FIRST_CLCTN
},
4225 {"inbox-or-folder-in-recent-collection", NULL
, GOTO_INBOX_RECENT_CLCTN
},
4226 {"first-collection-with-inbox-default", NULL
, GOTO_FIRST_CLCTN_DEF_INBOX
},
4227 {"most-recent-folder", NULL
, GOTO_LAST_FLDR
}
4230 return((index
>= 0 && index
< (sizeof(g_rules
)/sizeof(g_rules
[0])))
4231 ? &g_rules
[index
] : NULL
);
4236 pat_fldr_types(int index
)
4238 static NAMEVAL_S pat_fldr_list
[] = {
4239 {"Any", "ANY", FLDR_ANY
},
4240 {"News", "NEWS", FLDR_NEWS
},
4241 {"Email", "EMAIL", FLDR_EMAIL
},
4242 {"Specific (Enter Incoming Nicknames or use ^T)", "SPEC", FLDR_SPECIFIC
}
4245 return((index
>= 0 &&
4246 index
< (sizeof(pat_fldr_list
)/sizeof(pat_fldr_list
[0])))
4247 ? &pat_fldr_list
[index
] : NULL
);
4252 inabook_fldr_types(int indexarg
)
4254 static NAMEVAL_S inabook_fldr_list
[] = {
4255 {"Don't care, always matches", "E", IAB_EITHER
},
4256 {"Yes, in any address book", "YES", IAB_YES
},
4257 {"No, not in any address book", "NO", IAB_NO
},
4258 {"Yes, in specific address books", "SYES", IAB_SPEC_YES
},
4259 {"No, not in any of specific address books", "SNO", IAB_SPEC_NO
}
4262 int index
= indexarg
& IAB_TYPE_MASK
;
4264 return((index
>= 0 &&
4265 index
< (sizeof(inabook_fldr_list
)/sizeof(inabook_fldr_list
[0])))
4266 ? &inabook_fldr_list
[index
] : NULL
);
4271 filter_types(int index
)
4273 static NAMEVAL_S filter_type_list
[] = {
4274 {"Just Set Message Status", "NONE", FILTER_STATE
},
4275 {"Delete", "DEL", FILTER_KILL
},
4276 {"Move (Enter folder name(s) in primary collection, or use ^T)",
4277 "FLDR", FILTER_FOLDER
}
4280 return((index
>= 0 &&
4281 index
< (sizeof(filter_type_list
)/sizeof(filter_type_list
[0])))
4282 ? &filter_type_list
[index
] : NULL
);
4287 role_repl_types(int index
)
4289 static NAMEVAL_S role_repl_list
[] = {
4290 {"Never", "NO", ROLE_REPL_NO
},
4291 {"With confirmation", "YES", ROLE_REPL_YES
},
4292 {"Without confirmation", "NC", ROLE_REPL_NOCONF
}
4295 return((index
>= 0 &&
4296 index
< (sizeof(role_repl_list
)/sizeof(role_repl_list
[0])))
4297 ? &role_repl_list
[index
] : NULL
);
4302 role_forw_types(int index
)
4304 static NAMEVAL_S role_forw_list
[] = {
4305 {"Never", "NO", ROLE_FORW_NO
},
4306 {"With confirmation", "YES", ROLE_FORW_YES
},
4307 {"Without confirmation", "NC", ROLE_FORW_NOCONF
}
4310 return((index
>= 0 &&
4311 index
< (sizeof(role_forw_list
)/sizeof(role_forw_list
[0])))
4312 ? &role_forw_list
[index
] : NULL
);
4317 role_comp_types(int index
)
4319 static NAMEVAL_S role_comp_list
[] = {
4320 {"Never", "NO", ROLE_COMP_NO
},
4321 {"With confirmation", "YES", ROLE_COMP_YES
},
4322 {"Without confirmation", "NC", ROLE_COMP_NOCONF
}
4325 return((index
>= 0 &&
4326 index
< (sizeof(role_comp_list
)/sizeof(role_comp_list
[0])))
4327 ? &role_comp_list
[index
] : NULL
);
4332 role_status_types(int index
)
4334 static NAMEVAL_S role_status_list
[] = {
4335 {"Don't care, always matches", "E", PAT_STAT_EITHER
},
4336 {"Yes", "YES", PAT_STAT_YES
},
4337 {"No", "NO", PAT_STAT_NO
}
4340 return((index
>= 0 &&
4341 index
< (sizeof(role_status_list
)/sizeof(role_status_list
[0])))
4342 ? &role_status_list
[index
] : NULL
);
4347 msg_state_types(int index
)
4349 static NAMEVAL_S msg_state_list
[] = {
4350 {"Don't change it", "LV", ACT_STAT_LEAVE
},
4351 {"Set this state", "SET", ACT_STAT_SET
},
4352 {"Clear this state", "CLR", ACT_STAT_CLEAR
}
4355 return((index
>= 0 &&
4356 index
< (sizeof(msg_state_list
)/sizeof(msg_state_list
[0])))
4357 ? &msg_state_list
[index
] : NULL
);
4363 ldap_search_rules(int index
)
4365 static NAMEVAL_S ldap_search_list
[] = {
4366 {"contains", NULL
, LDAP_SRCH_CONTAINS
},
4367 {"equals", NULL
, LDAP_SRCH_EQUALS
},
4368 {"begins-with", NULL
, LDAP_SRCH_BEGINS
},
4369 {"ends-with", NULL
, LDAP_SRCH_ENDS
}
4372 return((index
>= 0 &&
4373 index
< (sizeof(ldap_search_list
)/sizeof(ldap_search_list
[0])))
4374 ? &ldap_search_list
[index
] : NULL
);
4379 ldap_search_types(int index
)
4381 static NAMEVAL_S ldap_types_list
[] = {
4382 {"name", NULL
, LDAP_TYPE_CN
},
4383 {"surname", NULL
, LDAP_TYPE_SUR
},
4384 {"givenname", NULL
, LDAP_TYPE_GIVEN
},
4385 {"email", NULL
, LDAP_TYPE_EMAIL
},
4386 {"name-or-email", NULL
, LDAP_TYPE_CN_EMAIL
},
4387 {"surname-or-givenname", NULL
, LDAP_TYPE_SUR_GIVEN
},
4388 {"sur-or-given-or-name-or-email", NULL
, LDAP_TYPE_SEVERAL
}
4391 return((index
>= 0 &&
4392 index
< (sizeof(ldap_types_list
)/sizeof(ldap_types_list
[0])))
4393 ? &ldap_types_list
[index
] : NULL
);
4398 ldap_search_scope(int index
)
4400 static NAMEVAL_S ldap_scope_list
[] = {
4401 {"base", NULL
, LDAP_SCOPE_BASE
},
4402 {"onelevel", NULL
, LDAP_SCOPE_ONELEVEL
},
4403 {"subtree", NULL
, LDAP_SCOPE_SUBTREE
}
4406 return((index
>= 0 &&
4407 index
< (sizeof(ldap_scope_list
)/sizeof(ldap_scope_list
[0])))
4408 ? &ldap_scope_list
[index
] : NULL
);
4414 * Choose from the global default, command line args, pinerc values to set
4415 * the actual value of the variable that we will use. Start at the top
4416 * and work down from higher to lower precedence.
4417 * For lists, we may inherit values from lower precedence
4418 * versions if that's the way the user specifies it.
4419 * The user can put INHERIT_DEFAULT as the first entry in a list and that
4420 * means it will inherit the current values, for example the values
4421 * from the global_val, or the value from the main_user_val could be
4422 * inherited in the post_user_val.
4425 set_current_val(struct variable
*var
, int expand
, int cmdline
)
4427 int is_set
[5], is_inherit
[5];
4428 int i
, j
, k
, cnt
, start
;
4429 char **tmp
, **t
, **list
[5];
4433 "set_current_val(var=%s%s, expand=%d, cmdline=%d)\n",
4434 (var
&& var
->name
) ? var
->name
: "?",
4435 (var
&& var
->is_list
) ? " (list)" : "",
4441 if(var
->is_list
){ /* variable is a list */
4443 for(j
= 0; j
< 5; j
++){
4444 t
= j
==0 ? var
->global_val
.l
:
4445 j
==1 ? var
->main_user_val
.l
:
4446 j
==2 ? var
->post_user_val
.l
:
4447 j
==3 ? ((cmdline
) ? var
->cmdline_val
.l
: NULL
) :
4450 is_set
[j
] = is_inherit
[j
] = 0;
4459 for(i
= 0; t
[i
]; i
++){
4460 if(expand_variables(tmp_20k_buf
, SIZEOF_20KBUF
, t
[i
],
4462 /* successful expand */
4470 if(list
[j
] && list
[j
][0] && !strcmp(list
[j
][0],INHERIT
))
4477 /* count how many items in current_val list */
4478 /* Admin wants default, which is global_val. */
4479 if(var
->is_fixed
&& var
->fixed_val
.l
== NULL
){
4482 for(; list
[0][cnt
]; cnt
++)
4487 for(j
= 0; j
< 5; j
++){
4490 cnt
= 0; /* reset */
4494 for(i
= is_inherit
[j
] ? 1 : 0; list
[j
][i
]; i
++)
4500 free_list_array(&var
->current_val
.l
); /* clean up any old values */
4502 /* check to see if anything is set */
4503 if(is_set
[0] + is_set
[1] + is_set
[2] + is_set
[3] + is_set
[4] > 0){
4504 var
->current_val
.l
= (char **)fs_get((cnt
+1)*sizeof(char *));
4505 tmp
= var
->current_val
.l
;
4506 if(var
->is_fixed
&& var
->fixed_val
.l
== NULL
){
4508 for(i
= 0; list
[0][i
]; i
++){
4510 *tmp
++ = cpystr(list
[0][i
]);
4511 else if(expand_variables(tmp_20k_buf
, SIZEOF_20KBUF
,
4513 *tmp
++ = cpystr(tmp_20k_buf
);
4518 for(j
= start
; j
< 5; j
++){
4520 for(i
= is_inherit
[j
] ? 1 : 0; list
[j
][i
]; i
++){
4522 *tmp
++ = cpystr(list
[j
][i
]);
4523 else if(expand_variables(tmp_20k_buf
,SIZEOF_20KBUF
,
4525 *tmp
++ = cpystr(tmp_20k_buf
);
4534 var
->current_val
.l
= NULL
;
4536 else{ /* variable is not a list */
4537 char *strvar
= NULL
;
4539 for(j
= 0; j
< 5; j
++){
4541 p
= j
==0 ? var
->fixed_val
.p
:
4542 j
==1 ? ((cmdline
) ? var
->cmdline_val
.p
: NULL
) :
4543 j
==2 ? var
->post_user_val
.p
:
4544 j
==3 ? var
->main_user_val
.p
:
4555 else if(expand_variables(tmp_20k_buf
, SIZEOF_20KBUF
, p
,
4556 (var
== &ps_global
->vars
[V_MAILCAP_PATH
] ||
4557 var
== &ps_global
->vars
[V_MIMETYPE_PATH
]))){
4565 /* Admin wants default, which is global_val. */
4566 if(var
->is_fixed
&& var
->fixed_val
.p
== NULL
)
4567 strvar
= var
->global_val
.p
;
4569 if(var
->current_val
.p
) /* free previous value */
4570 fs_give((void **)&var
->current_val
.p
);
4574 var
->current_val
.p
= cpystr(strvar
);
4576 expand_variables(tmp_20k_buf
, SIZEOF_20KBUF
, strvar
,
4577 (var
== &ps_global
->vars
[V_MAILCAP_PATH
] ||
4578 var
== &ps_global
->vars
[V_MIMETYPE_PATH
]));
4579 var
->current_val
.p
= cpystr(tmp_20k_buf
);
4583 var
->current_val
.p
= NULL
;
4586 if(var
->is_fixed
&& !is_inherit
[4]){
4588 int fixed_len
, user_len
;
4591 * sys mgr fixed this variable and user is trying to change it
4593 for(k
= 1; !(ps_global
->give_fixed_warning
&&
4594 ps_global
->fix_fixed_warning
) && k
<= 3; k
++){
4597 t
= k
==1 ? ((cmdline
) ? var
->cmdline_val
.l
: NULL
) :
4598 k
==2 ? var
->post_user_val
.l
:
4599 var
->main_user_val
.l
;
4601 /* If same length and same contents, don't warn. */
4602 for(flist
=var
->fixed_val
.l
; flist
&& *flist
; flist
++)
4603 ;/* just counting */
4605 fixed_len
= var
->fixed_val
.l
? (flist
- var
->fixed_val
.l
)
4607 for(flist
=t
; flist
&& *flist
; flist
++)
4608 ;/* just counting */
4610 user_len
= t
? (flist
- t
) : 0;
4611 if(user_len
== fixed_len
){
4612 for(i
=0; i
< user_len
; i
++){
4613 for(j
=0; j
< user_len
; j
++)
4614 if(!strucmp(t
[i
], var
->fixed_val
.l
[j
]))
4618 ps_global
->give_fixed_warning
= 1;
4620 ps_global
->fix_fixed_warning
= 1;
4627 ps_global
->give_fixed_warning
= 1;
4629 ps_global
->fix_fixed_warning
= 1;
4633 p
= k
==1 ? ((cmdline
) ? var
->cmdline_val
.p
: NULL
) :
4634 k
==2 ? var
->post_user_val
.p
:
4635 var
->main_user_val
.p
;
4637 if((var
->fixed_val
.p
&& !p
) ||
4638 (!var
->fixed_val
.p
&& p
) ||
4639 (var
->fixed_val
.p
&& p
&& strucmp(var
->fixed_val
.p
, p
))){
4640 ps_global
->give_fixed_warning
= 1;
4642 ps_global
->fix_fixed_warning
= 1;
4652 set_news_spec_current_val(int expand
, int cmdline
)
4654 struct variable
*newsvar
= &ps_global
->vars
[V_NEWS_SPEC
];
4655 struct variable
*fvar
= &ps_global
->vars
[V_FOLDER_SPEC
];
4657 /* check to see if it has a value */
4658 set_current_val(newsvar
, expand
, cmdline
);
4661 * If no value, we might want to fake a value. We'll do that if
4662 * there is no news collection already defined in FOLDER_SPEC and if
4663 * there is also an NNTP_SERVER defined.
4665 if(!newsvar
->current_val
.l
&& ps_global
->VAR_NNTP_SERVER
&&
4666 ps_global
->VAR_NNTP_SERVER
[0] && ps_global
->VAR_NNTP_SERVER
[0][0] &&
4667 !news_in_folders(fvar
)){
4670 newsvar
->global_val
.l
= (char **)fs_get(2 * sizeof(char *));
4671 snprintf(buf
, sizeof(buf
), "{%.*s/nntp}#news.[]", sizeof(buf
)-20,
4672 ps_global
->VAR_NNTP_SERVER
[0]);
4673 newsvar
->global_val
.l
[0] = cpystr(buf
);
4674 newsvar
->global_val
.l
[1] = NULL
;
4675 set_current_val(newsvar
, expand
, cmdline
);
4677 * But we're going to get rid of the fake global_val in case
4680 free_list_array(&newsvar
->global_val
.l
);
4686 * Feature-list has to be handled separately from the other variables
4687 * because it is additive. The other variables choose one of command line,
4688 * or pine.conf, or pinerc. Feature list adds them. This could easily be
4689 * converted to a general purpose routine if we add more additive variables.
4691 * This works by replacing earlier values with later ones. That is, command
4692 * line settings have higher precedence than global settings and that is
4693 * accomplished by putting the command line features after the global
4694 * features in the list. When they are processed, the last one wins.
4696 * Feature-list also has a backwards compatibility hack.
4699 set_feature_list_current_val(struct variable
*var
)
4707 /* count the lists so we can allocate */
4708 for(m
= 0; m
< 6; m
++){
4709 list
= m
==0 ? var
->global_val
.l
:
4710 m
==1 ? var
->main_user_val
.l
:
4711 m
==2 ? var
->post_user_val
.l
:
4712 m
==3 ? ps_global
->feat_list_back_compat
:
4713 m
==4 ? var
->cmdline_val
.l
:
4716 for(i
= 0; list
[i
]; i
++)
4720 list_fixed
= var
->fixed_val
.l
;
4722 if(var
->current_val
.l
)
4723 free_list_array(&var
->current_val
.l
);
4725 var
->current_val
.l
= (char **)fs_get((elems
+1) * sizeof(char *));
4728 * We need to warn the user if the sys mgr has restricted him or her
4729 * from changing a feature that he or she is trying to change.
4731 * We're not catching the old-growth macro since we're just comparing
4732 * strings. That is, it works correctly, but the user won't be warned
4733 * if the user old-growth and the mgr says no-quit-without-confirm.
4737 strncpy(no_allow
, "no-", 3);
4738 strncpy(no_allow
+3, feature_list_name(F_ALLOW_CHANGING_FROM
), sizeof(no_allow
)-3-1);
4739 no_allow
[sizeof(no_allow
)-1] = '\0';
4741 for(m
= 0; m
< 6; m
++){
4742 list
= m
==0 ? var
->global_val
.l
:
4743 m
==1 ? var
->main_user_val
.l
:
4744 m
==2 ? var
->post_user_val
.l
:
4745 m
==3 ? ps_global
->feat_list_back_compat
:
4746 m
==4 ? var
->cmdline_val
.l
:
4749 for(i
= 0; list
[i
]; i
++){
4750 var
->current_val
.l
[j
++] = cpystr(list
[i
]);
4752 /* this is the warning section */
4753 if(m
>= 1 && m
<= 4){
4754 for(k
= 0; list_fixed
&& list_fixed
[k
]; k
++){
4758 if(!struncmp(p
, "no-", 3))
4760 if(!struncmp(q
, "no-", 3))
4762 if(!strucmp(q
, p
) && strucmp(list
[i
], list_fixed
[k
])){
4763 ps_global
->give_fixed_warning
= 1;
4765 ps_global
->fix_fixed_warning
= 1;
4769 else if(m
== 5 && !strucmp(list
[i
], no_allow
))
4770 ps_global
->never_allow_changing_from
= 1;
4774 #ifdef NEVER_ALLOW_CHANGING_FROM
4775 ps_global
->never_allow_changing_from
= 1;
4778 var
->current_val
.l
[j
] = NULL
;
4783 /*----------------------------------------------------------------------
4785 Expand Metacharacters/variables in file-names
4787 Read input line and expand shell-variables/meta-characters
4789 <input> <replaced by>
4790 $variable getenv("variable")
4791 ${variable} getenv("variable")
4792 ${variable:-defvalue} is getenv("variable") if variable is defined and
4793 is defvalue otherwise
4796 <others> <just copied>
4798 NOTE handling of braces in ${name} doesn't check much or do error recovery
4800 If colon_path is set, then we expand ~ not only at the start of linein,
4801 but also after each : in the path.
4804 #define is_allowed_envchar(C, S) ((S) == 0 ? !isspace((C)) && (C) != '/'\
4805 : (((C) >= 'a' && (C) <= 'z') \
4806 || ((C) >= 'A' && (C) <= 'Z') \
4807 || ((C) >= '0' && (C) <= '9')))
4810 expand_variables(char *lineout
, size_t lineoutlen
, char *linein
, int colon_path
)
4812 char *src
= linein
, *dest
= lineout
, *p
;
4813 char *limit
= lineout
+ lineoutlen
;
4814 int envexpand
= 0, sp
;
4819 sp
= strncmp(src
,"LIT:pattern=\"/NICK=", strlen("LIT:pattern=\"/NICK=")) == 0;
4820 while(*src
){ /* something in input string */
4821 if(*src
== '$' && *(src
+1) == '$'){
4823 * $$ to escape chars we're interested in, else
4824 * it's up to the user of the variable to handle the
4828 *dest
++ = *++src
; /* copy next as is */
4830 #if !(defined(DOS) || defined(OS2))
4831 if(*src
== '\\' && *(src
+1) == '$'){
4833 * backslash to escape chars we're interested in, else
4834 * it's up to the user of the variable to handle the
4838 *dest
++ = *++src
; /* copy next as is */
4839 }else if(*src
== '~' &&
4840 (src
== linein
|| (colon_path
&& *(src
-1) == ':'))){
4844 for(i
= 0; i
< sizeof(buf
)-1 && src
[i
] && src
[i
] != '/'; i
++)
4847 src
+= i
; /* advance src pointer */
4848 buf
[i
] = '\0'; /* tie off buf string */
4849 fnexpand(buf
, sizeof(buf
)); /* expand the path */
4851 for(p
= buf
; dest
< limit
&& (*dest
= *p
); p
++, dest
++)
4857 if(*src
== '$'){ /* shell variable */
4858 char word
[128+1], *colon
= NULL
, *rbrace
= NULL
;
4860 envexpand
++; /* signal that we've expanded a var */
4861 src
++; /* skip dollar */
4862 if(*src
== '{'){ /* starts with brace? */
4864 rbrace
= strindex(src
, '}');
4866 /* look for default value */
4867 colon
= strstr(src
, ":-");
4868 if(colon
&& (rbrace
< colon
))
4875 /* put the env variable to be looked up in word */
4878 && (p
-word
< sizeof(word
)-1)
4879 && ((colon
&& src
< colon
) || (!colon
&& src
< rbrace
))){
4880 if(isspace((unsigned char) *src
)){
4882 * Illegal input. This should be an error of some
4883 * sort but instead of that we'll just backup to the
4884 * $ and treat it like it wasn't there.
4896 /* adjust src for next char */
4900 while(*src
&& is_allowed_envchar((unsigned char) *src
, sp
)
4901 && (p
-word
< sizeof(word
)-1))
4907 if((p
= getenv(word
)) != NULL
){ /* check for word in environment */
4908 while(*p
&& dest
< limit
)
4911 else if(colon
){ /* else possible default value */
4913 while(*p
&& p
< rbrace
&& dest
< limit
)
4918 }else{ /* other cases: just copy */
4924 if(*src
) /* next character (if any) */
4931 lineout
[lineoutlen
-1] = '\0';
4933 return((envexpand
&& lineout
[0] == '\0') ? NULL
: lineout
);
4937 /*----------------------------------------------------------------------
4938 Sets login, full_username and home_dir
4940 Args: ps -- The Pine structure to put the user name, etc in
4942 Result: sets the fullname, login and home_dir field of the pine structure
4943 returns 0 on success, -1 if not.
4945 #define MAX_INIT_ERRS 10
4947 init_error(struct pine
*ps
, int flags
, int min_time
, int max_time
, char *message
)
4952 ps
->init_errs
= (INIT_ERR_S
*)fs_get((MAX_INIT_ERRS
+ 1) *
4953 sizeof(*ps
->init_errs
));
4954 memset(ps
->init_errs
, 0, (MAX_INIT_ERRS
+ 1) * sizeof(*ps
->init_errs
));
4957 for(i
= 0; i
< MAX_INIT_ERRS
; i
++)
4958 if(!(ps
->init_errs
)[i
].message
){
4959 (ps
->init_errs
)[i
].message
= cpystr(message
);
4960 (ps
->init_errs
)[i
].min_time
= min_time
;
4961 (ps
->init_errs
)[i
].max_time
= max_time
;
4962 (ps
->init_errs
)[i
].flags
= flags
;
4963 dprint((2, "%s\n", message
? message
: "?"));
4969 /*----------------------------------------------------------------------
4970 Read and parse a pinerc file
4972 Args: Filename -- name of the .pinerc file to open and read
4973 vars -- The vars structure to store values in
4974 which_vars -- Whether the local or global values are being read
4978 This may be the local file or the global file. The values found are
4979 merged with the values currently in vars. All values are strings and
4980 are malloced; and existing values will be freed before the assignment.
4981 Those that are <unset> will be left unset; their values will be NULL.
4984 read_pinerc(PINERC_S
*prc
, struct variable
*vars
, ParsePinerc which_vars
)
4986 char *filename
, *file
, *value
, **lvalue
, *line
, *error
;
4987 char *p
, *p1
, *free_file
= NULL
;
4989 PINERC_LINE
*pline
= NULL
;
4990 int line_count
, was_quoted
;
4996 dprint((2, "reading_pinerc \"%s\"\n",
4997 prc
->name
? prc
->name
: "?"));
4999 if(prc
->type
== Loc
){
5000 filename
= prc
->name
? prc
->name
: "";
5001 file
= free_file
= read_file(filename
, 0);
5004 * This is questionable. In case the user edits the pinerc
5005 * in Windows and adds a UTF-8 BOM, we skip it here. If the
5006 * user adds a Unicode BOM we're in trouble. We could write it
5007 * with the BOM ourselves but so far we leave it BOMless in
5008 * order that it's the same on Unix and Windows.
5014 if((file
= read_remote_pinerc(prc
, which_vars
)) != NULL
)
5015 ps_global
->c_client_error
[0] = '\0';
5020 if(file
== NULL
|| *file
== '\0'){
5023 dprint((2, "Open failed: %s\n", error_description(errno
)));
5026 if(prc
->type
== Loc
){
5027 dprint((1, "Read_pinerc: empty pinerc (new?)\n"));
5030 dprint((1, "Read_pinerc: new remote pinerc\n"));
5035 if(which_vars
== ParsePers
){
5036 /* problems getting remote config */
5037 if(file
== NULL
&& prc
->type
== RemImap
){
5038 if(!pith_opt_remote_pinerc_failure
5039 || !(*pith_opt_remote_pinerc_failure
)())
5040 exceptional_exit(_("Unable to read or write remote configuration"), -1);
5043 ps_global
->first_time_user
= 1;
5044 prc
->outstanding_pinerc_changes
= 1;
5050 if(prc
->type
== Loc
&&
5051 (which_vars
== ParseFixed
|| which_vars
== ParseGlobal
||
5052 (can_access(filename
, ACCESS_EXISTS
) == 0 &&
5053 can_access(filename
, EDIT_ACCESS
) != 0))){
5055 if(prc
== ps_global
->prc
)
5056 ps_global
->readonly_pinerc
= 1;
5060 * accept CRLF or LF newlines
5062 for(p
= file
; *p
&& *p
!= '\012'; p
++)
5065 if(p
> file
&& *p
&& *(p
-1) == '\015') /* cvt crlf to lf */
5066 for(p1
= p
- 1; (*p1
= *p
) != '\0'; p
++)
5067 if(!(*p
== '\015' && *(p
+1) == '\012'))
5071 dprint((2, "Read %d characters:\n", strlen(file
)));
5073 if(which_vars
== ParsePers
|| which_vars
== ParsePersPost
){
5074 /*--- Count up lines and allocate structures */
5075 for(line_count
= 0, p
= file
; *p
!= '\0'; p
++)
5079 prc
->pinerc_lines
= (PINERC_LINE
*)
5080 fs_get((3 + line_count
) * sizeof(PINERC_LINE
));
5081 memset((void *)prc
->pinerc_lines
, 0,
5082 (3 + line_count
) * sizeof(PINERC_LINE
));
5083 pline
= prc
->pinerc_lines
;
5086 for(p
= file
, line
= file
; *p
!= '\0';){
5087 /*----- Grab the line ----*/
5089 while(*p
&& *p
!= '\n')
5095 /*----- Comment Line -----*/
5097 /* no comments in remote pinercs */
5098 if(pline
&& prc
->type
== Loc
){
5100 pline
->line
= cpystr(line
);
5106 if(*line
== '\0' || *line
== '\t' || *line
== ' '){
5108 while(*p1
== '\t' || *p1
== ' ')
5112 * This could be a continuation line from some future
5113 * version of pine, or it could be a continuation line
5114 * from a PC-Pine variable we don't know about in unix.
5117 pline
->line
= cpystr(line
);
5119 pline
->line
= cpystr("");
5126 /*----- look up matching 'v' and leave "value" after '=' ----*/
5127 for(v
= vars
; *line
&& v
->name
; v
++)
5128 if((i
= strlen(v
->name
)) < strlen(line
) && !struncmp(v
->name
,line
,i
)){
5131 for(j
= i
; line
[j
] == ' ' || line
[j
] == '\t'; j
++)
5134 if(line
[j
] == '='){ /* bingo! */
5135 for(value
= &line
[j
+1];
5136 *value
== ' ' || *value
== '\t';
5142 /* else either unrecognized var or bogus line */
5145 /*----- Didn't match any variable or bogus format -----*/
5147 * This could be a variable from some future
5148 * version of pine, or it could be a PC-Pine variable
5149 * we don't know about in unix. Either way, we want to preserve
5155 pline
->line
= cpystr(line
);
5162 * Previous versions have caused duplicate pinerc data to be
5163 * written to pinerc files. This clause erases the duplicate
5164 * information when we read it, and it will be removed from the file
5165 * if we call write_pinerc. We test to see if the same variable
5166 * appears later in the file, if so, we skip over it here.
5167 * We don't care about duplicates if this isn't a pinerc we might
5168 * write out, so include pline in the conditional.
5169 * Note that we will leave all of the duplicate comments and blank
5170 * lines in the file unless it is a remote pinerc. Luckily, the
5171 * bug that caused the duplicates only applied to remote pinercs,
5172 * so we should have that case covered.
5174 * If we find a duplicate, we point p to the start
5175 * of the next line that should be considered, and then skip back
5176 * to the top of the loop.
5178 if(pline
&& var_is_in_rest_of_file(v
->name
, p
)){
5180 p
= skip_over_this_var(line
, p
);
5186 /*----- Obsolete variable, read it anyway below, might use it -----*/
5189 pline
->obsolete_var
= 1;
5190 pline
->line
= cpystr(line
);
5195 /*----- Variable is in the list but unused for some reason -----*/
5199 pline
->line
= cpystr(line
);
5205 /*--- Var is not user controlled, leave it alone for back compat ---*/
5206 if(!v
->is_user
&& pline
){
5208 pline
->line
= cpystr(line
);
5213 if(which_vars
== ParseFixed
)
5216 /*---- variable is unset, or it's global but expands to nothing ----*/
5218 || (which_vars
== ParseGlobal
5219 && !expand_variables(tmp_20k_buf
, SIZEOF_20KBUF
, value
,
5220 (v
== &ps_global
->vars
[V_MAILCAP_PATH
] ||
5221 v
== &ps_global
->vars
[V_MIMETYPE_PATH
])))){
5222 if(v
->is_user
&& pline
){
5230 /*--value is non-empty, store it handling quotes and trailing space--*/
5231 if(*value
== '"' && !v
->is_list
&& v
->del_quotes
){
5234 for(p1
= value
; *p1
&& *p1
!= '"'; p1
++);
5238 removing_trailing_white_space(value
);
5243 * List Entry Parsing
5245 * The idea is to parse a comma separated list of
5246 * elements, preserving quotes, and understanding
5247 * continuation lines (that is ',' == "\n ").
5248 * Quotes must be balanced within elements. Space
5249 * within elements is preserved, but leading and trailing
5250 * space is trimmed. This is a generic function, and it's
5251 * left to the the functions that use the lists to make sure
5252 * they contain valid data...
5259 while(1){ /* generous count of list elements */
5260 if(*p1
== '"') /* ignore ',' if quoted */
5261 was_quoted
= (was_quoted
) ? 0 : 1 ;
5263 if((*p1
== ',' && !was_quoted
) || *p1
== '\n' || *p1
== '\0')
5264 line_count
++; /* count this element */
5266 if(*p1
== '\0' || *p1
== '\n'){ /* deal with EOL */
5267 if(p1
< p
|| *p1
== '\n'){
5268 *p1
++ = ','; /* fix null or newline */
5270 if(*p1
!= '\t' && *p1
!= ' '){
5271 *(p1
-1) = '\0'; /* tie off list */
5272 p
= p1
; /* reset p */
5276 p
= p1
; /* end of pinerc */
5284 lvalue
= parse_list(value
, line_count
,
5285 v
->del_quotes
? PL_REMSURRQUOT
: PL_NONE
,
5289 "read_pinerc: ERROR: %s in %s = \"%s\"\n",
5290 error
? error
: "?",
5291 v
->name
? v
->name
: "?",
5292 value
? value
: "?"));
5295 * Special case: turn "" strings into empty strings.
5296 * This allows users to turn off default lists. For example,
5297 * if smtp-server is set then a user could override smtp-server
5298 * with smtp-server="".
5300 for(i
= 0; lvalue
[i
]; i
++)
5301 if(lvalue
[i
][0] == '"' &&
5302 lvalue
[i
][1] == '"' &&
5303 lvalue
[i
][2] == '\0')
5304 lvalue
[i
][0] = '\0';
5308 if(v
->is_user
&& (which_vars
== ParsePers
|| !v
->is_onlymain
)){
5312 l
= (which_vars
== ParsePers
) ? &v
->main_user_val
.l
5313 : &v
->post_user_val
.l
;
5320 p
= (which_vars
== ParsePers
) ? &v
->main_user_val
.p
5321 : &v
->post_user_val
.p
;
5323 fs_give((void **)p
);
5331 pline
->is_quoted
= was_quoted
;
5336 else if(which_vars
== ParseGlobal
){
5339 free_list_array(&v
->global_val
.l
);
5340 v
->global_val
.l
= lvalue
;
5343 if(v
->global_val
.p
!= NULL
)
5344 fs_give((void **) &(v
->global_val
.p
));
5346 v
->global_val
.p
= cpystr(value
);
5350 else{ /* which_vars == ParseFixed */
5351 if(v
->is_user
|| v
->is_global
){
5353 free_list_array(&v
->fixed_val
.l
);
5354 v
->fixed_val
.l
= lvalue
;
5357 if(v
->fixed_val
.p
!= NULL
)
5358 fs_give((void **) &(v
->fixed_val
.p
));
5360 v
->fixed_val
.p
= cpystr(value
);
5368 l
= (which_vars
== ParsePers
) ? v
->main_user_val
.l
:
5369 (which_vars
== ParsePersPost
) ? v
->post_user_val
.l
:
5370 (which_vars
== ParseGlobal
) ? v
->global_val
.l
:
5373 dprint((5, " %20.20s : %s\n",
5374 v
->name
? v
->name
: "?",
5376 while(++l
&& *l
&& **l
)
5377 dprint((5, " %20.20s : %s\n", "",
5382 p
= (which_vars
== ParsePers
) ? v
->main_user_val
.p
:
5383 (which_vars
== ParsePersPost
) ? v
->post_user_val
.p
:
5384 (which_vars
== ParseGlobal
) ? v
->global_val
.p
:
5387 dprint((5, " %20.20s : %s\n",
5388 v
->name
? v
->name
: "?",
5397 if(!prc
->pinerc_written
&& prc
->type
== Loc
){
5398 prc
->pinerc_written
= name_file_mtime(filename
);
5399 dprint((5, "read_pinerc: time_pinerc_written = %ld\n",
5400 (long) prc
->pinerc_written
));
5405 fs_give((void **) &free_file
);
5410 * Args varname The variable name we're looking for
5411 * begin Begin looking here
5413 * Returns 1 if variable varname appears in the rest of the file
5417 var_is_in_rest_of_file(char *varname
, char *begin
)
5421 if(!(varname
&& *varname
&& begin
&& *begin
))
5426 while((p
= srchstr(p
, varname
)) != NULL
){
5427 /* beginning of a line? */
5428 if(p
> begin
&& (*(p
-1) != '\n' && *(p
-1) != '\r')){
5433 /* followed by [ SPACE ] < = > ? */
5434 p
+= strlen(varname
);
5435 while(*p
== ' ' || *p
== '\t')
5447 * Args begin Variable to skip starts here.
5448 * nextline This is where the next line starts. We need to know this
5449 * because the input has been mangled a little. A \0 has
5450 * replaced the \n at the end of the first line, but we can
5451 * use nextline to help us out of that quandry.
5453 * Return a pointer to the start of the first line after this variable
5454 * and all of its continuation lines.
5457 skip_over_this_var(char *begin
, char *nextline
)
5464 if(*p
== '\0' || *p
== '\n'){ /* EOL */
5465 if(p
< nextline
|| *p
== '\n'){ /* there may be another line */
5467 if(*p
!= ' ' && *p
!= '\t') /* no continuation line */
5470 else /* end of file */
5479 static char quotes
[3] = {'"', '"', '\0'};
5480 /*----------------------------------------------------------------------
5481 Write out the .pinerc state information
5483 Args: ps -- The pine structure to take state to be written from
5484 which -- Which pinerc to write
5485 flags -- If bit WRP_NOUSER is set, then assume that there is
5486 not a user present to answer questions.
5488 This writes to a temporary file first, and then renames that to
5489 be the new .pinerc file to protect against disk error. This has the
5490 problem of possibly messing up file protections, ownership and links.
5493 write_pinerc(struct pine
*ps
, EditWhich which
, int flags
)
5495 char *p
, *dir
, *tmp
= NULL
, *pinrc
;
5497 char *linep
= NULL
, *lineq
= NULL
;
5501 struct variable
*var
;
5504 REMDATA_S
*rd
= NULL
;
5505 PINERC_S
*prc
= NULL
;
5512 #define MAXPLINESIZE 10000
5514 dprint((2,"---- write_pinerc(%s) ----\n",
5515 (which
== Main
) ? "Main" : "Post"));
5519 prc
= ps
? ps
->prc
: NULL
;
5522 prc
= ps
? ps
->post_prc
: NULL
;
5531 if(prc
->quit_to_edit
){
5532 if(!(flags
& WRP_NOUSER
))
5533 quit_to_edit_msg(prc
);
5538 if(prc
->type
!= Loc
&& !prc
->readonly
){
5540 bc
= 0; /* don't do backcompat conversion */
5545 rd_check_remvalid(rd
, -10L);
5547 if(rd
->flags
& REM_OUTOFDATE
){
5548 if((flags
& WRP_NOUSER
) || unexpected_pinerc_change()){
5549 prc
->outstanding_pinerc_changes
= 1;
5550 if(!(flags
& WRP_NOUSER
))
5551 q_status_message1(SM_ORDER
| SM_DING
, 3, 3,
5552 "Pinerc \"%.200s\" NOT saved",
5553 prc
->name
? prc
->name
: "");
5554 dprint((2, "write_pinerc: remote pinerc changed\n"));
5558 rd
->flags
&= ~REM_OUTOFDATE
;
5563 if(rd
->access
== ReadWrite
){
5566 if((ro
=rd_remote_is_readonly(rd
)) || rd
->flags
& REM_OUTOFDATE
){
5568 if(!(flags
& WRP_NOUSER
))
5569 q_status_message(SM_ORDER
| SM_DING
, 5, 15,
5570 _("Can't access remote config, changes NOT saved!"));
5572 "write_pinerc: Can't write to remote pinerc %s, aborting write\n",
5573 rd
->rn
? rd
->rn
: "?"));
5576 if(!(rd
->flags
& NO_META_UPDATE
)){
5577 unsigned long save_chk_nmsgs
;
5581 save_chk_nmsgs
= rd
->t
.i
.chk_nmsgs
;
5582 rd
->t
.i
.chk_nmsgs
= 0;
5583 rd_write_metadata(rd
, 0);
5584 rd
->t
.i
.chk_nmsgs
= save_chk_nmsgs
;
5588 q_status_message(SM_ORDER
| SM_DING
, 3, 5,
5589 "Write_pinerc: Type not supported");
5594 if(!(flags
& WRP_NOUSER
))
5595 q_status_message1(SM_ORDER
| SM_DING
, 5, 15,
5596 _("No write permission for remote config %.200s, changes NOT saved!"),
5600 if(!(flags
& WRP_NOUSER
))
5601 q_status_message(SM_ORDER
| SM_DING
, 5, 15,
5602 _("Remote config changed, aborting our change to avoid damage..."));
5604 "write_pinerc: remote config %s changed since we started pine, aborting write\n",
5605 prc
->name
? prc
->name
: "?"));
5608 rd
->flags
&= ~DO_REMTRIM
;
5617 ps
->readonly_pinerc
= 1;
5621 filename
= prc
->name
? prc
->name
: "";
5623 pinrc
= prc
->name
? prc
->name
: "";
5625 if(prc
->type
== Loc
){
5626 mtime
= name_file_mtime(filename
);
5627 if(prc
->pinerc_written
5628 && prc
->pinerc_written
!= mtime
5629 && ((flags
& WRP_NOUSER
) || unexpected_pinerc_change())){
5630 prc
->outstanding_pinerc_changes
= 1;
5632 if(!(flags
& WRP_NOUSER
))
5633 q_status_message1(SM_ORDER
| SM_DING
, 3, 3,
5634 "Pinerc \"%.200s\" NOT saved", pinrc
);
5636 dprint((2,"write_pinerc: mtime mismatch: \"%s\": %ld != %ld\n",
5637 filename
? filename
: "?",
5638 (long) prc
->pinerc_written
, (long) mtime
));
5643 /* don't write if pinerc is read-only */
5646 can_access(filename
, ACCESS_EXISTS
) == 0 &&
5647 can_access(filename
, EDIT_ACCESS
) != 0)){
5650 ps
->readonly_pinerc
= 1;
5652 if(!(flags
& WRP_NOUSER
))
5653 q_status_message1(SM_ORDER
| SM_DING
, 0, 5,
5654 _("Can't modify configuration file \"%.200s\": ReadOnly"),
5656 dprint((2, "write_pinerc: fail because can't access pinerc\n"));
5659 rd
->flags
&= ~DO_REMTRIM
;
5664 if(rd
&& rd
->flags
& NO_FILE
){
5666 so_truncate(rd
->sonofile
, 0L); /* reset storage object */
5670 if((p
= last_cmpnt(filename
)) != NULL
){
5675 #if defined(DOS) || defined(OS2)
5676 if(!(isalpha((unsigned char)dir
[0]) && dir
[1] == ':' && dir
[2] == '\0')
5677 && (can_access(dir
, EDIT_ACCESS
) < 0 &&
5678 our_mkdir(dir
, 0700) < 0))
5680 if(!(flags
& WRP_NOUSER
))
5681 q_status_message2(SM_ORDER
| SM_DING
, 3, 5,
5682 /* TRANSLATORS: first argument is a filename, second
5683 arg is the text of the error message */
5684 _("Error creating \"%.200s\" : %.200s"), dir
,
5685 error_description(errno
));
5687 rd
->flags
&= ~DO_REMTRIM
;
5692 tmp
= temp_nam(dir
, "rc");
5694 if(*dir
&& tmp
&& !in_dir(dir
, tmp
)){
5696 fs_give((void **)&tmp
);
5706 tmp
= temp_nam((*dir
) ? dir
: "/", "pinerc");
5709 * If temp_nam can't write in dir it puts the temp file in a
5710 * temp directory, which won't help us when we go to rename.
5712 if(*dir
&& tmp
&& !in_dir(dir
, tmp
)){
5714 fs_give((void **)&tmp
);
5725 if((so
= so_get(FileStar
, tmp
, WRITE_ACCESS
)) == NULL
)
5729 if(!(flags
& WRP_PRESERV_WRITTEN
))
5730 for(var
= ps
->vars
; var
->name
!= NULL
; var
++)
5731 var
->been_written
= 0;
5733 if(prc
->type
== Loc
&& ps
->first_time_user
&&
5734 !so_puts(so
, native_nl(cf_text_comment
)))
5737 linep
= fs_get((MAXPLINESIZE
+1)*sizeof(char));
5738 lineq
= fs_get((MAXPLINESIZE
+1)*sizeof(char));
5739 buflen
= MAXPLINESIZE
;
5741 /* Write out what was in the .pinerc */
5742 for(pline
= prc
->pinerc_lines
;
5743 pline
&& (pline
->is_var
|| pline
->line
); pline
++){
5748 lval
= LVAL(var
, which
);
5750 pval
= PVAL(var
, which
);
5752 /* variable is not set */
5753 if((var
->is_list
&& (!lval
|| !lval
[0])) ||
5754 (!var
->is_list
&& !pval
)){
5755 /* leave null variables out of remote pinerc */
5756 if(prc
->type
== Loc
&&
5757 (!so_puts(so
, var
->name
) || !so_puts(so
, "=") ||
5758 !so_puts(so
, NEWLINE
)))
5761 /* var is set to empty string */
5762 else if((var
->is_list
&& lval
[0][0] == '\0') ||
5763 (!var
->is_list
&& pval
[0] == '\0')){
5764 if(!so_puts(so
, var
->name
) || !so_puts(so
, "=") ||
5765 !so_puts(so
, quotes
) || !so_puts(so
, NEWLINE
))
5772 for(i
= 0; lval
[i
]; i
++){
5773 if(strlen(var
->name
)
5774 + (lval
[i
][0] ? strlen(lval
[i
]) : 5) > buflen
){
5775 buflen
= strlen(var
->name
)
5776 + (lval
[i
][0] ? strlen(lval
[i
]) : 5);
5777 fs_resize((void **)&linep
, (buflen
+1)*sizeof(char));
5778 fs_resize((void **)&lineq
, (buflen
+1)*sizeof(char));
5780 snprintf(linep
, buflen
+1, "%s%s%s%s%s",
5781 (i
) ? "\t" : var
->name
,
5783 lval
[i
][0] ? lval
[i
] : quotes
,
5784 lval
[i
+1] ? "," : "", NEWLINE
);
5785 linep
[buflen
] = '\0';
5786 if(!so_puts(so
, bc
? backcompat_convert_from_utf8(&lineq
, buflen
+1, linep
) : linep
))
5791 if(strlen(var
->name
)
5792 + (pval
[0] ? strlen(pval
) : 5) > buflen
){
5793 buflen
= strlen(var
->name
)
5794 + (pval
[0] ? strlen(pval
) : 5);
5795 fs_resize((void **)&linep
, (buflen
+1)*sizeof(char));
5796 fs_resize((void **)&lineq
, (buflen
+1)*sizeof(char));
5798 snprintf(linep
, buflen
+1, "%s=%s%s%s%s",
5800 (pline
->is_quoted
&& pval
[0] != '\"')
5803 (pline
->is_quoted
&& pval
[0] != '\"')
5804 ? "\"" : "", NEWLINE
);
5805 linep
[buflen
] = '\0';
5806 if(!so_puts(so
, bc
? backcompat_convert_from_utf8(&lineq
, buflen
+1, linep
) : linep
))
5811 var
->been_written
= 1;
5815 * The description text should be changed into a message
5816 * about the variable being obsolete when a variable is
5817 * moved to obsolete status. We add that message before
5818 * the variable unless it is already there. However, we
5819 * leave the variable itself in case the user runs an old
5820 * version of pine again. Note that we have read in the
5821 * value of the variable in read_pinerc and translated it
5822 * into a new variable if appropriate.
5824 if(pline
->obsolete_var
&& prc
->type
== Loc
){
5825 if(pline
<= prc
->pinerc_lines
|| (pline
-1)->line
== NULL
||
5826 strlen((pline
-1)->line
) < 3 ||
5827 strucmp((pline
-1)->line
+2, pline
->var
->descrip
) != 0)
5828 if(!so_puts(so
, "# ") ||
5829 !so_puts(so
, native_nl(pline
->var
->descrip
)) ||
5830 !so_puts(so
, NEWLINE
))
5834 /* remove comments from remote pinercs */
5835 if((prc
->type
== Loc
||
5836 (pline
->line
[0] != '#' && pline
->line
[0] != '\0')) &&
5837 (!so_puts(so
, pline
->line
) || !so_puts(so
, NEWLINE
)))
5842 /* Now write out all the variables not in the .pinerc */
5843 for(var
= ps
->vars
; var
->name
!= NULL
; var
++){
5844 if(!var
->is_user
|| var
->been_written
|| !var
->is_used
||
5845 var
->is_obsolete
|| (var
->is_onlymain
&& which
!= Main
))
5849 lval
= LVAL(var
, which
);
5851 pval
= PVAL(var
, which
);
5854 * set description to NULL to eliminate preceding
5855 * blank and comment line.
5857 if(prc
->type
== Loc
&& var
->descrip
&& *var
->descrip
&&
5858 (!so_puts(so
, NEWLINE
) || !so_puts(so
, "# ") ||
5859 !so_puts(so
, native_nl(var
->descrip
)) || !so_puts(so
, NEWLINE
)))
5862 /* variable is not set */
5863 /** Don't know what the global_val thing is for. SH, Mar 00 **/
5864 if((var
->is_list
&& (!lval
|| (!lval
[0] && !var
->global_val
.l
))) ||
5865 (!var
->is_list
&& !pval
)){
5866 /* leave null variables out of remote pinerc */
5867 if(prc
->type
== Loc
&&
5868 (!so_puts(so
, var
->name
) || !so_puts(so
, "=") ||
5869 !so_puts(so
, NEWLINE
)))
5872 /* var is set to empty string */
5873 else if((var
->is_list
&& (!lval
[0] || !lval
[0][0]))
5874 || (!var
->is_list
&& pval
[0] == '\0')){
5875 if(!so_puts(so
, var
->name
) || !so_puts(so
, "=") ||
5876 !so_puts(so
, quotes
) || !so_puts(so
, NEWLINE
))
5879 else if(var
->is_list
){
5882 for(i
= 0; lval
[i
] ; i
++){
5883 if(strlen(var
->name
)
5884 + (lval
[i
][0] ? strlen(lval
[i
]) : 5) > buflen
){
5885 buflen
= strlen(var
->name
)
5886 + (lval
[i
][0] ? strlen(lval
[i
]) : 5);
5887 fs_resize((void **)&linep
, (buflen
+1)*sizeof(char));
5888 fs_resize((void **)&lineq
, (buflen
+1)*sizeof(char));
5890 snprintf(linep
, buflen
+1, "%s%s%s%s%s",
5891 (i
) ? "\t" : var
->name
,
5894 lval
[i
+1] ? "," : "", NEWLINE
);
5895 linep
[buflen
] = '\0';
5896 if(!so_puts(so
, bc
? backcompat_convert_from_utf8(&lineq
, buflen
+1, linep
) : linep
))
5903 if(strlen(pval
) > buflen
){
5904 buflen
= strlen(pval
) + 1;
5905 fs_resize((void **)&linep
, (buflen
+1)*sizeof(char));
5906 fs_resize((void **)&lineq
, (buflen
+1)*sizeof(char));
5908 pconverted
= bc
? backcompat_convert_from_utf8(&lineq
, buflen
+1, pval
) : pval
;
5910 if(!so_puts(so
, var
->name
) || !so_puts(so
, "=") ||
5911 !so_puts(so
, pconverted
) || !so_puts(so
, NEWLINE
))
5916 if(!(rd
&& rd
->flags
& NO_FILE
)){
5921 /* if .pinerc is a symbolic link, override symbolic link */
5922 if(our_lstat(filename
, &sbuf
) == 0
5923 && ((sbuf
.st_mode
& S_IFMT
) == S_IFLNK
)){
5924 if((slink
= fs_get((sbuf
.st_size
+1)*sizeof(char))) != NULL
){
5925 int r
= -1; /* assume error */
5926 if(readlink(filename
, slink
, sbuf
.st_size
+ 1) >= 0){
5929 slink
[sbuf
.st_size
] = '\0';
5931 slpath
= cpystr(slink
);
5934 basep
= strrchr(filename
, '/');
5937 slpath
= (char *) fs_get((strlen(filename
) + strlen(slink
) + 2)*sizeof(char));
5938 snprintf(slpath
, sizeof(slpath
), "%s/%s", filename
, slink
);
5941 slpath
= (char *) fs_get((strlen(ps_global
->home_dir
) + strlen(slink
) + 2)*sizeof(char));
5942 snprintf(slpath
, sizeof(slpath
), "%s/%s", ps_global
->home_dir
, slink
);
5945 file_attrib_copy(tmp
, slpath
);
5946 r
= rename_file(tmp
, slpath
);
5947 fs_give((void **)&slpath
);
5949 fs_give((void **)&slink
);
5950 if (r
< 0) goto io_err
;
5954 #endif /* _WINDOWS */
5956 file_attrib_copy(tmp
, filename
);
5957 if(rename_file(tmp
, filename
) < 0)
5962 if(prc
->type
!= Loc
){
5969 if(!(flags
& WRP_NOUSER
))
5970 we_cancel
= busy_cue(_("Copying to remote config"), NULL
, 1);
5972 if((e
= rd_update_remote(rd
, datebuf
)) != 0){
5974 "write_pinerc: error copying from %s to %s\n",
5975 rd
->lf
? rd
->lf
: "<memory>", rd
->rn
? rd
->rn
: "?"));
5976 if(!(flags
& WRP_NOUSER
)){
5977 q_status_message2(SM_ORDER
| SM_DING
, 3, 5,
5978 _("Error copying to %.200s: %.200s"),
5979 rd
->rn
, error_description(errno
));
5981 q_status_message(SM_ORDER
| SM_DING
, 5, 5,
5982 _("Copy of config to remote folder failed, changes NOT saved remotely"));
5986 rd_update_metadata(rd
, datebuf
);
5987 rd
->read_status
= 'W';
5988 rd_trim_remdata(&rd
);
5989 rd_close_remote(rd
);
5993 cancel_busy_cue(-1);
5996 prc
->outstanding_pinerc_changes
= 0;
5998 if(prc
->type
== Loc
){
5999 prc
->pinerc_written
= name_file_mtime(filename
);
6000 dprint((2, "wrote pinerc: %s: time_pinerc_written = %ld\n",
6001 pinrc
? pinrc
: "?", (long) prc
->pinerc_written
));
6004 dprint((2, "wrote pinerc: %s\n", pinrc
? pinrc
: "?"));
6009 fs_give((void **)&tmp
);
6012 if(linep
) fs_give((void **)&linep
);
6013 if(lineq
) fs_give((void **)&lineq
);
6018 if(!(flags
& WRP_NOUSER
))
6019 q_status_message2(SM_ORDER
| SM_DING
, 3, 5,
6020 _("Error saving configuration in \"%.200s\": %.200s"),
6021 pinrc
, error_description(errno
));
6023 dprint((1, "Error writing %s : %s\n", pinrc
? pinrc
: "?",
6024 error_description(errno
)));
6026 rd
->flags
&= ~DO_REMTRIM
;
6029 fs_give((void **)&tmp
);
6032 if(linep
) fs_give((void **)&linep
);
6033 if(lineq
) fs_give((void **)&lineq
);
6040 * The srcstr is UTF-8. In order to help the user with
6041 * running this pine and an old pre-alpine pine on the same config
6042 * file we attempt to convert the values of the config variables
6043 * to the user's character set before writing.
6044 * parameters: char **buf. Memory of size_t buflen allocated by caller.
6047 backcompat_convert_from_utf8(char **buf
, size_t buflen
, char *srcstr
)
6049 char *converted
= NULL
;
6054 for(p
= srcstr
; *p
&& its_ascii
; p
++)
6058 /* if it is ascii, go with that */
6060 strncpy(*buf
, srcstr
, buflen
);
6062 (*buf
)[buflen
-1] = '\0';
6065 char *trythischarset
= NULL
;
6068 * If it is possible to translate the UTF-8
6069 * string into the user's character set then
6070 * do that. For backwards compatibility with
6073 if(ps_global
->keyboard_charmap
&& ps_global
->keyboard_charmap
[0])
6074 trythischarset
= ps_global
->keyboard_charmap
;
6075 else if(ps_global
->display_charmap
&& ps_global
->display_charmap
[0])
6076 trythischarset
= ps_global
->display_charmap
;
6081 src
.data
= (unsigned char *) srcstr
;
6082 src
.size
= strlen(srcstr
);
6083 memset(&dst
, 0, sizeof(dst
));
6084 if(utf8_cstext(&src
, trythischarset
, &dst
, 0)){
6086 strncpy(*buf
, (char *) dst
.data
, buflen
);
6087 (*buf
)[buflen
-1] = '\0';
6088 fs_give((void **) &dst
.data
);
6094 strncpy(*buf
, srcstr
, buflen
);
6095 (*buf
)[buflen
-1] = '\0';
6105 * Given a unix-style source string which may contain LFs,
6106 * convert those to CRLFs if appropriate.
6108 * Returns a pointer to the converted string. This will be a string
6109 * stored in tmp_20k_buf.
6111 * This is just used for the variable descriptions in the pinerc file. It
6112 * could certainly be fancier. It simply converts all \n to NEWLINE.
6115 native_nl(char *src
)
6119 tmp_20k_buf
[0] = '\0';
6122 for(q
= (char *)tmp_20k_buf
; *src
; src
++){
6124 for(p
= NEWLINE
; *p
; p
++)
6134 return((char *)tmp_20k_buf
);
6139 quit_to_edit_msg(PINERC_S
*prc
)
6141 /* TRANSLATORS: The %s is either "Postload " or nothing. A Postload config file
6142 is a type of config file. */
6143 q_status_message1(SM_ORDER
, 3, 4, _("Must quit Alpine to change %sconfig file."),
6144 (prc
== ps_global
->post_prc
) ? "Postload " : "");
6148 /*------------------------------------------------------------
6149 Return TRUE if the given string was a feature name present in the
6150 pinerc as it was when pine was started...
6153 var_in_pinerc(char *s
)
6157 for(pline
= ps_global
->prc
? ps_global
->prc
->pinerc_lines
: NULL
;
6158 pline
&& (pline
->var
|| pline
->line
); pline
++)
6159 if(pline
->var
&& pline
->var
->name
&& !strucmp(s
, pline
->var
->name
))
6162 for(pline
= ps_global
->post_prc
? ps_global
->post_prc
->pinerc_lines
: NULL
;
6163 pline
&& (pline
->var
|| pline
->line
); pline
++)
6164 if(pline
->var
&& pline
->var
->name
&& !strucmp(s
, pline
->var
->name
))
6171 /*------------------------------------------------------------
6172 Free resources associated with pinerc_lines data
6175 free_pinerc_lines(PINERC_LINE
**pinerc_lines
)
6179 if(pinerc_lines
&& *pinerc_lines
){
6180 for(pline
= *pinerc_lines
; pline
->var
|| pline
->line
; pline
++)
6182 fs_give((void **)&pline
->line
);
6184 fs_give((void **)pinerc_lines
);
6189 /*------------------------------------------------------------
6190 Dump out a global pine.conf on the standard output with fresh
6191 comments. Preserves variables currently set in SYSTEM_PINERC, if any.
6194 dump_global_conf(void)
6197 struct variable
*var
;
6200 prc
= new_pinerc_s(SYSTEM_PINERC
);
6201 read_pinerc(prc
, variables
, ParseGlobal
);
6203 free_pinerc_s(&prc
);
6209 fprintf(f
, "# %s -- system wide pine configuration\n#\n",
6211 fprintf(f
, "# Values here affect all pine users unless they've overridden the values\n");
6212 fprintf(f
, "# in their .pinerc files. A copy of this file with current comments may\n");
6213 fprintf(f
, "# be obtained by running \"pine -conf\". It will be printed to standard output.\n#\n");
6214 fprintf(f
,"# For a variable to be unset its value must be null/blank. This is not the\n");
6215 fprintf(f
,"# same as the value of \"empty string\", which can be used to effectively\n");
6216 fprintf(f
,"# \"unset\" a variable that has a default or previously assigned value.\n");
6217 fprintf(f
,"# To set a variable to the empty string its value should be \"\".\n");
6218 fprintf(f
,"# Switch variables are set to either \"yes\" or \"no\", and default to \"no\".\n");
6219 fprintf(f
,"# Except for feature-list items, which are additive, values set in the\n");
6220 fprintf(f
,"# .pinerc file replace those in pine.conf, and those in pine.conf.fixed\n");
6221 fprintf(f
,"# over-ride all others. Features can be over-ridden in .pinerc or\n");
6222 fprintf(f
,"# pine.conf.fixed by pre-pending the feature name with \"no-\".\n#\n");
6223 fprintf(f
,"# (These comments are automatically inserted.)\n");
6225 for(var
= variables
; var
->name
!= NULL
; var
++){
6226 if(!var
->is_global
|| !var
->is_used
|| var
->is_obsolete
)
6229 if(var
->descrip
&& *var
->descrip
){
6230 if(fprintf(f
, "\n# %s\n", var
->descrip
) == EOF
)
6235 if(var
->global_val
.l
== NULL
){
6236 if(fprintf(f
, "%s=\n", var
->name
) == EOF
)
6241 for(i
=0; var
->global_val
.l
[i
]; i
++)
6242 if(fprintf(f
, "%s%s%s%s\n", (i
) ? "\t" : var
->name
,
6243 (i
) ? "" : "=", var
->global_val
.l
[i
],
6244 var
->global_val
.l
[i
+1] ? ",":"") == EOF
)
6248 if(var
->global_val
.p
== NULL
){
6249 if(fprintf(f
, "%s=\n", var
->name
) == EOF
)
6251 }else if(strlen(var
->global_val
.p
) == 0){
6252 if(fprintf(f
, "%s=\"\"\n", var
->name
) == EOF
)
6255 if(fprintf(f
,"%s=%s\n",var
->name
,var
->global_val
.p
) == EOF
)
6264 fprintf(stderr
, "Error writing config to stdout: %s\n",
6265 error_description(errno
));
6270 /*------------------------------------------------------------
6271 Dump out a pinerc to filename with fresh
6272 comments. Preserves variables currently set in pinerc, if any.
6275 dump_new_pinerc(char *filename
)
6278 struct variable
*var
;
6279 char buf
[MAXPATH
], *p
;
6283 p
= ps_global
->pinerc
;
6285 #if defined(DOS) || defined(OS2)
6286 if(!ps_global
->pinerc
){
6289 if(p
= getenv("PINERC")){
6290 ps_global
->pinerc
= cpystr(p
);
6293 build_path(buf2
, ps_global
->home_dir
, DF_PINEDIR
, sizeof(buf2
));
6294 build_path(buf
, buf2
, SYSTEM_PINERC
, sizeof(buf
));
6300 if(!ps_global
->pinerc
){
6301 build_path(buf
, ps_global
->home_dir
, ".pinerc", sizeof(buf
));
6306 prc
= new_pinerc_s(p
);
6307 read_pinerc(prc
, variables
, ParsePers
);
6309 free_pinerc_s(&prc
);
6312 if(filename
[0] == '\0'){
6313 fprintf(stderr
, "Missing argument to \"-pinerc\".\n");
6314 }else if(!strcmp(filename
, "-")){
6317 f
= our_fopen(filename
, "wb");
6323 if(fprintf(f
, "%s", cf_text_comment
) == EOF
)
6326 for(var
= variables
; var
->name
!= NULL
; var
++){
6327 dprint((7,"write_pinerc: %s = %s\n",
6328 var
->name
? var
->name
: "?",
6329 var
->main_user_val
.p
? var
->main_user_val
.p
: "<not set>"));
6330 if(!var
->is_user
|| !var
->is_used
|| var
->is_obsolete
)
6334 * set description to NULL to eliminate preceding
6335 * blank and comment line.
6337 if(var
->descrip
&& *var
->descrip
){
6338 if(fprintf(f
, "\n# %s\n", var
->descrip
) == EOF
)
6343 if(var
->main_user_val
.l
== NULL
){
6344 if(fprintf(f
, "%s=\n", var
->name
) == EOF
)
6349 for(i
=0; var
->main_user_val
.l
[i
]; i
++)
6350 if(fprintf(f
, "%s%s%s%s\n", (i
) ? "\t" : var
->name
,
6351 (i
) ? "" : "=", var
->main_user_val
.l
[i
],
6352 var
->main_user_val
.l
[i
+1] ? ",":"") == EOF
)
6356 if(var
->main_user_val
.p
== NULL
){
6357 if(fprintf(f
, "%s=\n", var
->name
) == EOF
)
6359 }else if(strlen(var
->main_user_val
.p
) == 0){
6360 if(fprintf(f
, "%s=\"\"\n", var
->name
) == EOF
)
6363 if(fprintf(f
,"%s=%s\n",var
->name
,var
->main_user_val
.p
) == EOF
)
6372 snprintf(buf
, sizeof(buf
), "Error writing config to %s: %s\n",
6373 filename
, error_description(errno
));
6374 exceptional_exit(buf
, -1);
6378 /*----------------------------------------------------------------------
6379 Set a user variable and save the .pinerc
6381 Args: var -- The index of the variable to set from conftype.h (V_....)
6382 value -- The string to set the value to
6384 Result: -1 is returned on failure and 0 is returned on success
6386 The vars data structure is updated and the pinerc saved.
6389 set_variable(int var
, char *value
, int expand
, int commit
, EditWhich which
)
6395 v
= &ps_global
->vars
[var
];
6398 panic1("Trying to set non-user variable %s", v
->name
);
6400 /* Override value of which, at most one of these should be set */
6403 else if(v
->is_outermost
)
6404 which
= ps_global
->ew_for_except_vars
;
6406 apval
= APVAL(v
, which
);
6412 fs_give((void **)apval
);
6414 *apval
= value
? cpystr(value
) : NULL
;
6415 set_current_val(v
, expand
, FALSE
);
6419 prc
= ps_global
->prc
;
6422 prc
= ps_global
->post_prc
;
6429 prc
->outstanding_pinerc_changes
= 1;
6431 return(commit
? write_pinerc(ps_global
, which
, WRP_NONE
) : 0);
6435 /*----------------------------------------------------------------------
6436 Set a user variable list and save the .pinerc
6438 Args: var -- The index of the variable to set from conftype.h (V_....)
6439 lvalue -- The list to set the value to
6441 Result: -1 is returned on failure and 0 is returned on success
6443 The vars data structure is updated and if write_it, the pinerc is saved.
6446 set_variable_list(int var
, char **lvalue
, int write_it
, EditWhich which
)
6450 struct variable
*v
= &ps_global
->vars
[var
];
6453 if(!v
->is_user
|| !v
->is_list
)
6454 panic1("BOTCH: Trying to set non-user or non-list variable %s", v
->name
);
6456 /* Override value of which, at most one of these should be set */
6459 else if(v
->is_outermost
)
6460 which
= ps_global
->ew_for_except_vars
;
6462 alval
= ALVAL(v
, which
);
6467 free_list_array(alval
);
6470 for(i
= 0; lvalue
[i
] ; i
++) /* count elements */
6473 *alval
= (char **) fs_get((i
+1) * sizeof(char *));
6475 for(i
= 0; lvalue
[i
] ; i
++)
6476 (*alval
)[i
] = cpystr(lvalue
[i
]);
6481 set_current_val(v
, TRUE
, FALSE
);
6485 prc
= ps_global
->prc
;
6488 prc
= ps_global
->post_prc
;
6495 prc
->outstanding_pinerc_changes
= 1;
6497 return(write_it
? write_pinerc(ps_global
, which
, WRP_NONE
) : 0);
6502 set_current_color_vals(struct pine
*ps
)
6504 struct variable
*vars
= ps
->vars
;
6505 int later_color_is_set
= 0;
6507 set_current_val(&vars
[V_NORM_FORE_COLOR
], TRUE
, TRUE
);
6508 set_current_val(&vars
[V_NORM_BACK_COLOR
], TRUE
, TRUE
);
6509 pico_nfcolor(VAR_NORM_FORE_COLOR
);
6510 pico_nbcolor(VAR_NORM_BACK_COLOR
);
6512 set_current_val(&vars
[V_REV_FORE_COLOR
], TRUE
, TRUE
);
6513 set_current_val(&vars
[V_REV_BACK_COLOR
], TRUE
, TRUE
);
6514 pico_rfcolor(VAR_REV_FORE_COLOR
);
6515 pico_rbcolor(VAR_REV_BACK_COLOR
);
6517 set_color_val(&vars
[V_TITLE_FORE_COLOR
], 1);
6518 set_color_val(&vars
[V_TITLECLOSED_FORE_COLOR
], 0);
6519 set_color_val(&vars
[V_FOLDER_FORE_COLOR
], 0);
6520 set_color_val(&vars
[V_DIRECTORY_FORE_COLOR
], 0);
6521 set_color_val(&vars
[V_FOLDER_LIST_FORE_COLOR
], 0);
6522 set_color_val(&vars
[V_STATUS_FORE_COLOR
], 1);
6523 set_color_val(&vars
[V_KEYLABEL_FORE_COLOR
], 1);
6524 set_color_val(&vars
[V_KEYNAME_FORE_COLOR
], 1);
6525 set_color_val(&vars
[V_SLCTBL_FORE_COLOR
], 1);
6526 set_color_val(&vars
[V_METAMSG_FORE_COLOR
], 1);
6527 set_color_val(&vars
[V_PROMPT_FORE_COLOR
], 1);
6528 set_color_val(&vars
[V_HEADER_GENERAL_FORE_COLOR
], 1);
6529 set_color_val(&vars
[V_IND_PLUS_FORE_COLOR
], 0);
6530 set_color_val(&vars
[V_IND_IMP_FORE_COLOR
], 0);
6531 set_color_val(&vars
[V_IND_DEL_FORE_COLOR
], 0);
6532 set_color_val(&vars
[V_IND_HIPRI_FORE_COLOR
], 0);
6533 set_color_val(&vars
[V_IND_LOPRI_FORE_COLOR
], 0);
6534 set_color_val(&vars
[V_IND_ANS_FORE_COLOR
], 0);
6535 set_color_val(&vars
[V_IND_NEW_FORE_COLOR
], 0);
6536 set_color_val(&vars
[V_IND_REC_FORE_COLOR
], 0);
6537 set_color_val(&vars
[V_IND_FWD_FORE_COLOR
], 0);
6538 set_color_val(&vars
[V_IND_UNS_FORE_COLOR
], 0);
6539 set_color_val(&vars
[V_IND_ARR_FORE_COLOR
], 0);
6540 set_color_val(&vars
[V_IND_SUBJ_FORE_COLOR
], 0);
6541 set_color_val(&vars
[V_IND_FROM_FORE_COLOR
], 0);
6542 set_color_val(&vars
[V_IND_OP_FORE_COLOR
], 0);
6543 set_color_val(&vars
[V_INCUNSEEN_FORE_COLOR
], 0);
6544 set_color_val(&vars
[V_SIGNATURE_FORE_COLOR
], 0);
6546 set_current_val(&ps
->vars
[V_INDEX_TOKEN_COLORS
], TRUE
, TRUE
);
6547 set_current_val(&ps
->vars
[V_VIEW_HDR_COLORS
], TRUE
, TRUE
);
6548 set_current_val(&ps
->vars
[V_KW_COLORS
], TRUE
, TRUE
);
6549 set_custom_spec_colors(ps
);
6552 * Set up the quoting colors. If a later color is set but not an earlier
6553 * color we set the earlier color to Normal to make it easier when
6554 * we go to use the colors. However, if the only quote colors set are
6555 * Normal that is the same as no settings, so delete them.
6557 set_color_val(&vars
[V_QUOTE1_FORE_COLOR
], 0);
6558 set_color_val(&vars
[V_QUOTE2_FORE_COLOR
], 0);
6559 set_color_val(&vars
[V_QUOTE3_FORE_COLOR
], 0);
6561 if((!(VAR_QUOTE3_FORE_COLOR
&& VAR_QUOTE3_BACK_COLOR
) ||
6562 (!strucmp(VAR_QUOTE3_FORE_COLOR
, VAR_NORM_FORE_COLOR
) &&
6563 !strucmp(VAR_QUOTE3_BACK_COLOR
, VAR_NORM_BACK_COLOR
))) &&
6564 (!(VAR_QUOTE2_FORE_COLOR
&& VAR_QUOTE2_BACK_COLOR
) ||
6565 (!strucmp(VAR_QUOTE2_FORE_COLOR
, VAR_NORM_FORE_COLOR
) &&
6566 !strucmp(VAR_QUOTE2_BACK_COLOR
, VAR_NORM_BACK_COLOR
))) &&
6567 (!(VAR_QUOTE1_FORE_COLOR
&& VAR_QUOTE1_BACK_COLOR
) ||
6568 (!strucmp(VAR_QUOTE1_FORE_COLOR
, VAR_NORM_FORE_COLOR
) &&
6569 !strucmp(VAR_QUOTE1_BACK_COLOR
, VAR_NORM_BACK_COLOR
)))){
6571 * They are all either Normal or not set. Delete them all.
6573 if(VAR_QUOTE3_FORE_COLOR
)
6574 fs_give((void **)&VAR_QUOTE3_FORE_COLOR
);
6575 if(VAR_QUOTE3_BACK_COLOR
)
6576 fs_give((void **)&VAR_QUOTE3_BACK_COLOR
);
6577 if(VAR_QUOTE2_FORE_COLOR
)
6578 fs_give((void **)&VAR_QUOTE2_FORE_COLOR
);
6579 if(VAR_QUOTE2_BACK_COLOR
)
6580 fs_give((void **)&VAR_QUOTE2_BACK_COLOR
);
6581 if(VAR_QUOTE1_FORE_COLOR
)
6582 fs_give((void **)&VAR_QUOTE1_FORE_COLOR
);
6583 if(VAR_QUOTE1_BACK_COLOR
)
6584 fs_give((void **)&VAR_QUOTE1_BACK_COLOR
);
6586 else{ /* something is non-Normal */
6587 if(VAR_QUOTE3_FORE_COLOR
&& VAR_QUOTE3_BACK_COLOR
)
6588 later_color_is_set
++;
6590 /* if 3 is set but not 2, set 2 to Normal */
6591 if(VAR_QUOTE2_FORE_COLOR
&& VAR_QUOTE2_BACK_COLOR
)
6592 later_color_is_set
++;
6593 else if(later_color_is_set
)
6594 set_color_val(&vars
[V_QUOTE2_FORE_COLOR
], 1);
6596 /* if 3 or 2 is set but not 1, set 1 to Normal */
6597 if(VAR_QUOTE1_FORE_COLOR
&& VAR_QUOTE1_BACK_COLOR
)
6598 later_color_is_set
++;
6599 else if(later_color_is_set
)
6600 set_color_val(&vars
[V_QUOTE1_FORE_COLOR
], 1);
6605 int conv_main
= 0, conv_post
= 0;
6608 if(ps
->prc
&& !unix_color_style_in_pinerc(ps
->prc
)){
6609 conv_main
= convert_pc_gray_names(ps
, ps
->prc
, Main
);
6611 ps
->prc
->outstanding_pinerc_changes
= 1;
6615 if(ps
->post_prc
&& !unix_color_style_in_pinerc(ps
->post_prc
)){
6616 conv_post
= convert_pc_gray_names(ps
, ps
->post_prc
, Post
);
6618 ps
->post_prc
->outstanding_pinerc_changes
= 1;
6621 if(conv_main
|| conv_post
){
6623 write_pinerc(ps
, Main
, WRP_NONE
);
6626 write_pinerc(ps
, Post
, WRP_NONE
);
6628 set_current_color_vals(ps
);
6631 #endif /* _WINDOWS */
6633 pico_set_normal_color();
6638 * Set current_val for the foreground and background color vars, which
6639 * are assumed to be in order. If a set_current_val on them doesn't
6640 * produce current_vals, then use the colors from defvar to set those
6644 set_color_val(struct variable
*v
, int use_default
)
6646 set_current_val(v
, TRUE
, TRUE
);
6647 set_current_val(v
+1, TRUE
, TRUE
);
6649 if(!(v
->current_val
.p
&& v
->current_val
.p
[0] &&
6650 (v
+1)->current_val
.p
&& (v
+1)->current_val
.p
[0])){
6651 struct variable
*defvar
;
6653 if(v
->current_val
.p
)
6654 fs_give((void **)&v
->current_val
.p
);
6655 if((v
+1)->current_val
.p
)
6656 fs_give((void **)&(v
+1)->current_val
.p
);
6661 if(var_defaults_to_rev(v
))
6662 defvar
= &ps_global
->vars
[V_REV_FORE_COLOR
];
6664 defvar
= &ps_global
->vars
[V_NORM_FORE_COLOR
];
6666 /* use default vars values instead */
6667 if(defvar
&& defvar
->current_val
.p
&& defvar
->current_val
.p
[0] &&
6668 (defvar
+1)->current_val
.p
&& (defvar
+1)->current_val
.p
[0]){
6669 v
->current_val
.p
= cpystr(defvar
->current_val
.p
);
6670 (v
+1)->current_val
.p
= cpystr((defvar
+1)->current_val
.p
);
6677 var_defaults_to_rev(struct variable
*v
)
6679 return(v
== &ps_global
->vars
[V_REV_FORE_COLOR
] ||
6680 v
== &ps_global
->vars
[V_TITLE_FORE_COLOR
] ||
6681 v
== &ps_global
->vars
[V_STATUS_FORE_COLOR
] ||
6682 v
== &ps_global
->vars
[V_KEYNAME_FORE_COLOR
] ||
6683 v
== &ps_global
->vars
[V_PROMPT_FORE_COLOR
]);
6689 * Each item in the list looks like:
6691 * /HDR=<header>/FG=<foreground color>/BG=<background color>
6693 * We separate the three pieces into an array of structures to make
6694 * it easier to deal with later.
6697 set_custom_spec_colors(struct pine
*ps
)
6699 if(ps
->index_token_colors
)
6700 free_spec_colors(&ps
->index_token_colors
);
6702 ps
->index_token_colors
= spec_colors_from_varlist(ps
->VAR_INDEX_TOKEN_COLORS
, 1);
6705 free_spec_colors(&ps
->hdr_colors
);
6707 ps
->hdr_colors
= spec_colors_from_varlist(ps
->VAR_VIEW_HDR_COLORS
, 1);
6709 /* fit keyword colors into the same structures for code re-use */
6711 free_spec_colors(&ps
->kw_colors
);
6713 ps
->kw_colors
= spec_colors_from_varlist(ps
->VAR_KW_COLORS
, 1);
6718 * Input is one item from config variable.
6720 * Return value must be freed by caller. The return is a single SPEC_COLOR_S,
6724 spec_color_from_var(char *t
, int already_expanded
)
6726 char *p
, *spec
, *fg
, *bg
;
6728 SPEC_COLOR_S
*new_hcolor
= NULL
;
6730 if(t
&& t
[0] && !strcmp(t
, INHERIT
)){
6731 new_hcolor
= (SPEC_COLOR_S
*)fs_get(sizeof(*new_hcolor
));
6732 memset((void *)new_hcolor
, 0, sizeof(*new_hcolor
));
6733 new_hcolor
->inherit
= 1;
6738 if(!already_expanded
){
6740 if(expand_variables(tbuf
, sizeof(tbuf
), t
, 0))
6744 spec
= fg
= bg
= NULL
;
6746 if((p
= srchstr(t
, "/HDR=")) != NULL
)
6747 spec
= remove_backslash_escapes(p
+5);
6748 if((p
= srchstr(t
, "/FG=")) != NULL
)
6749 fg
= remove_backslash_escapes(p
+4);
6750 if((p
= srchstr(t
, "/BG=")) != NULL
)
6751 bg
= remove_backslash_escapes(p
+4);
6752 val
= parse_pattern("VAL", t
, 0);
6756 if((p
= strindex(spec
, ':')) != NULL
)
6759 new_hcolor
= (SPEC_COLOR_S
*)fs_get(sizeof(*new_hcolor
));
6760 memset((void *)new_hcolor
, 0, sizeof(*new_hcolor
));
6761 new_hcolor
->spec
= spec
;
6762 new_hcolor
->fg
= fg
;
6763 new_hcolor
->bg
= bg
;
6764 new_hcolor
->val
= val
;
6768 fs_give((void **)&spec
);
6770 fs_give((void **)&fg
);
6772 fs_give((void **)&bg
);
6783 * Input is a list from config file.
6785 * Return value may be a list of SPEC_COLOR_S and must be freed by caller.
6788 spec_colors_from_varlist(char **varlist
, int already_expanded
)
6791 SPEC_COLOR_S
*new_hc
= NULL
;
6792 SPEC_COLOR_S
*new_hcolor
, **nexthc
;
6796 for(s
= varlist
; (t
= *s
) != NULL
; s
++){
6798 new_hcolor
= spec_color_from_var(t
, already_expanded
);
6800 *nexthc
= new_hcolor
;
6801 nexthc
= &new_hcolor
->next
;
6812 * Returns allocated charstar suitable for config var for a single
6816 var_from_spec_color(SPEC_COLOR_S
*hc
)
6818 char *ret_val
= NULL
;
6819 char *p
, *spec
= NULL
, *fg
= NULL
, *bg
= NULL
, *val
= NULL
;
6822 if(hc
&& hc
->inherit
)
6823 ret_val
= cpystr(INHERIT
);
6826 spec
= add_viewerhdr_escapes(hc
->spec
);
6828 fg
= add_viewerhdr_escapes(hc
->fg
);
6830 bg
= add_viewerhdr_escapes(hc
->bg
);
6832 p
= pattern_to_string(hc
->val
);
6834 val
= add_viewerhdr_escapes(p
);
6835 fs_give((void **)&p
);
6839 len
= strlen("/HDR=/FG=/BG=") + strlen(spec
? spec
: "") +
6840 strlen(fg
? fg
: "") + strlen(bg
? bg
: "") +
6841 strlen(val
? "/VAL=" : "") + strlen(val
? val
: "");
6842 ret_val
= (char *) fs_get(len
+ 1);
6843 snprintf(ret_val
, len
+1, "/HDR=%s/FG=%s/BG=%s%s%s",
6844 spec
? spec
: "", fg
? fg
: "", bg
? bg
: "",
6845 val
? "/VAL=" : "", val
? val
: "");
6848 fs_give((void **)&spec
);
6850 fs_give((void **)&fg
);
6852 fs_give((void **)&bg
);
6854 fs_give((void **)&val
);
6862 * Returns allocated charstar suitable for config var for a single
6866 varlist_from_spec_colors(SPEC_COLOR_S
*hcolors
)
6869 char **ret_val
= NULL
;
6872 /* count how many */
6873 for(hc
= hcolors
, i
= 0; hc
; hc
= hc
->next
, i
++)
6876 ret_val
= (char **)fs_get((i
+1) * sizeof(*ret_val
));
6877 memset((void *)ret_val
, 0, (i
+1) * sizeof(*ret_val
));
6878 for(hc
= hcolors
, i
= 0; hc
; hc
= hc
->next
, i
++)
6879 ret_val
[i
] = var_from_spec_color(hc
);
6886 update_posting_charset(struct pine
*ps
, int revert
)
6889 if(F_ON(F_USE_SYSTEM_TRANS
, ps
)){
6891 q_status_message(SM_ORDER
, 5, 5, _("This change has no effect because feature Use-System-Translation is on"));
6894 #endif /* ! _WINDOWS */
6895 if(ps
->posting_charmap
)
6896 fs_give((void **) &ps
->posting_charmap
);
6898 if(ps
->VAR_POST_CHAR_SET
){
6899 ps
->posting_charmap
= cpystr(ps
->VAR_POST_CHAR_SET
);
6900 if(!posting_charset_is_supported(ps
->posting_charmap
)){
6901 snprintf(tmp_20k_buf
, SIZEOF_20KBUF
,
6902 _("Posting-Character set \"%s\" is unsupported, using UTF-8"),
6903 ps
->posting_charmap
);
6904 q_status_message(SM_ORDER
| SM_DING
, 3, 5, tmp_20k_buf
);
6905 fs_give((void **) &ps
->posting_charmap
);
6906 ps
->posting_charmap
= cpystr("UTF-8");
6910 ps
->posting_charmap
= cpystr("UTF-8");
6913 #endif /* ! _WINDOWS */
6917 #define FIXED_COMMENT _("(fixed)")
6918 #define DEFAULT_COMMENT _("(default)")
6919 #define OVERRIDE_COMMENT _("(overridden)")
6922 feature_gets_an_x(struct pine
*ps
, struct variable
*var
, FEATURE_S
*feature
,
6923 char **comment
, EditWhich ew
)
6925 char **lval
, **lvalexc
, **lvalnorm
;
6926 char *def
= DEFAULT_COMMENT
;
6928 int feature_fixed_on
= 0, feature_fixed_off
= 0;
6933 lval
= LVAL(var
, ew
);
6934 lvalexc
= LVAL(var
, ps
->ew_for_except_vars
);
6935 lvalnorm
= LVAL(var
, Main
);
6937 /* feature value is administratively fixed */
6938 if((j
= feature_in_list(var
->fixed_val
.l
, feature
->name
)) != 0){
6942 feature_fixed_off
++;
6946 *comment
= FIXED_COMMENT
;
6950 * We have an exceptions config setting which overrides anything
6951 * we do here, in the normal config.
6954 ps
->ew_for_except_vars
!= Main
&& ew
== Main
&&
6955 feature_in_list(lvalexc
, feature
->name
)){
6958 *comment
= OVERRIDE_COMMENT
;
6962 * Feature is set On in default but not set here.
6965 !feature_in_list(lval
, feature
->name
) &&
6966 ((feature_in_list(var
->global_val
.l
, feature
->name
) == 1) ||
6967 ((ps
->ew_for_except_vars
!= Main
&&
6968 ew
== ps
->ew_for_except_vars
&&
6969 feature_in_list(lvalnorm
, feature
->name
) == 1)))){
6977 !feature_in_list(lval
, feature
->name
) &&
6978 !feature_in_list(var
->global_val
.l
, feature
->name
) &&
6979 (ps
->ew_for_except_vars
== Main
||
6980 ew
!= ps
->ew_for_except_vars
||
6981 !feature_in_list(lvalnorm
, feature
->name
))){
6987 return(feature_fixed_on
||
6988 (!feature_fixed_off
&&
6990 test_feature(lval
, feature
->name
,
6991 test_old_growth_bits(ps
, feature
->id
)))));
6996 longest_feature_comment(struct pine
*ps
, EditWhich ew
)
7000 lc
= MAX(lc
, utf8_width(FIXED_COMMENT
));
7001 lc
= MAX(lc
, utf8_width(DEFAULT_COMMENT
));
7002 if(ps
->ew_for_except_vars
!= Main
&& ew
== Main
)
7003 lc
= MAX(lc
, utf8_width(OVERRIDE_COMMENT
));
7010 toggle_feature(struct pine
*ps
, struct variable
*var
, FEATURE_S
*f
,
7011 int just_flip_value
, EditWhich ew
)
7013 char **vp
, *p
, **lval
, ***alval
;
7014 int og
, on_before
, was_set
;
7018 og
= test_old_growth_bits(ps
, f
->id
);
7021 * if this feature is in the fixed set, or old-growth is in the fixed
7022 * set and this feature is in the old-growth set, don't alter it...
7024 for(vp
= var
->fixed_val
.l
; vp
&& *vp
; vp
++){
7025 p
= (struncmp(*vp
, "no-", 3)) ? *vp
: *vp
+ 3;
7026 if(!strucmp(p
, f
->name
) || (og
&& !strucmp(p
, "old-growth"))){
7027 q_status_message(SM_ORDER
, 3, 3,
7028 /* TRANSLATORS: In the configuration screen, telling the user we
7029 can't change this option because the system administrator
7031 _("Can't change value fixed by sys-admin."));
7036 on_before
= F_ON(f
->id
, ps
);
7038 lval
= LVAL(var
, ew
);
7039 alval
= ALVAL(var
, ew
);
7041 was_set
= test_feature(lval
, f
->name
, og
);
7043 was_set
= feature_gets_an_x(ps
, var
, f
, NULL
, ew
);
7046 set_feature(alval
, f
->name
, !was_set
);
7048 set_feature_list_current_val(var
);
7049 process_feature_list(ps
, var
->current_val
.l
, 0, 0, 0);
7052 * Handle any features that need special attention here...
7054 if(on_before
!= F_ON(f
->id
, ps
))
7056 case F_QUOTE_ALL_FROMS
:
7057 mail_parameters(NULL
,SET_FROMWIDGET
,F_ON(f
->id
,ps
) ? VOIDT
: NIL
);
7060 case F_FAKE_NEW_IN_NEWS
:
7061 if(IS_NEWS(ps
->mail_stream
))
7062 q_status_message(SM_ORDER
| SM_DING
, 3, 4,
7063 "news-approximates-new-status won't affect current newsgroup until next open");
7067 case F_COLOR_LINE_IMPORTANT
:
7068 case F_DATES_TO_LOCAL
:
7069 clear_index_cache(ps
->mail_stream
, 0);
7072 case F_DISABLE_INDEX_LOCALE_DATES
:
7073 reset_index_format();
7074 clear_index_cache(ps
->mail_stream
, 0);
7077 case F_MARK_FOR_CC
:
7078 clear_index_cache(ps
->mail_stream
, 0);
7079 if(THREADING() && sp_viewing_a_thread(ps
->mail_stream
))
7080 unview_thread(ps
, ps
->mail_stream
, ps
->msgmap
);
7084 case F_HIDE_NNTP_PATH
:
7085 mail_parameters(NULL
, SET_NNTPHIDEPATH
,
7086 F_ON(f
->id
, ps
) ? VOIDT
: NIL
);
7089 case F_MAILDROPS_PRESERVE_STATE
:
7090 mail_parameters(NULL
, SET_SNARFPRESERVE
,
7091 F_ON(f
->id
, ps
) ? VOIDT
: NIL
);
7094 case F_DISABLE_SHARED_NAMESPACES
:
7095 mail_parameters(NULL
, SET_DISABLEAUTOSHAREDNS
,
7096 F_ON(f
->id
, ps
) ? VOIDT
: NIL
);
7099 case F_QUELL_LOCK_FAILURE_MSGS
:
7100 mail_parameters(NULL
, SET_LOCKEACCESERROR
,
7101 F_ON(f
->id
, ps
) ? VOIDT
: NIL
);
7104 case F_MULNEWSRC_HOSTNAMES_AS_TYPED
:
7105 l
= F_ON(f
->id
, ps
) ? 0L : 1L;
7106 mail_parameters(NULL
, SET_NEWSRCCANONHOST
, (void *) l
);
7109 case F_QUELL_INTERNAL_MSG
:
7110 mail_parameters(NULL
, SET_USERHASNOLIFE
,
7111 F_ON(f
->id
, ps
) ? VOIDT
: NIL
);
7114 case F_DISABLE_SETLOCALE_COLLATE
:
7115 set_collation(F_OFF(F_DISABLE_SETLOCALE_COLLATE
, ps
), 1);
7119 case F_USE_SYSTEM_TRANS
:
7121 reset_character_set_stuff(&err
);
7123 q_status_message(SM_ORDER
| SM_DING
, 3, 4, err
);
7124 fs_give((void **) &err
);
7128 #endif /* ! _WINDOWS */
7130 case F_ENABLE_INCOMING_CHECKING
:
7131 if(!on_before
&& F_OFF(F_ENABLE_INCOMING
, ps
))
7132 q_status_message(SM_ORDER
, 0, 3, _("This option has no effect without Enable-Incoming-Folders"));
7134 clear_incoming_valid_bits();
7137 case F_INCOMING_CHECKING_TOTAL
:
7138 case F_INCOMING_CHECKING_RECENT
:
7139 if(!on_before
&& F_OFF(F_ENABLE_INCOMING_CHECKING
, ps
))
7140 q_status_message(SM_ORDER
, 0, 3, _("This option has no effect without Enable-Incoming-Folders-Checking"));
7142 clear_incoming_valid_bits();
7145 case F_THREAD_SORTS_BY_ARRIVAL
:
7146 clear_index_cache(ps
->mail_stream
, 0);
7147 refresh_sort(ps
->mail_stream
, sp_msgmap(ps
->mail_stream
), SRT_NON
);
7151 case F_DONT_DO_SMIME
:
7155 #ifdef APPLEKEYCHAIN
7156 case F_PUBLICCERTS_IN_KEYCHAIN
:
7169 * Returns 1 -- Feature is in the list and positive
7170 * 0 -- Feature is not in the list at all
7171 * -1 -- Feature is in the list and negative (no-)
7174 feature_in_list(char **l
, char *f
)
7177 int rv
= 0, forced_off
;
7179 for(; l
&& *l
; l
++){
7180 p
= (forced_off
= !struncmp(*l
, "no-", 3)) ? *l
+ 3 : *l
;
7182 rv
= forced_off
? -1 : 1;
7190 * test_feature - runs thru a feature list, and returns:
7191 * 1 if feature explicitly set and matches 'v'
7192 * 0 if feature not explicitly set *or* doesn't match 'v'
7195 test_feature(char **l
, char *f
, int g
)
7198 int rv
= 0, forced_off
;
7200 for(; l
&& *l
; l
++){
7201 p
= (forced_off
= !struncmp(*l
, "no-", 3)) ? *l
+ 3 : *l
;
7204 else if(g
&& !strucmp(p
, "old-growth"))
7213 set_feature(char ***l
, char *f
, int v
)
7215 char **list
= l
? *l
: NULL
, newval
[256];
7218 snprintf(newval
, sizeof(newval
), "%s%s", v
? "" : "no-", f
);
7219 for(; list
&& *list
; list
++, count
++)
7220 if((**list
== '\0') /* anything can replace an empty value */
7221 || !strucmp(((!struncmp(*list
, "no-", 3)) ? *list
+ 3 : *list
), f
)){
7222 fs_give((void **)list
); /* replace with new value */
7223 *list
= cpystr(newval
);
7228 * if we got here, we didn't find it in the list, so grow the list
7232 *l
= (char **)fs_get((count
+ 2) * sizeof(char *));
7234 fs_resize((void **)l
, (count
+ 2) * sizeof(char *));
7236 (*l
)[count
] = cpystr(newval
);
7237 (*l
)[count
+ 1] = NULL
;
7242 reset_character_set_stuff(char **err
)
7250 if(ps_global
->display_charmap
)
7251 fs_give((void **) &ps_global
->display_charmap
);
7253 if(ps_global
->keyboard_charmap
)
7254 fs_give((void **) &ps_global
->keyboard_charmap
);
7256 if(ps_global
->posting_charmap
)
7257 fs_give((void **) &ps_global
->posting_charmap
);
7260 ps_global
->display_charmap
= cpystr("UTF-8");
7262 if(ps_global
->VAR_CHAR_SET
)
7263 ps_global
->display_charmap
= cpystr(ps_global
->VAR_CHAR_SET
);
7265 #if HAVE_LANGINFO_H && defined(CODESET)
7266 ps_global
->display_charmap
= cpystr(nl_langinfo_codeset_wrapper());
7268 ps_global
->display_charmap
= cpystr("UTF-8");
7273 if(!ps_global
->display_charmap
)
7274 ps_global
->display_charmap
= cpystr("US-ASCII");
7277 ps_global
->keyboard_charmap
= cpystr("UTF-8");
7279 if(ps_global
->VAR_KEY_CHAR_SET
)
7280 ps_global
->keyboard_charmap
= cpystr(ps_global
->VAR_KEY_CHAR_SET
);
7282 ps_global
->keyboard_charmap
= cpystr(ps_global
->display_charmap
);
7284 if(!ps_global
->keyboard_charmap
)
7285 ps_global
->keyboard_charmap
= cpystr("US-ASCII");
7287 if(F_ON(F_USE_SYSTEM_TRANS
, ps_global
)){
7288 #if PREREQ_FOR_SYS_TRANSLATION
7290 /* This modifies its arguments */
7291 if(setup_for_input_output(use_system
, &ps_global
->display_charmap
,
7292 &ps_global
->keyboard_charmap
,
7293 &ps_global
->input_cs
, (err
&& *err
) ? NULL
: err
) == -1)
7300 if(setup_for_input_output(use_system
, &ps_global
->display_charmap
,
7301 &ps_global
->keyboard_charmap
,
7302 &ps_global
->input_cs
, (err
&& *err
) ? NULL
: err
) == -1)
7306 if(!use_system
&& ps_global
->VAR_POST_CHAR_SET
){
7307 ps_global
->posting_charmap
= cpystr(ps_global
->VAR_POST_CHAR_SET
);
7308 if(!posting_charset_is_supported(ps_global
->posting_charmap
)){
7310 snprintf(buf
, sizeof(buf
),
7311 _("Posting-Character-Set \"%s\" is unsupported, using UTF-8"),
7312 ps_global
->posting_charmap
);
7316 fs_give((void **) &ps_global
->posting_charmap
);
7317 ps_global
->posting_charmap
= cpystr("UTF-8");
7321 if(use_system
&& ps_global
->VAR_POST_CHAR_SET
7322 && strucmp(ps_global
->VAR_POST_CHAR_SET
, "UTF-8"))
7324 *err
= cpystr(_("Posting-Character-Set is ignored with Use-System-Translation turned on"));
7326 ps_global
->posting_charmap
= cpystr("UTF-8");
7329 set_locale_charmap(ps_global
->keyboard_charmap
);
7336 * Given a single printer string from the config file, returns pointers
7337 * to alloc'd strings containing the printer nickname, the command,
7338 * the init string, the trailer string, everything but the nickname string,
7339 * and everything but the command string. All_but_cmd includes the trailing
7340 * space at the end (the one before the command) but all_but_nick does not
7341 * include the leading space (the one before the [).
7342 * If you pass in a pointer it is guaranteed to come back pointing to an
7343 * allocated string, even if it is just an empty string. It is ok to pass
7344 * NULL for any of the six return strings.
7347 parse_printer(char *input
, char **nick
, char **cmd
, char **init
, char **trailer
,
7348 char **all_but_nick
, char **all_but_cmd
)
7350 char *p
, *q
, *start
, *saved_options
= NULL
;
7356 if(nick
|| all_but_nick
){
7357 if((p
= srchstr(input
, " [")) != NULL
){
7359 *all_but_nick
= cpystr(p
+1);
7362 while(p
-1 > input
&& isspace((unsigned char)*(p
-1)))
7367 *nick
= cpystr(input
);
7376 *all_but_nick
= cpystr(input
);
7380 if((p
= srchstr(input
, "] ")) != NULL
){
7383 }while(isspace((unsigned char)*p
));
7387 saved_options
= cpystr(input
);
7397 if(saved_options
&& (p
= srchstr(saved_options
, "INIT="))){
7398 start
= p
+ strlen("INIT=");
7399 for(cnt
=0, p
= start
; *p
&& *(p
+1) && isxpair(p
); p
+= 2)
7402 q
= *init
= (char *)fs_get((cnt
+ 1) * sizeof(char));
7403 for(p
= start
; *p
&& *(p
+1) && isxpair(p
); p
+= 2)
7413 if(saved_options
&& (p
= srchstr(saved_options
, "TRAILER="))){
7414 start
= p
+ strlen("TRAILER=");
7415 for(cnt
=0, p
= start
; *p
&& *(p
+1) && isxpair(p
); p
+= 2)
7418 q
= *trailer
= (char *)fs_get((cnt
+ 1) * sizeof(char));
7419 for(p
= start
; *p
&& *(p
+1) && isxpair(p
); p
+= 2)
7425 *trailer
= cpystr("");
7430 *all_but_cmd
= saved_options
;
7432 *all_but_cmd
= cpystr("");
7434 else if(saved_options
)
7435 fs_give((void **)&saved_options
);
7440 copy_pinerc(char *local
, char *remote
, char **err_msg
)
7442 return(copy_localfile_to_remotefldr(RemImap
, local
, remote
,
7443 REMOTE_PINERC_SUBTYPE
,
7449 copy_abook(char *local
, char *remote
, char **err_msg
)
7451 return(copy_localfile_to_remotefldr(RemImap
, local
, remote
,
7452 REMOTE_ABOOK_SUBTYPE
,
7458 * Copy local file to remote folder.
7460 * Args remotetype -- type of remote folder
7461 * local -- name of local file
7462 * remote -- name of remote folder
7465 * Returns 0 on success.
7468 copy_localfile_to_remotefldr(RemType remotetype
, char *local
, char *remote
,
7469 char *subtype
, char **err_msg
)
7475 dprint((9, "copy_localfile_to_remotefldr(%s,%s)\n",
7476 local
? local
: "<null>",
7477 remote
? remote
: "<null>"));
7479 *err_msg
= (char *)fs_get(MAXPATH
* sizeof(char));
7481 if(!local
|| !*local
){
7482 snprintf(*err_msg
, MAXPATH
, _("No local file specified"));
7486 if(!remote
|| !*remote
){
7487 snprintf(*err_msg
, MAXPATH
, _("No remote folder specified"));
7491 if(!IS_REMOTE(remote
)){
7492 snprintf(*err_msg
, MAXPATH
, _("Remote folder name \"%s\" %s"), remote
,
7493 (*remote
!= '{') ? _("must begin with \"{\"") : _("not valid"));
7497 if(IS_REMOTE(local
)){
7498 snprintf(*err_msg
, MAXPATH
, _("First argument \"%s\" must be a local filename"),
7503 if(can_access(local
, ACCESS_EXISTS
) != 0){
7504 snprintf(*err_msg
, MAXPATH
, _("Local file \"%s\" does not exist"), local
);
7508 if(can_access(local
, READ_ACCESS
) != 0){
7509 snprintf(*err_msg
, MAXPATH
, _("Can't read local file \"%s\": %s"),
7510 local
, error_description(errno
));
7515 * Check if remote folder exists and create it if it doesn't.
7518 rd
= rd_create_remote(remotetype
, remote
, subtype
,
7519 &flags
, _("Error: "), _("Can't copy to remote folder."));
7521 if(!rd
|| rd
->access
== NoExists
){
7522 snprintf(*err_msg
, MAXPATH
, _("Can't create \"%s\""), remote
);
7524 rd_free_remdata(&rd
);
7529 if(rd
->access
== MaybeRorW
)
7530 rd
->access
= ReadWrite
;
7532 rd
->flags
|= (NO_META_UPDATE
| DO_REMTRIM
);
7533 rd
->lf
= cpystr(local
);
7536 if(!rd_stream_exists(rd
)){
7537 snprintf(*err_msg
, MAXPATH
, _("Can't open remote folder \"%s\""), rd
->rn
);
7538 rd_free_remdata(&rd
);
7542 if(rd_remote_is_readonly(rd
)){
7543 snprintf(*err_msg
, MAXPATH
, _("Remote folder \"%s\" is readonly"), rd
->rn
);
7544 rd_free_remdata(&rd
);
7551 * Empty folder, add a header msg.
7553 if(rd
->t
.i
.stream
->nmsgs
== 0){
7554 if(rd_init_remote(rd
, 1) != 0){
7555 snprintf(*err_msg
, MAXPATH
,
7556 _("Failed initializing remote folder \"%s\", check debug file"),
7558 rd_free_remdata(&rd
);
7563 fs_give((void **)err_msg
);
7565 if(rd_chk_for_hdr_msg(&(rd
->t
.i
.stream
), rd
, err_msg
)){
7566 rd_free_remdata(&rd
);
7576 if(rd_update_remote(rd
, NULL
) != 0){
7577 snprintf(*err_msg
, MAXPATH
, _("Error copying to remote folder \"%s\""), rd
->rn
);
7578 rd_free_remdata(&rd
);
7582 rd_update_metadata(rd
, NULL
);
7583 rd_close_remdata(&rd
);
7585 fs_give((void **)err_msg
);
7590 /*----------------------------------------------------------------------
7591 Panic pine - call on detected programmatic errors to exit pine, with arg
7593 Input: message -- printf styule string for panic message (see above)
7594 arg -- argument for printf string
7596 Result: The various tty modes are restored
7597 If debugging is active a core dump will be generated
7601 panic1(char *message
, char *arg
)
7603 char buf1
[1001], buf2
[1001];
7605 snprintf(buf1
, sizeof(buf1
), "%.*s", MAX(sizeof(buf1
) - 1 - strlen(message
), 0), arg
);
7606 snprintf(buf2
, sizeof(buf2
), message
, buf1
);
7615 config_help(int var
, int feature
)
7618 case V_FEATURE_LIST
:
7619 return(feature_list_help(feature
));
7622 case V_PERSONAL_NAME
:
7623 return(h_config_pers_name
);
7625 return(h_config_user_id
);
7626 case V_USER_DOMAIN
:
7627 return(h_config_user_dom
);
7628 case V_SMTP_SERVER
:
7629 return(h_config_smtp_server
);
7630 case V_NNTP_SERVER
:
7631 return(h_config_nntp_server
);
7633 return(h_config_inbox_path
);
7634 case V_PRUNED_FOLDERS
:
7635 return(h_config_pruned_folders
);
7636 case V_DEFAULT_FCC
:
7637 return(h_config_default_fcc
);
7638 case V_DEFAULT_SAVE_FOLDER
:
7639 return(h_config_def_save_folder
);
7640 case V_POSTPONED_FOLDER
:
7641 return(h_config_postponed_folder
);
7642 case V_READ_MESSAGE_FOLDER
:
7643 return(h_config_read_message_folder
);
7644 case V_FORM_FOLDER
:
7645 return(h_config_form_folder
);
7646 case V_ARCHIVED_FOLDERS
:
7647 return(h_config_archived_folders
);
7648 case V_SIGNATURE_FILE
:
7649 return(h_config_signature_file
);
7650 case V_LITERAL_SIG
:
7651 return(h_config_literal_sig
);
7652 case V_INIT_CMD_LIST
:
7653 return(h_config_init_cmd_list
);
7655 return(h_config_comp_hdrs
);
7656 case V_CUSTOM_HDRS
:
7657 return(h_config_custom_hdrs
);
7658 case V_VIEW_HEADERS
:
7659 return(h_config_viewer_headers
);
7660 case V_VIEW_MARGIN_LEFT
:
7661 return(h_config_viewer_margin_left
);
7662 case V_VIEW_MARGIN_RIGHT
:
7663 return(h_config_viewer_margin_right
);
7664 case V_QUOTE_SUPPRESSION
:
7665 return(h_config_quote_suppression
);
7666 case V_SAVED_MSG_NAME_RULE
:
7667 return(h_config_saved_msg_name_rule
);
7669 return(h_config_fcc_rule
);
7671 return(h_config_sort_key
);
7672 case V_AB_SORT_RULE
:
7673 return(h_config_ab_sort_rule
);
7674 case V_FLD_SORT_RULE
:
7675 return(h_config_fld_sort_rule
);
7676 case V_POST_CHAR_SET
:
7677 return(h_config_post_char_set
);
7678 case V_UNK_CHAR_SET
:
7679 return(h_config_unk_char_set
);
7681 case V_KEY_CHAR_SET
:
7682 return(h_config_key_char_set
);
7684 return(h_config_char_set
);
7685 #endif /* ! _WINDOWS */
7687 return(h_config_editor
);
7689 return(h_config_speller
);
7690 case V_DISPLAY_FILTERS
:
7691 return(h_config_display_filters
);
7692 case V_SEND_FILTER
:
7693 return(h_config_sending_filter
);
7695 return(h_config_alt_addresses
);
7697 return(h_config_keywords
);
7699 return(h_config_kw_braces
);
7700 case V_OPENING_SEP
:
7701 return(h_config_opening_sep
);
7703 return(h_config_kw_color
);
7704 case V_ABOOK_FORMATS
:
7705 return(h_config_abook_formats
);
7706 case V_INDEX_FORMAT
:
7707 return(h_config_index_format
);
7708 case V_INCCHECKTIMEO
:
7709 return(h_config_incoming_timeo
);
7710 case V_INCCHECKINTERVAL
:
7711 return(h_config_incoming_interv
);
7712 case V_INC2NDCHECKINTERVAL
:
7713 return(h_config_incoming_second_interv
);
7714 case V_INCCHECKLIST
:
7715 return(h_config_incoming_list
);
7717 return(h_config_psleep
);
7719 return(h_config_viewer_overlap
);
7720 case V_MAXREMSTREAM
:
7721 return(h_config_maxremstream
);
7723 return(h_config_permlocked
);
7725 return(h_config_scroll_margin
);
7727 return(h_config_deadlets
);
7729 return(h_config_composer_wrap_column
);
7730 case V_TCPOPENTIMEO
:
7731 return(h_config_tcp_open_timeo
);
7732 case V_TCPREADWARNTIMEO
:
7733 return(h_config_tcp_readwarn_timeo
);
7734 case V_TCPWRITEWARNTIMEO
:
7735 return(h_config_tcp_writewarn_timeo
);
7736 case V_TCPQUERYTIMEO
:
7737 return(h_config_tcp_query_timeo
);
7738 case V_RSHOPENTIMEO
:
7739 return(h_config_rsh_open_timeo
);
7740 case V_SSHOPENTIMEO
:
7741 return(h_config_ssh_open_timeo
);
7742 case V_USERINPUTTIMEO
:
7743 return(h_config_user_input_timeo
);
7744 case V_REMOTE_ABOOK_VALIDITY
:
7745 return(h_config_remote_abook_validity
);
7746 case V_REMOTE_ABOOK_HISTORY
:
7747 return(h_config_remote_abook_history
);
7748 case V_INCOMING_FOLDERS
:
7749 return(h_config_incoming_folders
);
7750 case V_FOLDER_SPEC
:
7751 return(h_config_folder_spec
);
7753 return(h_config_news_spec
);
7754 case V_ADDRESSBOOK
:
7755 return(h_config_address_book
);
7756 case V_GLOB_ADDRBOOK
:
7757 return(h_config_glob_addrbook
);
7758 case V_LAST_VERS_USED
:
7759 return(h_config_last_vers
);
7760 case V_SENDMAIL_PATH
:
7761 return(h_config_sendmail_path
);
7763 return(h_config_oper_dir
);
7765 return(h_config_rshpath
);
7767 return(h_config_rshcmd
);
7769 return(h_config_sshpath
);
7771 return(h_config_sshcmd
);
7772 case V_NEW_VER_QUELL
:
7773 return(h_config_new_ver_quell
);
7774 case V_DISABLE_DRIVERS
:
7775 return(h_config_disable_drivers
);
7776 case V_DISABLE_AUTHS
:
7777 return(h_config_disable_auths
);
7778 case V_REMOTE_ABOOK_METADATA
:
7779 return(h_config_abook_metafile
);
7780 case V_REPLY_STRING
:
7781 return(h_config_reply_indent_string
);
7783 return(h_config_wordseps
);
7784 case V_QUOTE_REPLACE_STRING
:
7785 return(h_config_quote_replace_string
);
7786 case V_REPLY_INTRO
:
7787 return(h_config_reply_intro
);
7788 case V_EMPTY_HDR_MSG
:
7789 return(h_config_empty_hdr_msg
);
7790 case V_STATUS_MSG_DELAY
:
7791 return(h_config_status_msg_delay
);
7792 case V_ACTIVE_MSG_INTERVAL
:
7793 return(h_config_active_msg_interval
);
7795 return(h_config_mailcheck
);
7796 case V_MAILCHECKNONCURR
:
7797 return(h_config_mailchecknoncurr
);
7798 case V_MAILDROPCHECK
:
7799 return(h_config_maildropcheck
);
7801 return(h_config_nntprange
);
7802 case V_NEWS_ACTIVE_PATH
:
7803 return(h_config_news_active
);
7804 case V_NEWS_SPOOL_DIR
:
7805 return(h_config_news_spool
);
7806 case V_IMAGE_VIEWER
:
7807 return(h_config_image_viewer
);
7808 case V_USE_ONLY_DOMAIN_NAME
:
7809 return(h_config_domain_name
);
7810 case V_LAST_TIME_PRUNE_QUESTION
:
7811 return(h_config_prune_date
);
7813 return(h_config_upload_cmd
);
7814 case V_UPLOAD_CMD_PREFIX
:
7815 return(h_config_upload_prefix
);
7816 case V_DOWNLOAD_CMD
:
7817 return(h_config_download_cmd
);
7818 case V_DOWNLOAD_CMD_PREFIX
:
7819 return(h_config_download_prefix
);
7820 case V_GOTO_DEFAULT_RULE
:
7821 return(h_config_goto_default
);
7822 case V_INCOMING_STARTUP
:
7823 return(h_config_inc_startup
);
7824 case V_PRUNING_RULE
:
7825 return(h_config_pruning_rule
);
7827 return(h_config_reopen_rule
);
7828 case V_THREAD_DISP_STYLE
:
7829 return(h_config_thread_disp_style
);
7830 case V_THREAD_INDEX_STYLE
:
7831 return(h_config_thread_index_style
);
7832 case V_THREAD_MORE_CHAR
:
7833 return(h_config_thread_indicator_char
);
7834 case V_THREAD_EXP_CHAR
:
7835 return(h_config_thread_exp_char
);
7836 case V_THREAD_LASTREPLY_CHAR
:
7837 return(h_config_thread_lastreply_char
);
7838 case V_MAILCAP_PATH
:
7839 return(h_config_mailcap_path
);
7840 case V_MIMETYPE_PATH
:
7841 return(h_config_mimetype_path
);
7842 #if !defined(DOS) && !defined(OS2) && !defined(LEAVEOUTFIFO)
7844 return(h_config_fifopath
);
7847 return(h_config_newmailwidth
);
7848 case V_NEWSRC_PATH
:
7849 return(h_config_newsrc_path
);
7851 return(h_config_browser
);
7852 #if defined(DOS) || defined(OS2)
7854 return(h_config_file_dir
);
7856 case V_NORM_FORE_COLOR
:
7857 case V_NORM_BACK_COLOR
:
7858 return(h_config_normal_color
);
7859 case V_REV_FORE_COLOR
:
7860 case V_REV_BACK_COLOR
:
7861 return(h_config_reverse_color
);
7862 case V_TITLE_FORE_COLOR
:
7863 case V_TITLE_BACK_COLOR
:
7864 return(h_config_title_color
);
7865 case V_TITLECLOSED_FORE_COLOR
:
7866 case V_TITLECLOSED_BACK_COLOR
:
7867 return(h_config_titleclosed_color
);
7868 case V_FOLDER_FORE_COLOR
:
7869 return(h_config_folder_color
);
7870 case V_DIRECTORY_FORE_COLOR
:
7871 return(h_config_directory_color
);
7872 case V_FOLDER_LIST_FORE_COLOR
:
7873 return(h_config_folder_list_color
);
7874 case V_STATUS_FORE_COLOR
:
7875 case V_STATUS_BACK_COLOR
:
7876 return(h_config_status_color
);
7877 case V_SLCTBL_FORE_COLOR
:
7878 case V_SLCTBL_BACK_COLOR
:
7879 return(h_config_slctbl_color
);
7880 case V_QUOTE1_FORE_COLOR
:
7881 case V_QUOTE2_FORE_COLOR
:
7882 case V_QUOTE3_FORE_COLOR
:
7883 case V_QUOTE1_BACK_COLOR
:
7884 case V_QUOTE2_BACK_COLOR
:
7885 case V_QUOTE3_BACK_COLOR
:
7886 return(h_config_quote_color
);
7887 case V_INCUNSEEN_FORE_COLOR
:
7888 case V_INCUNSEEN_BACK_COLOR
:
7889 return(h_config_incunseen_color
);
7890 case V_SIGNATURE_FORE_COLOR
:
7891 case V_SIGNATURE_BACK_COLOR
:
7892 return(h_config_signature_color
);
7893 case V_PROMPT_FORE_COLOR
:
7894 case V_PROMPT_BACK_COLOR
:
7895 return(h_config_prompt_color
);
7896 case V_HEADER_GENERAL_FORE_COLOR
:
7897 case V_HEADER_GENERAL_BACK_COLOR
:
7898 return(h_config_header_general_color
);
7899 case V_IND_PLUS_FORE_COLOR
:
7900 case V_IND_IMP_FORE_COLOR
:
7901 case V_IND_DEL_FORE_COLOR
:
7902 case V_IND_ANS_FORE_COLOR
:
7903 case V_IND_NEW_FORE_COLOR
:
7904 case V_IND_UNS_FORE_COLOR
:
7905 case V_IND_REC_FORE_COLOR
:
7906 case V_IND_FWD_FORE_COLOR
:
7907 case V_IND_PLUS_BACK_COLOR
:
7908 case V_IND_IMP_BACK_COLOR
:
7909 case V_IND_DEL_BACK_COLOR
:
7910 case V_IND_ANS_BACK_COLOR
:
7911 case V_IND_NEW_BACK_COLOR
:
7912 case V_IND_UNS_BACK_COLOR
:
7913 case V_IND_REC_BACK_COLOR
:
7914 case V_IND_FWD_BACK_COLOR
:
7915 return(h_config_index_color
);
7916 case V_IND_OP_FORE_COLOR
:
7917 case V_IND_OP_BACK_COLOR
:
7918 return(h_config_index_opening_color
);
7919 case V_IND_SUBJ_FORE_COLOR
:
7920 case V_IND_SUBJ_BACK_COLOR
:
7921 return(h_config_index_subject_color
);
7922 case V_IND_FROM_FORE_COLOR
:
7923 case V_IND_FROM_BACK_COLOR
:
7924 return(h_config_index_from_color
);
7925 case V_IND_HIPRI_FORE_COLOR
:
7926 case V_IND_HIPRI_BACK_COLOR
:
7927 case V_IND_LOPRI_FORE_COLOR
:
7928 case V_IND_LOPRI_BACK_COLOR
:
7929 return(h_config_index_pri_color
);
7930 case V_IND_ARR_FORE_COLOR
:
7931 case V_IND_ARR_BACK_COLOR
:
7932 return(h_config_index_arrow_color
);
7933 case V_KEYLABEL_FORE_COLOR
:
7934 case V_KEYLABEL_BACK_COLOR
:
7935 return(h_config_keylabel_color
);
7936 case V_KEYNAME_FORE_COLOR
:
7937 case V_KEYNAME_BACK_COLOR
:
7938 return(h_config_keyname_color
);
7939 case V_METAMSG_FORE_COLOR
:
7940 case V_METAMSG_BACK_COLOR
:
7941 return(h_config_metamsg_color
);
7942 case V_VIEW_HDR_COLORS
:
7943 return(h_config_customhdr_color
);
7944 case V_INDEX_TOKEN_COLORS
:
7945 return(h_config_indextoken_color
);
7947 return(h_config_printer
);
7948 case V_PERSONAL_PRINT_CATEGORY
:
7949 return(h_config_print_cat
);
7950 case V_PERSONAL_PRINT_COMMAND
:
7951 return(h_config_print_command
);
7953 return(h_config_pat_roles
);
7955 return(h_config_pat_filts
);
7957 return(h_config_pat_scores
);
7959 return(h_config_pat_incols
);
7961 return(h_config_pat_other
);
7963 return(h_config_pat_srch
);
7964 case V_INDEX_COLOR_STYLE
:
7965 return(h_config_index_color_style
);
7966 case V_TITLEBAR_COLOR_STYLE
:
7967 return(h_config_titlebar_color_style
);
7970 return(h_config_font_name
);
7972 return(h_config_font_size
);
7974 return(h_config_font_style
);
7975 case V_FONT_CHAR_SET
:
7976 return(h_config_font_char_set
);
7977 case V_PRINT_FONT_NAME
:
7978 return(h_config_print_font_name
);
7979 case V_PRINT_FONT_SIZE
:
7980 return(h_config_print_font_size
);
7981 case V_PRINT_FONT_STYLE
:
7982 return(h_config_print_font_style
);
7983 case V_PRINT_FONT_CHAR_SET
:
7984 return(h_config_print_font_char_set
);
7985 case V_WINDOW_POSITION
:
7986 return(h_config_window_position
);
7987 case V_CURSOR_STYLE
:
7988 return(h_config_cursor_style
);
7990 case V_COLOR_STYLE
:
7991 return(h_config_color_style
);
7994 case V_LDAP_SERVERS
:
7995 return(h_config_ldap_servers
);
7998 case V_PUBLICCERT_DIR
:
7999 return(h_config_smime_pubcertdir
);
8000 case V_PUBLICCERT_CONTAINER
:
8001 return(h_config_smime_pubcertcon
);
8002 case V_PRIVATEKEY_DIR
:
8003 return(h_config_smime_privkeydir
);
8004 case V_PRIVATEKEY_CONTAINER
:
8005 return(h_config_smime_privkeycon
);
8007 return(h_config_smime_cacertdir
);
8008 case V_CACERT_CONTAINER
:
8009 return(h_config_smime_cacertcon
);
8012 return(h_config_rss_news
);
8013 case V_RSS_WEATHER
:
8014 return(h_config_rss_weather
);
8015 case V_WP_INDEXHEIGHT
:
8016 return(h_config_wp_indexheight
);
8017 case V_WP_INDEXLINES
:
8018 return(h_config_wp_indexlines
);
8019 case V_WP_AGGSTATE
:
8020 return(h_config_wp_aggstate
);
8022 return(h_config_wp_state
);
8024 return(h_config_wp_columns
);
8032 * We don't want the user to be able to edit their pinerc and set
8033 * printer to whatever they want if personal-print-command is fixed.
8034 * So make sure printer is set to something legitimate. If it isn't,
8035 * set it to something standard and return non-zero.
8038 printer_value_check_and_adjust(void)
8041 char aname
[100], wname
[100];
8043 struct variable
*vars
= ps_global
->vars
;
8045 if(vars
[V_PERSONAL_PRINT_COMMAND
].is_fixed
&& !vars
[V_PRINTER
].is_fixed
){
8046 strncpy(aname
, ANSI_PRINTER
, sizeof(aname
));
8047 aname
[sizeof(aname
)-1] = '\0';
8048 strncat(aname
, "-no-formfeed", sizeof(aname
)-strlen(aname
)-1);
8049 strncpy(wname
, WYSE_PRINTER
, sizeof(wname
));
8050 wname
[sizeof(wname
)-1] = '\0';
8051 strncat(wname
, "-no-formfeed", sizeof(wname
)-strlen(wname
)-1);
8052 if(strucmp(VAR_PRINTER
, ANSI_PRINTER
) == 0
8053 || strucmp(VAR_PRINTER
, aname
) == 0
8054 || strucmp(VAR_PRINTER
, WYSE_PRINTER
) == 0
8055 || strucmp(VAR_PRINTER
, wname
) == 0)
8057 else if(VAR_STANDARD_PRINTER
&& VAR_STANDARD_PRINTER
[0]){
8058 for(tt
= VAR_STANDARD_PRINTER
; *tt
; tt
++)
8059 if(strucmp(VAR_PRINTER
, *tt
) == 0)
8070 if(VAR_STANDARD_PRINTER
&& VAR_STANDARD_PRINTER
[0])
8071 val
= VAR_STANDARD_PRINTER
[0];
8075 v
= &vars
[V_PRINTER
];
8076 if(v
->main_user_val
.p
)
8077 fs_give((void **)&v
->main_user_val
.p
);
8078 if(v
->post_user_val
.p
)
8079 fs_give((void **)&v
->post_user_val
.p
);
8080 if(v
->current_val
.p
)
8081 fs_give((void **)&v
->current_val
.p
);
8083 v
->main_user_val
.p
= cpystr(val
);
8084 v
->current_val
.p
= cpystr(val
);
8093 get_supported_options(void)
8098 char *title
= _("Supported features in this Alpine");
8099 char sbuf
[MAX_SCREEN_COLS
+1];
8100 int cnt
, alcnt
, len
, cols
, disabled
, any_disabled
= 0;;
8105 * SSL Title + SSL lines + blank = 5
8106 * Auth title + blank = 2
8107 * Driver title + blank = 2
8108 * LDAP title + LDAP line = 2
8109 * Disabled explanation + blank line = 4
8113 for(a
= mail_lookup_auth(1); a
; a
= a
->next
)
8115 for(d
= (DRIVER
*)mail_parameters(NIL
, GET_DRIVERS
, NIL
);
8120 config
= (char **) fs_get(alcnt
* sizeof(char *));
8121 memset(config
, 0, alcnt
* sizeof(char *));
8123 cols
= ps_global
->ttyo
? ps_global
->ttyo
->screen_cols
: 0;
8124 len
= utf8_width(title
);
8125 snprintf(sbuf
, sizeof(sbuf
), "%*s%s", cols
> len
? (cols
-len
)/2 : 0, "", title
);
8129 config
[cnt
] = cpystr(sbuf
);
8132 config
[cnt
] = cpystr("");
8135 /* TRANSLATORS: headings */
8136 config
[cnt
] = cpystr(_("Encryption:"));
8138 if(++cnt
< alcnt
&& mail_parameters(NIL
, GET_SSLDRIVER
, NIL
))
8139 config
[cnt
] = cpystr(_(" TLS and SSL"));
8141 config
[cnt
] = cpystr(_(" None (no TLS or SSL)"));
8142 #ifdef SSL_SUPPORTS_TLSV1_2
8144 config
[cnt
] = cpystr(" TLSv1.1, TLSv1.2, and DTLSv1");
8148 config
[cnt
] = cpystr(" S/MIME");
8152 config
[cnt
] = cpystr("");
8155 config
[cnt
] = cpystr(_("Authenticators:"));
8157 for(a
= mail_lookup_auth(1); a
; a
= a
->next
){
8158 disabled
= (a
->client
== NULL
&& a
->server
== NULL
);
8159 any_disabled
+= disabled
;
8160 snprintf(sbuf
, sizeof(sbuf
), " %s%s", a
->name
, disabled
? " (disabled)" : "");
8162 config
[cnt
] = cpystr(sbuf
);
8166 config
[cnt
] = cpystr("");
8169 config
[cnt
] = cpystr(_("Mailbox drivers:"));
8171 for(d
= (DRIVER
*)mail_parameters(NIL
, GET_DRIVERS
, NIL
);
8173 disabled
= (d
->flags
& DR_DISABLE
);
8174 any_disabled
+= disabled
;
8175 snprintf(sbuf
, sizeof(sbuf
), " %s%s", d
->name
, disabled
? " (disabled)" : "");
8177 config
[cnt
] = cpystr(sbuf
);
8181 config
[cnt
] = cpystr("");
8184 config
[cnt
] = cpystr(_("Directories:"));
8188 config
[cnt
] = cpystr(" LDAP");
8191 config
[cnt
] = cpystr(" None (no LDAP)");
8196 config
[cnt
] = cpystr("");
8198 if(ps_global
->ttyo
){
8200 config
[cnt
] = cpystr(_("Authenticators may be disabled because of the \"disable-these-authenticators\" hidden config option. Mailbox drivers may be disabled because of the \"disable-these-drivers\" hidden config option."));
8204 config
[cnt
] = cpystr(_("Authenticators may be disabled because of the \"disable-these-authenticators\""));
8206 config
[cnt
] = cpystr(_("hidden config option. Mailbox drivers may be disabled because of the"));
8208 config
[cnt
] = cpystr(_("\"disable-these-drivers\" hidden config option."));
8220 reset_startup_rule(MAILSTREAM
*stream
)
8222 long rflags
= ROLE_DO_OTHER
;
8225 unsigned startup_rule
;
8227 startup_rule
= IS_NOTSET
;
8229 if(stream
&& nonempty_patterns(rflags
, &pstate
)){
8230 for(pat
= first_pattern(&pstate
); pat
; pat
= next_pattern(&pstate
)){
8231 if(match_pattern(pat
->patgrp
, stream
, NULL
, NULL
, NULL
,
8232 SE_NOSERVER
|SE_NOPREFETCH
))
8236 if(pat
&& pat
->action
&& !pat
->action
->bogus
)
8237 startup_rule
= pat
->action
->startup_rule
;
8240 return(startup_rule
);
8247 transformed_color(old
)
8253 if(!struncmp(old
, "color008", 8))
8255 else if(!struncmp(old
, "color009", 8))
8257 else if(!struncmp(old
, "color010", 8))
8265 * If this is the first time we've run a version > 4.40, and there
8266 * is evidence that the config file has not been used by unix pine,
8267 * then we convert color008 to colorlgr, color009 to colormgr, and
8268 * color010 to colordgr. If the config file is being used by
8269 * unix pine then color008 may really supposed to be color008, color009
8270 * may really supposed to be red, and color010 may really supposed to be
8271 * green. Same if we've already run 4.41 or higher previously.
8273 * Returns 0 if no changes, > 0 if something was changed.
8276 convert_pc_gray_names(ps
, prc
, which
)
8282 int ret
= 0, ic
= 0;
8283 char **s
, *t
, *p
, *pstr
, *new, *pval
, **apval
, **lval
;
8285 for(v
= ps
->vars
; v
->name
; v
++){
8286 if(!color_holding_var(ps
, v
) || v
== &ps
->vars
[V_KW_COLORS
])
8289 if(v
== &ps
->vars
[V_VIEW_HDR_COLORS
]){
8291 if((lval
= LVAL(v
,which
)) != NULL
){
8292 /* fix these in place */
8293 for(s
= lval
; (t
= *s
) != NULL
; s
++){
8294 if((p
= srchstr(t
, "FG=color008")) ||
8295 (p
= srchstr(t
, "FG=color009")) ||
8296 (p
= srchstr(t
, "FG=color010"))){
8297 strncpy(p
+3, transformed_color(p
+3), 8);
8301 if((p
= srchstr(t
, "BG=color008")) ||
8302 (p
= srchstr(t
, "BG=color009")) ||
8303 (p
= srchstr(t
, "BG=color010"))){
8304 strncpy(p
+3, transformed_color(p
+3), 8);
8311 if((pval
= PVAL(v
,which
)) != NULL
){
8312 apval
= APVAL(v
,which
);
8313 if(apval
&& (!strucmp(pval
, "color008") ||
8314 !strucmp(pval
, "color009") ||
8315 !strucmp(pval
, "color010"))){
8316 new = transformed_color(pval
);
8318 fs_give((void **)apval
);
8320 *apval
= cpystr(new);
8327 v
= &ps
->vars
[V_PAT_INCOLS
];
8328 if((lval
= LVAL(v
,which
)) != NULL
){
8329 for(s
= lval
; (t
= *s
) != NULL
; s
++){
8330 if((pstr
= srchstr(t
, "action=")) != NULL
){
8331 if((p
= srchstr(pstr
, "FG=color008")) ||
8332 (p
= srchstr(pstr
, "FG=color009")) ||
8333 (p
= srchstr(pstr
, "FG=color010"))){
8334 strncpy(p
+3, transformed_color(p
+3), 8);
8338 if((p
= srchstr(pstr
, "BG=color008")) ||
8339 (p
= srchstr(pstr
, "BG=color009")) ||
8340 (p
= srchstr(pstr
, "BG=color010"))){
8341 strncpy(p
+3, transformed_color(p
+3), 8);
8349 set_current_val(&ps
->vars
[V_PAT_INCOLS
], TRUE
, TRUE
);
8356 unix_color_style_in_pinerc(prc
)
8361 for(pline
= prc
? prc
->pinerc_lines
: NULL
;
8362 pline
&& (pline
->var
|| pline
->line
); pline
++)
8363 if(pline
->line
&& !struncmp("color-style=", pline
->line
, 12))
8370 pcpine_general_help(titlebuf
)
8374 strcpy(titlebuf
, "PC Alpine For Windows");
8376 return(pcpine_help(h_pine_for_windows
));
8379 #endif /* _WINDOWS */