From 9a9467cafe1c27290eac02c0a6bb6baa480a5096 Mon Sep 17 00:00:00 2001
From: "Eric S. Raymond" <esr@thyrsus.com>
Date: Sun, 31 Jan 1999 21:15:12 +0000
Subject: Now we can have top-level properties.

svn path=/trunk/; revision=2368
---
 conf.c        | 3 ++-
 fetchmail.h   | 3 ++-
 fetchmail.man | 3 +++
 fetchmailconf | 8 ++++++--
 rcfile_y.y    | 1 +
 5 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/conf.c b/conf.c
index b8603f98..b12c8d76 100644
--- a/conf.c
+++ b/conf.c
@@ -183,11 +183,12 @@ void dump_config(struct runctl *runp, struct query *querylist)
     indent('{');
 
     numdump("poll_interval", runp->poll_interval);
-    booldump("syslog", runp->use_syslog);
     stringdump("logfile", runp->logfile);
     stringdump("idfile", runp->idfile);
     stringdump("postmaster", runp->postmaster);
+    stringdump("properties", runp->properties);
     booldump("invisible", runp->invisible);
+    booldump("syslog", runp->use_syslog);
 
     if (!querylist)
     {
diff --git a/fetchmail.h b/fetchmail.h
index 1e4e6c51..f07f04ac 100644
--- a/fetchmail.h
+++ b/fetchmail.h
@@ -103,9 +103,10 @@ struct runctl
     char	*logfile;
     char	*idfile;
     int		poll_interval;
+    char	*postmaster;
+    char	*properties;
     flag	use_syslog;
     flag	invisible;
-    char	*postmaster;
 };
 
 struct idlist
diff --git a/fetchmail.man b/fetchmail.man
index 7e100034..6eb9a289 100644
--- a/fetchmail.man
+++ b/fetchmail.man
@@ -957,6 +957,9 @@ T}
 set nosyslog  	\&	T{
 Turn off error logging through syslog(3).
 T}
+set properties 	\&	T{
+String value is ignored by fetchmail (may be used by extension scripts)
+T}
 .TE
 
 Here are the legal server options:
diff --git a/fetchmailconf b/fetchmailconf
index b49fc7b0..846ed1d7 100755
--- a/fetchmailconf
+++ b/fetchmailconf
@@ -16,18 +16,20 @@ import sys, time, os, string, socket, getopt
 class Configuration:
     def __init__(self):
 	self.poll_interval = 0		# Normally, run in foreground
-	self.syslog = FALSE		# Use syslogd for logging?
 	self.logfile = None		# No logfile, initially
 	self.idfile = os.environ["HOME"] + "/.fetchids"		# Default idfile, initially
         self.postmaster = None		# No last-resort address, initially
+        self.properties = None		# No exiguous properties
 	self.invisible = FALSE		# Suppress Received line & spoof?
+	self.syslog = FALSE		# Use syslogd for logging?
 	self.servers = []		# List of included sites
 	Configuration.typemap = (
 	    ('poll_interval',	'Int'),
-	    ('syslog',		'Boolean'),
 	    ('logfile',		'String'),
 	    ('idfile',		'String'),
 	    ('postmaster',	'String'),
+	    ('properties',	'String'),
+	    ('syslog',		'Boolean'),
 	    ('invisible',	'Boolean'))
 
     def __repr__(self):
@@ -40,6 +42,8 @@ class Configuration:
 	    str = str + ("set idfile \"%s\"\n" % (self.idfile,));
 	if self.postmaster != ConfigurationDefaults.postmaster:
 	    str = str + ("set postmaster \"%s\"\n" % (self.postmaster,));
+	if self.properties != ConfigurationDefaults.properties:
+	    str = str + ("set properties \"%s\"\n" % (self.properties,));
 	if self.poll_interval > 0:
 	    str = str + "set daemon " + `self.poll_interval` + "\n"
 	for site in self.servers:
diff --git a/rcfile_y.y b/rcfile_y.y
index 05084635..adf21428 100644
--- a/rcfile_y.y
+++ b/rcfile_y.y
@@ -88,6 +88,7 @@ statement	: SET LOGFILE optmap STRING	{run.logfile = xstrdup($4);}
 		| SET IDFILE optmap STRING	{run.idfile = xstrdup($4);}
 		| SET DAEMON optmap NUMBER	{run.poll_interval = $4;}
 		| SET POSTMASTER optmap STRING	{run.postmaster = xstrdup($4);}
+		| SET PROPERTIES optmap STRING	{run.properties =xstrdup($4);}
 		| SET SYSLOG			{run.use_syslog = TRUE;}
 		| SET INVISIBLE			{run.invisible = TRUE;}
 
-- 
cgit v1.2.3