1 /* Copyright (c) 2001 Matej Pfajfar.
2 * Copyright (c) 2001-2004, Roger Dingledine.
3 * Copyright (c) 2004-2006, Roger Dingledine, Nick Mathewson.
4 * Copyright (c) 2007-2010, The Tor Project, Inc. */
5 /* See LICENSE for licensing information */
9 * \brief Code to parse and interpret configuration files.
12 #define CONFIG_PRIVATE
19 /** Enumeration of types which option values can take */
20 typedef enum config_type_t
{
21 CONFIG_TYPE_STRING
= 0, /**< An arbitrary string. */
22 CONFIG_TYPE_FILENAME
, /**< A filename: some prefixes get expanded. */
23 CONFIG_TYPE_UINT
, /**< A non-negative integer less than MAX_INT */
24 CONFIG_TYPE_INTERVAL
, /**< A number of seconds, with optional units*/
25 CONFIG_TYPE_MEMUNIT
, /**< A number of bytes, with optional units*/
26 CONFIG_TYPE_DOUBLE
, /**< A floating-point value */
27 CONFIG_TYPE_BOOL
, /**< A boolean value, expressed as 0 or 1. */
28 CONFIG_TYPE_ISOTIME
, /**< An ISO-formatted time relative to GMT. */
29 CONFIG_TYPE_CSV
, /**< A list of strings, separated by commas and
30 * optional whitespace. */
31 CONFIG_TYPE_LINELIST
, /**< Uninterpreted config lines */
32 CONFIG_TYPE_LINELIST_S
, /**< Uninterpreted, context-sensitive config lines,
33 * mixed with other keywords. */
34 CONFIG_TYPE_LINELIST_V
, /**< Catch-all "virtual" option to summarize
35 * context-sensitive config lines when fetching.
37 CONFIG_TYPE_ROUTERSET
, /**< A list of router names, addrs, and fps,
38 * parsed into a routerset_t. */
39 CONFIG_TYPE_OBSOLETE
, /**< Obsolete (ignored) option. */
42 /** An abbreviation for a configuration option allowed on the command line. */
43 typedef struct config_abbrev_t
{
44 const char *abbreviated
;
50 /* Handy macro for declaring "In the config file or on the command line,
51 * you can abbreviate <b>tok</b>s as <b>tok</b>". */
52 #define PLURAL(tok) { #tok, #tok "s", 0, 0 }
54 /** A list of abbreviations and aliases to map command-line options, obsolete
55 * option names, or alternative option names, to their current values. */
56 static config_abbrev_t _option_abbrevs
[] = {
61 PLURAL(LongLivedPort
),
62 PLURAL(HiddenServiceNode
),
63 PLURAL(HiddenServiceExcludeNode
),
66 PLURAL(RendExcludeNode
),
67 PLURAL(StrictEntryNode
),
68 PLURAL(StrictExitNode
),
70 { "AllowUnverifiedNodes", "AllowInvalidNodes", 0, 0},
71 { "AutomapHostSuffixes", "AutomapHostsSuffixes", 0, 0},
72 { "AutomapHostOnResolve", "AutomapHostsOnResolve", 0, 0},
73 { "BandwidthRateBytes", "BandwidthRate", 0, 0},
74 { "BandwidthBurstBytes", "BandwidthBurst", 0, 0},
75 { "DirFetchPostPeriod", "StatusFetchPeriod", 0, 0},
76 { "MaxConn", "ConnLimit", 0, 1},
77 { "ORBindAddress", "ORListenAddress", 0, 0},
78 { "DirBindAddress", "DirListenAddress", 0, 0},
79 { "SocksBindAddress", "SocksListenAddress", 0, 0},
80 { "UseHelperNodes", "UseEntryGuards", 0, 0},
81 { "NumHelperNodes", "NumEntryGuards", 0, 0},
82 { "UseEntryNodes", "UseEntryGuards", 0, 0},
83 { "NumEntryNodes", "NumEntryGuards", 0, 0},
84 { "ResolvConf", "ServerDNSResolvConfFile", 0, 1},
85 { "SearchDomains", "ServerDNSSearchDomains", 0, 1},
86 { "ServerDNSAllowBrokenResolvConf", "ServerDNSAllowBrokenConfig", 0, 0 },
87 { "PreferTunnelledDirConns", "PreferTunneledDirConns", 0, 0},
88 { "BridgeAuthoritativeDirectory", "BridgeAuthoritativeDir", 0, 0},
89 { "HashedControlPassword", "__HashedControlSessionPassword", 1, 0},
93 /** A list of state-file "abbreviations," for compatibility. */
94 static config_abbrev_t _state_abbrevs
[] = {
95 { "AccountingBytesReadInterval", "AccountingBytesReadInInterval", 0, 0 },
96 { "HelperNode", "EntryGuard", 0, 0 },
97 { "HelperNodeDownSince", "EntryGuardDownSince", 0, 0 },
98 { "HelperNodeUnlistedSince", "EntryGuardUnlistedSince", 0, 0 },
99 { "EntryNode", "EntryGuard", 0, 0 },
100 { "EntryNodeDownSince", "EntryGuardDownSince", 0, 0 },
101 { "EntryNodeUnlistedSince", "EntryGuardUnlistedSince", 0, 0 },
106 /** A variable allowed in the configuration file or on the command line. */
107 typedef struct config_var_t
{
108 const char *name
; /**< The full keyword (case insensitive). */
109 config_type_t type
; /**< How to interpret the type and turn it into a
111 off_t var_offset
; /**< Offset of the corresponding member of or_options_t. */
112 const char *initvalue
; /**< String (or null) describing initial value. */
115 /** An entry for config_vars: "The option <b>name</b> has type
116 * CONFIG_TYPE_<b>conftype</b>, and corresponds to
117 * or_options_t.<b>member</b>"
119 #define VAR(name,conftype,member,initvalue) \
120 { name, CONFIG_TYPE_ ## conftype, STRUCT_OFFSET(or_options_t, member), \
122 /** As VAR, but the option name and member name are the same. */
123 #define V(member,conftype,initvalue) \
124 VAR(#member, conftype, member, initvalue)
125 /** An entry for config_vars: "The option <b>name</b> is obsolete." */
126 #define OBSOLETE(name) { name, CONFIG_TYPE_OBSOLETE, 0, NULL }
128 /** Array of configuration options. Until we disallow nonstandard
129 * abbreviations, order is significant, since the first matching option will
132 static config_var_t _option_vars
[] = {
133 OBSOLETE("AccountingMaxKB"),
134 V(AccountingMax
, MEMUNIT
, "0 bytes"),
135 V(AccountingStart
, STRING
, NULL
),
136 V(Address
, STRING
, NULL
),
137 V(AllowInvalidNodes
, CSV
, "middle,rendezvous"),
138 V(AllowNonRFC953Hostnames
, BOOL
, "0"),
139 V(AllowSingleHopCircuits
, BOOL
, "0"),
140 V(AllowSingleHopExits
, BOOL
, "0"),
141 V(AlternateBridgeAuthority
, LINELIST
, NULL
),
142 V(AlternateDirAuthority
, LINELIST
, NULL
),
143 V(AlternateHSAuthority
, LINELIST
, NULL
),
144 V(AssumeReachable
, BOOL
, "0"),
145 V(AuthDirBadDir
, LINELIST
, NULL
),
146 V(AuthDirBadExit
, LINELIST
, NULL
),
147 V(AuthDirInvalid
, LINELIST
, NULL
),
148 V(AuthDirReject
, LINELIST
, NULL
),
149 V(AuthDirRejectUnlisted
, BOOL
, "0"),
150 V(AuthDirListBadDirs
, BOOL
, "0"),
151 V(AuthDirListBadExits
, BOOL
, "0"),
152 V(AuthDirMaxServersPerAddr
, UINT
, "2"),
153 V(AuthDirMaxServersPerAuthAddr
,UINT
, "5"),
154 VAR("AuthoritativeDirectory", BOOL
, AuthoritativeDir
, "0"),
155 V(AutomapHostsOnResolve
, BOOL
, "0"),
156 V(AutomapHostsSuffixes
, CSV
, ".onion,.exit"),
157 V(AvoidDiskWrites
, BOOL
, "0"),
158 V(BandwidthBurst
, MEMUNIT
, "10 MB"),
159 V(BandwidthRate
, MEMUNIT
, "5 MB"),
160 V(BridgeAuthoritativeDir
, BOOL
, "0"),
161 VAR("Bridge", LINELIST
, Bridges
, NULL
),
162 V(BridgePassword
, STRING
, NULL
),
163 V(BridgeRecordUsageByCountry
, BOOL
, "1"),
164 V(BridgeRelay
, BOOL
, "0"),
165 V(CircuitBuildTimeout
, INTERVAL
, "1 minute"),
166 V(CircuitIdleTimeout
, INTERVAL
, "1 hour"),
167 V(ClientDNSRejectInternalAddresses
, BOOL
,"1"),
168 V(ClientOnly
, BOOL
, "0"),
169 V(ConnLimit
, UINT
, "1000"),
170 V(ConstrainedSockets
, BOOL
, "0"),
171 V(ConstrainedSockSize
, MEMUNIT
, "8192"),
172 V(ContactInfo
, STRING
, NULL
),
173 V(ControlListenAddress
, LINELIST
, NULL
),
174 V(ControlPort
, UINT
, "0"),
175 V(ControlSocket
, LINELIST
, NULL
),
176 V(CookieAuthentication
, BOOL
, "0"),
177 V(CookieAuthFileGroupReadable
, BOOL
, "0"),
178 V(CookieAuthFile
, STRING
, NULL
),
179 V(DataDirectory
, FILENAME
, NULL
),
180 OBSOLETE("DebugLogFile"),
181 V(DirAllowPrivateAddresses
, BOOL
, NULL
),
182 V(TestingAuthDirTimeToLearnReachability
, INTERVAL
, "30 minutes"),
183 V(DirListenAddress
, LINELIST
, NULL
),
184 OBSOLETE("DirFetchPeriod"),
185 V(DirPolicy
, LINELIST
, NULL
),
186 V(DirPort
, UINT
, "0"),
187 V(DirPortFrontPage
, FILENAME
, NULL
),
188 OBSOLETE("DirPostPeriod"),
189 #ifdef ENABLE_GEOIP_STATS
190 V(DirRecordUsageByCountry
, BOOL
, "0"),
191 V(DirRecordUsageGranularity
, UINT
, "4"),
192 V(DirRecordUsageRetainIPs
, INTERVAL
, "14 days"),
193 V(DirRecordUsageSaveInterval
, INTERVAL
, "6 hours"),
195 VAR("DirServer", LINELIST
, DirServers
, NULL
),
196 V(DNSPort
, UINT
, "0"),
197 V(DNSListenAddress
, LINELIST
, NULL
),
198 V(DownloadExtraInfo
, BOOL
, "0"),
199 V(EnforceDistinctSubnets
, BOOL
, "1"),
200 V(EntryNodes
, ROUTERSET
, NULL
),
201 V(TestingEstimatedDescriptorPropagationTime
, INTERVAL
, "10 minutes"),
202 V(ExcludeNodes
, ROUTERSET
, NULL
),
203 V(ExcludeExitNodes
, ROUTERSET
, NULL
),
204 V(ExcludeSingleHopRelays
, BOOL
, "1"),
205 V(ExitNodes
, ROUTERSET
, NULL
),
206 V(ExitPolicy
, LINELIST
, NULL
),
207 V(ExitPolicyRejectPrivate
, BOOL
, "1"),
208 V(FallbackNetworkstatusFile
, FILENAME
,
209 SHARE_DATADIR PATH_SEPARATOR
"tor" PATH_SEPARATOR
"fallback-consensus"),
210 V(FascistFirewall
, BOOL
, "0"),
211 V(FirewallPorts
, CSV
, ""),
212 V(FastFirstHopPK
, BOOL
, "1"),
213 V(FetchDirInfoEarly
, BOOL
, "0"),
214 V(FetchServerDescriptors
, BOOL
, "1"),
215 V(FetchHidServDescriptors
, BOOL
, "1"),
216 V(FetchUselessDescriptors
, BOOL
, "0"),
218 V(GeoIPFile
, FILENAME
, "<default>"),
220 V(GeoIPFile
, FILENAME
,
221 SHARE_DATADIR PATH_SEPARATOR
"tor" PATH_SEPARATOR
"geoip"),
224 V(HardwareAccel
, BOOL
, "0"),
225 V(HashedControlPassword
, LINELIST
, NULL
),
226 V(HidServDirectoryV2
, BOOL
, "1"),
227 VAR("HiddenServiceDir", LINELIST_S
, RendConfigLines
, NULL
),
228 OBSOLETE("HiddenServiceExcludeNodes"),
229 OBSOLETE("HiddenServiceNodes"),
230 VAR("HiddenServiceOptions",LINELIST_V
, RendConfigLines
, NULL
),
231 VAR("HiddenServicePort", LINELIST_S
, RendConfigLines
, NULL
),
232 VAR("HiddenServiceVersion",LINELIST_S
, RendConfigLines
, NULL
),
233 VAR("HiddenServiceAuthorizeClient",LINELIST_S
,RendConfigLines
, NULL
),
234 V(HidServAuth
, LINELIST
, NULL
),
235 V(HSAuthoritativeDir
, BOOL
, "0"),
236 V(HSAuthorityRecordStats
, BOOL
, "0"),
237 V(HttpProxy
, STRING
, NULL
),
238 V(HttpProxyAuthenticator
, STRING
, NULL
),
239 V(HttpsProxy
, STRING
, NULL
),
240 V(HttpsProxyAuthenticator
, STRING
, NULL
),
241 OBSOLETE("IgnoreVersion"),
242 V(KeepalivePeriod
, INTERVAL
, "5 minutes"),
243 VAR("Log", LINELIST
, Logs
, NULL
),
244 OBSOLETE("LinkPadding"),
245 OBSOLETE("LogLevel"),
247 V(LongLivedPorts
, CSV
,
248 "21,22,706,1863,5050,5190,5222,5223,6667,6697,8300"),
249 VAR("MapAddress", LINELIST
, AddressMap
, NULL
),
250 V(MaxAdvertisedBandwidth
, MEMUNIT
, "1 GB"),
251 V(MaxCircuitDirtiness
, INTERVAL
, "10 minutes"),
252 V(MaxOnionsPending
, UINT
, "100"),
253 OBSOLETE("MonthlyAccountingStart"),
254 V(MyFamily
, STRING
, NULL
),
255 V(NewCircuitPeriod
, INTERVAL
, "30 seconds"),
256 VAR("NamingAuthoritativeDirectory",BOOL
, NamingAuthoritativeDir
, "0"),
257 V(NatdListenAddress
, LINELIST
, NULL
),
258 V(NatdPort
, UINT
, "0"),
259 V(Nickname
, STRING
, NULL
),
260 V(NoPublish
, BOOL
, "0"),
261 VAR("NodeFamily", LINELIST
, NodeFamilies
, NULL
),
262 V(NumCpus
, UINT
, "1"),
263 V(NumEntryGuards
, UINT
, "3"),
264 V(ORListenAddress
, LINELIST
, NULL
),
265 V(ORPort
, UINT
, "0"),
266 V(OutboundBindAddress
, STRING
, NULL
),
267 OBSOLETE("PathlenCoinWeight"),
268 V(PidFile
, STRING
, NULL
),
269 V(TestingTorNetwork
, BOOL
, "0"),
270 V(PreferTunneledDirConns
, BOOL
, "1"),
271 V(ProtocolWarnings
, BOOL
, "0"),
272 V(PublishServerDescriptor
, CSV
, "1"),
273 V(PublishHidServDescriptors
, BOOL
, "1"),
274 V(ReachableAddresses
, LINELIST
, NULL
),
275 V(ReachableDirAddresses
, LINELIST
, NULL
),
276 V(ReachableORAddresses
, LINELIST
, NULL
),
277 V(RecommendedVersions
, LINELIST
, NULL
),
278 V(RecommendedClientVersions
, LINELIST
, NULL
),
279 V(RecommendedServerVersions
, LINELIST
, NULL
),
280 OBSOLETE("RedirectExit"),
281 V(RejectPlaintextPorts
, CSV
, ""),
282 V(RelayBandwidthBurst
, MEMUNIT
, "0"),
283 V(RelayBandwidthRate
, MEMUNIT
, "0"),
284 OBSOLETE("RendExcludeNodes"),
285 OBSOLETE("RendNodes"),
286 V(RendPostPeriod
, INTERVAL
, "1 hour"),
287 V(RephistTrackTime
, INTERVAL
, "24 hours"),
288 OBSOLETE("RouterFile"),
289 V(RunAsDaemon
, BOOL
, "0"),
290 V(RunTesting
, BOOL
, "0"),
291 V(SafeLogging
, BOOL
, "1"),
292 V(SafeSocks
, BOOL
, "0"),
293 V(ServerDNSAllowBrokenConfig
, BOOL
, "1"),
294 V(ServerDNSAllowNonRFC953Hostnames
, BOOL
,"0"),
295 V(ServerDNSDetectHijacking
, BOOL
, "1"),
296 V(ServerDNSRandomizeCase
, BOOL
, "1"),
297 V(ServerDNSResolvConfFile
, STRING
, NULL
),
298 V(ServerDNSSearchDomains
, BOOL
, "0"),
299 V(ServerDNSTestAddresses
, CSV
,
300 "www.google.com,www.mit.edu,www.yahoo.com,www.slashdot.org"),
301 V(ShutdownWaitLength
, INTERVAL
, "30 seconds"),
302 V(SocksListenAddress
, LINELIST
, NULL
),
303 V(SocksPolicy
, LINELIST
, NULL
),
304 V(SocksPort
, UINT
, "9050"),
305 V(SocksTimeout
, INTERVAL
, "2 minutes"),
306 OBSOLETE("StatusFetchPeriod"),
307 V(StrictEntryNodes
, BOOL
, "0"),
308 V(StrictExitNodes
, BOOL
, "0"),
310 V(TestSocks
, BOOL
, "0"),
312 V(TrackHostExits
, CSV
, NULL
),
313 V(TrackHostExitsExpire
, INTERVAL
, "30 minutes"),
314 OBSOLETE("TrafficShaping"),
315 V(TransListenAddress
, LINELIST
, NULL
),
316 V(TransPort
, UINT
, "0"),
317 V(TunnelDirConns
, BOOL
, "1"),
318 V(UpdateBridgesFromAuthority
, BOOL
, "0"),
319 V(UseBridges
, BOOL
, "0"),
320 V(UseEntryGuards
, BOOL
, "1"),
321 V(User
, STRING
, NULL
),
322 VAR("V1AuthoritativeDirectory",BOOL
, V1AuthoritativeDir
, "0"),
323 VAR("V2AuthoritativeDirectory",BOOL
, V2AuthoritativeDir
, "0"),
324 VAR("V3AuthoritativeDirectory",BOOL
, V3AuthoritativeDir
, "0"),
325 V(TestingV3AuthInitialVotingInterval
, INTERVAL
, "30 minutes"),
326 V(TestingV3AuthInitialVoteDelay
, INTERVAL
, "5 minutes"),
327 V(TestingV3AuthInitialDistDelay
, INTERVAL
, "5 minutes"),
328 V(V3AuthVotingInterval
, INTERVAL
, "1 hour"),
329 V(V3AuthVoteDelay
, INTERVAL
, "5 minutes"),
330 V(V3AuthDistDelay
, INTERVAL
, "5 minutes"),
331 V(V3AuthNIntervalsValid
, UINT
, "3"),
332 V(V3AuthUseLegacyKey
, BOOL
, "0"),
333 VAR("VersioningAuthoritativeDirectory",BOOL
,VersioningAuthoritativeDir
, "0"),
334 V(VirtualAddrNetwork
, STRING
, "127.192.0.0/10"),
335 V(WarnPlaintextPorts
, CSV
, "23,109,110,143"),
336 VAR("__ReloadTorrcOnSIGHUP", BOOL
, ReloadTorrcOnSIGHUP
, "1"),
337 VAR("__AllDirActionsPrivate", BOOL
, AllDirActionsPrivate
, "0"),
338 VAR("__DisablePredictedCircuits",BOOL
,DisablePredictedCircuits
, "0"),
339 VAR("__LeaveStreamsUnattached",BOOL
, LeaveStreamsUnattached
, "0"),
340 VAR("__HashedControlSessionPassword", LINELIST
, HashedControlSessionPassword
,
342 V(MinUptimeHidServDirectoryV2
, INTERVAL
, "24 hours"),
343 { NULL
, CONFIG_TYPE_OBSOLETE
, 0, NULL
}
346 /** Override default values with these if the user sets the TestingTorNetwork
348 static config_var_t testing_tor_network_defaults
[] = {
349 V(ServerDNSAllowBrokenConfig
, BOOL
, "1"),
350 V(DirAllowPrivateAddresses
, BOOL
, "1"),
351 V(EnforceDistinctSubnets
, BOOL
, "0"),
352 V(AssumeReachable
, BOOL
, "1"),
353 V(AuthDirMaxServersPerAddr
, UINT
, "0"),
354 V(AuthDirMaxServersPerAuthAddr
,UINT
, "0"),
355 V(ClientDNSRejectInternalAddresses
, BOOL
,"0"),
356 V(ExitPolicyRejectPrivate
, BOOL
, "0"),
357 V(V3AuthVotingInterval
, INTERVAL
, "5 minutes"),
358 V(V3AuthVoteDelay
, INTERVAL
, "20 seconds"),
359 V(V3AuthDistDelay
, INTERVAL
, "20 seconds"),
360 V(TestingV3AuthInitialVotingInterval
, INTERVAL
, "5 minutes"),
361 V(TestingV3AuthInitialVoteDelay
, INTERVAL
, "20 seconds"),
362 V(TestingV3AuthInitialDistDelay
, INTERVAL
, "20 seconds"),
363 V(TestingAuthDirTimeToLearnReachability
, INTERVAL
, "0 minutes"),
364 V(TestingEstimatedDescriptorPropagationTime
, INTERVAL
, "0 minutes"),
365 { NULL
, CONFIG_TYPE_OBSOLETE
, 0, NULL
}
369 #define VAR(name,conftype,member,initvalue) \
370 { name, CONFIG_TYPE_ ## conftype, STRUCT_OFFSET(or_state_t, member), \
373 /** Array of "state" variables saved to the ~/.tor/state file. */
374 static config_var_t _state_vars
[] = {
375 V(AccountingBytesReadInInterval
, MEMUNIT
, NULL
),
376 V(AccountingBytesWrittenInInterval
, MEMUNIT
, NULL
),
377 V(AccountingExpectedUsage
, MEMUNIT
, NULL
),
378 V(AccountingIntervalStart
, ISOTIME
, NULL
),
379 V(AccountingSecondsActive
, INTERVAL
, NULL
),
381 VAR("EntryGuard", LINELIST_S
, EntryGuards
, NULL
),
382 VAR("EntryGuardDownSince", LINELIST_S
, EntryGuards
, NULL
),
383 VAR("EntryGuardUnlistedSince", LINELIST_S
, EntryGuards
, NULL
),
384 VAR("EntryGuardAddedBy", LINELIST_S
, EntryGuards
, NULL
),
385 V(EntryGuards
, LINELIST_V
, NULL
),
387 V(BWHistoryReadEnds
, ISOTIME
, NULL
),
388 V(BWHistoryReadInterval
, UINT
, "900"),
389 V(BWHistoryReadValues
, CSV
, ""),
390 V(BWHistoryWriteEnds
, ISOTIME
, NULL
),
391 V(BWHistoryWriteInterval
, UINT
, "900"),
392 V(BWHistoryWriteValues
, CSV
, ""),
394 V(TorVersion
, STRING
, NULL
),
396 V(LastRotatedOnionKey
, ISOTIME
, NULL
),
397 V(LastWritten
, ISOTIME
, NULL
),
399 { NULL
, CONFIG_TYPE_OBSOLETE
, 0, NULL
}
406 /** Represents an English description of a configuration variable; used when
407 * generating configuration file comments. */
408 typedef struct config_var_description_t
{
410 const char *description
;
411 } config_var_description_t
;
413 /** Descriptions of the configuration options, to be displayed by online
415 /* XXXX022 did anybody want this? at all? If not, kill it.*/
416 static config_var_description_t options_description
[] = {
417 /* ==== general options */
418 { "AvoidDiskWrites", "If non-zero, try to write to disk less frequently than"
419 " we would otherwise." },
420 { "BandwidthRate", "A token bucket limits the average incoming bandwidth on "
421 "this node to the specified number of bytes per second." },
422 { "BandwidthBurst", "Limit the maximum token buffer size (also known as "
423 "burst) to the given number of bytes." },
424 { "ConnLimit", "Minimum number of simultaneous sockets we must have." },
425 { "ConstrainedSockets", "Shrink tx and rx buffers for sockets to avoid "
426 "system limits on vservers and related environments. See man page for "
427 "more information regarding this option." },
428 { "ConstrainedSockSize", "Limit socket buffers to this size when "
429 "ConstrainedSockets is enabled." },
430 /* ControlListenAddress */
431 { "ControlPort", "If set, Tor will accept connections from the same machine "
432 "(localhost only) on this port, and allow those connections to control "
433 "the Tor process using the Tor Control Protocol (described in "
434 "control-spec.txt).", },
435 { "CookieAuthentication", "If this option is set to 1, don't allow any "
436 "connections to the control port except when the connecting process "
437 "can read a file that Tor creates in its data directory." },
438 { "DataDirectory", "Store working data, state, keys, and caches here." },
439 { "DirServer", "Tor only trusts directories signed with one of these "
440 "servers' keys. Used to override the standard list of directory "
442 /* { "FastFirstHopPK", "" }, */
443 /* FetchServerDescriptors, FetchHidServDescriptors,
444 * FetchUselessDescriptors */
445 { "HardwareAccel", "If set, Tor tries to use hardware crypto accelerators "
447 /* HashedControlPassword */
448 { "HTTPProxy", "Force Tor to make all HTTP directory requests through this "
449 "host:port (or host:80 if port is not set)." },
450 { "HTTPProxyAuthenticator", "A username:password pair to be used with "
452 { "HTTPSProxy", "Force Tor to make all TLS (SSL) connections through this "
453 "host:port (or host:80 if port is not set)." },
454 { "HTTPSProxyAuthenticator", "A username:password pair to be used with "
456 { "KeepalivePeriod", "Send a padding cell every N seconds to keep firewalls "
457 "from closing our connections while Tor is not in use." },
458 { "Log", "Where to send logging messages. Format is "
459 "minSeverity[-maxSeverity] (stderr|stdout|syslog|file FILENAME)." },
460 { "OutboundBindAddress", "Make all outbound connections originate from the "
461 "provided IP address (only useful for multiple network interfaces)." },
462 { "PIDFile", "On startup, write our PID to this file. On clean shutdown, "
463 "remove the file." },
464 { "PreferTunneledDirConns", "If non-zero, avoid directory servers that "
465 "don't support tunneled connections." },
466 /* PreferTunneledDirConns */
467 /* ProtocolWarnings */
468 /* RephistTrackTime */
469 { "RunAsDaemon", "If set, Tor forks and daemonizes to the background when "
470 "started. Unix only." },
471 { "SafeLogging", "If set to 0, Tor logs potentially sensitive strings "
472 "rather than replacing them with the string [scrubbed]." },
473 { "TunnelDirConns", "If non-zero, when a directory server we contact "
474 "supports it, we will build a one-hop circuit and make an encrypted "
475 "connection via its ORPort." },
476 { "User", "On startup, setuid to this user." },
478 /* ==== client options */
479 { "AllowInvalidNodes", "Where on our circuits should Tor allow servers "
480 "that the directory authorities haven't called \"valid\"?" },
481 { "AllowNonRFC953Hostnames", "If set to 1, we don't automatically reject "
482 "hostnames for having invalid characters." },
483 /* CircuitBuildTimeout, CircuitIdleTimeout */
484 { "ClientOnly", "If set to 1, Tor will under no circumstances run as a "
485 "server, even if ORPort is enabled." },
486 { "EntryNodes", "A list of preferred entry nodes to use for the first hop "
487 "in circuits, when possible." },
488 /* { "EnforceDistinctSubnets" , "" }, */
489 { "ExitNodes", "A list of preferred nodes to use for the last hop in "
490 "circuits, when possible." },
491 { "ExcludeNodes", "A list of nodes never to use when building a circuit." },
492 { "FascistFirewall", "If set, Tor will only create outgoing connections to "
493 "servers running on the ports listed in FirewallPorts." },
494 { "FirewallPorts", "A list of ports that we can connect to. Only used "
495 "when FascistFirewall is set." },
496 { "LongLivedPorts", "A list of ports for services that tend to require "
497 "high-uptime connections." },
498 { "MapAddress", "Force Tor to treat all requests for one address as if "
499 "they were for another." },
500 { "NewCircuitPeriod", "Force Tor to consider whether to build a new circuit "
501 "every NUM seconds." },
502 { "MaxCircuitDirtiness", "Do not attach new streams to a circuit that has "
503 "been used more than this many seconds ago." },
504 /* NatdPort, NatdListenAddress */
505 { "NodeFamily", "A list of servers that constitute a 'family' and should "
506 "never be used in the same circuit." },
507 { "NumEntryGuards", "How many entry guards should we keep at a time?" },
508 /* PathlenCoinWeight */
509 { "ReachableAddresses", "Addresses we can connect to, as IP/bits:port-port. "
510 "By default, we assume all addresses are reachable." },
511 /* reachablediraddresses, reachableoraddresses. */
513 { "SOCKSPort", "The port where we listen for SOCKS connections from "
515 { "SOCKSListenAddress", "Bind to this address to listen to connections from "
516 "SOCKS-speaking applications." },
517 { "SOCKSPolicy", "Set an entry policy to limit which addresses can connect "
518 "to the SOCKSPort." },
520 { "StrictExitNodes", "If set, Tor will fail to operate when none of the "
521 "configured ExitNodes can be used." },
522 { "StrictEntryNodes", "If set, Tor will fail to operate when none of the "
523 "configured EntryNodes can be used." },
525 { "TrackHostsExit", "Hosts and domains which should, if possible, be "
526 "accessed from the same exit node each time we connect to them." },
527 { "TrackHostsExitExpire", "Time after which we forget which exit we were "
528 "using to connect to hosts in TrackHostsExit." },
529 /* "TransPort", "TransListenAddress */
530 { "UseEntryGuards", "Set to 0 if we want to pick from the whole set of "
531 "servers for the first position in each circuit, rather than picking a "
532 "set of 'Guards' to prevent profiling attacks." },
534 /* === server options */
535 { "Address", "The advertised (external) address we should use." },
536 /* Accounting* options. */
537 /* AssumeReachable */
538 { "ContactInfo", "Administrative contact information to advertise for this "
540 { "ExitPolicy", "Address/port ranges for which to accept or reject outgoing "
541 "connections on behalf of Tor users." },
542 /* { "ExitPolicyRejectPrivate, "" }, */
543 { "MaxAdvertisedBandwidth", "If set, we will not advertise more than this "
544 "amount of bandwidth for our bandwidth rate, regardless of how much "
545 "bandwidth we actually detect." },
546 { "MaxOnionsPending", "Reject new attempts to extend circuits when we "
547 "already have this many pending." },
548 { "MyFamily", "Declare a list of other servers as belonging to the same "
549 "family as this one, so that clients will not use two from the same "
550 "family in the same circuit." },
551 { "Nickname", "Set the server nickname." },
552 { "NoPublish", "{DEPRECATED}" },
553 { "NumCPUs", "How many processes to use at once for public-key crypto." },
554 { "ORPort", "Advertise this port to listen for connections from Tor clients "
556 { "ORListenAddress", "Bind to this address to listen for connections from "
557 "clients and servers, instead of the default 0.0.0.0:ORPort." },
558 { "PublishServerDescriptor", "Set to 0 to keep the server from "
559 "uploading info to the directory authorities." },
560 /* ServerDNS: DetectHijacking, ResolvConfFile, SearchDomains */
561 { "ShutdownWaitLength", "Wait this long for clients to finish when "
562 "shutting down because of a SIGINT." },
564 /* === directory cache options */
565 { "DirPort", "Serve directory information from this port, and act as a "
566 "directory cache." },
567 { "DirPortFrontPage", "Serve a static html disclaimer on DirPort." },
568 { "DirListenAddress", "Bind to this address to listen for connections from "
569 "clients and servers, instead of the default 0.0.0.0:DirPort." },
570 { "DirPolicy", "Set a policy to limit who can connect to the directory "
573 /* Authority options: AuthDirBadExit, AuthDirInvalid, AuthDirReject,
574 * AuthDirRejectUnlisted, AuthDirListBadExits, AuthoritativeDirectory,
575 * DirAllowPrivateAddresses, HSAuthoritativeDir,
576 * NamingAuthoritativeDirectory, RecommendedVersions,
577 * RecommendedClientVersions, RecommendedServerVersions, RendPostPeriod,
578 * RunTesting, V1AuthoritativeDirectory, VersioningAuthoritativeDirectory, */
580 /* Hidden service options: HiddenService: dir,excludenodes, nodes,
581 * options, port. PublishHidServDescriptor */
583 /* Nonpersistent options: __LeaveStreamsUnattached, __AllDirActionsPrivate */
587 /** Online description of state variables. */
588 static config_var_description_t state_description
[] = {
589 { "AccountingBytesReadInInterval",
590 "How many bytes have we read in this accounting period?" },
591 { "AccountingBytesWrittenInInterval",
592 "How many bytes have we written in this accounting period?" },
593 { "AccountingExpectedUsage",
594 "How many bytes did we expect to use per minute? (0 for no estimate.)" },
595 { "AccountingIntervalStart", "When did this accounting period begin?" },
596 { "AccountingSecondsActive", "How long have we been awake in this period?" },
598 { "BWHistoryReadEnds", "When does the last-recorded read-interval end?" },
599 { "BWHistoryReadInterval", "How long is each read-interval (in seconds)?" },
600 { "BWHistoryReadValues", "Number of bytes read in each interval." },
601 { "BWHistoryWriteEnds", "When does the last-recorded write-interval end?" },
602 { "BWHistoryWriteInterval", "How long is each write-interval (in seconds)?"},
603 { "BWHistoryWriteValues", "Number of bytes written in each interval." },
605 { "EntryGuard", "One of the nodes we have chosen as a fixed entry" },
606 { "EntryGuardDownSince",
607 "The last entry guard has been unreachable since this time." },
608 { "EntryGuardUnlistedSince",
609 "The last entry guard has been unusable since this time." },
611 { "LastRotatedOnionKey",
612 "The last time at which we changed the medium-term private key used for "
613 "building circuits." },
614 { "LastWritten", "When was this state file last regenerated?" },
616 { "TorVersion", "Which version of Tor generated this state file?" },
620 /** Type of a callback to validate whether a given configuration is
621 * well-formed and consistent. See options_trial_assign() for documentation
623 typedef int (*validate_fn_t
)(void*,void*,int,char**);
625 /** Information on the keys, value types, key-to-struct-member mappings,
626 * variable descriptions, validation functions, and abbreviations for a
627 * configuration or storage format. */
629 size_t size
; /**< Size of the struct that everything gets parsed into. */
630 uint32_t magic
; /**< Required 'magic value' to make sure we have a struct
631 * of the right type. */
632 off_t magic_offset
; /**< Offset of the magic value within the struct. */
633 config_abbrev_t
*abbrevs
; /**< List of abbreviations that we expand when
634 * parsing this format. */
635 config_var_t
*vars
; /**< List of variables we recognize, their default
636 * values, and where we stick them in the structure. */
637 validate_fn_t validate_fn
; /**< Function to validate config. */
638 /** Documentation for configuration variables. */
639 config_var_description_t
*descriptions
;
640 /** If present, extra is a LINELIST variable for unrecognized
641 * lines. Otherwise, unrecognized lines are an error. */
645 /** Macro: assert that <b>cfg</b> has the right magic field for format
647 #define CHECK(fmt, cfg) STMT_BEGIN \
648 tor_assert(fmt && cfg); \
649 tor_assert((fmt)->magic == \
650 *(uint32_t*)STRUCT_VAR_P(cfg,fmt->magic_offset)); \
654 static char *get_windows_conf_root(void);
656 static void config_line_append(config_line_t
**lst
,
657 const char *key
, const char *val
);
658 static void option_clear(config_format_t
*fmt
, or_options_t
*options
,
660 static void option_reset(config_format_t
*fmt
, or_options_t
*options
,
661 config_var_t
*var
, int use_defaults
);
662 static void config_free(config_format_t
*fmt
, void *options
);
663 static int config_lines_eq(config_line_t
*a
, config_line_t
*b
);
664 static int option_is_same(config_format_t
*fmt
,
665 or_options_t
*o1
, or_options_t
*o2
,
667 static or_options_t
*options_dup(config_format_t
*fmt
, or_options_t
*old
);
668 static int options_validate(or_options_t
*old_options
, or_options_t
*options
,
669 int from_setconf
, char **msg
);
670 static int options_act_reversible(or_options_t
*old_options
, char **msg
);
671 static int options_act(or_options_t
*old_options
);
672 static int options_transition_allowed(or_options_t
*old
, or_options_t
*new,
674 static int options_transition_affects_workers(or_options_t
*old_options
,
675 or_options_t
*new_options
);
676 static int options_transition_affects_descriptor(or_options_t
*old_options
,
677 or_options_t
*new_options
);
678 static int check_nickname_list(const char *lst
, const char *name
, char **msg
);
679 static void config_register_addressmaps(or_options_t
*options
);
681 static int parse_bridge_line(const char *line
, int validate_only
);
682 static int parse_dir_server_line(const char *line
,
683 authority_type_t required_type
,
685 static int validate_data_directory(or_options_t
*options
);
686 static int write_configuration_file(const char *fname
, or_options_t
*options
);
687 static config_line_t
*get_assigned_option(config_format_t
*fmt
,
688 void *options
, const char *key
,
690 static void config_init(config_format_t
*fmt
, void *options
);
691 static int or_state_validate(or_state_t
*old_options
, or_state_t
*options
,
692 int from_setconf
, char **msg
);
693 static int or_state_load(void);
694 static int options_init_logs(or_options_t
*options
, int validate_only
);
696 static int is_listening_on_low_port(uint16_t port_option
,
697 const config_line_t
*listen_options
);
699 static uint64_t config_parse_memunit(const char *s
, int *ok
);
700 static int config_parse_interval(const char *s
, int *ok
);
701 static void init_libevent(void);
702 static int opt_streq(const char *s1
, const char *s2
);
703 /** Versions of libevent. */
705 /* Note: we compare these, so it's important that "old" precede everything,
706 * and that "other" come last. */
707 LE_OLD
=0, LE_10C
, LE_10D
, LE_10E
, LE_11
, LE_11A
, LE_11B
, LE_12
, LE_12A
,
708 LE_13
, LE_13A
, LE_13B
, LE_13C
, LE_13D
, LE_13E
,
709 LE_140
, LE_141
, LE_142
, LE_143
, LE_144
, LE_145
, LE_146
, LE_147
, LE_148
,
713 static le_version_t
decode_libevent_version(const char *v
, int *bincompat_out
);
714 #if defined(HAVE_EVENT_GET_VERSION) && defined(HAVE_EVENT_GET_METHOD)
715 static void check_libevent_version(const char *m
, int server
);
718 /** Magic value for or_options_t. */
719 #define OR_OPTIONS_MAGIC 9090909
721 /** Configuration format for or_options_t. */
722 static config_format_t options_format
= {
723 sizeof(or_options_t
),
725 STRUCT_OFFSET(or_options_t
, _magic
),
728 (validate_fn_t
)options_validate
,
733 /** Magic value for or_state_t. */
734 #define OR_STATE_MAGIC 0x57A73f57
736 /** "Extra" variable in the state that receives lines we can't parse. This
737 * lets us preserve options from versions of Tor newer than us. */
738 static config_var_t state_extra_var
= {
739 "__extra", CONFIG_TYPE_LINELIST
, STRUCT_OFFSET(or_state_t
, ExtraLines
), NULL
742 /** Configuration format for or_state_t. */
743 static config_format_t state_format
= {
746 STRUCT_OFFSET(or_state_t
, _magic
),
749 (validate_fn_t
)or_state_validate
,
755 * Functions to read and write the global options pointer.
758 /** Command-line and config-file options. */
759 static or_options_t
*global_options
= NULL
;
760 /** Name of most recently read torrc file. */
761 static char *torrc_fname
= NULL
;
762 /** Persistent serialized state. */
763 static or_state_t
*global_state
= NULL
;
764 /** Configuration Options set by command line. */
765 static config_line_t
*global_cmdline_options
= NULL
;
766 /** Contents of most recently read DirPortFrontPage file. */
767 static char *global_dirfrontpagecontents
= NULL
;
769 /** Return the contents of our frontpage string, or NULL if not configured. */
771 get_dirportfrontpage(void)
773 return global_dirfrontpagecontents
;
776 /** Allocate an empty configuration object of a given format type. */
778 config_alloc(config_format_t
*fmt
)
780 void *opts
= tor_malloc_zero(fmt
->size
);
781 *(uint32_t*)STRUCT_VAR_P(opts
, fmt
->magic_offset
) = fmt
->magic
;
786 /** Return the currently configured options. */
790 tor_assert(global_options
);
791 return global_options
;
794 /** Change the current global options to contain <b>new_val</b> instead of
795 * their current value; take action based on the new value; free the old value
796 * as necessary. Returns 0 on success, -1 on failure.
799 set_options(or_options_t
*new_val
, char **msg
)
801 or_options_t
*old_options
= global_options
;
802 global_options
= new_val
;
803 /* Note that we pass the *old* options below, for comparison. It
804 * pulls the new options directly out of global_options. */
805 if (options_act_reversible(old_options
, msg
)<0) {
807 global_options
= old_options
;
810 if (options_act(old_options
) < 0) { /* acting on the options failed. die. */
812 "Acting on config options left us in a broken state. Dying.");
816 config_free(&options_format
, old_options
);
821 extern const char tor_svn_revision
[]; /* from tor_main.c */
823 /** The version of this Tor process, as parsed. */
824 static char *_version
= NULL
;
826 /** Return the current Tor version. */
830 if (_version
== NULL
) {
831 if (strlen(tor_svn_revision
)) {
832 size_t len
= strlen(VERSION
)+strlen(tor_svn_revision
)+8;
833 _version
= tor_malloc(len
);
834 tor_snprintf(_version
, len
, "%s (r%s)", VERSION
, tor_svn_revision
);
836 _version
= tor_strdup(VERSION
);
842 /** Release additional memory allocated in options
845 or_options_free(or_options_t
*options
)
847 if (options
->_ExcludeExitNodesUnion
)
848 routerset_free(options
->_ExcludeExitNodesUnion
);
849 config_free(&options_format
, options
);
852 /** Release all memory and resources held by global configuration structures.
855 config_free_all(void)
857 if (global_options
) {
858 or_options_free(global_options
);
859 global_options
= NULL
;
862 config_free(&state_format
, global_state
);
865 if (global_cmdline_options
) {
866 config_free_lines(global_cmdline_options
);
867 global_cmdline_options
= NULL
;
869 tor_free(torrc_fname
);
871 tor_free(global_dirfrontpagecontents
);
874 /** If options->SafeLogging is on, return a not very useful string,
875 * else return address.
878 safe_str(const char *address
)
881 if (get_options()->SafeLogging
)
887 /** Equivalent to escaped(safe_str(address)). See reentrancy note on
888 * escaped(): don't use this outside the main thread, or twice in the same
891 escaped_safe_str(const char *address
)
893 if (get_options()->SafeLogging
)
896 return escaped(address
);
899 /** Add the default directory authorities directly into the trusted dir list,
900 * but only add them insofar as they share bits with <b>type</b>. */
902 add_default_trusted_dir_authorities(authority_type_t type
)
905 const char *dirservers
[] = {
906 "moria1 orport=9101 no-v2 "
907 "v3ident=D586D18309DED4CD6D57C18FDB97EFA96D330566 "
908 "128.31.0.39:9131 9695 DFC3 5FFE B861 329B 9F1A B04C 4639 7020 CE31",
909 "tor26 v1 orport=443 v3ident=14C131DFC5C6F93646BE72FA1401C02A8DF2E8B4 "
910 "86.59.21.38:80 847B 1F85 0344 D787 6491 A548 92F9 0493 4E4E B85D",
911 "dizum orport=443 v3ident=E8A9C45EDE6D711294FADF8E7951F4DE6CA56B58 "
912 "194.109.206.212:80 7EA6 EAD6 FD83 083C 538F 4403 8BBF A077 587D D755",
913 "Tonga orport=443 bridge no-v2 82.94.251.203:80 "
914 "4A0C CD2D DC79 9508 3D73 F5D6 6710 0C8A 5831 F16D",
915 "ides orport=9090 no-v2 v3ident=27B6B5996C426270A5C95488AA5BCEB6BCC86956 "
916 "216.224.124.114:9030 F397 038A DC51 3361 35E7 B80B D99C A384 4360 292B",
917 "gabelmoo orport=8080 no-v2 "
918 "v3ident=ED03BB616EB2F60BEC80151114BB25CEF515B226 "
919 "80.190.246.100:8180 F204 4413 DAC2 E02E 3D6B CF47 35A1 9BCA 1DE9 7281",
920 "dannenberg orport=443 no-v2 "
921 "v3ident=585769C78764D58426B8B52B6651A5A71137189A "
922 "193.23.244.244:80 7BE6 83E6 5D48 1413 21C5 ED92 F075 C553 64AC 7123",
923 "urras orport=80 no-v2 v3ident=80550987E1D626E3EBA5E5E75A458DE0626D088C "
924 "208.83.223.34:443 0AD3 FA88 4D18 F89E EA2D 89C0 1937 9E0E 7FD9 4417",
925 "maatuska orport=80 no-v2 "
926 "v3ident=49015F787433103580E3B66A1707A00E60F2D15B "
927 "213.115.239.118:443 BD6A 8292 55CB 08E6 6FBE 7D37 4836 3586 E46B 3810",
930 for (i
=0; dirservers
[i
]; i
++) {
931 if (parse_dir_server_line(dirservers
[i
], type
, 0)<0) {
932 log_err(LD_BUG
, "Couldn't parse internal dirserver line %s",
938 /** Look at all the config options for using alternate directory
939 * authorities, and make sure none of them are broken. Also, warn the
940 * user if we changed any dangerous ones.
943 validate_dir_authorities(or_options_t
*options
, or_options_t
*old_options
)
947 if (options
->DirServers
&&
948 (options
->AlternateDirAuthority
|| options
->AlternateBridgeAuthority
||
949 options
->AlternateHSAuthority
)) {
951 "You cannot set both DirServers and Alternate*Authority.");
955 /* do we want to complain to the user about being partitionable? */
956 if ((options
->DirServers
&&
958 !config_lines_eq(options
->DirServers
, old_options
->DirServers
))) ||
959 (options
->AlternateDirAuthority
&&
961 !config_lines_eq(options
->AlternateDirAuthority
,
962 old_options
->AlternateDirAuthority
)))) {
964 "You have used DirServer or AlternateDirAuthority to "
965 "specify alternate directory authorities in "
966 "your configuration. This is potentially dangerous: it can "
967 "make you look different from all other Tor users, and hurt "
968 "your anonymity. Even if you've specified the same "
969 "authorities as Tor uses by default, the defaults could "
970 "change in the future. Be sure you know what you're doing.");
973 /* Now go through the four ways you can configure an alternate
974 * set of directory authorities, and make sure none are broken. */
975 for (cl
= options
->DirServers
; cl
; cl
= cl
->next
)
976 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 1)<0)
978 for (cl
= options
->AlternateBridgeAuthority
; cl
; cl
= cl
->next
)
979 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 1)<0)
981 for (cl
= options
->AlternateDirAuthority
; cl
; cl
= cl
->next
)
982 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 1)<0)
984 for (cl
= options
->AlternateHSAuthority
; cl
; cl
= cl
->next
)
985 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 1)<0)
990 /** Look at all the config options and assign new dir authorities
994 consider_adding_dir_authorities(or_options_t
*options
,
995 or_options_t
*old_options
)
999 !smartlist_len(router_get_trusted_dir_servers()) || !old_options
||
1000 !config_lines_eq(options
->DirServers
, old_options
->DirServers
) ||
1001 !config_lines_eq(options
->AlternateBridgeAuthority
,
1002 old_options
->AlternateBridgeAuthority
) ||
1003 !config_lines_eq(options
->AlternateDirAuthority
,
1004 old_options
->AlternateDirAuthority
) ||
1005 !config_lines_eq(options
->AlternateHSAuthority
,
1006 old_options
->AlternateHSAuthority
);
1008 if (!need_to_update
)
1009 return 0; /* all done */
1011 /* Start from a clean slate. */
1012 clear_trusted_dir_servers();
1014 if (!options
->DirServers
) {
1015 /* then we may want some of the defaults */
1016 authority_type_t type
= NO_AUTHORITY
;
1017 if (!options
->AlternateBridgeAuthority
)
1018 type
|= BRIDGE_AUTHORITY
;
1019 if (!options
->AlternateDirAuthority
)
1020 type
|= V1_AUTHORITY
| V2_AUTHORITY
| V3_AUTHORITY
;
1021 if (!options
->AlternateHSAuthority
)
1022 type
|= HIDSERV_AUTHORITY
;
1023 add_default_trusted_dir_authorities(type
);
1026 for (cl
= options
->DirServers
; cl
; cl
= cl
->next
)
1027 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 0)<0)
1029 for (cl
= options
->AlternateBridgeAuthority
; cl
; cl
= cl
->next
)
1030 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 0)<0)
1032 for (cl
= options
->AlternateDirAuthority
; cl
; cl
= cl
->next
)
1033 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 0)<0)
1035 for (cl
= options
->AlternateHSAuthority
; cl
; cl
= cl
->next
)
1036 if (parse_dir_server_line(cl
->value
, NO_AUTHORITY
, 0)<0)
1041 /** Fetch the active option list, and take actions based on it. All of the
1042 * things we do should survive being done repeatedly. If present,
1043 * <b>old_options</b> contains the previous value of the options.
1045 * Return 0 if all goes well, return -1 if things went badly.
1048 options_act_reversible(or_options_t
*old_options
, char **msg
)
1050 smartlist_t
*new_listeners
= smartlist_create();
1051 smartlist_t
*replaced_listeners
= smartlist_create();
1052 static int libevent_initialized
= 0;
1053 or_options_t
*options
= get_options();
1054 int running_tor
= options
->command
== CMD_RUN_TOR
;
1055 int set_conn_limit
= 0;
1057 int logs_marked
= 0;
1059 /* Daemonize _first_, since we only want to open most of this stuff in
1060 * the subprocess. Libevent bases can't be reliably inherited across
1062 if (running_tor
&& options
->RunAsDaemon
) {
1063 /* No need to roll back, since you can't change the value. */
1067 #ifndef HAVE_SYS_UN_H
1068 if (options
->ControlSocket
) {
1069 *msg
= tor_strdup("Unix domain sockets (ControlSocket) not supported"
1070 " on this OS/with this build.");
1076 /* We need to set the connection limit before we can open the listeners. */
1077 if (set_max_file_descriptors((unsigned)options
->ConnLimit
,
1078 &options
->_ConnLimit
) < 0) {
1079 *msg
= tor_strdup("Problem with ConnLimit value. See logs for details.");
1084 /* Set up libevent. (We need to do this before we can register the
1085 * listeners as listeners.) */
1086 if (running_tor
&& !libevent_initialized
) {
1088 libevent_initialized
= 1;
1091 /* Launch the listeners. (We do this before we setuid, so we can bind to
1092 * ports under 1024.) */
1093 if (retry_all_listeners(replaced_listeners
, new_listeners
) < 0) {
1094 *msg
= tor_strdup("Failed to bind one of the listener ports.");
1099 #if defined(HAVE_NET_IF_H) && defined(HAVE_NET_PFVAR_H)
1100 /* Open /dev/pf before dropping privileges. */
1101 if (options
->TransPort
) {
1102 if (get_pf_socket() < 0) {
1103 *msg
= tor_strdup("Unable to open /dev/pf for transparent proxy.");
1109 /* Setuid/setgid as appropriate */
1110 if (options
->User
) {
1111 if (switch_id(options
->User
) != 0) {
1112 /* No need to roll back, since you can't change the value. */
1113 *msg
= tor_strdup("Problem with User value. See logs for details.");
1118 /* Ensure data directory is private; create if possible. */
1119 if (check_private_dir(options
->DataDirectory
,
1120 running_tor
? CPD_CREATE
: CPD_CHECK
)<0) {
1122 int tmp
= tor_snprintf(buf
, sizeof(buf
),
1123 "Couldn't access/create private data directory \"%s\"",
1124 options
->DataDirectory
);
1125 *msg
= tor_strdup(tmp
>= 0 ? buf
: "internal error");
1127 /* No need to roll back, since you can't change the value. */
1130 if (directory_caches_v2_dir_info(options
)) {
1131 size_t len
= strlen(options
->DataDirectory
)+32;
1132 char *fn
= tor_malloc(len
);
1133 tor_snprintf(fn
, len
, "%s"PATH_SEPARATOR
"cached-status",
1134 options
->DataDirectory
);
1135 if (check_private_dir(fn
, running_tor
? CPD_CREATE
: CPD_CHECK
) < 0) {
1137 int tmp
= tor_snprintf(buf
, sizeof(buf
),
1138 "Couldn't access/create private data directory \"%s\"", fn
);
1139 *msg
= tor_strdup(tmp
>= 0 ? buf
: "internal error");
1146 /* Bail out at this point if we're not going to be a client or server:
1147 * we don't run Tor itself. */
1151 mark_logs_temp(); /* Close current logs once new logs are open. */
1153 if (options_init_logs(options
, 0)<0) { /* Configure the log(s) */
1154 *msg
= tor_strdup("Failed to init Log options. See logs for details.");
1161 log_severity_list_t
*severity
=
1162 tor_malloc_zero(sizeof(log_severity_list_t
));
1164 add_callback_log(severity
, control_event_logmsg
);
1165 control_adjust_event_log_severity();
1168 SMARTLIST_FOREACH(replaced_listeners
, connection_t
*, conn
,
1170 log_notice(LD_NET
, "Closing old %s on %s:%d",
1171 conn_type_to_string(conn
->type
), conn
->address
, conn
->port
);
1172 connection_close_immediate(conn
);
1173 connection_mark_for_close(conn
);
1182 rollback_log_changes();
1183 control_adjust_event_log_severity();
1186 if (set_conn_limit
&& old_options
)
1187 set_max_file_descriptors((unsigned)old_options
->ConnLimit
,
1188 &options
->_ConnLimit
);
1190 SMARTLIST_FOREACH(new_listeners
, connection_t
*, conn
,
1192 log_notice(LD_NET
, "Closing partially-constructed listener %s on %s:%d",
1193 conn_type_to_string(conn
->type
), conn
->address
, conn
->port
);
1194 connection_close_immediate(conn
);
1195 connection_mark_for_close(conn
);
1199 smartlist_free(new_listeners
);
1200 smartlist_free(replaced_listeners
);
1204 /** If we need to have a GEOIP ip-to-country map to run with our configured
1205 * options, return 1 and set *<b>reason_out</b> to a description of why. */
1207 options_need_geoip_info(or_options_t
*options
, const char **reason_out
)
1210 options
->BridgeRelay
&& options
->BridgeRecordUsageByCountry
;
1211 int routerset_usage
=
1212 routerset_needs_geoip(options
->EntryNodes
) ||
1213 routerset_needs_geoip(options
->ExitNodes
) ||
1214 routerset_needs_geoip(options
->ExcludeExitNodes
) ||
1215 routerset_needs_geoip(options
->ExcludeNodes
);
1217 if (routerset_usage
&& reason_out
) {
1218 *reason_out
= "We've been configured to use (or avoid) nodes in certain "
1219 "countries, and we need GEOIP information to figure out which ones they "
1221 } else if (bridge_usage
&& reason_out
) {
1222 *reason_out
= "We've been configured to see which countries can access "
1223 "us as a bridge, and we need GEOIP information to tell which countries "
1226 return bridge_usage
|| routerset_usage
;
1229 /** Return the bandwidthrate that we are going to report to the authorities
1230 * based on the config options. */
1232 get_effective_bwrate(or_options_t
*options
)
1234 uint64_t bw
= options
->BandwidthRate
;
1235 if (bw
> options
->MaxAdvertisedBandwidth
)
1236 bw
= options
->MaxAdvertisedBandwidth
;
1237 if (options
->RelayBandwidthRate
> 0 && bw
> options
->RelayBandwidthRate
)
1238 bw
= options
->RelayBandwidthRate
;
1240 /* ensure_bandwidth_cap() makes sure that this cast can't overflow. */
1241 return (uint32_t)bw
;
1244 /** Return the bandwidthburst that we are going to report to the authorities
1245 * based on the config options. */
1247 get_effective_bwburst(or_options_t
*options
)
1249 uint64_t bw
= options
->BandwidthBurst
;
1250 if (options
->RelayBandwidthBurst
> 0 && bw
> options
->RelayBandwidthBurst
)
1251 bw
= options
->RelayBandwidthBurst
;
1252 /* ensure_bandwidth_cap() makes sure that this cast can't overflow. */
1253 return (uint32_t)bw
;
1256 /** Fetch the active option list, and take actions based on it. All of the
1257 * things we do should survive being done repeatedly. If present,
1258 * <b>old_options</b> contains the previous value of the options.
1260 * Return 0 if all goes well, return -1 if it's time to die.
1262 * Note: We haven't moved all the "act on new configuration" logic
1263 * here yet. Some is still in do_hup() and other places.
1266 options_act(or_options_t
*old_options
)
1269 or_options_t
*options
= get_options();
1270 int running_tor
= options
->command
== CMD_RUN_TOR
;
1273 if (running_tor
&& !have_lockfile()) {
1274 if (try_locking(options
, 1) < 0)
1278 if (consider_adding_dir_authorities(options
, old_options
) < 0)
1281 if (options
->Bridges
) {
1282 clear_bridge_list();
1283 for (cl
= options
->Bridges
; cl
; cl
= cl
->next
) {
1284 if (parse_bridge_line(cl
->value
, 0)<0) {
1286 "Previously validated Bridge line could not be added!");
1292 if (running_tor
&& rend_config_services(options
, 0)<0) {
1294 "Previously validated hidden services line could not be added!");
1298 if (running_tor
&& rend_parse_service_authorization(options
, 0) < 0) {
1299 log_warn(LD_BUG
, "Previously validated client authorization for "
1300 "hidden services could not be added!");
1305 if (! global_state
&& running_tor
) {
1306 if (or_state_load())
1308 rep_hist_load_mtbf_data(time(NULL
));
1311 /* Bail out at this point if we're not going to be a client or server:
1312 * we want to not fork, and to log stuff to stderr. */
1316 /* Finish backgrounding the process */
1317 if (running_tor
&& options
->RunAsDaemon
) {
1318 /* We may be calling this for the n'th time (on SIGHUP), but it's safe. */
1319 finish_daemon(options
->DataDirectory
);
1322 /* Write our PID to the PID file. If we do not have write permissions we
1323 * will log a warning */
1324 if (running_tor
&& options
->PidFile
)
1325 write_pidfile(options
->PidFile
);
1327 /* Register addressmap directives */
1328 config_register_addressmaps(options
);
1329 parse_virtual_addr_network(options
->VirtualAddrNetwork
, 0, &msg
);
1331 /* Update address policies. */
1332 if (policies_parse_from_options(options
) < 0) {
1333 /* This should be impossible, but let's be sure. */
1334 log_warn(LD_BUG
,"Error parsing already-validated policy options.");
1338 if (init_cookie_authentication(options
->CookieAuthentication
) < 0) {
1339 log_warn(LD_CONFIG
,"Error creating cookie authentication file.");
1343 /* reload keys as needed for rendezvous services. */
1344 if (rend_service_load_keys()<0) {
1345 log_warn(LD_GENERAL
,"Error loading rendezvous service keys");
1349 /* Set up accounting */
1350 if (accounting_parse_options(options
, 0)<0) {
1351 log_warn(LD_CONFIG
,"Error in accounting options");
1354 if (accounting_is_enabled(options
))
1355 configure_accounting(time(NULL
));
1357 /* Check for transitions that need action. */
1359 if (options
->UseEntryGuards
&& !old_options
->UseEntryGuards
) {
1361 "Switching to entry guards; abandoning previous circuits");
1362 circuit_mark_all_unused_circs();
1363 circuit_expire_all_dirty_circs();
1366 if (! bool_eq(options
->BridgeRelay
, old_options
->BridgeRelay
)) {
1367 log_info(LD_GENERAL
, "Bridge status changed. Forgetting GeoIP stats.");
1368 geoip_remove_old_clients(time(NULL
)+(2*60*60));
1371 if (options_transition_affects_workers(old_options
, options
)) {
1372 log_info(LD_GENERAL
,
1373 "Worker-related options changed. Rotating workers.");
1374 if (server_mode(options
) && !server_mode(old_options
)) {
1375 if (init_keys() < 0) {
1376 log_warn(LD_BUG
,"Error initializing keys; exiting");
1379 ip_address_changed(0);
1380 if (has_completed_circuit
|| !any_predicted_circuits(time(NULL
)))
1381 inform_testing_reachability();
1383 cpuworkers_rotate();
1391 if (options
->V3AuthoritativeDir
&& !old_options
->V3AuthoritativeDir
)
1395 /* Maybe load geoip file */
1396 if (options
->GeoIPFile
&&
1397 ((!old_options
|| !opt_streq(old_options
->GeoIPFile
, options
->GeoIPFile
))
1398 || !geoip_is_loaded())) {
1399 /* XXXX Don't use this "<default>" junk; make our filename options
1400 * understand prefixes somehow. -NM */
1401 /* XXXX021 Reload GeoIPFile on SIGHUP. -NM */
1402 char *actual_fname
= tor_strdup(options
->GeoIPFile
);
1404 if (!strcmp(actual_fname
, "<default>")) {
1405 const char *conf_root
= get_windows_conf_root();
1406 size_t len
= strlen(conf_root
)+16;
1407 tor_free(actual_fname
);
1408 actual_fname
= tor_malloc(len
+1);
1409 tor_snprintf(actual_fname
, len
, "%s\\geoip", conf_root
);
1412 geoip_load_file(actual_fname
, options
);
1413 tor_free(actual_fname
);
1415 #ifdef ENABLE_GEOIP_STATS
1416 log_warn(LD_CONFIG
, "We are configured to measure GeoIP statistics, but "
1417 "the way these statistics are measured has changed "
1418 "significantly in later versions of Tor. The results may not be "
1419 "as expected if you are used to later versions. Be sure you "
1420 "know what you are doing.");
1422 /* Check if we need to parse and add the EntryNodes config option. */
1423 if (options
->EntryNodes
&&
1425 (!routerset_equal(old_options
->EntryNodes
,options
->EntryNodes
))))
1426 entry_nodes_should_be_added();
1428 /* Since our options changed, we might need to regenerate and upload our
1429 * server descriptor.
1432 options_transition_affects_descriptor(old_options
, options
))
1433 mark_my_descriptor_dirty();
1435 /* We may need to reschedule some directory stuff if our status changed. */
1437 if (authdir_mode_v3(options
) && !authdir_mode_v3(old_options
))
1438 dirvote_recalculate_timing(options
, time(NULL
));
1439 if (!bool_eq(directory_fetches_dir_info_early(options
),
1440 directory_fetches_dir_info_early(old_options
)) ||
1441 !bool_eq(directory_fetches_dir_info_later(options
),
1442 directory_fetches_dir_info_later(old_options
))) {
1443 /* Make sure update_router_have_min_dir_info gets called. */
1444 router_dir_info_changed();
1445 /* We might need to download a new consensus status later or sooner than
1446 * we had expected. */
1447 update_consensus_networkstatus_fetch_time(time(NULL
));
1451 /* Load the webpage we're going to serve every time someone asks for '/' on
1453 tor_free(global_dirfrontpagecontents
);
1454 if (options
->DirPortFrontPage
) {
1455 global_dirfrontpagecontents
=
1456 read_file_to_str(options
->DirPortFrontPage
, 0, NULL
);
1457 if (!global_dirfrontpagecontents
) {
1459 "DirPortFrontPage file '%s' not found. Continuing anyway.",
1460 options
->DirPortFrontPage
);
1468 * Functions to parse config options
1471 /** If <b>option</b> is an official abbreviation for a longer option,
1472 * return the longer option. Otherwise return <b>option</b>.
1473 * If <b>command_line</b> is set, apply all abbreviations. Otherwise, only
1474 * apply abbreviations that work for the config file and the command line.
1475 * If <b>warn_obsolete</b> is set, warn about deprecated names. */
1477 expand_abbrev(config_format_t
*fmt
, const char *option
, int command_line
,
1483 for (i
=0; fmt
->abbrevs
[i
].abbreviated
; ++i
) {
1484 /* Abbreviations are case insensitive. */
1485 if (!strcasecmp(option
,fmt
->abbrevs
[i
].abbreviated
) &&
1486 (command_line
|| !fmt
->abbrevs
[i
].commandline_only
)) {
1487 if (warn_obsolete
&& fmt
->abbrevs
[i
].warn
) {
1489 "The configuration option '%s' is deprecated; "
1490 "use '%s' instead.",
1491 fmt
->abbrevs
[i
].abbreviated
,
1492 fmt
->abbrevs
[i
].full
);
1494 return fmt
->abbrevs
[i
].full
;
1500 /** Helper: Read a list of configuration options from the command line.
1501 * If successful, put them in *<b>result</b> and return 0, and return
1502 * -1 and leave *<b>result</b> alone. */
1504 config_get_commandlines(int argc
, char **argv
, config_line_t
**result
)
1506 config_line_t
*front
= NULL
;
1507 config_line_t
**new = &front
;
1512 if (!strcmp(argv
[i
],"-f") ||
1513 !strcmp(argv
[i
],"--hash-password")) {
1514 i
+= 2; /* command-line option with argument. ignore them. */
1516 } else if (!strcmp(argv
[i
],"--list-fingerprint") ||
1517 !strcmp(argv
[i
],"--verify-config") ||
1518 !strcmp(argv
[i
],"--ignore-missing-torrc") ||
1519 !strcmp(argv
[i
],"--quiet") ||
1520 !strcmp(argv
[i
],"--hush")) {
1521 i
+= 1; /* command-line option. ignore it. */
1523 } else if (!strcmp(argv
[i
],"--nt-service") ||
1524 !strcmp(argv
[i
],"-nt-service")) {
1530 log_warn(LD_CONFIG
,"Command-line option '%s' with no value. Failing.",
1532 config_free_lines(front
);
1536 *new = tor_malloc_zero(sizeof(config_line_t
));
1542 (*new)->key
= tor_strdup(expand_abbrev(&options_format
, s
, 1, 1));
1543 (*new)->value
= tor_strdup(argv
[i
+1]);
1544 (*new)->next
= NULL
;
1545 log(LOG_DEBUG
, LD_CONFIG
, "command line: parsed keyword '%s', value '%s'",
1546 (*new)->key
, (*new)->value
);
1548 new = &((*new)->next
);
1555 /** Helper: allocate a new configuration option mapping 'key' to 'val',
1556 * append it to *<b>lst</b>. */
1558 config_line_append(config_line_t
**lst
,
1562 config_line_t
*newline
;
1564 newline
= tor_malloc(sizeof(config_line_t
));
1565 newline
->key
= tor_strdup(key
);
1566 newline
->value
= tor_strdup(val
);
1567 newline
->next
= NULL
;
1569 lst
= &((*lst
)->next
);
1574 /** Helper: parse the config string and strdup into key/value
1575 * strings. Set *result to the list, or NULL if parsing the string
1576 * failed. Return 0 on success, -1 on failure. Warn and ignore any
1577 * misformatted lines. */
1579 config_get_lines(const char *string
, config_line_t
**result
)
1581 config_line_t
*list
= NULL
, **next
;
1587 string
= parse_config_line_from_str(string
, &k
, &v
);
1589 config_free_lines(list
);
1595 /* This list can get long, so we keep a pointer to the end of it
1596 * rather than using config_line_append over and over and getting
1597 * n^2 performance. */
1598 *next
= tor_malloc(sizeof(config_line_t
));
1601 (*next
)->next
= NULL
;
1602 next
= &((*next
)->next
);
1614 * Free all the configuration lines on the linked list <b>front</b>.
1617 config_free_lines(config_line_t
*front
)
1626 tor_free(tmp
->value
);
1631 /** Return the description for a given configuration variable, or NULL if no
1632 * description exists. */
1634 config_find_description(config_format_t
*fmt
, const char *name
)
1637 for (i
=0; fmt
->descriptions
[i
].name
; ++i
) {
1638 if (!strcasecmp(name
, fmt
->descriptions
[i
].name
))
1639 return fmt
->descriptions
[i
].description
;
1644 /** If <b>key</b> is a configuration option, return the corresponding
1645 * config_var_t. Otherwise, if <b>key</b> is a non-standard abbreviation,
1646 * warn, and return the corresponding config_var_t. Otherwise return NULL.
1648 static config_var_t
*
1649 config_find_option(config_format_t
*fmt
, const char *key
)
1652 size_t keylen
= strlen(key
);
1654 return NULL
; /* if they say "--" on the command line, it's not an option */
1655 /* First, check for an exact (case-insensitive) match */
1656 for (i
=0; fmt
->vars
[i
].name
; ++i
) {
1657 if (!strcasecmp(key
, fmt
->vars
[i
].name
)) {
1658 return &fmt
->vars
[i
];
1661 /* If none, check for an abbreviated match */
1662 for (i
=0; fmt
->vars
[i
].name
; ++i
) {
1663 if (!strncasecmp(key
, fmt
->vars
[i
].name
, keylen
)) {
1664 log_warn(LD_CONFIG
, "The abbreviation '%s' is deprecated. "
1665 "Please use '%s' instead",
1666 key
, fmt
->vars
[i
].name
);
1667 return &fmt
->vars
[i
];
1670 /* Okay, unrecognized option */
1675 * Functions to assign config options.
1678 /** <b>c</b>-\>key is known to be a real key. Update <b>options</b>
1679 * with <b>c</b>-\>value and return 0, or return -1 if bad value.
1681 * Called from config_assign_line() and option_reset().
1684 config_assign_value(config_format_t
*fmt
, or_options_t
*options
,
1685 config_line_t
*c
, char **msg
)
1692 CHECK(fmt
, options
);
1694 var
= config_find_option(fmt
, c
->key
);
1697 lvalue
= STRUCT_VAR_P(options
, var
->var_offset
);
1699 switch (var
->type
) {
1701 case CONFIG_TYPE_UINT
:
1702 i
= (int)tor_parse_long(c
->value
, 10, 0, INT_MAX
, &ok
, NULL
);
1704 r
= tor_snprintf(buf
, sizeof(buf
),
1705 "Int keyword '%s %s' is malformed or out of bounds.",
1707 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1713 case CONFIG_TYPE_INTERVAL
: {
1714 i
= config_parse_interval(c
->value
, &ok
);
1716 r
= tor_snprintf(buf
, sizeof(buf
),
1717 "Interval '%s %s' is malformed or out of bounds.",
1719 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1726 case CONFIG_TYPE_MEMUNIT
: {
1727 uint64_t u64
= config_parse_memunit(c
->value
, &ok
);
1729 r
= tor_snprintf(buf
, sizeof(buf
),
1730 "Value '%s %s' is malformed or out of bounds.",
1732 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1735 *(uint64_t *)lvalue
= u64
;
1739 case CONFIG_TYPE_BOOL
:
1740 i
= (int)tor_parse_long(c
->value
, 10, 0, 1, &ok
, NULL
);
1742 r
= tor_snprintf(buf
, sizeof(buf
),
1743 "Boolean '%s %s' expects 0 or 1.",
1745 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1751 case CONFIG_TYPE_STRING
:
1752 case CONFIG_TYPE_FILENAME
:
1753 tor_free(*(char **)lvalue
);
1754 *(char **)lvalue
= tor_strdup(c
->value
);
1757 case CONFIG_TYPE_DOUBLE
:
1758 *(double *)lvalue
= atof(c
->value
);
1761 case CONFIG_TYPE_ISOTIME
:
1762 if (parse_iso_time(c
->value
, (time_t *)lvalue
)) {
1763 r
= tor_snprintf(buf
, sizeof(buf
),
1764 "Invalid time '%s' for keyword '%s'", c
->value
, c
->key
);
1765 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1770 case CONFIG_TYPE_ROUTERSET
:
1771 if (*(routerset_t
**)lvalue
) {
1772 routerset_free(*(routerset_t
**)lvalue
);
1774 *(routerset_t
**)lvalue
= routerset_new();
1775 if (routerset_parse(*(routerset_t
**)lvalue
, c
->value
, c
->key
)<0) {
1776 tor_snprintf(buf
, sizeof(buf
), "Invalid exit list '%s' for option '%s'",
1778 *msg
= tor_strdup(buf
);
1783 case CONFIG_TYPE_CSV
:
1784 if (*(smartlist_t
**)lvalue
) {
1785 SMARTLIST_FOREACH(*(smartlist_t
**)lvalue
, char *, cp
, tor_free(cp
));
1786 smartlist_clear(*(smartlist_t
**)lvalue
);
1788 *(smartlist_t
**)lvalue
= smartlist_create();
1791 smartlist_split_string(*(smartlist_t
**)lvalue
, c
->value
, ",",
1792 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
, 0);
1795 case CONFIG_TYPE_LINELIST
:
1796 case CONFIG_TYPE_LINELIST_S
:
1797 config_line_append((config_line_t
**)lvalue
, c
->key
, c
->value
);
1799 case CONFIG_TYPE_OBSOLETE
:
1800 log_warn(LD_CONFIG
, "Skipping obsolete configuration option '%s'", c
->key
);
1802 case CONFIG_TYPE_LINELIST_V
:
1803 r
= tor_snprintf(buf
, sizeof(buf
),
1804 "You may not provide a value for virtual option '%s'", c
->key
);
1805 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
1814 /** If <b>c</b> is a syntactically valid configuration line, update
1815 * <b>options</b> with its value and return 0. Otherwise return -1 for bad
1816 * key, -2 for bad value.
1818 * If <b>clear_first</b> is set, clear the value first. Then if
1819 * <b>use_defaults</b> is set, set the value to the default.
1821 * Called from config_assign().
1824 config_assign_line(config_format_t
*fmt
, or_options_t
*options
,
1825 config_line_t
*c
, int use_defaults
,
1826 int clear_first
, char **msg
)
1830 CHECK(fmt
, options
);
1832 var
= config_find_option(fmt
, c
->key
);
1835 void *lvalue
= STRUCT_VAR_P(options
, fmt
->extra
->var_offset
);
1837 "Found unrecognized option '%s'; saving it.", c
->key
);
1838 config_line_append((config_line_t
**)lvalue
, c
->key
, c
->value
);
1842 int tmp
= tor_snprintf(buf
, sizeof(buf
),
1843 "Unknown option '%s'. Failing.", c
->key
);
1844 *msg
= tor_strdup(tmp
>= 0 ? buf
: "internal error");
1848 /* Put keyword into canonical case. */
1849 if (strcmp(var
->name
, c
->key
)) {
1851 c
->key
= tor_strdup(var
->name
);
1854 if (!strlen(c
->value
)) {
1855 /* reset or clear it, then return */
1857 if (var
->type
== CONFIG_TYPE_LINELIST
||
1858 var
->type
== CONFIG_TYPE_LINELIST_S
) {
1859 /* We got an empty linelist from the torrc or command line.
1860 As a special case, call this an error. Warn and ignore. */
1862 "Linelist option '%s' has no value. Skipping.", c
->key
);
1863 } else { /* not already cleared */
1864 option_reset(fmt
, options
, var
, use_defaults
);
1870 if (config_assign_value(fmt
, options
, c
, msg
) < 0)
1875 /** Restore the option named <b>key</b> in options to its default value.
1876 * Called from config_assign(). */
1878 config_reset_line(config_format_t
*fmt
, or_options_t
*options
,
1879 const char *key
, int use_defaults
)
1883 CHECK(fmt
, options
);
1885 var
= config_find_option(fmt
, key
);
1887 return; /* give error on next pass. */
1889 option_reset(fmt
, options
, var
, use_defaults
);
1892 /** Return true iff key is a valid configuration option. */
1894 option_is_recognized(const char *key
)
1896 config_var_t
*var
= config_find_option(&options_format
, key
);
1897 return (var
!= NULL
);
1900 /** Return the canonical name of a configuration option, or NULL
1901 * if no such option exists. */
1903 option_get_canonical_name(const char *key
)
1905 config_var_t
*var
= config_find_option(&options_format
, key
);
1906 return var
? var
->name
: NULL
;
1909 /** Return a canonical list of the options assigned for key.
1912 option_get_assignment(or_options_t
*options
, const char *key
)
1914 return get_assigned_option(&options_format
, options
, key
, 1);
1917 /** Return true iff value needs to be quoted and escaped to be used in
1918 * a configuration file. */
1920 config_value_needs_escape(const char *value
)
1930 /* Note: quotes and backspaces need special handling when we are using
1931 * quotes, not otherwise, so they don't trigger escaping on their
1935 if (!TOR_ISPRINT(*value
))
1943 /** Return a newly allocated deep copy of the lines in <b>inp</b>. */
1944 static config_line_t
*
1945 config_lines_dup(const config_line_t
*inp
)
1947 config_line_t
*result
= NULL
;
1948 config_line_t
**next_out
= &result
;
1950 *next_out
= tor_malloc(sizeof(config_line_t
));
1951 (*next_out
)->key
= tor_strdup(inp
->key
);
1952 (*next_out
)->value
= tor_strdup(inp
->value
);
1954 next_out
= &((*next_out
)->next
);
1960 /** Return newly allocated line or lines corresponding to <b>key</b> in the
1961 * configuration <b>options</b>. If <b>escape_val</b> is true and a
1962 * value needs to be quoted before it's put in a config file, quote and
1963 * escape that value. Return NULL if no such key exists. */
1964 static config_line_t
*
1965 get_assigned_option(config_format_t
*fmt
, void *options
,
1966 const char *key
, int escape_val
)
1971 config_line_t
*result
;
1972 tor_assert(options
&& key
);
1974 CHECK(fmt
, options
);
1976 var
= config_find_option(fmt
, key
);
1978 log_warn(LD_CONFIG
, "Unknown option '%s'. Failing.", key
);
1981 value
= STRUCT_VAR_P(options
, var
->var_offset
);
1983 result
= tor_malloc_zero(sizeof(config_line_t
));
1984 result
->key
= tor_strdup(var
->name
);
1987 case CONFIG_TYPE_STRING
:
1988 case CONFIG_TYPE_FILENAME
:
1989 if (*(char**)value
) {
1990 result
->value
= tor_strdup(*(char**)value
);
1992 tor_free(result
->key
);
1997 case CONFIG_TYPE_ISOTIME
:
1998 if (*(time_t*)value
) {
1999 result
->value
= tor_malloc(ISO_TIME_LEN
+1);
2000 format_iso_time(result
->value
, *(time_t*)value
);
2002 tor_free(result
->key
);
2005 escape_val
= 0; /* Can't need escape. */
2007 case CONFIG_TYPE_INTERVAL
:
2008 case CONFIG_TYPE_UINT
:
2009 /* This means every or_options_t uint or bool element
2010 * needs to be an int. Not, say, a uint16_t or char. */
2011 tor_snprintf(buf
, sizeof(buf
), "%d", *(int*)value
);
2012 result
->value
= tor_strdup(buf
);
2013 escape_val
= 0; /* Can't need escape. */
2015 case CONFIG_TYPE_MEMUNIT
:
2016 tor_snprintf(buf
, sizeof(buf
), U64_FORMAT
,
2017 U64_PRINTF_ARG(*(uint64_t*)value
));
2018 result
->value
= tor_strdup(buf
);
2019 escape_val
= 0; /* Can't need escape. */
2021 case CONFIG_TYPE_DOUBLE
:
2022 tor_snprintf(buf
, sizeof(buf
), "%f", *(double*)value
);
2023 result
->value
= tor_strdup(buf
);
2024 escape_val
= 0; /* Can't need escape. */
2026 case CONFIG_TYPE_BOOL
:
2027 result
->value
= tor_strdup(*(int*)value
? "1" : "0");
2028 escape_val
= 0; /* Can't need escape. */
2030 case CONFIG_TYPE_ROUTERSET
:
2031 result
->value
= routerset_to_string(*(routerset_t
**)value
);
2033 case CONFIG_TYPE_CSV
:
2034 if (*(smartlist_t
**)value
)
2036 smartlist_join_strings(*(smartlist_t
**)value
, ",", 0, NULL
);
2038 result
->value
= tor_strdup("");
2040 case CONFIG_TYPE_OBSOLETE
:
2041 log_fn(LOG_PROTOCOL_WARN
, LD_CONFIG
,
2042 "You asked me for the value of an obsolete config option '%s'.",
2044 tor_free(result
->key
);
2047 case CONFIG_TYPE_LINELIST_S
:
2049 "Can't return context-sensitive '%s' on its own", key
);
2050 tor_free(result
->key
);
2053 case CONFIG_TYPE_LINELIST
:
2054 case CONFIG_TYPE_LINELIST_V
:
2055 tor_free(result
->key
);
2057 result
= config_lines_dup(*(const config_line_t
**)value
);
2060 tor_free(result
->key
);
2062 log_warn(LD_BUG
,"Unknown type %d for known key '%s'",
2068 config_line_t
*line
;
2069 for (line
= result
; line
; line
= line
->next
) {
2070 if (line
->value
&& config_value_needs_escape(line
->value
)) {
2071 char *newval
= esc_for_log(line
->value
);
2072 tor_free(line
->value
);
2073 line
->value
= newval
;
2081 /** Iterate through the linked list of requested options <b>list</b>.
2082 * For each item, convert as appropriate and assign to <b>options</b>.
2083 * If an item is unrecognized, set *msg and return -1 immediately,
2084 * else return 0 for success.
2086 * If <b>clear_first</b>, interpret config options as replacing (not
2087 * extending) their previous values. If <b>clear_first</b> is set,
2088 * then <b>use_defaults</b> to decide if you set to defaults after
2089 * clearing, or make the value 0 or NULL.
2091 * Here are the use cases:
2092 * 1. A non-empty AllowInvalid line in your torrc. Appends to current
2093 * if linelist, replaces current if csv.
2094 * 2. An empty AllowInvalid line in your torrc. Should clear it.
2095 * 3. "RESETCONF AllowInvalid" sets it to default.
2096 * 4. "SETCONF AllowInvalid" makes it NULL.
2097 * 5. "SETCONF AllowInvalid=foo" clears it and sets it to "foo".
2099 * Use_defaults Clear_first
2101 * 1 0 undefined, don't use
2102 * 0 1 "set to null first"
2103 * 1 1 "set to defaults first"
2104 * Return 0 on success, -1 on bad key, -2 on bad value.
2106 * As an additional special case, if a LINELIST config option has
2107 * no value and clear_first is 0, then warn and ignore it.
2111 There are three call cases for config_assign() currently.
2113 Case one: Torrc entry
2114 options_init_from_torrc() calls config_assign(0, 0)
2115 calls config_assign_line(0, 0).
2116 if value is empty, calls option_reset(0) and returns.
2117 calls config_assign_value(), appends.
2120 options_trial_assign() calls config_assign(0, 1)
2121 calls config_reset_line(0)
2122 calls option_reset(0)
2123 calls option_clear().
2124 calls config_assign_line(0, 1).
2125 if value is empty, returns.
2126 calls config_assign_value(), appends.
2128 Case three: resetconf
2129 options_trial_assign() calls config_assign(1, 1)
2130 calls config_reset_line(1)
2131 calls option_reset(1)
2132 calls option_clear().
2133 calls config_assign_value(default)
2134 calls config_assign_line(1, 1).
2138 config_assign(config_format_t
*fmt
, void *options
, config_line_t
*list
,
2139 int use_defaults
, int clear_first
, char **msg
)
2143 CHECK(fmt
, options
);
2145 /* pass 1: normalize keys */
2146 for (p
= list
; p
; p
= p
->next
) {
2147 const char *full
= expand_abbrev(fmt
, p
->key
, 0, 1);
2148 if (strcmp(full
,p
->key
)) {
2150 p
->key
= tor_strdup(full
);
2154 /* pass 2: if we're reading from a resetting source, clear all
2155 * mentioned config options, and maybe set to their defaults. */
2157 for (p
= list
; p
; p
= p
->next
)
2158 config_reset_line(fmt
, options
, p
->key
, use_defaults
);
2161 /* pass 3: assign. */
2164 if ((r
=config_assign_line(fmt
, options
, list
, use_defaults
,
2172 /** Try assigning <b>list</b> to the global options. You do this by duping
2173 * options, assigning list to the new one, then validating it. If it's
2174 * ok, then throw out the old one and stick with the new one. Else,
2175 * revert to old and return failure. Return SETOPT_OK on success, or
2176 * a setopt_err_t on failure.
2178 * If not success, point *<b>msg</b> to a newly allocated string describing
2182 options_trial_assign(config_line_t
*list
, int use_defaults
,
2183 int clear_first
, char **msg
)
2186 or_options_t
*trial_options
= options_dup(&options_format
, get_options());
2188 if ((r
=config_assign(&options_format
, trial_options
,
2189 list
, use_defaults
, clear_first
, msg
)) < 0) {
2190 config_free(&options_format
, trial_options
);
2194 if (options_validate(get_options(), trial_options
, 1, msg
) < 0) {
2195 config_free(&options_format
, trial_options
);
2196 return SETOPT_ERR_PARSE
; /*XXX make this a separate return value. */
2199 if (options_transition_allowed(get_options(), trial_options
, msg
) < 0) {
2200 config_free(&options_format
, trial_options
);
2201 return SETOPT_ERR_TRANSITION
;
2204 if (set_options(trial_options
, msg
)<0) {
2205 config_free(&options_format
, trial_options
);
2206 return SETOPT_ERR_SETTING
;
2209 /* we liked it. put it in place. */
2213 /** Reset config option <b>var</b> to 0, 0.0, NULL, or the equivalent.
2214 * Called from option_reset() and config_free(). */
2216 option_clear(config_format_t
*fmt
, or_options_t
*options
, config_var_t
*var
)
2218 void *lvalue
= STRUCT_VAR_P(options
, var
->var_offset
);
2219 (void)fmt
; /* unused */
2220 switch (var
->type
) {
2221 case CONFIG_TYPE_STRING
:
2222 case CONFIG_TYPE_FILENAME
:
2223 tor_free(*(char**)lvalue
);
2225 case CONFIG_TYPE_DOUBLE
:
2226 *(double*)lvalue
= 0.0;
2228 case CONFIG_TYPE_ISOTIME
:
2229 *(time_t*)lvalue
= 0;
2231 case CONFIG_TYPE_INTERVAL
:
2232 case CONFIG_TYPE_UINT
:
2233 case CONFIG_TYPE_BOOL
:
2236 case CONFIG_TYPE_MEMUNIT
:
2237 *(uint64_t*)lvalue
= 0;
2239 case CONFIG_TYPE_ROUTERSET
:
2240 if (*(routerset_t
**)lvalue
) {
2241 routerset_free(*(routerset_t
**)lvalue
);
2242 *(routerset_t
**)lvalue
= NULL
;
2245 case CONFIG_TYPE_CSV
:
2246 if (*(smartlist_t
**)lvalue
) {
2247 SMARTLIST_FOREACH(*(smartlist_t
**)lvalue
, char *, cp
, tor_free(cp
));
2248 smartlist_free(*(smartlist_t
**)lvalue
);
2249 *(smartlist_t
**)lvalue
= NULL
;
2252 case CONFIG_TYPE_LINELIST
:
2253 case CONFIG_TYPE_LINELIST_S
:
2254 config_free_lines(*(config_line_t
**)lvalue
);
2255 *(config_line_t
**)lvalue
= NULL
;
2257 case CONFIG_TYPE_LINELIST_V
:
2258 /* handled by linelist_s. */
2260 case CONFIG_TYPE_OBSOLETE
:
2265 /** Clear the option indexed by <b>var</b> in <b>options</b>. Then if
2266 * <b>use_defaults</b>, set it to its default value.
2267 * Called by config_init() and option_reset_line() and option_assign_line(). */
2269 option_reset(config_format_t
*fmt
, or_options_t
*options
,
2270 config_var_t
*var
, int use_defaults
)
2274 CHECK(fmt
, options
);
2275 option_clear(fmt
, options
, var
); /* clear it first */
2277 return; /* all done */
2278 if (var
->initvalue
) {
2279 c
= tor_malloc_zero(sizeof(config_line_t
));
2280 c
->key
= tor_strdup(var
->name
);
2281 c
->value
= tor_strdup(var
->initvalue
);
2282 if (config_assign_value(fmt
, options
, c
, &msg
) < 0) {
2283 log_warn(LD_BUG
, "Failed to assign default: %s", msg
);
2284 tor_free(msg
); /* if this happens it's a bug */
2286 config_free_lines(c
);
2290 /** Print a usage message for tor. */
2295 "Copyright (c) 2001-2004, Roger Dingledine\n"
2296 "Copyright (c) 2004-2006, Roger Dingledine, Nick Mathewson\n"
2297 "Copyright (c) 2007-2010, The Tor Project, Inc.\n\n"
2298 "tor -f <torrc> [args]\n"
2299 "See man page for options, or https://www.torproject.org/ for "
2300 "documentation.\n");
2303 /** Print all non-obsolete torrc options. */
2305 list_torrc_options(void)
2308 smartlist_t
*lines
= smartlist_create();
2309 for (i
= 0; _option_vars
[i
].name
; ++i
) {
2310 config_var_t
*var
= &_option_vars
[i
];
2312 if (var
->type
== CONFIG_TYPE_OBSOLETE
||
2313 var
->type
== CONFIG_TYPE_LINELIST_V
)
2315 desc
= config_find_description(&options_format
, var
->name
);
2316 printf("%s\n", var
->name
);
2318 wrap_string(lines
, desc
, 76, " ", " ");
2319 SMARTLIST_FOREACH(lines
, char *, cp
, {
2323 smartlist_clear(lines
);
2326 smartlist_free(lines
);
2329 /** Last value actually set by resolve_my_address. */
2330 static uint32_t last_resolved_addr
= 0;
2332 * Based on <b>options-\>Address</b>, guess our public IP address and put it
2333 * (in host order) into *<b>addr_out</b>. If <b>hostname_out</b> is provided,
2334 * set *<b>hostname_out</b> to a new string holding the hostname we used to
2335 * get the address. Return 0 if all is well, or -1 if we can't find a suitable
2336 * public IP address.
2339 resolve_my_address(int warn_severity
, or_options_t
*options
,
2340 uint32_t *addr_out
, char **hostname_out
)
2346 int explicit_hostname
=1;
2347 int from_interface
=0;
2348 char tmpbuf
[INET_NTOA_BUF_LEN
];
2349 const char *address
= options
->Address
;
2350 int notice_severity
= warn_severity
<= LOG_NOTICE
?
2351 LOG_NOTICE
: warn_severity
;
2353 tor_assert(addr_out
);
2355 if (address
&& *address
) {
2356 strlcpy(hostname
, address
, sizeof(hostname
));
2357 } else { /* then we need to guess our address */
2358 explicit_ip
= 0; /* it's implicit */
2359 explicit_hostname
= 0; /* it's implicit */
2361 if (gethostname(hostname
, sizeof(hostname
)) < 0) {
2362 log_fn(warn_severity
, LD_NET
,"Error obtaining local hostname");
2365 log_debug(LD_CONFIG
,"Guessed local host name as '%s'",hostname
);
2368 /* now we know hostname. resolve it and keep only the IP address */
2370 if (tor_inet_aton(hostname
, &in
) == 0) {
2371 /* then we have to resolve it */
2373 if (tor_lookup_hostname(hostname
, &addr
)) {
2374 uint32_t interface_ip
;
2376 if (explicit_hostname
) {
2377 log_fn(warn_severity
, LD_CONFIG
,
2378 "Could not resolve local Address '%s'. Failing.", hostname
);
2381 log_fn(notice_severity
, LD_CONFIG
,
2382 "Could not resolve guessed local hostname '%s'. "
2383 "Trying something else.", hostname
);
2384 if (get_interface_address(warn_severity
, &interface_ip
)) {
2385 log_fn(warn_severity
, LD_CONFIG
,
2386 "Could not get local interface IP address. Failing.");
2390 in
.s_addr
= htonl(interface_ip
);
2391 tor_inet_ntoa(&in
,tmpbuf
,sizeof(tmpbuf
));
2392 log_fn(notice_severity
, LD_CONFIG
, "Learned IP address '%s' for "
2393 "local interface. Using that.", tmpbuf
);
2394 strlcpy(hostname
, "<guessed from interfaces>", sizeof(hostname
));
2396 in
.s_addr
= htonl(addr
);
2398 if (!explicit_hostname
&&
2399 is_internal_IP(ntohl(in
.s_addr
), 0)) {
2400 uint32_t interface_ip
;
2402 tor_inet_ntoa(&in
,tmpbuf
,sizeof(tmpbuf
));
2403 log_fn(notice_severity
, LD_CONFIG
, "Guessed local hostname '%s' "
2404 "resolves to a private IP address (%s). Trying something "
2405 "else.", hostname
, tmpbuf
);
2407 if (get_interface_address(warn_severity
, &interface_ip
)) {
2408 log_fn(warn_severity
, LD_CONFIG
,
2409 "Could not get local interface IP address. Too bad.");
2410 } else if (is_internal_IP(interface_ip
, 0)) {
2412 in2
.s_addr
= htonl(interface_ip
);
2413 tor_inet_ntoa(&in2
,tmpbuf
,sizeof(tmpbuf
));
2414 log_fn(notice_severity
, LD_CONFIG
,
2415 "Interface IP address '%s' is a private address too. "
2416 "Ignoring.", tmpbuf
);
2419 in
.s_addr
= htonl(interface_ip
);
2420 tor_inet_ntoa(&in
,tmpbuf
,sizeof(tmpbuf
));
2421 log_fn(notice_severity
, LD_CONFIG
,
2422 "Learned IP address '%s' for local interface."
2423 " Using that.", tmpbuf
);
2424 strlcpy(hostname
, "<guessed from interfaces>", sizeof(hostname
));
2430 tor_inet_ntoa(&in
,tmpbuf
,sizeof(tmpbuf
));
2431 if (is_internal_IP(ntohl(in
.s_addr
), 0) &&
2432 options
->_PublishServerDescriptor
) {
2433 /* make sure we're ok with publishing an internal IP */
2434 if (!options
->DirServers
&& !options
->AlternateDirAuthority
) {
2435 /* if they are using the default dirservers, disallow internal IPs
2437 log_fn(warn_severity
, LD_CONFIG
,
2438 "Address '%s' resolves to private IP address '%s'. "
2439 "Tor servers that use the default DirServers must have public "
2440 "IP addresses.", hostname
, tmpbuf
);
2444 /* even if they've set their own dirservers, require an explicit IP if
2445 * they're using an internal address. */
2446 log_fn(warn_severity
, LD_CONFIG
, "Address '%s' resolves to private "
2447 "IP address '%s'. Please set the Address config option to be "
2448 "the IP address you want to use.", hostname
, tmpbuf
);
2453 log_debug(LD_CONFIG
, "Resolved Address to '%s'.", tmpbuf
);
2454 *addr_out
= ntohl(in
.s_addr
);
2455 if (last_resolved_addr
&& last_resolved_addr
!= *addr_out
) {
2456 /* Leave this as a notice, regardless of the requested severity,
2457 * at least until dynamic IP address support becomes bulletproof. */
2459 "Your IP address seems to have changed to %s. Updating.",
2461 ip_address_changed(0);
2463 if (last_resolved_addr
!= *addr_out
) {
2465 const char *h
= hostname
;
2467 method
= "CONFIGURED";
2469 } else if (explicit_hostname
) {
2470 method
= "RESOLVED";
2471 } else if (from_interface
) {
2472 method
= "INTERFACE";
2475 method
= "GETHOSTNAME";
2477 control_event_server_status(LOG_NOTICE
,
2478 "EXTERNAL_ADDRESS ADDRESS=%s METHOD=%s %s%s",
2479 tmpbuf
, method
, h
?"HOSTNAME=":"", h
);
2481 last_resolved_addr
= *addr_out
;
2483 *hostname_out
= tor_strdup(hostname
);
2487 /** Return true iff <b>addr</b> is judged to be on the same network as us, or
2488 * on a private network.
2491 is_local_addr(const tor_addr_t
*addr
)
2493 if (tor_addr_is_internal(addr
, 0))
2495 /* Check whether ip is on the same /24 as we are. */
2496 if (get_options()->EnforceDistinctSubnets
== 0)
2498 if (tor_addr_family(addr
) == AF_INET
) {
2499 /*XXXX022 IP6 what corresponds to an /24? */
2500 uint32_t ip
= tor_addr_to_ipv4h(addr
);
2502 /* It's possible that this next check will hit before the first time
2503 * resolve_my_address actually succeeds. (For clients, it is likely that
2504 * resolve_my_address will never be called at all). In those cases,
2505 * last_resolved_addr will be 0, and so checking to see whether ip is on
2506 * the same /24 as last_resolved_addr will be the same as checking whether
2507 * it was on net 0, which is already done by is_internal_IP.
2509 if ((last_resolved_addr
& (uint32_t)0xffffff00ul
)
2510 == (ip
& (uint32_t)0xffffff00ul
))
2516 /** Called when we don't have a nickname set. Try to guess a good nickname
2517 * based on the hostname, and return it in a newly allocated string. If we
2518 * can't, return NULL and let the caller warn if it wants to. */
2520 get_default_nickname(void)
2522 static const char * const bad_default_nicknames
[] = {
2526 char localhostname
[256];
2527 char *cp
, *out
, *outp
;
2530 if (gethostname(localhostname
, sizeof(localhostname
)) < 0)
2533 /* Put it in lowercase; stop at the first dot. */
2534 if ((cp
= strchr(localhostname
, '.')))
2536 tor_strlower(localhostname
);
2538 /* Strip invalid characters. */
2540 out
= outp
= tor_malloc(strlen(localhostname
) + 1);
2542 if (strchr(LEGAL_NICKNAME_CHARACTERS
, *cp
))
2549 /* Enforce length. */
2550 if (strlen(out
) > MAX_NICKNAME_LEN
)
2551 out
[MAX_NICKNAME_LEN
]='\0';
2553 /* Check for dumb names. */
2554 for (i
= 0; bad_default_nicknames
[i
]; ++i
) {
2555 if (!strcmp(out
, bad_default_nicknames
[i
])) {
2564 /** Release storage held by <b>options</b>. */
2566 config_free(config_format_t
*fmt
, void *options
)
2570 tor_assert(options
);
2572 for (i
=0; fmt
->vars
[i
].name
; ++i
)
2573 option_clear(fmt
, options
, &(fmt
->vars
[i
]));
2575 config_line_t
**linep
= STRUCT_VAR_P(options
, fmt
->extra
->var_offset
);
2576 config_free_lines(*linep
);
2582 /** Return true iff a and b contain identical keys and values in identical
2585 config_lines_eq(config_line_t
*a
, config_line_t
*b
)
2588 if (strcasecmp(a
->key
, b
->key
) || strcmp(a
->value
, b
->value
))
2598 /** Return true iff the option <b>name</b> has the same value in <b>o1</b>
2599 * and <b>o2</b>. Must not be called for LINELIST_S or OBSOLETE options.
2602 option_is_same(config_format_t
*fmt
,
2603 or_options_t
*o1
, or_options_t
*o2
, const char *name
)
2605 config_line_t
*c1
, *c2
;
2610 c1
= get_assigned_option(fmt
, o1
, name
, 0);
2611 c2
= get_assigned_option(fmt
, o2
, name
, 0);
2612 r
= config_lines_eq(c1
, c2
);
2613 config_free_lines(c1
);
2614 config_free_lines(c2
);
2618 /** Copy storage held by <b>old</b> into a new or_options_t and return it. */
2619 static or_options_t
*
2620 options_dup(config_format_t
*fmt
, or_options_t
*old
)
2622 or_options_t
*newopts
;
2624 config_line_t
*line
;
2626 newopts
= config_alloc(fmt
);
2627 for (i
=0; fmt
->vars
[i
].name
; ++i
) {
2628 if (fmt
->vars
[i
].type
== CONFIG_TYPE_LINELIST_S
)
2630 if (fmt
->vars
[i
].type
== CONFIG_TYPE_OBSOLETE
)
2632 line
= get_assigned_option(fmt
, old
, fmt
->vars
[i
].name
, 0);
2635 if (config_assign(fmt
, newopts
, line
, 0, 0, &msg
) < 0) {
2636 log_err(LD_BUG
, "Config_get_assigned_option() generated "
2637 "something we couldn't config_assign(): %s", msg
);
2642 config_free_lines(line
);
2647 /** Return a new empty or_options_t. Used for testing. */
2651 return config_alloc(&options_format
);
2654 /** Set <b>options</b> to hold reasonable defaults for most options.
2655 * Each option defaults to zero. */
2657 options_init(or_options_t
*options
)
2659 config_init(&options_format
, options
);
2662 /* Check if the port number given in <b>port_option</b> in combination with
2663 * the specified port in <b>listen_options</b> will result in Tor actually
2664 * opening a low port (meaning a port lower than 1024). Return 1 if
2665 * it is, or 0 if it isn't or the concept of a low port isn't applicable for
2666 * the platform we're on. */
2668 is_listening_on_low_port(uint16_t port_option
,
2669 const config_line_t
*listen_options
)
2672 return 0; /* No port is too low for windows. */
2674 const config_line_t
*l
;
2676 if (port_option
== 0)
2677 return 0; /* We're not listening */
2678 if (listen_options
== NULL
)
2679 return (port_option
< 1024);
2681 for (l
= listen_options
; l
; l
= l
->next
) {
2682 parse_addr_port(LOG_WARN
, l
->value
, NULL
, NULL
, &p
);
2691 /** Set all vars in the configuration object <b>options</b> to their default
2694 config_init(config_format_t
*fmt
, void *options
)
2698 CHECK(fmt
, options
);
2700 for (i
=0; fmt
->vars
[i
].name
; ++i
) {
2701 var
= &fmt
->vars
[i
];
2702 if (!var
->initvalue
)
2703 continue; /* defaults to NULL or 0 */
2704 option_reset(fmt
, options
, var
, 1);
2708 /** Allocate and return a new string holding the written-out values of the vars
2709 * in 'options'. If 'minimal', do not write out any default-valued vars.
2710 * Else, if comment_defaults, write default values as comments.
2713 config_dump(config_format_t
*fmt
, void *options
, int minimal
,
2714 int comment_defaults
)
2716 smartlist_t
*elements
;
2717 or_options_t
*defaults
;
2718 config_line_t
*line
, *assigned
;
2724 defaults
= config_alloc(fmt
);
2725 config_init(fmt
, defaults
);
2727 /* XXX use a 1 here so we don't add a new log line while dumping */
2728 if (fmt
->validate_fn(NULL
,defaults
, 1, &msg
) < 0) {
2729 log_err(LD_BUG
, "Failed to validate default config.");
2734 elements
= smartlist_create();
2735 for (i
=0; fmt
->vars
[i
].name
; ++i
) {
2736 int comment_option
= 0;
2737 if (fmt
->vars
[i
].type
== CONFIG_TYPE_OBSOLETE
||
2738 fmt
->vars
[i
].type
== CONFIG_TYPE_LINELIST_S
)
2740 /* Don't save 'hidden' control variables. */
2741 if (!strcmpstart(fmt
->vars
[i
].name
, "__"))
2743 if (minimal
&& option_is_same(fmt
, options
, defaults
, fmt
->vars
[i
].name
))
2745 else if (comment_defaults
&&
2746 option_is_same(fmt
, options
, defaults
, fmt
->vars
[i
].name
))
2749 desc
= config_find_description(fmt
, fmt
->vars
[i
].name
);
2750 line
= assigned
= get_assigned_option(fmt
, options
, fmt
->vars
[i
].name
, 1);
2753 /* Only dump the description if there's something to describe. */
2754 wrap_string(elements
, desc
, 78, "# ", "# ");
2757 for (; line
; line
= line
->next
) {
2758 size_t len
= strlen(line
->key
) + strlen(line
->value
) + 5;
2760 tmp
= tor_malloc(len
);
2761 if (tor_snprintf(tmp
, len
, "%s%s %s\n",
2762 comment_option
? "# " : "",
2763 line
->key
, line
->value
)<0) {
2764 log_err(LD_BUG
,"Internal error writing option value");
2767 smartlist_add(elements
, tmp
);
2769 config_free_lines(assigned
);
2773 line
= *(config_line_t
**)STRUCT_VAR_P(options
, fmt
->extra
->var_offset
);
2774 for (; line
; line
= line
->next
) {
2775 size_t len
= strlen(line
->key
) + strlen(line
->value
) + 3;
2777 tmp
= tor_malloc(len
);
2778 if (tor_snprintf(tmp
, len
, "%s %s\n", line
->key
, line
->value
)<0) {
2779 log_err(LD_BUG
,"Internal error writing option value");
2782 smartlist_add(elements
, tmp
);
2786 result
= smartlist_join_strings(elements
, "", 0, NULL
);
2787 SMARTLIST_FOREACH(elements
, char *, cp
, tor_free(cp
));
2788 smartlist_free(elements
);
2789 config_free(fmt
, defaults
);
2793 /** Return a string containing a possible configuration file that would give
2794 * the configuration in <b>options</b>. If <b>minimal</b> is true, do not
2795 * include options that are the same as Tor's defaults.
2798 options_dump(or_options_t
*options
, int minimal
)
2800 return config_dump(&options_format
, options
, minimal
, 0);
2803 /** Return 0 if every element of sl is a string holding a decimal
2804 * representation of a port number, or if sl is NULL.
2805 * Otherwise set *msg and return -1. */
2807 validate_ports_csv(smartlist_t
*sl
, const char *name
, char **msg
)
2816 SMARTLIST_FOREACH(sl
, const char *, cp
,
2819 if (i
< 1 || i
> 65535) {
2820 int r
= tor_snprintf(buf
, sizeof(buf
),
2821 "Port '%s' out of range in %s", cp
, name
);
2822 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
2829 /** If <b>value</b> exceeds ROUTER_MAX_DECLARED_BANDWIDTH, write
2830 * a complaint into *<b>msg</b> using string <b>desc</b>, and return -1.
2834 ensure_bandwidth_cap(uint64_t *value
, const char *desc
, char **msg
)
2838 if (*value
> ROUTER_MAX_DECLARED_BANDWIDTH
) {
2839 /* This handles an understandable special case where somebody says "2gb"
2840 * whereas our actual maximum is 2gb-1 (INT_MAX) */
2843 if (*value
> ROUTER_MAX_DECLARED_BANDWIDTH
) {
2844 r
= tor_snprintf(buf
, sizeof(buf
), "%s ("U64_FORMAT
") must be at most %d",
2845 desc
, U64_PRINTF_ARG(*value
),
2846 ROUTER_MAX_DECLARED_BANDWIDTH
);
2847 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
2853 /** Parse an authority type from <b>options</b>-\>PublishServerDescriptor
2854 * and write it to <b>options</b>-\>_PublishServerDescriptor. Treat "1"
2855 * as "v2,v3" unless BridgeRelay is 1, in which case treat it as "bridge".
2857 * Return 0 on success or -1 if not a recognized authority type (in which
2858 * case the value of _PublishServerDescriptor is undefined). */
2860 compute_publishserverdescriptor(or_options_t
*options
)
2862 smartlist_t
*list
= options
->PublishServerDescriptor
;
2863 authority_type_t
*auth
= &options
->_PublishServerDescriptor
;
2864 *auth
= NO_AUTHORITY
;
2865 if (!list
) /* empty list, answer is none */
2867 SMARTLIST_FOREACH(list
, const char *, string
, {
2868 if (!strcasecmp(string
, "v1"))
2869 *auth
|= V1_AUTHORITY
;
2870 else if (!strcmp(string
, "1"))
2871 if (options
->BridgeRelay
)
2872 *auth
|= BRIDGE_AUTHORITY
;
2874 *auth
|= V2_AUTHORITY
| V3_AUTHORITY
;
2875 else if (!strcasecmp(string
, "v2"))
2876 *auth
|= V2_AUTHORITY
;
2877 else if (!strcasecmp(string
, "v3"))
2878 *auth
|= V3_AUTHORITY
;
2879 else if (!strcasecmp(string
, "bridge"))
2880 *auth
|= BRIDGE_AUTHORITY
;
2881 else if (!strcasecmp(string
, "hidserv"))
2882 *auth
|= HIDSERV_AUTHORITY
;
2883 else if (!strcasecmp(string
, "") || !strcmp(string
, "0"))
2891 /** Lowest allowable value for RendPostPeriod; if this is too low, hidden
2892 * services can overload the directory system. */
2893 #define MIN_REND_POST_PERIOD (10*60)
2895 /** Highest allowable value for RendPostPeriod. */
2896 #define MAX_DIR_PERIOD (MIN_ONION_KEY_LIFETIME/2)
2898 /** Lowest allowable value for CircuitBuildTimeout; values too low will
2899 * increase network load because of failing connections being retried, and
2900 * might prevent users from connecting to the network at all. */
2901 #define MIN_CIRCUIT_BUILD_TIMEOUT 30
2903 /** Lowest allowable value for MaxCircuitDirtiness; if this is too low, Tor
2904 * will generate too many circuits and potentially overload the network. */
2905 #define MIN_MAX_CIRCUIT_DIRTINESS 10
2907 /** Return 0 if every setting in <b>options</b> is reasonable, and a
2908 * permissible transition from <b>old_options</b>. Else return -1.
2909 * Should have no side effects, except for normalizing the contents of
2912 * On error, tor_strdup an error explanation into *<b>msg</b>.
2915 * If <b>from_setconf</b>, we were called by the controller, and our
2916 * Log line should stay empty. If it's 0, then give us a default log
2917 * if there are no logs defined.
2920 options_validate(or_options_t
*old_options
, or_options_t
*options
,
2921 int from_setconf
, char **msg
)
2925 const char *uname
= get_uname();
2927 #define REJECT(arg) \
2928 STMT_BEGIN *msg = tor_strdup(arg); return -1; STMT_END
2929 #define COMPLAIN(arg) STMT_BEGIN log(LOG_WARN, LD_CONFIG, arg); STMT_END
2934 if (options
->ORPort
< 0 || options
->ORPort
> 65535)
2935 REJECT("ORPort option out of bounds.");
2937 if (server_mode(options
) &&
2938 (!strcmpstart(uname
, "Windows 95") ||
2939 !strcmpstart(uname
, "Windows 98") ||
2940 !strcmpstart(uname
, "Windows Me"))) {
2941 log(LOG_WARN
, LD_CONFIG
, "Tor is running as a server, but you are "
2942 "running %s; this probably won't work. See "
2943 "http://wiki.noreply.org/noreply/TheOnionRouter/TorFAQ#ServerOS "
2944 "for details.", uname
);
2947 if (options
->ORPort
== 0 && options
->ORListenAddress
!= NULL
)
2948 REJECT("ORPort must be defined if ORListenAddress is defined.");
2950 if (options
->DirPort
== 0 && options
->DirListenAddress
!= NULL
)
2951 REJECT("DirPort must be defined if DirListenAddress is defined.");
2953 if (options
->DNSPort
== 0 && options
->DNSListenAddress
!= NULL
)
2954 REJECT("DNSPort must be defined if DNSListenAddress is defined.");
2956 if (options
->ControlPort
== 0 && options
->ControlListenAddress
!= NULL
)
2957 REJECT("ControlPort must be defined if ControlListenAddress is defined.");
2959 if (options
->TransPort
== 0 && options
->TransListenAddress
!= NULL
)
2960 REJECT("TransPort must be defined if TransListenAddress is defined.");
2962 if (options
->NatdPort
== 0 && options
->NatdListenAddress
!= NULL
)
2963 REJECT("NatdPort must be defined if NatdListenAddress is defined.");
2965 /* Don't gripe about SocksPort 0 with SocksListenAddress set; a standard
2966 * configuration does this. */
2968 for (i
= 0; i
< 3; ++i
) {
2969 int is_socks
= i
==0;
2970 int is_trans
= i
==1;
2971 config_line_t
*line
, *opt
, *old
;
2974 opt
= options
->SocksListenAddress
;
2975 old
= old_options
? old_options
->SocksListenAddress
: NULL
;
2977 } else if (is_trans
) {
2978 opt
= options
->TransListenAddress
;
2979 old
= old_options
? old_options
->TransListenAddress
: NULL
;
2980 tp
= "transparent proxy";
2982 opt
= options
->NatdListenAddress
;
2983 old
= old_options
? old_options
->NatdListenAddress
: NULL
;
2987 for (line
= opt
; line
; line
= line
->next
) {
2988 char *address
= NULL
;
2991 if (parse_addr_port(LOG_WARN
, line
->value
, &address
, &addr
, &port
)<0)
2992 continue; /* We'll warn about this later. */
2993 if (!is_internal_IP(addr
, 1) &&
2994 (!old_options
|| !config_lines_eq(old
, opt
))) {
2996 "You specified a public address '%s' for a %s. Other "
2997 "people on the Internet might find your computer and use it as "
2998 "an open %s. Please don't allow this unless you have "
2999 "a good reason.", address
, tp
, tp
);
3005 if (validate_data_directory(options
)<0)
3006 REJECT("Invalid DataDirectory");
3008 if (options
->Nickname
== NULL
) {
3009 if (server_mode(options
)) {
3010 if (!(options
->Nickname
= get_default_nickname())) {
3011 log_notice(LD_CONFIG
, "Couldn't pick a nickname based on "
3012 "our hostname; using %s instead.", UNNAMED_ROUTER_NICKNAME
);
3013 options
->Nickname
= tor_strdup(UNNAMED_ROUTER_NICKNAME
);
3015 log_notice(LD_CONFIG
, "Choosing default nickname '%s'",
3020 if (!is_legal_nickname(options
->Nickname
)) {
3021 r
= tor_snprintf(buf
, sizeof(buf
),
3022 "Nickname '%s' is wrong length or contains illegal characters.",
3024 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3029 if (server_mode(options
) && !options
->ContactInfo
)
3030 log(LOG_NOTICE
, LD_CONFIG
, "Your ContactInfo config option is not set. "
3031 "Please consider setting it, so we can contact you if your server is "
3032 "misconfigured or something else goes wrong.");
3034 /* Special case on first boot if no Log options are given. */
3035 if (!options
->Logs
&& !options
->RunAsDaemon
&& !from_setconf
)
3036 config_line_append(&options
->Logs
, "Log", "notice stdout");
3038 if (options_init_logs(options
, 1)<0) /* Validate the log(s) */
3039 REJECT("Failed to validate Log options. See logs for details.");
3041 if (options
->NoPublish
) {
3042 log(LOG_WARN
, LD_CONFIG
,
3043 "NoPublish is obsolete. Use PublishServerDescriptor instead.");
3044 SMARTLIST_FOREACH(options
->PublishServerDescriptor
, char *, s
,
3046 smartlist_clear(options
->PublishServerDescriptor
);
3049 if (authdir_mode(options
)) {
3050 /* confirm that our address isn't broken, so we can complain now */
3052 if (resolve_my_address(LOG_WARN
, options
, &tmp
, NULL
) < 0)
3053 REJECT("Failed to resolve/guess local address. See logs for details.");
3057 if (options
->RunAsDaemon
&& torrc_fname
&& path_is_relative(torrc_fname
))
3058 REJECT("Can't use a relative path to torrc when RunAsDaemon is set.");
3061 if (options
->SocksPort
< 0 || options
->SocksPort
> 65535)
3062 REJECT("SocksPort option out of bounds.");
3064 if (options
->DNSPort
< 0 || options
->DNSPort
> 65535)
3065 REJECT("DNSPort option out of bounds.");
3067 if (options
->TransPort
< 0 || options
->TransPort
> 65535)
3068 REJECT("TransPort option out of bounds.");
3070 if (options
->NatdPort
< 0 || options
->NatdPort
> 65535)
3071 REJECT("NatdPort option out of bounds.");
3073 if (options
->SocksPort
== 0 && options
->TransPort
== 0 &&
3074 options
->NatdPort
== 0 && options
->ORPort
== 0 &&
3075 options
->DNSPort
== 0 && !options
->RendConfigLines
)
3076 log(LOG_WARN
, LD_CONFIG
,
3077 "SocksPort, TransPort, NatdPort, DNSPort, and ORPort are all "
3078 "undefined, and there aren't any hidden services configured. "
3079 "Tor will still run, but probably won't do anything.");
3081 if (options
->ControlPort
< 0 || options
->ControlPort
> 65535)
3082 REJECT("ControlPort option out of bounds.");
3084 if (options
->DirPort
< 0 || options
->DirPort
> 65535)
3085 REJECT("DirPort option out of bounds.");
3087 #ifndef USE_TRANSPARENT
3088 if (options
->TransPort
|| options
->TransListenAddress
)
3089 REJECT("TransPort and TransListenAddress are disabled in this build.");
3092 if (options
->AccountingMax
&&
3093 (is_listening_on_low_port(options
->ORPort
, options
->ORListenAddress
) ||
3094 is_listening_on_low_port(options
->DirPort
, options
->DirListenAddress
)))
3096 log(LOG_WARN
, LD_CONFIG
,
3097 "You have set AccountingMax to use hibernation. You have also "
3098 "chosen a low DirPort or OrPort. This combination can make Tor stop "
3099 "working when it tries to re-attach the port after a period of "
3100 "hibernation. Please choose a different port or turn off "
3101 "hibernation unless you know this combination will work on your "
3105 if (options
->ExcludeExitNodes
|| options
->ExcludeNodes
) {
3106 options
->_ExcludeExitNodesUnion
= routerset_new();
3107 routerset_union(options
->_ExcludeExitNodesUnion
,options
->ExcludeExitNodes
);
3108 routerset_union(options
->_ExcludeExitNodesUnion
,options
->ExcludeNodes
);
3111 if (options
->StrictExitNodes
&&
3112 (!options
->ExitNodes
) &&
3114 (old_options
->StrictExitNodes
!= options
->StrictExitNodes
) ||
3115 (!routerset_equal(old_options
->ExitNodes
,options
->ExitNodes
))))
3116 COMPLAIN("StrictExitNodes set, but no ExitNodes listed.");
3118 if (options
->StrictEntryNodes
&&
3119 (!options
->EntryNodes
) &&
3121 (old_options
->StrictEntryNodes
!= options
->StrictEntryNodes
) ||
3122 (!routerset_equal(old_options
->EntryNodes
,options
->EntryNodes
))))
3123 COMPLAIN("StrictEntryNodes set, but no EntryNodes listed.");
3125 if (options
->EntryNodes
&& !routerset_is_list(options
->EntryNodes
)) {
3126 /* XXXX fix this; see entry_guards_prepend_from_config(). */
3127 REJECT("IPs or countries are not yet supported in EntryNodes.");
3130 if (options
->AuthoritativeDir
) {
3131 if (!options
->ContactInfo
&& !options
->TestingTorNetwork
)
3132 REJECT("Authoritative directory servers must set ContactInfo");
3133 if (options
->V1AuthoritativeDir
&& !options
->RecommendedVersions
)
3134 REJECT("V1 authoritative dir servers must set RecommendedVersions.");
3135 if (!options
->RecommendedClientVersions
)
3136 options
->RecommendedClientVersions
=
3137 config_lines_dup(options
->RecommendedVersions
);
3138 if (!options
->RecommendedServerVersions
)
3139 options
->RecommendedServerVersions
=
3140 config_lines_dup(options
->RecommendedVersions
);
3141 if (options
->VersioningAuthoritativeDir
&&
3142 (!options
->RecommendedClientVersions
||
3143 !options
->RecommendedServerVersions
))
3144 REJECT("Versioning authoritative dir servers must set "
3145 "Recommended*Versions.");
3146 if (options
->UseEntryGuards
) {
3147 log_info(LD_CONFIG
, "Authoritative directory servers can't set "
3148 "UseEntryGuards. Disabling.");
3149 options
->UseEntryGuards
= 0;
3151 if (!options
->DownloadExtraInfo
&& authdir_mode_any_main(options
)) {
3152 log_info(LD_CONFIG
, "Authoritative directories always try to download "
3153 "extra-info documents. Setting DownloadExtraInfo.");
3154 options
->DownloadExtraInfo
= 1;
3156 if (!(options
->BridgeAuthoritativeDir
|| options
->HSAuthoritativeDir
||
3157 options
->V1AuthoritativeDir
|| options
->V2AuthoritativeDir
||
3158 options
->V3AuthoritativeDir
))
3159 REJECT("AuthoritativeDir is set, but none of "
3160 "(Bridge/HS/V1/V2/V3)AuthoritativeDir is set.");
3163 if (options
->AuthoritativeDir
&& !options
->DirPort
)
3164 REJECT("Running as authoritative directory, but no DirPort set.");
3166 if (options
->AuthoritativeDir
&& !options
->ORPort
)
3167 REJECT("Running as authoritative directory, but no ORPort set.");
3169 if (options
->AuthoritativeDir
&& options
->ClientOnly
)
3170 REJECT("Running as authoritative directory, but ClientOnly also set.");
3172 if (options
->HSAuthorityRecordStats
&& !options
->HSAuthoritativeDir
)
3173 REJECT("HSAuthorityRecordStats is set but we're not running as "
3174 "a hidden service authority.");
3176 if (options
->ConnLimit
<= 0) {
3177 r
= tor_snprintf(buf
, sizeof(buf
),
3178 "ConnLimit must be greater than 0, but was set to %d",
3179 options
->ConnLimit
);
3180 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3184 if (validate_ports_csv(options
->FirewallPorts
, "FirewallPorts", msg
) < 0)
3187 if (validate_ports_csv(options
->LongLivedPorts
, "LongLivedPorts", msg
) < 0)
3190 if (validate_ports_csv(options
->RejectPlaintextPorts
,
3191 "RejectPlaintextPorts", msg
) < 0)
3194 if (validate_ports_csv(options
->WarnPlaintextPorts
,
3195 "WarnPlaintextPorts", msg
) < 0)
3198 if (options
->FascistFirewall
&& !options
->ReachableAddresses
) {
3199 if (options
->FirewallPorts
&& smartlist_len(options
->FirewallPorts
)) {
3200 /* We already have firewall ports set, so migrate them to
3201 * ReachableAddresses, which will set ReachableORAddresses and
3202 * ReachableDirAddresses if they aren't set explicitly. */
3203 smartlist_t
*instead
= smartlist_create();
3204 config_line_t
*new_line
= tor_malloc_zero(sizeof(config_line_t
));
3205 new_line
->key
= tor_strdup("ReachableAddresses");
3206 /* If we're configured with the old format, we need to prepend some
3208 SMARTLIST_FOREACH(options
->FirewallPorts
, const char *, portno
,
3210 int p
= atoi(portno
);
3214 tor_snprintf(s
, 16, "*:%d", p
);
3215 smartlist_add(instead
, s
);
3217 new_line
->value
= smartlist_join_strings(instead
,",",0,NULL
);
3218 /* These have been deprecated since 0.1.1.5-alpha-cvs */
3219 log(LOG_NOTICE
, LD_CONFIG
,
3220 "Converting FascistFirewall and FirewallPorts "
3221 "config options to new format: \"ReachableAddresses %s\"",
3223 options
->ReachableAddresses
= new_line
;
3224 SMARTLIST_FOREACH(instead
, char *, cp
, tor_free(cp
));
3225 smartlist_free(instead
);
3227 /* We do not have FirewallPorts set, so add 80 to
3228 * ReachableDirAddresses, and 443 to ReachableORAddresses. */
3229 if (!options
->ReachableDirAddresses
) {
3230 config_line_t
*new_line
= tor_malloc_zero(sizeof(config_line_t
));
3231 new_line
->key
= tor_strdup("ReachableDirAddresses");
3232 new_line
->value
= tor_strdup("*:80");
3233 options
->ReachableDirAddresses
= new_line
;
3234 log(LOG_NOTICE
, LD_CONFIG
, "Converting FascistFirewall config option "
3235 "to new format: \"ReachableDirAddresses *:80\"");
3237 if (!options
->ReachableORAddresses
) {
3238 config_line_t
*new_line
= tor_malloc_zero(sizeof(config_line_t
));
3239 new_line
->key
= tor_strdup("ReachableORAddresses");
3240 new_line
->value
= tor_strdup("*:443");
3241 options
->ReachableORAddresses
= new_line
;
3242 log(LOG_NOTICE
, LD_CONFIG
, "Converting FascistFirewall config option "
3243 "to new format: \"ReachableORAddresses *:443\"");
3248 for (i
=0; i
<3; i
++) {
3249 config_line_t
**linep
=
3250 (i
==0) ? &options
->ReachableAddresses
:
3251 (i
==1) ? &options
->ReachableORAddresses
:
3252 &options
->ReachableDirAddresses
;
3255 /* We need to end with a reject *:*, not an implicit accept *:* */
3257 if (!strcmp((*linep
)->value
, "reject *:*")) /* already there */
3259 linep
= &((*linep
)->next
);
3261 *linep
= tor_malloc_zero(sizeof(config_line_t
));
3262 (*linep
)->key
= tor_strdup(
3263 (i
==0) ? "ReachableAddresses" :
3264 (i
==1) ? "ReachableORAddresses" :
3265 "ReachableDirAddresses");
3266 (*linep
)->value
= tor_strdup("reject *:*");
3272 if ((options
->ReachableAddresses
||
3273 options
->ReachableORAddresses
||
3274 options
->ReachableDirAddresses
) &&
3275 server_mode(options
))
3276 REJECT("Servers must be able to freely connect to the rest "
3277 "of the Internet, so they must not set Reachable*Addresses "
3278 "or FascistFirewall.");
3280 if (options
->UseBridges
&&
3281 server_mode(options
))
3282 REJECT("Servers must be able to freely connect to the rest "
3283 "of the Internet, so they must not set UseBridges.");
3285 options
->_AllowInvalid
= 0;
3286 if (options
->AllowInvalidNodes
) {
3287 SMARTLIST_FOREACH(options
->AllowInvalidNodes
, const char *, cp
, {
3288 if (!strcasecmp(cp
, "entry"))
3289 options
->_AllowInvalid
|= ALLOW_INVALID_ENTRY
;
3290 else if (!strcasecmp(cp
, "exit"))
3291 options
->_AllowInvalid
|= ALLOW_INVALID_EXIT
;
3292 else if (!strcasecmp(cp
, "middle"))
3293 options
->_AllowInvalid
|= ALLOW_INVALID_MIDDLE
;
3294 else if (!strcasecmp(cp
, "introduction"))
3295 options
->_AllowInvalid
|= ALLOW_INVALID_INTRODUCTION
;
3296 else if (!strcasecmp(cp
, "rendezvous"))
3297 options
->_AllowInvalid
|= ALLOW_INVALID_RENDEZVOUS
;
3299 r
= tor_snprintf(buf
, sizeof(buf
),
3300 "Unrecognized value '%s' in AllowInvalidNodes", cp
);
3301 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3307 if (compute_publishserverdescriptor(options
) < 0) {
3308 r
= tor_snprintf(buf
, sizeof(buf
),
3309 "Unrecognized value in PublishServerDescriptor");
3310 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3314 if ((options
->BridgeRelay
3315 || options
->_PublishServerDescriptor
& BRIDGE_AUTHORITY
)
3316 && (options
->_PublishServerDescriptor
3317 & (V1_AUTHORITY
|V2_AUTHORITY
|V3_AUTHORITY
))) {
3318 REJECT("Bridges are not supposed to publish router descriptors to the "
3319 "directory authorities. Please correct your "
3320 "PublishServerDescriptor line.");
3323 if (options
->MinUptimeHidServDirectoryV2
< 0) {
3324 log_warn(LD_CONFIG
, "MinUptimeHidServDirectoryV2 option must be at "
3325 "least 0 seconds. Changing to 0.");
3326 options
->MinUptimeHidServDirectoryV2
= 0;
3329 if (options
->RendPostPeriod
< MIN_REND_POST_PERIOD
) {
3330 log(LOG_WARN
,LD_CONFIG
,"RendPostPeriod option is too short; "
3331 "raising to %d seconds.", MIN_REND_POST_PERIOD
);
3332 options
->RendPostPeriod
= MIN_REND_POST_PERIOD
;
3335 if (options
->RendPostPeriod
> MAX_DIR_PERIOD
) {
3336 log(LOG_WARN
, LD_CONFIG
, "RendPostPeriod is too large; clipping to %ds.",
3338 options
->RendPostPeriod
= MAX_DIR_PERIOD
;
3341 if (options
->CircuitBuildTimeout
< MIN_CIRCUIT_BUILD_TIMEOUT
) {
3342 log(LOG_WARN
, LD_CONFIG
, "CircuitBuildTimeout option is too short; "
3343 "raising to %d seconds.", MIN_CIRCUIT_BUILD_TIMEOUT
);
3344 options
->CircuitBuildTimeout
= MIN_CIRCUIT_BUILD_TIMEOUT
;
3347 if (options
->MaxCircuitDirtiness
< MIN_MAX_CIRCUIT_DIRTINESS
) {
3348 log(LOG_WARN
, LD_CONFIG
, "MaxCircuitDirtiness option is too short; "
3349 "raising to %d seconds.", MIN_MAX_CIRCUIT_DIRTINESS
);
3350 options
->MaxCircuitDirtiness
= MIN_MAX_CIRCUIT_DIRTINESS
;
3353 if (options
->KeepalivePeriod
< 1)
3354 REJECT("KeepalivePeriod option must be positive.");
3356 if (ensure_bandwidth_cap(&options
->BandwidthRate
,
3357 "BandwidthRate", msg
) < 0)
3359 if (ensure_bandwidth_cap(&options
->BandwidthBurst
,
3360 "BandwidthBurst", msg
) < 0)
3362 if (ensure_bandwidth_cap(&options
->MaxAdvertisedBandwidth
,
3363 "MaxAdvertisedBandwidth", msg
) < 0)
3365 if (ensure_bandwidth_cap(&options
->RelayBandwidthRate
,
3366 "RelayBandwidthRate", msg
) < 0)
3368 if (ensure_bandwidth_cap(&options
->RelayBandwidthBurst
,
3369 "RelayBandwidthBurst", msg
) < 0)
3372 if (server_mode(options
)) {
3373 if (options
->BandwidthRate
< ROUTER_REQUIRED_MIN_BANDWIDTH
) {
3374 r
= tor_snprintf(buf
, sizeof(buf
),
3375 "BandwidthRate is set to %d bytes/second. "
3376 "For servers, it must be at least %d.",
3377 (int)options
->BandwidthRate
,
3378 ROUTER_REQUIRED_MIN_BANDWIDTH
);
3379 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3381 } else if (options
->MaxAdvertisedBandwidth
<
3382 ROUTER_REQUIRED_MIN_BANDWIDTH
/2) {
3383 r
= tor_snprintf(buf
, sizeof(buf
),
3384 "MaxAdvertisedBandwidth is set to %d bytes/second. "
3385 "For servers, it must be at least %d.",
3386 (int)options
->MaxAdvertisedBandwidth
,
3387 ROUTER_REQUIRED_MIN_BANDWIDTH
/2);
3388 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3391 if (options
->RelayBandwidthRate
&&
3392 options
->RelayBandwidthRate
< ROUTER_REQUIRED_MIN_BANDWIDTH
) {
3393 r
= tor_snprintf(buf
, sizeof(buf
),
3394 "RelayBandwidthRate is set to %d bytes/second. "
3395 "For servers, it must be at least %d.",
3396 (int)options
->RelayBandwidthRate
,
3397 ROUTER_REQUIRED_MIN_BANDWIDTH
);
3398 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3403 if (options
->RelayBandwidthRate
&& !options
->RelayBandwidthBurst
)
3404 options
->RelayBandwidthBurst
= options
->RelayBandwidthRate
;
3406 if (options
->RelayBandwidthRate
> options
->RelayBandwidthBurst
)
3407 REJECT("RelayBandwidthBurst must be at least equal "
3408 "to RelayBandwidthRate.");
3410 if (options
->BandwidthRate
> options
->BandwidthBurst
)
3411 REJECT("BandwidthBurst must be at least equal to BandwidthRate.");
3413 /* if they set relaybandwidth* really high but left bandwidth*
3414 * at the default, raise the defaults. */
3415 if (options
->RelayBandwidthRate
> options
->BandwidthRate
)
3416 options
->BandwidthRate
= options
->RelayBandwidthRate
;
3417 if (options
->RelayBandwidthBurst
> options
->BandwidthBurst
)
3418 options
->BandwidthBurst
= options
->RelayBandwidthBurst
;
3420 if (accounting_parse_options(options
, 1)<0)
3421 REJECT("Failed to parse accounting options. See logs for details.");
3423 if (options
->HttpProxy
) { /* parse it now */
3424 if (parse_addr_port(LOG_WARN
, options
->HttpProxy
, NULL
,
3425 &options
->HttpProxyAddr
, &options
->HttpProxyPort
) < 0)
3426 REJECT("HttpProxy failed to parse or resolve. Please fix.");
3427 if (options
->HttpProxyPort
== 0) { /* give it a default */
3428 options
->HttpProxyPort
= 80;
3432 if (options
->HttpProxyAuthenticator
) {
3433 if (strlen(options
->HttpProxyAuthenticator
) >= 48)
3434 REJECT("HttpProxyAuthenticator is too long (>= 48 chars).");
3437 if (options
->HttpsProxy
) { /* parse it now */
3438 if (parse_addr_port(LOG_WARN
, options
->HttpsProxy
, NULL
,
3439 &options
->HttpsProxyAddr
, &options
->HttpsProxyPort
) <0)
3440 REJECT("HttpsProxy failed to parse or resolve. Please fix.");
3441 if (options
->HttpsProxyPort
== 0) { /* give it a default */
3442 options
->HttpsProxyPort
= 443;
3446 if (options
->HttpsProxyAuthenticator
) {
3447 if (strlen(options
->HttpsProxyAuthenticator
) >= 48)
3448 REJECT("HttpsProxyAuthenticator is too long (>= 48 chars).");
3451 if (options
->HashedControlPassword
) {
3452 smartlist_t
*sl
= decode_hashed_passwords(options
->HashedControlPassword
);
3454 REJECT("Bad HashedControlPassword: wrong length or bad encoding");
3456 SMARTLIST_FOREACH(sl
, char*, cp
, tor_free(cp
));
3461 if (options
->HashedControlSessionPassword
) {
3462 smartlist_t
*sl
= decode_hashed_passwords(
3463 options
->HashedControlSessionPassword
);
3465 REJECT("Bad HashedControlSessionPassword: wrong length or bad encoding");
3467 SMARTLIST_FOREACH(sl
, char*, cp
, tor_free(cp
));
3472 if (options
->ControlListenAddress
) {
3473 int all_are_local
= 1;
3475 for (ln
= options
->ControlListenAddress
; ln
; ln
= ln
->next
) {
3476 if (strcmpstart(ln
->value
, "127."))
3479 if (!all_are_local
) {
3480 if (!options
->HashedControlPassword
&&
3481 !options
->HashedControlSessionPassword
&&
3482 !options
->CookieAuthentication
) {
3484 "You have a ControlListenAddress set to accept "
3485 "unauthenticated connections from a non-local address. "
3486 "This means that programs not running on your computer "
3487 "can reconfigure your Tor, without even having to guess a "
3488 "password. That's so bad that I'm closing your ControlPort "
3489 "for you. If you need to control your Tor remotely, try "
3490 "enabling authentication and using a tool like stunnel or "
3491 "ssh to encrypt remote access.");
3492 options
->ControlPort
= 0;
3494 log_warn(LD_CONFIG
, "You have a ControlListenAddress set to accept "
3495 "connections from a non-local address. This means that "
3496 "programs not running on your computer can reconfigure your "
3497 "Tor. That's pretty bad, since the controller "
3498 "protocol isn't encrypted! Maybe you should just listen on "
3499 "127.0.0.1 and use a tool like stunnel or ssh to encrypt "
3500 "remote connections to your control port.");
3505 if (options
->ControlPort
&& !options
->HashedControlPassword
&&
3506 !options
->HashedControlSessionPassword
&&
3507 !options
->CookieAuthentication
) {
3508 log_warn(LD_CONFIG
, "ControlPort is open, but no authentication method "
3509 "has been configured. This means that any program on your "
3510 "computer can reconfigure your Tor. That's bad! You should "
3511 "upgrade your Tor controller as soon as possible.");
3514 if (options
->UseEntryGuards
&& ! options
->NumEntryGuards
)
3515 REJECT("Cannot enable UseEntryGuards with NumEntryGuards set to 0");
3517 if (check_nickname_list(options
->MyFamily
, "MyFamily", msg
))
3519 for (cl
= options
->NodeFamilies
; cl
; cl
= cl
->next
) {
3520 if (check_nickname_list(cl
->value
, "NodeFamily", msg
))
3524 if (validate_addr_policies(options
, msg
) < 0)
3527 if (validate_dir_authorities(options
, old_options
) < 0)
3528 REJECT("Directory authority line did not parse. See logs for details.");
3530 if (options
->UseBridges
&& !options
->Bridges
)
3531 REJECT("If you set UseBridges, you must specify at least one bridge.");
3532 if (options
->UseBridges
&& !options
->TunnelDirConns
)
3533 REJECT("If you set UseBridges, you must set TunnelDirConns.");
3534 if (options
->Bridges
) {
3535 for (cl
= options
->Bridges
; cl
; cl
= cl
->next
) {
3536 if (parse_bridge_line(cl
->value
, 1)<0)
3537 REJECT("Bridge line did not parse. See logs for details.");
3541 if (options
->ConstrainedSockets
) {
3542 /* If the user wants to constrain socket buffer use, make sure the desired
3543 * limit is between MIN|MAX_TCPSOCK_BUFFER in k increments. */
3544 if (options
->ConstrainedSockSize
< MIN_CONSTRAINED_TCP_BUFFER
||
3545 options
->ConstrainedSockSize
> MAX_CONSTRAINED_TCP_BUFFER
||
3546 options
->ConstrainedSockSize
% 1024) {
3547 r
= tor_snprintf(buf
, sizeof(buf
),
3548 "ConstrainedSockSize is invalid. Must be a value between %d and %d "
3549 "in 1024 byte increments.",
3550 MIN_CONSTRAINED_TCP_BUFFER
, MAX_CONSTRAINED_TCP_BUFFER
);
3551 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3554 if (options
->DirPort
) {
3555 /* Providing cached directory entries while system TCP buffers are scarce
3556 * will exacerbate the socket errors. Suggest that this be disabled. */
3557 COMPLAIN("You have requested constrained socket buffers while also "
3558 "serving directory entries via DirPort. It is strongly "
3559 "suggested that you disable serving directory requests when "
3560 "system TCP buffer resources are scarce.");
3564 if (options
->V3AuthVoteDelay
+ options
->V3AuthDistDelay
>=
3565 options
->V3AuthVotingInterval
/2) {
3566 REJECT("V3AuthVoteDelay plus V3AuthDistDelay must be less than half "
3567 "V3AuthVotingInterval");
3569 if (options
->V3AuthVoteDelay
< MIN_VOTE_SECONDS
)
3570 REJECT("V3AuthVoteDelay is way too low.");
3571 if (options
->V3AuthDistDelay
< MIN_DIST_SECONDS
)
3572 REJECT("V3AuthDistDelay is way too low.");
3574 if (options
->V3AuthNIntervalsValid
< 2)
3575 REJECT("V3AuthNIntervalsValid must be at least 2.");
3577 if (options
->V3AuthVotingInterval
< MIN_VOTE_INTERVAL
) {
3578 REJECT("V3AuthVotingInterval is insanely low.");
3579 } else if (options
->V3AuthVotingInterval
> 24*60*60) {
3580 REJECT("V3AuthVotingInterval is insanely high.");
3581 } else if (((24*60*60) % options
->V3AuthVotingInterval
) != 0) {
3582 COMPLAIN("V3AuthVotingInterval does not divide evenly into 24 hours.");
3585 if (rend_config_services(options
, 1) < 0)
3586 REJECT("Failed to configure rendezvous options. See logs for details.");
3588 /* Parse client-side authorization for hidden services. */
3589 if (rend_parse_service_authorization(options
, 1) < 0)
3590 REJECT("Failed to configure client authorization for hidden services. "
3591 "See logs for details.");
3593 if (parse_virtual_addr_network(options
->VirtualAddrNetwork
, 1, NULL
)<0)
3596 if (options
->PreferTunneledDirConns
&& !options
->TunnelDirConns
)
3597 REJECT("Must set TunnelDirConns if PreferTunneledDirConns is set.");
3599 if (options
->AutomapHostsSuffixes
) {
3600 SMARTLIST_FOREACH(options
->AutomapHostsSuffixes
, char *, suf
,
3602 size_t len
= strlen(suf
);
3603 if (len
&& suf
[len
-1] == '.')
3608 if (options
->TestingTorNetwork
&& !options
->DirServers
) {
3609 REJECT("TestingTorNetwork may only be configured in combination with "
3610 "a non-default set of DirServers.");
3613 /*XXXX022 checking for defaults manually like this is a bit fragile.*/
3615 /* Keep changes to hard-coded values synchronous to man page and default
3617 if (options
->TestingV3AuthInitialVotingInterval
!= 30*60 &&
3618 !options
->TestingTorNetwork
) {
3619 REJECT("TestingV3AuthInitialVotingInterval may only be changed in testing "
3621 } else if (options
->TestingV3AuthInitialVotingInterval
< MIN_VOTE_INTERVAL
) {
3622 REJECT("TestingV3AuthInitialVotingInterval is insanely low.");
3623 } else if (((30*60) % options
->TestingV3AuthInitialVotingInterval
) != 0) {
3624 REJECT("TestingV3AuthInitialVotingInterval does not divide evenly into "
3628 if (options
->TestingV3AuthInitialVoteDelay
!= 5*60 &&
3629 !options
->TestingTorNetwork
) {
3630 REJECT("TestingV3AuthInitialVoteDelay may only be changed in testing "
3632 } else if (options
->TestingV3AuthInitialVoteDelay
< MIN_VOTE_SECONDS
) {
3633 REJECT("TestingV3AuthInitialVoteDelay is way too low.");
3636 if (options
->TestingV3AuthInitialDistDelay
!= 5*60 &&
3637 !options
->TestingTorNetwork
) {
3638 REJECT("TestingV3AuthInitialDistDelay may only be changed in testing "
3640 } else if (options
->TestingV3AuthInitialDistDelay
< MIN_DIST_SECONDS
) {
3641 REJECT("TestingV3AuthInitialDistDelay is way too low.");
3644 if (options
->TestingV3AuthInitialVoteDelay
+
3645 options
->TestingV3AuthInitialDistDelay
>=
3646 options
->TestingV3AuthInitialVotingInterval
/2) {
3647 REJECT("TestingV3AuthInitialVoteDelay plus TestingV3AuthInitialDistDelay "
3648 "must be less than half TestingV3AuthInitialVotingInterval");
3651 if (options
->TestingAuthDirTimeToLearnReachability
!= 30*60 &&
3652 !options
->TestingTorNetwork
) {
3653 REJECT("TestingAuthDirTimeToLearnReachability may only be changed in "
3654 "testing Tor networks!");
3655 } else if (options
->TestingAuthDirTimeToLearnReachability
< 0) {
3656 REJECT("TestingAuthDirTimeToLearnReachability must be non-negative.");
3657 } else if (options
->TestingAuthDirTimeToLearnReachability
> 2*60*60) {
3658 COMPLAIN("TestingAuthDirTimeToLearnReachability is insanely high.");
3661 if (options
->TestingEstimatedDescriptorPropagationTime
!= 10*60 &&
3662 !options
->TestingTorNetwork
) {
3663 REJECT("TestingEstimatedDescriptorPropagationTime may only be changed in "
3664 "testing Tor networks!");
3665 } else if (options
->TestingEstimatedDescriptorPropagationTime
< 0) {
3666 REJECT("TestingEstimatedDescriptorPropagationTime must be non-negative.");
3667 } else if (options
->TestingEstimatedDescriptorPropagationTime
> 60*60) {
3668 COMPLAIN("TestingEstimatedDescriptorPropagationTime is insanely high.");
3671 if (options
->TestingTorNetwork
) {
3672 log_warn(LD_CONFIG
, "TestingTorNetwork is set. This will make your node "
3673 "almost unusable in the public Tor network, and is "
3674 "therefore only advised if you are building a "
3675 "testing Tor network!");
3683 /** Helper: return true iff s1 and s2 are both NULL, or both non-NULL
3686 opt_streq(const char *s1
, const char *s2
)
3690 else if (s1
&& s2
&& !strcmp(s1
,s2
))
3696 /** Check if any of the previous options have changed but aren't allowed to. */
3698 options_transition_allowed(or_options_t
*old
, or_options_t
*new_val
,
3704 if (!opt_streq(old
->PidFile
, new_val
->PidFile
)) {
3705 *msg
= tor_strdup("PidFile is not allowed to change.");
3709 if (old
->RunAsDaemon
!= new_val
->RunAsDaemon
) {
3710 *msg
= tor_strdup("While Tor is running, changing RunAsDaemon "
3715 if (strcmp(old
->DataDirectory
,new_val
->DataDirectory
)!=0) {
3717 int r
= tor_snprintf(buf
, sizeof(buf
),
3718 "While Tor is running, changing DataDirectory "
3719 "(\"%s\"->\"%s\") is not allowed.",
3720 old
->DataDirectory
, new_val
->DataDirectory
);
3721 *msg
= tor_strdup(r
>= 0 ? buf
: "internal error");
3725 if (!opt_streq(old
->User
, new_val
->User
)) {
3726 *msg
= tor_strdup("While Tor is running, changing User is not allowed.");
3730 if (!opt_streq(old
->Group
, new_val
->Group
)) {
3731 *msg
= tor_strdup("While Tor is running, changing Group is not allowed.");
3735 if (old
->HardwareAccel
!= new_val
->HardwareAccel
) {
3736 *msg
= tor_strdup("While Tor is running, changing HardwareAccel is "
3741 if (old
->TestingTorNetwork
!= new_val
->TestingTorNetwork
) {
3742 *msg
= tor_strdup("While Tor is running, changing TestingTorNetwork "
3750 /** Return 1 if any change from <b>old_options</b> to <b>new_options</b>
3751 * will require us to rotate the CPU and DNS workers; else return 0. */
3753 options_transition_affects_workers(or_options_t
*old_options
,
3754 or_options_t
*new_options
)
3756 if (!opt_streq(old_options
->DataDirectory
, new_options
->DataDirectory
) ||
3757 old_options
->NumCpus
!= new_options
->NumCpus
||
3758 old_options
->ORPort
!= new_options
->ORPort
||
3759 old_options
->ServerDNSSearchDomains
!=
3760 new_options
->ServerDNSSearchDomains
||
3761 old_options
->SafeLogging
!= new_options
->SafeLogging
||
3762 old_options
->ClientOnly
!= new_options
->ClientOnly
||
3763 !config_lines_eq(old_options
->Logs
, new_options
->Logs
))
3766 /* Check whether log options match. */
3768 /* Nothing that changed matters. */
3772 /** Return 1 if any change from <b>old_options</b> to <b>new_options</b>
3773 * will require us to generate a new descriptor; else return 0. */
3775 options_transition_affects_descriptor(or_options_t
*old_options
,
3776 or_options_t
*new_options
)
3778 /* XXX We can be smarter here. If your DirPort isn't being
3779 * published and you just turned it off, no need to republish. Etc. */
3780 if (!opt_streq(old_options
->DataDirectory
, new_options
->DataDirectory
) ||
3781 !opt_streq(old_options
->Nickname
,new_options
->Nickname
) ||
3782 !opt_streq(old_options
->Address
,new_options
->Address
) ||
3783 !config_lines_eq(old_options
->ExitPolicy
,new_options
->ExitPolicy
) ||
3784 old_options
->ExitPolicyRejectPrivate
!=
3785 new_options
->ExitPolicyRejectPrivate
||
3786 old_options
->ORPort
!= new_options
->ORPort
||
3787 old_options
->DirPort
!= new_options
->DirPort
||
3788 old_options
->ClientOnly
!= new_options
->ClientOnly
||
3789 old_options
->NoPublish
!= new_options
->NoPublish
||
3790 old_options
->_PublishServerDescriptor
!=
3791 new_options
->_PublishServerDescriptor
||
3792 get_effective_bwrate(old_options
) != get_effective_bwrate(new_options
) ||
3793 get_effective_bwburst(old_options
) !=
3794 get_effective_bwburst(new_options
) ||
3795 !opt_streq(old_options
->ContactInfo
, new_options
->ContactInfo
) ||
3796 !opt_streq(old_options
->MyFamily
, new_options
->MyFamily
) ||
3797 !opt_streq(old_options
->AccountingStart
, new_options
->AccountingStart
) ||
3798 old_options
->AccountingMax
!= new_options
->AccountingMax
)
3805 /** Return the directory on windows where we expect to find our application
3808 get_windows_conf_root(void)
3810 static int is_set
= 0;
3811 static char path
[MAX_PATH
+1];
3820 /* Find X:\documents and settings\username\application data\ .
3821 * We would use SHGetSpecialFolder path, but that wasn't added until IE4.
3823 #ifdef ENABLE_LOCAL_APPDATA
3824 #define APPDATA_PATH CSIDL_LOCAL_APPDATA
3826 #define APPDATA_PATH CSIDL_APPDATA
3828 if (!SUCCEEDED(SHGetSpecialFolderLocation(NULL
, APPDATA_PATH
, &idl
))) {
3829 GetCurrentDirectory(MAX_PATH
, path
);
3832 "I couldn't find your application data folder: are you "
3833 "running an ancient version of Windows 95? Defaulting to \"%s\"",
3837 /* Convert the path from an "ID List" (whatever that is!) to a path. */
3838 result
= SHGetPathFromIDList(idl
, path
);
3839 /* Now we need to free the */
3842 m
->lpVtbl
->Free(m
, idl
);
3843 m
->lpVtbl
->Release(m
);
3845 if (!SUCCEEDED(result
)) {
3848 strlcat(path
,"\\tor",MAX_PATH
);
3854 /** Return the default location for our torrc file. */
3856 get_default_conf_file(void)
3859 static char path
[MAX_PATH
+1];
3860 strlcpy(path
, get_windows_conf_root(), MAX_PATH
);
3861 strlcat(path
,"\\torrc",MAX_PATH
);
3864 return (CONFDIR
"/torrc");
3868 /** Verify whether lst is a string containing valid-looking comma-separated
3869 * nicknames, or NULL. Return 0 on success. Warn and return -1 on failure.
3872 check_nickname_list(const char *lst
, const char *name
, char **msg
)
3879 sl
= smartlist_create();
3881 smartlist_split_string(sl
, lst
, ",",
3882 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
|SPLIT_STRIP_SPACE
, 0);
3884 SMARTLIST_FOREACH(sl
, const char *, s
,
3886 if (!is_legal_nickname_or_hexdigest(s
)) {
3888 int tmp
= tor_snprintf(buf
, sizeof(buf
),
3889 "Invalid nickname '%s' in %s line", s
, name
);
3890 *msg
= tor_strdup(tmp
>= 0 ? buf
: "internal error");
3895 SMARTLIST_FOREACH(sl
, char *, s
, tor_free(s
));
3900 /** Learn config file name from command line arguments, or use the default */
3902 find_torrc_filename(int argc
, char **argv
,
3903 int *using_default_torrc
, int *ignore_missing_torrc
)
3908 for (i
= 1; i
< argc
; ++i
) {
3909 if (i
< argc
-1 && !strcmp(argv
[i
],"-f")) {
3911 log(LOG_WARN
, LD_CONFIG
, "Duplicate -f options on command line.");
3915 /* XXX one day we might want to extend expand_filename to work
3916 * under Windows as well. */
3917 fname
= tor_strdup(argv
[i
+1]);
3919 fname
= expand_filename(argv
[i
+1]);
3921 *using_default_torrc
= 0;
3923 } else if (!strcmp(argv
[i
],"--ignore-missing-torrc")) {
3924 *ignore_missing_torrc
= 1;
3928 if (*using_default_torrc
) {
3929 /* didn't find one, try CONFDIR */
3930 const char *dflt
= get_default_conf_file();
3931 if (dflt
&& file_status(dflt
) == FN_FILE
) {
3932 fname
= tor_strdup(dflt
);
3936 fn
= expand_filename("~/.torrc");
3937 if (fn
&& file_status(fn
) == FN_FILE
) {
3941 fname
= tor_strdup(dflt
);
3944 fname
= tor_strdup(dflt
);
3951 /** Load torrc from disk, setting torrc_fname if successful */
3953 load_torrc_from_disk(int argc
, char **argv
)
3957 int using_default_torrc
= 1;
3958 int ignore_missing_torrc
= 0;
3960 fname
= find_torrc_filename(argc
, argv
,
3961 &using_default_torrc
, &ignore_missing_torrc
);
3963 log(LOG_DEBUG
, LD_CONFIG
, "Opening config file \"%s\"", fname
);
3965 tor_free(torrc_fname
);
3966 torrc_fname
= fname
;
3968 /* Open config file */
3969 if (file_status(fname
) != FN_FILE
||
3970 !(cf
= read_file_to_str(fname
,0,NULL
))) {
3971 if (using_default_torrc
== 1 || ignore_missing_torrc
) {
3972 log(LOG_NOTICE
, LD_CONFIG
, "Configuration file \"%s\" not present, "
3973 "using reasonable defaults.", fname
);
3974 tor_free(fname
); /* sets fname to NULL */
3976 cf
= tor_strdup("");
3978 log(LOG_WARN
, LD_CONFIG
,
3979 "Unable to open configuration file \"%s\".", fname
);
3991 /** Read a configuration file into <b>options</b>, finding the configuration
3992 * file location based on the command line. After loading the file
3993 * call options_init_from_string() to load the config.
3994 * Return 0 if success, -1 if failure. */
3996 options_init_from_torrc(int argc
, char **argv
)
3999 int i
, retval
, command
;
4000 static char **backup_argv
;
4001 static int backup_argc
;
4002 char *command_arg
= NULL
;
4005 if (argv
) { /* first time we're called. save command line args */
4008 } else { /* we're reloading. need to clean up old options first. */
4012 if (argc
> 1 && (!strcmp(argv
[1], "-h") || !strcmp(argv
[1],"--help"))) {
4016 if (argc
> 1 && !strcmp(argv
[1], "--list-torrc-options")) {
4017 /* For documenting validating whether we've documented everything. */
4018 list_torrc_options();
4022 if (argc
> 1 && (!strcmp(argv
[1],"--version"))) {
4023 printf("Tor version %s.\n",get_version());
4027 /* Go through command-line variables */
4028 if (!global_cmdline_options
) {
4029 /* Or we could redo the list every time we pass this place.
4030 * It does not really matter */
4031 if (config_get_commandlines(argc
, argv
, &global_cmdline_options
) < 0) {
4036 command
= CMD_RUN_TOR
;
4037 for (i
= 1; i
< argc
; ++i
) {
4038 if (!strcmp(argv
[i
],"--list-fingerprint")) {
4039 command
= CMD_LIST_FINGERPRINT
;
4040 } else if (!strcmp(argv
[i
],"--hash-password")) {
4041 command
= CMD_HASH_PASSWORD
;
4042 command_arg
= tor_strdup( (i
< argc
-1) ? argv
[i
+1] : "");
4044 } else if (!strcmp(argv
[i
],"--verify-config")) {
4045 command
= CMD_VERIFY_CONFIG
;
4049 if (command
== CMD_HASH_PASSWORD
) {
4050 cf
= tor_strdup("");
4052 cf
= load_torrc_from_disk(argc
, argv
);
4057 retval
= options_init_from_string(cf
, command
, command_arg
, &errmsg
);
4066 log(LOG_WARN
,LD_CONFIG
,"%s", errmsg
);
4072 /** Load the options from the configuration in <b>cf</b>, validate
4073 * them for consistency and take actions based on them.
4075 * Return 0 if success, negative on error:
4076 * * -1 for general errors.
4077 * * -2 for failure to parse/validate,
4078 * * -3 for transition not allowed
4079 * * -4 for error while setting the new options
4082 options_init_from_string(const char *cf
,
4083 int command
, const char *command_arg
,
4086 or_options_t
*oldoptions
, *newoptions
;
4089 setopt_err_t err
= SETOPT_ERR_MISC
;
4092 oldoptions
= global_options
; /* get_options unfortunately asserts if
4093 this is the first time we run*/
4095 newoptions
= tor_malloc_zero(sizeof(or_options_t
));
4096 newoptions
->_magic
= OR_OPTIONS_MAGIC
;
4097 options_init(newoptions
);
4098 newoptions
->command
= command
;
4099 newoptions
->command_arg
= command_arg
;
4101 /* get config lines, assign them */
4102 retval
= config_get_lines(cf
, &cl
);
4104 err
= SETOPT_ERR_PARSE
;
4107 retval
= config_assign(&options_format
, newoptions
, cl
, 0, 0, msg
);
4108 config_free_lines(cl
);
4110 err
= SETOPT_ERR_PARSE
;
4114 /* Go through command-line variables too */
4115 retval
= config_assign(&options_format
, newoptions
,
4116 global_cmdline_options
, 0, 0, msg
);
4118 err
= SETOPT_ERR_PARSE
;
4122 /* If this is a testing network configuration, change defaults
4123 * for a list of dependent config options, re-initialize newoptions
4124 * with the new defaults, and assign all options to it second time. */
4125 if (newoptions
->TestingTorNetwork
) {
4126 /* XXXX this is a bit of a kludge. perhaps there's a better way to do
4127 * this? We could, for example, make the parsing algorithm do two passes
4128 * over the configuration. If it finds any "suite" options like
4129 * TestingTorNetwork, it could change the defaults before its second pass.
4130 * Not urgent so long as this seems to work, but at any sign of trouble,
4131 * let's clean it up. -NM */
4133 /* Change defaults. */
4135 for (i
= 0; testing_tor_network_defaults
[i
].name
; ++i
) {
4136 config_var_t
*new_var
= &testing_tor_network_defaults
[i
];
4137 config_var_t
*old_var
=
4138 config_find_option(&options_format
, new_var
->name
);
4139 tor_assert(new_var
);
4140 tor_assert(old_var
);
4141 old_var
->initvalue
= new_var
->initvalue
;
4144 /* Clear newoptions and re-initialize them with new defaults. */
4145 config_free(&options_format
, newoptions
);
4146 newoptions
= tor_malloc_zero(sizeof(or_options_t
));
4147 newoptions
->_magic
= OR_OPTIONS_MAGIC
;
4148 options_init(newoptions
);
4149 newoptions
->command
= command
;
4150 newoptions
->command_arg
= command_arg
;
4152 /* Assign all options a second time. */
4153 retval
= config_get_lines(cf
, &cl
);
4155 err
= SETOPT_ERR_PARSE
;
4158 retval
= config_assign(&options_format
, newoptions
, cl
, 0, 0, msg
);
4159 config_free_lines(cl
);
4161 err
= SETOPT_ERR_PARSE
;
4164 retval
= config_assign(&options_format
, newoptions
,
4165 global_cmdline_options
, 0, 0, msg
);
4167 err
= SETOPT_ERR_PARSE
;
4172 /* Validate newoptions */
4173 if (options_validate(oldoptions
, newoptions
, 0, msg
) < 0) {
4174 err
= SETOPT_ERR_PARSE
; /*XXX make this a separate return value.*/
4178 if (options_transition_allowed(oldoptions
, newoptions
, msg
) < 0) {
4179 err
= SETOPT_ERR_TRANSITION
;
4183 if (set_options(newoptions
, msg
)) {
4184 err
= SETOPT_ERR_SETTING
;
4185 goto err
; /* frees and replaces old options */
4191 config_free(&options_format
, newoptions
);
4193 int len
= (int)strlen(*msg
)+256;
4194 char *newmsg
= tor_malloc(len
);
4196 tor_snprintf(newmsg
, len
, "Failed to parse/validate config: %s", *msg
);
4203 /** Return the location for our configuration file.
4206 get_torrc_fname(void)
4211 return get_default_conf_file();
4214 /** Adjust the address map based on the MapAddress elements in the
4215 * configuration <b>options</b>
4218 config_register_addressmaps(or_options_t
*options
)
4224 addressmap_clear_configured();
4225 elts
= smartlist_create();
4226 for (opt
= options
->AddressMap
; opt
; opt
= opt
->next
) {
4227 smartlist_split_string(elts
, opt
->value
, NULL
,
4228 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
, 2);
4229 if (smartlist_len(elts
) >= 2) {
4230 from
= smartlist_get(elts
,0);
4231 to
= smartlist_get(elts
,1);
4232 if (address_is_invalid_destination(to
, 1)) {
4234 "Skipping invalid argument '%s' to MapAddress", to
);
4236 addressmap_register(from
, tor_strdup(to
), 0, ADDRMAPSRC_TORRC
);
4237 if (smartlist_len(elts
)>2) {
4238 log_warn(LD_CONFIG
,"Ignoring extra arguments to MapAddress.");
4242 log_warn(LD_CONFIG
,"MapAddress '%s' has too few arguments. Ignoring.",
4245 SMARTLIST_FOREACH(elts
, char*, cp
, tor_free(cp
));
4246 smartlist_clear(elts
);
4248 smartlist_free(elts
);
4252 * Initialize the logs based on the configuration file.
4255 options_init_logs(or_options_t
*options
, int validate_only
)
4264 options
->RunAsDaemon
;
4268 elts
= smartlist_create();
4270 for (opt
= options
->Logs
; opt
; opt
= opt
->next
) {
4271 log_severity_list_t
*severity
;
4272 const char *cfg
= opt
->value
;
4273 severity
= tor_malloc_zero(sizeof(log_severity_list_t
));
4274 if (parse_log_severity_config(&cfg
, severity
) < 0) {
4275 log_warn(LD_CONFIG
, "Couldn't parse log levels in Log option 'Log %s'",
4277 ok
= 0; goto cleanup
;
4280 smartlist_split_string(elts
, cfg
, NULL
,
4281 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
, 2);
4283 if (smartlist_len(elts
) == 0)
4284 smartlist_add(elts
, tor_strdup("stdout"));
4286 if (smartlist_len(elts
) == 1 &&
4287 (!strcasecmp(smartlist_get(elts
,0), "stdout") ||
4288 !strcasecmp(smartlist_get(elts
,0), "stderr"))) {
4289 int err
= smartlist_len(elts
) &&
4290 !strcasecmp(smartlist_get(elts
,0), "stderr");
4291 if (!validate_only
) {
4294 "Can't log to %s with RunAsDaemon set; skipping stdout",
4295 err
?"stderr":"stdout");
4297 add_stream_log(severity
, err
?"<stderr>":"<stdout>",
4298 fileno(err
?stderr
:stdout
));
4303 if (smartlist_len(elts
) == 1 &&
4304 !strcasecmp(smartlist_get(elts
,0), "syslog")) {
4305 #ifdef HAVE_SYSLOG_H
4306 if (!validate_only
) {
4307 add_syslog_log(severity
);
4310 log_warn(LD_CONFIG
, "Syslog is not supported on this system. Sorry.");
4315 if (smartlist_len(elts
) == 2 &&
4316 !strcasecmp(smartlist_get(elts
,0), "file")) {
4317 if (!validate_only
) {
4318 if (add_file_log(severity
, smartlist_get(elts
, 1)) < 0) {
4319 log_warn(LD_CONFIG
, "Couldn't open file for 'Log %s': %s",
4320 opt
->value
, strerror(errno
));
4327 log_warn(LD_CONFIG
, "Bad syntax on file Log option 'Log %s'",
4329 ok
= 0; goto cleanup
;
4332 SMARTLIST_FOREACH(elts
, char*, cp
, tor_free(cp
));
4333 smartlist_clear(elts
);
4336 smartlist_free(elts
);
4341 /** Read the contents of a Bridge line from <b>line</b>. Return 0
4342 * if the line is well-formed, and -1 if it isn't. If
4343 * <b>validate_only</b> is 0, and the line is well-formed, then add
4344 * the bridge described in the line to our internal bridge list. */
4346 parse_bridge_line(const char *line
, int validate_only
)
4348 smartlist_t
*items
= NULL
;
4350 char *addrport
=NULL
, *fingerprint
=NULL
;
4353 char digest
[DIGEST_LEN
];
4355 items
= smartlist_create();
4356 smartlist_split_string(items
, line
, NULL
,
4357 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
, -1);
4358 if (smartlist_len(items
) < 1) {
4359 log_warn(LD_CONFIG
, "Too few arguments to Bridge line.");
4362 addrport
= smartlist_get(items
, 0);
4363 smartlist_del_keeporder(items
, 0);
4364 if (tor_addr_port_parse(addrport
, &addr
, &port
)<0) {
4365 log_warn(LD_CONFIG
, "Error parsing Bridge address '%s'", addrport
);
4370 "Bridge address '%s' has no port; using default port 443.",
4375 if (smartlist_len(items
)) {
4376 fingerprint
= smartlist_join_strings(items
, "", 0, NULL
);
4377 if (strlen(fingerprint
) != HEX_DIGEST_LEN
) {
4378 log_warn(LD_CONFIG
, "Key digest for Bridge is wrong length.");
4381 if (base16_decode(digest
, DIGEST_LEN
, fingerprint
, HEX_DIGEST_LEN
)<0) {
4382 log_warn(LD_CONFIG
, "Unable to decode Bridge key digest.");
4387 if (!validate_only
) {
4388 log_debug(LD_DIR
, "Bridge at %s:%d (%s)", fmt_addr(&addr
),
4390 fingerprint
? fingerprint
: "no key listed");
4391 bridge_add_from_config(&addr
, port
, fingerprint
? digest
: NULL
);
4401 SMARTLIST_FOREACH(items
, char*, s
, tor_free(s
));
4402 smartlist_free(items
);
4404 tor_free(fingerprint
);
4408 /** Read the contents of a DirServer line from <b>line</b>. If
4409 * <b>validate_only</b> is 0, and the line is well-formed, and it
4410 * shares any bits with <b>required_type</b> or <b>required_type</b>
4411 * is 0, then add the dirserver described in the line (minus whatever
4412 * bits it's missing) as a valid authority. Return 0 on success,
4413 * or -1 if the line isn't well-formed or if we can't add it. */
4415 parse_dir_server_line(const char *line
, authority_type_t required_type
,
4418 smartlist_t
*items
= NULL
;
4420 char *addrport
=NULL
, *address
=NULL
, *nickname
=NULL
, *fingerprint
=NULL
;
4421 uint16_t dir_port
= 0, or_port
= 0;
4422 char digest
[DIGEST_LEN
];
4423 char v3_digest
[DIGEST_LEN
];
4424 authority_type_t type
= V2_AUTHORITY
;
4425 int is_not_hidserv_authority
= 0, is_not_v2_authority
= 0;
4427 items
= smartlist_create();
4428 smartlist_split_string(items
, line
, NULL
,
4429 SPLIT_SKIP_SPACE
|SPLIT_IGNORE_BLANK
, -1);
4430 if (smartlist_len(items
) < 1) {
4431 log_warn(LD_CONFIG
, "No arguments on DirServer line.");
4435 if (is_legal_nickname(smartlist_get(items
, 0))) {
4436 nickname
= smartlist_get(items
, 0);
4437 smartlist_del_keeporder(items
, 0);
4440 while (smartlist_len(items
)) {
4441 char *flag
= smartlist_get(items
, 0);
4442 if (TOR_ISDIGIT(flag
[0]))
4444 if (!strcasecmp(flag
, "v1")) {
4445 type
|= (V1_AUTHORITY
| HIDSERV_AUTHORITY
);
4446 } else if (!strcasecmp(flag
, "hs")) {
4447 type
|= HIDSERV_AUTHORITY
;
4448 } else if (!strcasecmp(flag
, "no-hs")) {
4449 is_not_hidserv_authority
= 1;
4450 } else if (!strcasecmp(flag
, "bridge")) {
4451 type
|= BRIDGE_AUTHORITY
;
4452 } else if (!strcasecmp(flag
, "no-v2")) {
4453 is_not_v2_authority
= 1;
4454 } else if (!strcasecmpstart(flag
, "orport=")) {
4456 char *portstring
= flag
+ strlen("orport=");
4457 or_port
= (uint16_t) tor_parse_long(portstring
, 10, 1, 65535, &ok
, NULL
);
4459 log_warn(LD_CONFIG
, "Invalid orport '%s' on DirServer line.",
4461 } else if (!strcasecmpstart(flag
, "v3ident=")) {
4462 char *idstr
= flag
+ strlen("v3ident=");
4463 if (strlen(idstr
) != HEX_DIGEST_LEN
||
4464 base16_decode(v3_digest
, DIGEST_LEN
, idstr
, HEX_DIGEST_LEN
)<0) {
4465 log_warn(LD_CONFIG
, "Bad v3 identity digest '%s' on DirServer line",
4468 type
|= V3_AUTHORITY
;
4471 log_warn(LD_CONFIG
, "Unrecognized flag '%s' on DirServer line",
4475 smartlist_del_keeporder(items
, 0);
4477 if (is_not_hidserv_authority
)
4478 type
&= ~HIDSERV_AUTHORITY
;
4479 if (is_not_v2_authority
)
4480 type
&= ~V2_AUTHORITY
;
4482 if (smartlist_len(items
) < 2) {
4483 log_warn(LD_CONFIG
, "Too few arguments to DirServer line.");
4486 addrport
= smartlist_get(items
, 0);
4487 smartlist_del_keeporder(items
, 0);
4488 if (parse_addr_port(LOG_WARN
, addrport
, &address
, NULL
, &dir_port
)<0) {
4489 log_warn(LD_CONFIG
, "Error parsing DirServer address '%s'", addrport
);
4493 log_warn(LD_CONFIG
, "Missing port in DirServer address '%s'",addrport
);
4497 fingerprint
= smartlist_join_strings(items
, "", 0, NULL
);
4498 if (strlen(fingerprint
) != HEX_DIGEST_LEN
) {
4499 log_warn(LD_CONFIG
, "Key digest for DirServer is wrong length %d.",
4500 (int)strlen(fingerprint
));
4503 if (!strcmp(fingerprint
, "E623F7625FBE0C87820F11EC5F6D5377ED816294")) {
4504 /* a known bad fingerprint. refuse to use it. We can remove this
4505 * clause once Tor 0.1.2.17 is obsolete. */
4506 log_warn(LD_CONFIG
, "Dangerous dirserver line. To correct, erase your "
4507 "torrc file (%s), or reinstall Tor and use the default torrc.",
4511 if (base16_decode(digest
, DIGEST_LEN
, fingerprint
, HEX_DIGEST_LEN
)<0) {
4512 log_warn(LD_CONFIG
, "Unable to decode DirServer key digest.");
4516 if (!validate_only
&& (!required_type
|| required_type
& type
)) {
4518 type
&= required_type
; /* pare down what we think of them as an
4520 log_debug(LD_DIR
, "Trusted %d dirserver at %s:%d (%s)", (int)type
,
4521 address
, (int)dir_port
, (char*)smartlist_get(items
,0));
4522 if (!add_trusted_dir_server(nickname
, address
, dir_port
, or_port
,
4523 digest
, v3_digest
, type
))
4534 SMARTLIST_FOREACH(items
, char*, s
, tor_free(s
));
4535 smartlist_free(items
);
4539 tor_free(fingerprint
);
4543 /** Adjust the value of options->DataDirectory, or fill it in if it's
4544 * absent. Return 0 on success, -1 on failure. */
4546 normalize_data_directory(or_options_t
*options
)
4550 if (options
->DataDirectory
)
4551 return 0; /* all set */
4552 p
= tor_malloc(MAX_PATH
);
4553 strlcpy(p
,get_windows_conf_root(),MAX_PATH
);
4554 options
->DataDirectory
= p
;
4557 const char *d
= options
->DataDirectory
;
4561 if (strncmp(d
,"~/",2) == 0) {
4562 char *fn
= expand_filename(d
);
4564 log_warn(LD_CONFIG
,"Failed to expand filename \"%s\".", d
);
4567 if (!options
->DataDirectory
&& !strcmp(fn
,"/.tor")) {
4568 /* If our homedir is /, we probably don't want to use it. */
4569 /* Default to LOCALSTATEDIR/tor which is probably closer to what we
4572 "Default DataDirectory is \"~/.tor\". This expands to "
4573 "\"%s\", which is probably not what you want. Using "
4574 "\"%s"PATH_SEPARATOR
"tor\" instead
", fn, LOCALSTATEDIR);
4576 fn = tor_strdup(LOCALSTATEDIR PATH_SEPARATOR "tor
");
4578 tor_free(options->DataDirectory);
4579 options->DataDirectory = fn;
4585 /** Check and normalize the value of options->DataDirectory; return 0 if it
4586 * sane, -1 otherwise. */
4588 validate_data_directory(or_options_t *options)
4590 if (normalize_data_directory(options) < 0)
4592 tor_assert(options->DataDirectory);
4593 if (strlen(options->DataDirectory) > (512-128)) {
4594 log_warn(LD_CONFIG, "DataDirectory is too
long.");
4600 /** This string must remain the same forevermore. It is how we
4601 * recognize that the torrc file doesn't need to be backed up. */
4602 #define GENERATED_FILE_PREFIX "# This file was generated by Tor; " \
4603 "if you edit it, comments will not be preserved"
4604 /** This string can change; it tries to give the reader an idea
4605 * that editing this file by hand is not a good plan. */
4606 #define GENERATED_FILE_COMMENT "# The old torrc file was renamed " \
4607 "to torrc.orig.1 or similar, and Tor will ignore it"
4609 /** Save a configuration file for the configuration in <b>options</b>
4610 * into the file <b>fname</b>. If the file already exists, and
4611 * doesn't begin with GENERATED_FILE_PREFIX, rename it. Otherwise
4612 * replace it. Return 0 on success, -1 on failure. */
4614 write_configuration_file(const char *fname, or_options_t *options)
4616 char *old_val=NULL, *new_val=NULL, *new_conf=NULL;
4617 int rename_old = 0, r;
4622 switch (file_status(fname)) {
4624 old_val = read_file_to_str(fname, 0, NULL);
4625 if (strcmpstart(old_val, GENERATED_FILE_PREFIX)) {
4636 "Config file \"%s\" is not a file? Failing.", fname);
4640 if (!(new_conf = options_dump(options, 1))) {
4641 log_warn(LD_BUG, "Couldn't get configuration string");
4645 len = strlen(new_conf)+256;
4646 new_val = tor_malloc(len);
4647 tor_snprintf(new_val, len, "%s\n%s\n\n%s",
4648 GENERATED_FILE_PREFIX, GENERATED_FILE_COMMENT, new_conf);
4652 size_t fn_tmp_len = strlen(fname)+32;
4654 tor_assert(fn_tmp_len > strlen(fname)); /*check for overflow*/
4655 fn_tmp = tor_malloc(fn_tmp_len);
4657 if (tor_snprintf(fn_tmp, fn_tmp_len, "%s.orig.%d", fname, i)<0) {
4658 log_warn(LD_BUG, "tor_snprintf failed inexplicably");
4662 if (file_status(fn_tmp) == FN_NOENT)
4666 log_notice(LD_CONFIG, "Renaming old configuration file to \"%s\"", fn_tmp);
4667 if (rename(fname, fn_tmp) < 0) {
4669 "Couldn't rename configuration file \"%s\" to \"%s\": %s",
4670 fname, fn_tmp, strerror(errno));
4677 if (write_str_to_file(fname, new_val, 0) < 0)
4691 * Save the current configuration file value to disk. Return 0 on
4692 * success, -1 on failure.
4695 options_save_current(void)
4698 /* This fails if we can't write to our configuration file.
4700 * If we try falling back to datadirectory or something, we have a better
4701 * chance of saving the configuration, but a better chance of doing
4702 * something the user never expected. Let's just warn instead. */
4703 return write_configuration_file(torrc_fname, get_options());
4705 return write_configuration_file(get_default_conf_file(), get_options());
4708 /** Mapping from a unit name to a multiplier for converting that unit into a
4710 struct unit_table_t {
4712 uint64_t multiplier;
4715 /** Table to map the names of memory units to the number of bytes they
4717 static struct unit_table_t memory_units[] = {
4724 { "kbytes", 1<<10 },
4725 { "kilobyte", 1<<10 },
4726 { "kilobytes", 1<<10 },
4730 { "mbytes", 1<<20 },
4731 { "megabyte", 1<<20 },
4732 { "megabytes", 1<<20 },
4735 { "gbytes", 1<<30 },
4736 { "gigabyte", 1<<30 },
4737 { "gigabytes", 1<<30 },
4738 { "tb", U64_LITERAL(1)<<40 },
4739 { "terabyte", U64_LITERAL(1)<<40 },
4740 { "terabytes", U64_LITERAL(1)<<40 },
4744 /** Table to map the names of time units to the number of seconds they
4746 static struct unit_table_t time_units[] = {
4754 { "day", 24*60*60 },
4755 { "days", 24*60*60 },
4756 { "week", 7*24*60*60 },
4757 { "weeks", 7*24*60*60 },
4761 /** Parse a string <b>val</b> containing a number, zero or more
4762 * spaces, and an optional unit string. If the unit appears in the
4763 * table <b>u</b>, then multiply the number by the unit multiplier.
4764 * On success, set *<b>ok</b> to 1 and return this product.
4765 * Otherwise, set *<b>ok</b> to 0.
4768 config_parse_units(const char *val, struct unit_table_t *u, int *ok)
4775 v = tor_parse_uint64(val, 10, 0, UINT64_MAX, ok, &cp);
4782 while (TOR_ISSPACE(*cp))
4784 for ( ;u->unit;++u) {
4785 if (!strcasecmp(u->unit, cp)) {
4791 log_warn(LD_CONFIG, "Unknown unit '%s'.", cp);
4796 /** Parse a string in the format "number unit", where unit is a unit of
4797 * information (byte, KB, M, etc). On success, set *<b>ok</b> to true
4798 * and return the number of bytes specified. Otherwise, set
4799 * *<b>ok</b> to false and return 0. */
4801 config_parse_memunit(const char *s, int *ok)
4803 return config_parse_units(s, memory_units, ok);
4806 /** Parse a string in the format "number unit", where unit is a unit of time.
4807 * On success, set *<b>ok</b> to true and return the number of seconds in
4808 * the provided interval. Otherwise, set *<b>ok</b> to 0 and return -1.
4811 config_parse_interval(const char *s, int *ok)
4814 r = config_parse_units(s, time_units, ok);
4818 log_warn(LD_CONFIG, "Interval '%s' is too long", s);
4825 /* This is what passes for version detection on OSX. We set
4826 * MACOSX_KQUEUE_IS_BROKEN to true iff we're on a version of OSX before
4827 * 10.4.0 (aka 1040). */
4829 #ifdef __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__
4830 #define MACOSX_KQUEUE_IS_BROKEN \
4831 (__ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1040)
4833 #define MACOSX_KQUEUE_IS_BROKEN 0
4838 * Initialize the libevent library.
4843 configure_libevent_logging();
4844 /* If the kernel complains that some method (say, epoll) doesn't
4845 * exist, we don't care about it, since libevent will cope.
4847 suppress_libevent_log_msg("Function not implemented");
4849 if (MACOSX_KQUEUE_IS_BROKEN ||
4850 decode_libevent_version(event_get_version(), NULL) < LE_11B) {
4851 setenv("EVENT_NOKQUEUE","1",1);
4855 /* In libevent versions before 2.0, it's hard to keep binary compatibility
4856 * between upgrades, and unpleasant to detect when the version we compiled
4857 * against is unlike the version we have linked against. Here's how. */
4858 #if defined(_EVENT_VERSION) && defined(HAVE_EVENT_GET_VERSION)
4859 /* We have a header-file version and a function-call version. Easy. */
4860 if (strcmp(_EVENT_VERSION, event_get_version())) {
4861 int compat1 = -1, compat2 = -1;
4862 int verybad, prettybad ;
4863 decode_libevent_version(_EVENT_VERSION, &compat1);
4864 decode_libevent_version(event_get_version(), &compat2);
4865 verybad = compat1 != compat2;
4866 prettybad = (compat1 == -1 || compat2 == -1) && compat1 != compat2;
4868 log(verybad ? LOG_WARN : (prettybad ? LOG_NOTICE : LOG_INFO),
4869 LD_GENERAL, "We were compiled with headers from version %s "
4870 "of Libevent, but we're using a Libevent library that says it's "
4871 "version %s.", _EVENT_VERSION, event_get_version());
4873 log_warn(LD_GENERAL, "This will almost certainly make Tor crash.");
4875 log_notice(LD_GENERAL, "If Tor crashes, this might be why.");
4877 log_info(LD_GENERAL, "I think these versions are binary-compatible.");
4879 #elif defined(HAVE_EVENT_GET_VERSION)
4880 /* event_get_version but no _EVENT_VERSION. We might be in 1.4.0-beta or
4881 earlier, where that's normal. To see whether we were compiled with an
4882 earlier version, let's see whether the struct event defines MIN_HEAP_IDX.
4884 #ifdef HAVE_STRUCT_EVENT_MIN_HEAP_IDX
4885 /* The header files are 1.4.0-beta or later. If the version is not
4886 * 1.4.0-beta, we are incompatible. */
4888 if (strcmp(event_get_version(), "1.4.0-beta")) {
4889 log_warn(LD_GENERAL, "It's a little hard to tell, but you seem to have "
4890 "Libevent 1.4.0-beta header files, whereas you have linked "
4891 "against Libevent %s. This will probably make Tor crash.",
4892 event_get_version());
4896 /* Our headers are 1.3e or earlier. If the library version is not 1.4.x or
4897 later, we're probably fine. */
4899 const char *v
= event_get_version();
4900 if ((v
[0] == '1' && v
[2] == '.' && v
[3] > '3') || v
[0] > '1') {
4901 log_warn(LD_GENERAL
, "It's a little hard to tell, but you seem to have "
4902 "Libevent header file from 1.3e or earlier, whereas you have "
4903 "linked against Libevent %s. This will probably make Tor "
4904 "crash.", event_get_version());
4909 #elif defined(_EVENT_VERSION)
4910 #warn "_EVENT_VERSION is defined but not get_event_version(): Libevent is odd."
4912 /* Your libevent is ancient. */
4916 suppress_libevent_log_msg(NULL
);
4917 #if defined(HAVE_EVENT_GET_VERSION) && defined(HAVE_EVENT_GET_METHOD)
4918 /* Making this a NOTICE for now so we can link bugs to a libevent versions
4919 * or methods better. */
4920 log(LOG_NOTICE
, LD_GENERAL
,
4921 "Initialized libevent version %s using method %s. Good.",
4922 event_get_version(), event_get_method());
4923 check_libevent_version(event_get_method(), get_options()->ORPort
!= 0);
4925 log(LOG_NOTICE
, LD_GENERAL
,
4926 "Initialized old libevent (version 1.0b or earlier).");
4927 log(LOG_WARN
, LD_GENERAL
,
4928 "You have a *VERY* old version of libevent. It is likely to be buggy; "
4929 "please build Tor with a more recent version.");
4933 /** Table mapping return value of event_get_version() to le_version_t. */
4934 static const struct {
4935 const char *name
; le_version_t version
; int bincompat
;
4936 } le_version_table
[] = {
4937 /* earlier versions don't have get_version. */
4938 { "1.0c", LE_10C
, 1},
4939 { "1.0d", LE_10D
, 1},
4940 { "1.0e", LE_10E
, 1},
4941 { "1.1", LE_11
, 1 },
4942 { "1.1a", LE_11A
, 1 },
4943 { "1.1b", LE_11B
, 1 },
4944 { "1.2", LE_12
, 1 },
4945 { "1.2a", LE_12A
, 1 },
4946 { "1.3", LE_13
, 1 },
4947 { "1.3a", LE_13A
, 1 },
4948 { "1.3b", LE_13B
, 1 },
4949 { "1.3c", LE_13C
, 1 },
4950 { "1.3d", LE_13D
, 1 },
4951 { "1.3e", LE_13E
, 1 },
4952 { "1.4.0-beta", LE_140
, 2 },
4953 { "1.4.1-beta", LE_141
, 2 },
4954 { "1.4.2-rc", LE_142
, 2 },
4955 { "1.4.3-stable", LE_143
, 2 },
4956 { "1.4.4-stable", LE_144
, 2 },
4957 { "1.4.5-stable", LE_145
, 2 },
4958 { "1.4.6-stable", LE_146
, 2 },
4959 { "1.4.7-stable", LE_147
, 2 },
4960 { "1.4.8-stable", LE_148
, 2 },
4961 { "1.4.99-trunk", LE_1499
, 3 },
4962 { NULL
, LE_OTHER
, 0 }
4965 /** Return the le_version_t for the current version of libevent. If the
4966 * version is very new, return LE_OTHER. If the version is so old that it
4967 * doesn't support event_get_version(), return LE_OLD. */
4969 decode_libevent_version(const char *v
, int *bincompat_out
)
4972 for (i
=0; le_version_table
[i
].name
; ++i
) {
4973 if (!strcmp(le_version_table
[i
].name
, v
)) {
4975 *bincompat_out
= le_version_table
[i
].bincompat
;
4976 return le_version_table
[i
].version
;
4979 if (v
[0] != '1' && bincompat_out
)
4980 *bincompat_out
= 100;
4981 else if (!strcmpstart(v
, "1.4") && bincompat_out
)
4986 #if defined(HAVE_EVENT_GET_VERSION) && defined(HAVE_EVENT_GET_METHOD)
4988 * Compare the given libevent method and version to a list of versions
4989 * which are known not to work. Warn the user as appropriate.
4992 check_libevent_version(const char *m
, int server
)
4994 int buggy
= 0, iffy
= 0, slow
= 0, thread_unsafe
= 0;
4995 le_version_t version
;
4996 const char *v
= event_get_version();
4997 const char *badness
= NULL
;
4998 const char *sad_os
= "";
5000 version
= decode_libevent_version(v
, NULL
);
5002 /* XXX Would it be worthwhile disabling the methods that we know
5003 * are buggy, rather than just warning about them and then proceeding
5004 * to use them? If so, we should probably not wrap this whole thing
5005 * in HAVE_EVENT_GET_VERSION and HAVE_EVENT_GET_METHOD. -RD */
5006 /* XXXX The problem is that it's not trivial to get libevent to change it's
5007 * method once it's initialized, and it's not trivial to tell what method it
5008 * will use without initializing it. I guess we could preemptively disable
5009 * buggy libevent modes based on the version _before_ initializing it,
5010 * though, but then there's no good way (afaict) to warn "I would have used
5011 * kqueue, but instead I'm using select." -NM */
5012 if (!strcmp(m
, "kqueue")) {
5013 if (version
< LE_11B
)
5015 } else if (!strcmp(m
, "epoll")) {
5016 if (version
< LE_11
)
5018 } else if (!strcmp(m
, "poll")) {
5019 if (version
< LE_10E
)
5021 else if (version
< LE_11
)
5023 } else if (!strcmp(m
, "select")) {
5024 if (version
< LE_11
)
5026 } else if (!strcmp(m
, "win32")) {
5027 if (version
< LE_11B
)
5031 /* Libevent versions before 1.3b do very badly on operating systems with
5032 * user-space threading implementations. */
5033 #if defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__NetBSD__)
5034 if (server
&& version
< LE_13B
) {
5036 sad_os
= "BSD variants";
5038 #elif defined(__APPLE__) || defined(__darwin__)
5039 if (server
&& version
< LE_13B
) {
5041 sad_os
= "Mac OS X";
5045 if (thread_unsafe
) {
5046 log(LOG_WARN
, LD_GENERAL
,
5047 "Libevent version %s often crashes when running a Tor server with %s. "
5048 "Please use the latest version of libevent (1.3b or later)",v
,sad_os
);
5051 log(LOG_WARN
, LD_GENERAL
,
5052 "There are serious bugs in using %s with libevent %s. "
5053 "Please use the latest version of libevent.", m
, v
);
5056 log(LOG_WARN
, LD_GENERAL
,
5057 "There are minor bugs in using %s with libevent %s. "
5058 "You may want to use the latest version of libevent.", m
, v
);
5060 } else if (slow
&& server
) {
5061 log(LOG_WARN
, LD_GENERAL
,
5062 "libevent %s can be very slow with %s. "
5063 "When running a server, please use the latest version of libevent.",
5068 control_event_general_status(LOG_WARN
,
5069 "BAD_LIBEVENT VERSION=%s METHOD=%s BADNESS=%s RECOVERED=NO",
5076 /** Return the persistent state struct for this Tor. */
5080 tor_assert(global_state
);
5081 return global_state
;
5084 /** Return a newly allocated string holding a filename relative to the data
5085 * directory. If <b>sub1</b> is present, it is the first path component after
5086 * the data directory. If <b>sub2</b> is also present, it is the second path
5087 * component after the data directory. If <b>suffix</b> is present, it
5088 * is appended to the filename.
5091 * get_datadir_fname2_suffix("a", NULL, NULL) -> $DATADIR/a
5092 * get_datadir_fname2_suffix("a", NULL, ".tmp") -> $DATADIR/a.tmp
5093 * get_datadir_fname2_suffix("a", "b", ".tmp") -> $DATADIR/a/b/.tmp
5094 * get_datadir_fname2_suffix("a", "b", NULL) -> $DATADIR/a/b
5096 * Note: Consider using the get_datadir_fname* macros in or.h.
5099 options_get_datadir_fname2_suffix(or_options_t
*options
,
5100 const char *sub1
, const char *sub2
,
5105 tor_assert(options
);
5106 tor_assert(options
->DataDirectory
);
5107 tor_assert(sub1
|| !sub2
); /* If sub2 is present, sub1 must be present. */
5108 len
= strlen(options
->DataDirectory
);
5110 len
+= strlen(sub1
)+1;
5112 len
+= strlen(sub2
)+1;
5115 len
+= strlen(suffix
);
5117 fname
= tor_malloc(len
);
5120 tor_snprintf(fname
, len
, "%s"PATH_SEPARATOR
"%s"PATH_SEPARATOR
"%s",
5121 options
->DataDirectory
, sub1
, sub2
);
5123 tor_snprintf(fname
, len
, "%s"PATH_SEPARATOR
"%s",
5124 options
->DataDirectory
, sub1
);
5127 strlcpy(fname
, options
->DataDirectory
, len
);
5130 strlcat(fname
, suffix
, len
);
5134 /** Return 0 if every setting in <b>state</b> is reasonable, and a
5135 * permissible transition from <b>old_state</b>. Else warn and return -1.
5136 * Should have no side effects, except for normalizing the contents of
5139 /* XXX from_setconf is here because of bug 238 */
5141 or_state_validate(or_state_t
*old_state
, or_state_t
*state
,
5142 int from_setconf
, char **msg
)
5144 /* We don't use these; only options do. Still, we need to match that
5146 (void) from_setconf
;
5149 if (entry_guards_parse_state(state
, 0, msg
)<0)
5155 /** Replace the current persistent state with <b>new_state</b> */
5157 or_state_set(or_state_t
*new_state
)
5160 tor_assert(new_state
);
5162 config_free(&state_format
, global_state
);
5163 global_state
= new_state
;
5164 if (entry_guards_parse_state(global_state
, 1, &err
)<0) {
5165 log_warn(LD_GENERAL
,"%s",err
);
5168 if (rep_hist_load_state(global_state
, &err
)<0) {
5169 log_warn(LD_GENERAL
,"Unparseable bandwidth history state: %s",err
);
5174 /** Reload the persistent state from disk, generating a new state as needed.
5175 * Return 0 on success, less than 0 on failure.
5180 or_state_t
*new_state
= NULL
;
5181 char *contents
= NULL
, *fname
;
5182 char *errmsg
= NULL
;
5183 int r
= -1, badstate
= 0;
5185 fname
= get_datadir_fname("state");
5186 switch (file_status(fname
)) {
5188 if (!(contents
= read_file_to_str(fname
, 0, NULL
))) {
5189 log_warn(LD_FS
, "Unable to read state file \"%s\"", fname
);
5198 log_warn(LD_GENERAL
,"State file \"%s\" is not a file? Failing.", fname
);
5201 new_state
= tor_malloc_zero(sizeof(or_state_t
));
5202 new_state
->_magic
= OR_STATE_MAGIC
;
5203 config_init(&state_format
, new_state
);
5205 config_line_t
*lines
=NULL
;
5207 if (config_get_lines(contents
, &lines
)<0)
5209 assign_retval
= config_assign(&state_format
, new_state
,
5210 lines
, 0, 0, &errmsg
);
5211 config_free_lines(lines
);
5212 if (assign_retval
<0)
5215 log_warn(LD_GENERAL
, "%s", errmsg
);
5220 if (!badstate
&& or_state_validate(NULL
, new_state
, 1, &errmsg
) < 0)
5224 log_warn(LD_GENERAL
, "%s", errmsg
);
5228 if (badstate
&& !contents
) {
5229 log_warn(LD_BUG
, "Uh oh. We couldn't even validate our own default state."
5230 " This is a bug in Tor.");
5232 } else if (badstate
&& contents
) {
5234 file_status_t status
;
5235 size_t len
= strlen(fname
)+16;
5236 char *fname2
= tor_malloc(len
);
5237 for (i
= 0; i
< 100; ++i
) {
5238 tor_snprintf(fname2
, len
, "%s.%d", fname
, i
);
5239 status
= file_status(fname2
);
5240 if (status
== FN_NOENT
)
5244 log_warn(LD_BUG
, "Unable to parse state in \"%s\"; too many saved bad "
5245 "state files to move aside. Discarding the old state file.",
5249 log_warn(LD_BUG
, "Unable to parse state in \"%s\". Moving it aside "
5250 "to \"%s\". This could be a bug in Tor; please tell "
5251 "the developers.", fname
, fname2
);
5252 if (rename(fname
, fname2
) < 0) {
5253 log_warn(LD_BUG
, "Weirdly, I couldn't even move the state aside. The "
5254 "OS gave an error of %s", strerror(errno
));
5259 config_free(&state_format
, new_state
);
5261 new_state
= tor_malloc_zero(sizeof(or_state_t
));
5262 new_state
->_magic
= OR_STATE_MAGIC
;
5263 config_init(&state_format
, new_state
);
5264 } else if (contents
) {
5265 log_info(LD_GENERAL
, "Loaded state from \"%s\"", fname
);
5267 log_info(LD_GENERAL
, "Initialized state");
5269 or_state_set(new_state
);
5272 global_state
->next_write
= 0;
5273 or_state_save(time(NULL
));
5281 config_free(&state_format
, new_state
);
5286 /** Write the persistent state to disk. Return 0 for success, <0 on failure. */
5288 or_state_save(time_t now
)
5290 char *state
, *contents
;
5291 char tbuf
[ISO_TIME_LEN
+1];
5295 tor_assert(global_state
);
5297 if (global_state
->next_write
> now
)
5300 /* Call everything else that might dirty the state even more, in order
5301 * to avoid redundant writes. */
5302 entry_guards_update_state(global_state
);
5303 rep_hist_update_state(global_state
);
5304 if (accounting_is_enabled(get_options()))
5305 accounting_run_housekeeping(now
);
5307 global_state
->LastWritten
= time(NULL
);
5308 tor_free(global_state
->TorVersion
);
5309 len
= strlen(get_version())+8;
5310 global_state
->TorVersion
= tor_malloc(len
);
5311 tor_snprintf(global_state
->TorVersion
, len
, "Tor %s", get_version());
5313 state
= config_dump(&state_format
, global_state
, 1, 0);
5314 len
= strlen(state
)+256;
5315 contents
= tor_malloc(len
);
5316 format_local_iso_time(tbuf
, time(NULL
));
5317 tor_snprintf(contents
, len
,
5318 "# Tor state file last generated on %s local time\n"
5319 "# Other times below are in GMT\n"
5320 "# You *do not* need to edit this file.\n\n%s",
5323 fname
= get_datadir_fname("state");
5324 if (write_str_to_file(fname
, contents
, 0)<0) {
5325 log_warn(LD_FS
, "Unable to write state to file \"%s\"", fname
);
5330 log_info(LD_GENERAL
, "Saved state to \"%s\"", fname
);
5334 global_state
->next_write
= TIME_MAX
;
5338 /** Given a file name check to see whether the file exists but has not been
5339 * modified for a very long time. If so, remove it. */
5341 remove_file_if_very_old(const char *fname
, time_t now
)
5343 #define VERY_OLD_FILE_AGE (28*24*60*60)
5346 if (stat(fname
, &st
)==0 && st
.st_mtime
< now
-VERY_OLD_FILE_AGE
) {
5347 char buf
[ISO_TIME_LEN
+1];
5348 format_local_iso_time(buf
, st
.st_mtime
);
5349 log_notice(LD_GENERAL
, "Obsolete file %s hasn't been modified since %s. "
5350 "Removing it.", fname
, buf
);
5355 /** Helper to implement GETINFO functions about configuration variables (not
5356 * their values). Given a "config/names" question, set *<b>answer</b> to a
5357 * new string describing the supported configuration variables and their
5360 getinfo_helper_config(control_connection_t
*conn
,
5361 const char *question
, char **answer
)
5364 if (!strcmp(question
, "config/names")) {
5365 smartlist_t
*sl
= smartlist_create();
5367 for (i
= 0; _option_vars
[i
].name
; ++i
) {
5368 config_var_t
*var
= &_option_vars
[i
];
5369 const char *type
, *desc
;
5372 desc
= config_find_description(&options_format
, var
->name
);
5373 switch (var
->type
) {
5374 case CONFIG_TYPE_STRING
: type
= "String"; break;
5375 case CONFIG_TYPE_FILENAME
: type
= "Filename"; break;
5376 case CONFIG_TYPE_UINT
: type
= "Integer"; break;
5377 case CONFIG_TYPE_INTERVAL
: type
= "TimeInterval"; break;
5378 case CONFIG_TYPE_MEMUNIT
: type
= "DataSize"; break;
5379 case CONFIG_TYPE_DOUBLE
: type
= "Float"; break;
5380 case CONFIG_TYPE_BOOL
: type
= "Boolean"; break;
5381 case CONFIG_TYPE_ISOTIME
: type
= "Time"; break;
5382 case CONFIG_TYPE_ROUTERSET
: type
= "RouterList"; break;
5383 case CONFIG_TYPE_CSV
: type
= "CommaList"; break;
5384 case CONFIG_TYPE_LINELIST
: type
= "LineList"; break;
5385 case CONFIG_TYPE_LINELIST_S
: type
= "Dependant"; break;
5386 case CONFIG_TYPE_LINELIST_V
: type
= "Virtual"; break;
5388 case CONFIG_TYPE_OBSOLETE
:
5393 len
= strlen(var
->name
)+strlen(type
)+16;
5395 len
+= strlen(desc
);
5396 line
= tor_malloc(len
);
5398 tor_snprintf(line
, len
, "%s %s %s\n",var
->name
,type
,desc
);
5400 tor_snprintf(line
, len
, "%s %s\n",var
->name
,type
);
5401 smartlist_add(sl
, line
);
5403 *answer
= smartlist_join_strings(sl
, "", 0, NULL
);
5404 SMARTLIST_FOREACH(sl
, char *, c
, tor_free(c
));