- Complain and die if --dry-run is used with a batch option.
[rsync/rsync.git] / options.c
CommitLineData
7a24c346 1/* -*- c-file-style: "linux" -*-
dfa32483 2 *
dafe63ca
MP
3 * Copyright (C) 1998-2001 by Andrew Tridgell <tridge@samba.org>
4 * Copyright (C) 2000, 2001, 2002 by Martin Pool <mbp@samba.org>
dfa32483 5 *
dafe63ca
MP
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
dfa32483 10 *
dafe63ca
MP
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
dfa32483 15 *
dafe63ca
MP
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
7a6421fa 20
7a6421fa 21#include "rsync.h"
2855f61f 22#include "popt.h"
7a6421fa 23
7be73df4 24extern int sanitize_paths;
99218d82 25extern int select_timeout;
7be73df4 26extern char curr_dir[MAXPATHLEN];
bf6dcd17 27extern struct exclude_list_struct exclude_list;
8645af1d 28
7a6421fa 29int make_backups = 0;
1bfbf40b
MP
30
31/**
dfa32483 32 * If 1, send the whole file as literal data rather than trying to
dafe63ca 33 * create an incremental diff.
1bfbf40b 34 *
dfa32483 35 * If -1, then look at whether we're local or remote and go by that.
dafe63ca
MP
36 *
37 * @sa disable_deltas_p()
1bfbf40b 38 **/
dfa32483 39int whole_file = -1;
1bfbf40b 40
dfa32483 41int archive_mode = 0;
716e73d4 42int keep_dirlinks = 0;
7a6421fa
AT
43int copy_links = 0;
44int preserve_links = 0;
45int preserve_hard_links = 0;
46int preserve_perms = 0;
47int preserve_devices = 0;
48int preserve_uid = 0;
49int preserve_gid = 0;
50int preserve_times = 0;
51int update_only = 0;
52int cvs_exclude = 0;
a5c11139
WD
53int dry_run = 0;
54int local_server = 0;
55int ignore_times = 0;
56int delete_mode = 0;
57int delete_excluded = 0;
58int one_file_system = 0;
4f3e9a0f 59int protocol_version = PROTOCOL_VERSION;
a5c11139
WD
60int sparse_files = 0;
61int do_compression = 0;
62int am_root = 0;
63int orig_umask = 0;
ea5164d1
WD
64int relative_paths = -1;
65int implied_dirs = 1;
7a6421fa
AT
66int numeric_ids = 0;
67int force_delete = 0;
68int io_timeout = 0;
7a6421fa
AT
69int read_only = 0;
70int module_id = -1;
71int am_server = 0;
30ce7e8a 72int am_sender = 0;
4337c8f8 73int am_generator = 0;
ea5164d1
WD
74char *files_from = NULL;
75int filesfrom_fd = -1;
76char *remote_filesfrom_file = NULL;
77int eol_nulls = 0;
7a6421fa 78int recurse = 0;
1312d9fc
WD
79int am_daemon = 0;
80int daemon_over_rsh = 0;
a5c11139
WD
81int do_stats = 0;
82int do_progress = 0;
83int keep_partial = 0;
84int safe_symlinks = 0;
85int copy_unsafe_links = 0;
86int size_only = 0;
87int bwlimit = 0;
3c74c3a3 88size_t bwlimit_writemax = 0;
a5c11139
WD
89int delete_after = 0;
90int only_existing = 0;
91int opt_ignore_existing = 0;
92int max_delete = 0;
93int ignore_errors = 0;
94int modify_window = 0;
95int blocking_io = -1;
2289bf64 96int checksum_seed = 0;
da9d12f5 97unsigned int block_size = 0;
7a6421fa 98
b35d0d8e 99
13e29995 100/** Network address family. **/
6ab6d4bf 101#ifdef INET6
13e29995 102int default_af_hint = 0; /* Any protocol */
6ab6d4bf 103#else
13e29995 104int default_af_hint = AF_INET; /* Must use IPv4 */
6ab6d4bf 105#endif
06963d0f 106
13e29995
MP
107/** Do not go into the background when run as --daemon. Good
108 * for debugging and required for running as a service on W32,
109 * or under Unix process-monitors. **/
110int no_detach = 0;
111
088aac85
DD
112int write_batch = 0;
113int read_batch = 0;
d175d7e1
WD
114int backup_dir_len = 0;
115int backup_suffix_len;
e0391f81 116unsigned int backup_dir_remainder;
6902ed17 117
d175d7e1 118char *backup_suffix = NULL;
7a6421fa 119char *tmpdir = NULL;
375a4556 120char *compare_dest = NULL;
30e8c8e1 121char *config_file = NULL;
7a6421fa 122char *shell_cmd = NULL;
b6062654 123char *log_format = NULL;
65575e96 124char *password_file = NULL;
41bd28fe 125char *rsync_path = RSYNC_PATH;
66203a98 126char *backup_dir = NULL;
e0391f81 127char backup_dir_buf[MAXPATHLEN];
7a6421fa 128int rsync_port = RSYNC_PORT;
59c95e42 129int link_dest = 0;
7a6421fa
AT
130
131int verbose = 0;
b86f0cef 132int quiet = 0;
7a6421fa 133int always_checksum = 0;
f7632fc6 134int list_only = 0;
7a6421fa 135
9b3318b0
WD
136#define MAX_BATCH_NAME_LEN 256 /* Must be less than MAXPATHLEN-13 */
137char *batch_name = NULL;
6902ed17 138
e1add893 139static int daemon_opt; /* sets am_daemon after option error-reporting */
5b56cc19
AT
140static int modify_window_set;
141
06963d0f 142/** Local address to bind. As a character string because it's
fdf57ede 143 * interpreted by the IPv6 layer: should be a numeric IP4 or IP6
06963d0f
MP
144 * address, or a hostname. **/
145char *bind_address;
5c9730a4 146
7a24c346 147
27a12348 148static void print_rsync_version(enum logcode f)
7a24c346 149{
dfa32483
WD
150 char const *got_socketpair = "no ";
151 char const *hardlinks = "no ";
152 char const *links = "no ";
a358449a 153 char const *ipv6 = "no ";
736a6a29 154 STRUCT_STAT *dumstat;
0c80cd8e
MP
155
156#ifdef HAVE_SOCKETPAIR
dfa32483 157 got_socketpair = "";
0c80cd8e 158#endif
2855f61f
MP
159
160#if SUPPORT_HARD_LINKS
dfa32483 161 hardlinks = "";
2855f61f
MP
162#endif
163
164#if SUPPORT_LINKS
dfa32483 165 links = "";
2855f61f
MP
166#endif
167
a358449a
MP
168#if INET6
169 ipv6 = "";
dfa32483 170#endif
a358449a 171
dfa32483
WD
172 rprintf(f, "%s version %s protocol version %d\n",
173 RSYNC_NAME, RSYNC_VERSION, PROTOCOL_VERSION);
174 rprintf(f,
45ddbf62 175 "Copyright (C) 1996-2004 by Andrew Tridgell and others\n");
3b4b1984 176 rprintf(f, "<http://rsync.samba.org/>\n");
dfa32483
WD
177 rprintf(f, "Capabilities: %d-bit files, %ssocketpairs, "
178 "%shard links, %ssymlinks, batchfiles, \n",
a5c11139 179 (int) (sizeof (OFF_T) * 8),
dfa32483 180 got_socketpair, hardlinks, links);
2855f61f 181
736a6a29
MP
182 /* Note that this field may not have type ino_t. It depends
183 * on the complicated interaction between largefile feature
184 * macros. */
7a52790b 185 rprintf(f, " %sIPv6, %d-bit system inums, %d-bit internal inums\n",
dfa32483 186 ipv6,
a5c11139 187 (int) (sizeof dumstat->st_ino * 8),
5f381268 188 (int) (sizeof (uint64) * 8));
fc0302cf
MP
189#ifdef MAINTAINER_MODE
190 rprintf(f, " panic action: \"%s\"\n",
191 get_panic_action());
192#endif
736a6a29 193
7a24c346 194#ifdef NO_INT64
dfa32483 195 rprintf(f, "WARNING: no 64-bit integers on this platform!\n");
7a24c346 196#endif
7b329a2d
MP
197
198 rprintf(f,
199"\n"
200"rsync comes with ABSOLUTELY NO WARRANTY. This is free software, and you\n"
201"are welcome to redistribute it under certain conditions. See the GNU\n"
202"General Public Licence for details.\n"
203 );
7a24c346
MP
204}
205
206
0f3203c3 207void usage(enum logcode F)
7a6421fa 208{
2855f61f 209 print_rsync_version(F);
704f908e 210
3ff984d7 211 rprintf(F,"\nrsync is a file transfer program capable of efficient remote update\nvia a fast differencing algorithm.\n\n");
704f908e 212
9ef53907 213 rprintf(F,"Usage: rsync [OPTION]... SRC [SRC]... [USER@]HOST:DEST\n");
704f908e 214 rprintf(F," or rsync [OPTION]... [USER@]HOST:SRC DEST\n");
9ef53907 215 rprintf(F," or rsync [OPTION]... SRC [SRC]... DEST\n");
14d43f1f 216 rprintf(F," or rsync [OPTION]... [USER@]HOST::SRC [DEST]\n");
9ef53907 217 rprintf(F," or rsync [OPTION]... SRC [SRC]... [USER@]HOST::DEST\n");
14d43f1f 218 rprintf(F," or rsync [OPTION]... rsync://[USER@]HOST[:PORT]/SRC [DEST]\n");
eaa4c150 219 rprintf(F," or rsync [OPTION]... SRC [SRC]... rsync://[USER@]HOST[:PORT]/DEST\n");
9ef53907
DD
220 rprintf(F,"SRC on single-colon remote HOST will be expanded by remote shell\n");
221 rprintf(F,"SRC on server remote HOST may contain shell wildcards or multiple\n");
222 rprintf(F," sources separated by space as long as they have same top-level\n");
704f908e
AT
223 rprintf(F,"\nOptions\n");
224 rprintf(F," -v, --verbose increase verbosity\n");
b86f0cef 225 rprintf(F," -q, --quiet decrease verbosity\n");
704f908e 226 rprintf(F," -c, --checksum always checksum\n");
06891710 227 rprintf(F," -a, --archive archive mode, equivalent to -rlptgoD\n");
704f908e
AT
228 rprintf(F," -r, --recursive recurse into directories\n");
229 rprintf(F," -R, --relative use relative path names\n");
ea5164d1
WD
230 rprintf(F," --no-relative turn off --relative\n");
231 rprintf(F," --no-implied-dirs don't send implied dirs with -R\n");
6839140e 232 rprintf(F," -b, --backup make backups (see --suffix & --backup-dir)\n");
e20c5e95 233 rprintf(F," --backup-dir make backups into this directory\n");
6839140e 234 rprintf(F," --suffix=SUFFIX backup suffix (default %s w/o --backup-dir)\n",BACKUP_SUFFIX);
704f908e 235 rprintf(F," -u, --update update only (don't overwrite newer files)\n");
716e73d4 236 rprintf(F," -K, --keep-dirlinks treat symlinked dir on receiver as dir\n");
13e29995 237 rprintf(F," -l, --links copy symlinks as symlinks\n");
06d76beb
WD
238 rprintf(F," -L, --copy-links copy the referent of all symlinks\n");
239 rprintf(F," --copy-unsafe-links copy the referent of \"unsafe\" symlinks\n");
240 rprintf(F," --safe-links ignore \"unsafe\" symlinks\n");
704f908e
AT
241 rprintf(F," -H, --hard-links preserve hard links\n");
242 rprintf(F," -p, --perms preserve permissions\n");
243 rprintf(F," -o, --owner preserve owner (root only)\n");
244 rprintf(F," -g, --group preserve group\n");
245 rprintf(F," -D, --devices preserve devices (root only)\n");
dfa32483 246 rprintf(F," -t, --times preserve times\n");
704f908e
AT
247 rprintf(F," -S, --sparse handle sparse files efficiently\n");
248 rprintf(F," -n, --dry-run show what would have been transferred\n");
249 rprintf(F," -W, --whole-file copy whole files, no incremental checks\n");
93689aa5 250 rprintf(F," --no-whole-file turn off --whole-file\n");
704f908e 251 rprintf(F," -x, --one-file-system don't cross filesystem boundaries\n");
dfa32483 252 rprintf(F," -B, --block-size=SIZE checksum blocking size (default %d)\n",BLOCK_SIZE);
54170a08 253 rprintf(F," -e, --rsh=COMMAND specify the remote shell\n");
704f908e 254 rprintf(F," --rsync-path=PATH specify path to rsync on the remote machine\n");
1347d512 255 rprintf(F," --existing only update files that already exist\n");
6839140e 256 rprintf(F," --ignore-existing ignore files that already exist on receiving side\n");
704f908e 257 rprintf(F," --delete delete files that don't exist on the sending side\n");
b33b791e 258 rprintf(F," --delete-excluded also delete excluded files on the receiving side\n");
ad1a09a5 259 rprintf(F," --delete-after receiver deletes after transferring, not before\n");
db2b5cb7 260 rprintf(F," --ignore-errors delete even if there are I/O errors\n");
0b73ca12 261 rprintf(F," --max-delete=NUM don't delete more than NUM files\n");
c95da96a 262 rprintf(F," --partial keep partially transferred files\n");
704f908e
AT
263 rprintf(F," --force force deletion of directories even if not empty\n");
264 rprintf(F," --numeric-ids don't map uid/gid values by user/group name\n");
db2b5cb7 265 rprintf(F," --timeout=TIME set I/O timeout in seconds\n");
6839140e
WD
266 rprintf(F," -I, --ignore-times turn off mod time & file size quick check\n");
267 rprintf(F," --size-only ignore mod time for quick check (use size)\n");
268 rprintf(F," --modify-window=NUM compare mod times with reduced accuracy\n");
704f908e 269 rprintf(F," -T --temp-dir=DIR create temporary files in directory DIR\n");
375a4556 270 rprintf(F," --compare-dest=DIR also compare destination files relative to DIR\n");
8294b00c 271 rprintf(F," --link-dest=DIR create hardlinks to DIR for unchanged files\n");
d9fcc198 272 rprintf(F," -P equivalent to --partial --progress\n");
704f908e 273 rprintf(F," -z, --compress compress file data\n");
ea5164d1 274 rprintf(F," -C, --cvs-exclude auto ignore files in the same way CVS does\n");
2acf81eb 275 rprintf(F," --exclude=PATTERN exclude files matching PATTERN\n");
858fb9eb 276 rprintf(F," --exclude-from=FILE exclude patterns listed in FILE\n");
2acf81eb 277 rprintf(F," --include=PATTERN don't exclude files matching PATTERN\n");
858fb9eb 278 rprintf(F," --include-from=FILE don't exclude patterns listed in FILE\n");
ea5164d1 279 rprintf(F," --files-from=FILE read FILE for list of source-file names\n");
6839140e 280 rprintf(F," -0 --from0 all *-from file lists are delimited by nulls\n");
dfa32483 281 rprintf(F," --version print version number\n");
db2b5cb7 282 rprintf(F," --daemon run as an rsync daemon\n");
dfa32483
WD
283 rprintf(F," --no-detach do not detach from the parent\n");
284 rprintf(F," --address=ADDRESS bind to the specified address\n");
285 rprintf(F," --config=FILE specify alternate rsyncd.conf file\n");
704f908e 286 rprintf(F," --port=PORT specify alternate rsyncd port number\n");
db2b5cb7 287 rprintf(F," --blocking-io use blocking I/O for the remote shell\n");
dfa32483
WD
288 rprintf(F," --no-blocking-io turn off --blocking-io\n");
289 rprintf(F," --stats give some file transfer stats\n");
290 rprintf(F," --progress show progress during transfer\n");
291 rprintf(F," --log-format=FORMAT log file transfers using specified format\n");
65575e96 292 rprintf(F," --password-file=FILE get password from FILE\n");
ef5d23eb 293 rprintf(F," --bwlimit=KBPS limit I/O bandwidth, KBytes per second\n");
9b3318b0
WD
294 rprintf(F," --write-batch=FILE write a batch to FILE\n");
295 rprintf(F," --read-batch=FILE read a batch from FILE\n");
c8d895de 296 rprintf(F," --checksum-seed=NUM set block/file checksum seed\n");
06963d0f 297#ifdef INET6
3dd22903
WD
298 rprintf(F," -4 --ipv4 prefer IPv4\n");
299 rprintf(F," -6 --ipv6 prefer IPv6\n");
06963d0f 300#endif
3dd22903 301 rprintf(F," -h, --help show this help screen\n");
7a6421fa
AT
302
303 rprintf(F,"\n");
b72f24c7
AT
304
305 rprintf(F,"\nPlease see the rsync(1) and rsyncd.conf(5) man pages for full documentation\n");
2855f61f 306 rprintf(F,"See http://rsync.samba.org/ for updates, bug reports, and answers\n");
7a6421fa
AT
307}
308
1f3d6cdd
WD
309enum {OPT_VERSION = 1000, OPT_SENDER, OPT_EXCLUDE, OPT_EXCLUDE_FROM,
310 OPT_DELETE_AFTER, OPT_DELETE_EXCLUDED, OPT_LINK_DEST,
311 OPT_INCLUDE, OPT_INCLUDE_FROM, OPT_MODIFY_WINDOW,
99218d82 312 OPT_READ_BATCH, OPT_WRITE_BATCH, OPT_TIMEOUT,
c67d1386 313 OPT_REFUSED_BASE = 9000};
7a6421fa 314
2855f61f
MP
315static struct poptOption long_options[] = {
316 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
dfa32483 317 {"version", 0, POPT_ARG_NONE, 0, OPT_VERSION, 0, 0},
d175d7e1 318 {"suffix", 0, POPT_ARG_STRING, &backup_suffix, 0, 0, 0 },
3dd22903
WD
319 {"rsync-path", 0, POPT_ARG_STRING, &rsync_path, 0, 0, 0 },
320 {"password-file", 0, POPT_ARG_STRING, &password_file, 0, 0, 0 },
afb6e945
WD
321 {"ignore-times", 'I', POPT_ARG_NONE, &ignore_times, 0, 0, 0 },
322 {"size-only", 0, POPT_ARG_NONE, &size_only, 0, 0, 0 },
8b54f004 323 {"modify-window", 0, POPT_ARG_INT, &modify_window, OPT_MODIFY_WINDOW, 0, 0 },
afb6e945
WD
324 {"one-file-system", 'x', POPT_ARG_NONE, &one_file_system, 0, 0, 0 },
325 {"delete", 0, POPT_ARG_NONE, &delete_mode, 0, 0, 0 },
326 {"existing", 0, POPT_ARG_NONE, &only_existing, 0, 0, 0 },
327 {"ignore-existing", 0, POPT_ARG_NONE, &opt_ignore_existing, 0, 0, 0 },
1de50993 328 {"delete-after", 0, POPT_ARG_NONE, 0, OPT_DELETE_AFTER, 0, 0 },
8b54f004 329 {"delete-excluded", 0, POPT_ARG_NONE, 0, OPT_DELETE_EXCLUDED, 0, 0 },
afb6e945
WD
330 {"force", 0, POPT_ARG_NONE, &force_delete, 0, 0, 0 },
331 {"numeric-ids", 0, POPT_ARG_NONE, &numeric_ids, 0, 0, 0 },
8b54f004
MP
332 {"exclude", 0, POPT_ARG_STRING, 0, OPT_EXCLUDE, 0, 0 },
333 {"include", 0, POPT_ARG_STRING, 0, OPT_INCLUDE, 0, 0 },
334 {"exclude-from", 0, POPT_ARG_STRING, 0, OPT_EXCLUDE_FROM, 0, 0 },
335 {"include-from", 0, POPT_ARG_STRING, 0, OPT_INCLUDE_FROM, 0, 0 },
afb6e945 336 {"safe-links", 0, POPT_ARG_NONE, &safe_symlinks, 0, 0, 0 },
8b54f004 337 {"help", 'h', POPT_ARG_NONE, 0, 'h', 0, 0 },
afb6e945
WD
338 {"backup", 'b', POPT_ARG_NONE, &make_backups, 0, 0, 0 },
339 {"dry-run", 'n', POPT_ARG_NONE, &dry_run, 0, 0, 0 },
340 {"sparse", 'S', POPT_ARG_NONE, &sparse_files, 0, 0, 0 },
341 {"cvs-exclude", 'C', POPT_ARG_NONE, &cvs_exclude, 0, 0, 0 },
342 {"update", 'u', POPT_ARG_NONE, &update_only, 0, 0, 0 },
716e73d4 343 {"keep-dirlinks", 'K', POPT_ARG_NONE, &keep_dirlinks, 0, 0, 0 },
afb6e945
WD
344 {"links", 'l', POPT_ARG_NONE, &preserve_links, 0, 0, 0 },
345 {"copy-links", 'L', POPT_ARG_NONE, &copy_links, 0, 0, 0 },
346 {"whole-file", 'W', POPT_ARG_VAL, &whole_file, 1, 0, 0 },
347 {"no-whole-file", 0, POPT_ARG_VAL, &whole_file, 0, 0, 0 },
348 {"copy-unsafe-links", 0, POPT_ARG_NONE, &copy_unsafe_links, 0, 0, 0 },
349 {"perms", 'p', POPT_ARG_NONE, &preserve_perms, 0, 0, 0 },
350 {"owner", 'o', POPT_ARG_NONE, &preserve_uid, 0, 0, 0 },
351 {"group", 'g', POPT_ARG_NONE, &preserve_gid, 0, 0, 0 },
352 {"devices", 'D', POPT_ARG_NONE, &preserve_devices, 0, 0, 0 },
353 {"times", 't', POPT_ARG_NONE, &preserve_times, 0, 0, 0 },
354 {"checksum", 'c', POPT_ARG_NONE, &always_checksum, 0, 0, 0 },
8b54f004
MP
355 {"verbose", 'v', POPT_ARG_NONE, 0, 'v', 0, 0 },
356 {"quiet", 'q', POPT_ARG_NONE, 0, 'q', 0, 0 },
dfa32483 357 {"archive", 'a', POPT_ARG_NONE, &archive_mode, 0, 0, 0 },
afb6e945 358 {"server", 0, POPT_ARG_NONE, &am_server, 0, 0, 0 },
dfa32483 359 {"sender", 0, POPT_ARG_NONE, 0, OPT_SENDER, 0, 0 },
afb6e945 360 {"recursive", 'r', POPT_ARG_NONE, &recurse, 0, 0, 0 },
ea5164d1
WD
361 {"relative", 'R', POPT_ARG_VAL, &relative_paths, 1, 0, 0 },
362 {"no-relative", 0, POPT_ARG_VAL, &relative_paths, 0, 0, 0 },
afb6e945
WD
363 {"rsh", 'e', POPT_ARG_STRING, &shell_cmd, 0, 0, 0 },
364 {"block-size", 'B', POPT_ARG_INT, &block_size, 0, 0, 0 },
365 {"max-delete", 0, POPT_ARG_INT, &max_delete, 0, 0, 0 },
99218d82 366 {"timeout", 0, POPT_ARG_INT, &io_timeout, OPT_TIMEOUT, 0, 0 },
afb6e945
WD
367 {"temp-dir", 'T', POPT_ARG_STRING, &tmpdir, 0, 0, 0 },
368 {"compare-dest", 0, POPT_ARG_STRING, &compare_dest, 0, 0, 0 },
7be73df4 369 {"link-dest", 0, POPT_ARG_STRING, &compare_dest, OPT_LINK_DEST, 0, 0 },
2855f61f 370 /* TODO: Should this take an optional int giving the compression level? */
afb6e945 371 {"compress", 'z', POPT_ARG_NONE, &do_compression, 0, 0, 0 },
e1add893 372 {"daemon", 0, POPT_ARG_NONE, &daemon_opt, 0, 0, 0 },
afb6e945
WD
373 {"no-detach", 0, POPT_ARG_NONE, &no_detach, 0, 0, 0 },
374 {"stats", 0, POPT_ARG_NONE, &do_stats, 0, 0, 0 },
375 {"progress", 0, POPT_ARG_NONE, &do_progress, 0, 0, 0 },
376 {"partial", 0, POPT_ARG_NONE, &keep_partial, 0, 0, 0 },
377 {"ignore-errors", 0, POPT_ARG_NONE, &ignore_errors, 0, 0, 0 },
378 {"blocking-io", 0, POPT_ARG_VAL, &blocking_io, 1, 0, 0 },
379 {"no-blocking-io", 0, POPT_ARG_VAL, &blocking_io, 0, 0, 0 },
dfa32483 380 {0, 'P', POPT_ARG_NONE, 0, 'P', 0, 0 },
afb6e945
WD
381 {"config", 0, POPT_ARG_STRING, &config_file, 0, 0, 0 },
382 {"port", 0, POPT_ARG_INT, &rsync_port, 0, 0, 0 },
383 {"log-format", 0, POPT_ARG_STRING, &log_format, 0, 0, 0 },
384 {"bwlimit", 0, POPT_ARG_INT, &bwlimit, 0, 0, 0 },
8b54f004 385 {"address", 0, POPT_ARG_STRING, &bind_address, 0, 0, 0 },
afb6e945
WD
386 {"backup-dir", 0, POPT_ARG_STRING, &backup_dir, 0, 0, 0 },
387 {"hard-links", 'H', POPT_ARG_NONE, &preserve_hard_links, 0, 0, 0 },
9b3318b0
WD
388 {"read-batch", 0, POPT_ARG_STRING, &batch_name, OPT_READ_BATCH, 0, 0 },
389 {"write-batch", 0, POPT_ARG_STRING, &batch_name, OPT_WRITE_BATCH, 0, 0 },
ea5164d1
WD
390 {"files-from", 0, POPT_ARG_STRING, &files_from, 0, 0, 0 },
391 {"from0", '0', POPT_ARG_NONE, &eol_nulls, 0, 0, 0},
392 {"no-implied-dirs", 0, POPT_ARG_VAL, &implied_dirs, 0, 0, 0 },
4f3e9a0f 393 {"protocol", 0, POPT_ARG_INT, &protocol_version, 0, 0, 0 },
c8d895de 394 {"checksum-seed", 0, POPT_ARG_INT, &checksum_seed, 0, 0, 0 },
06963d0f 395#ifdef INET6
3dd22903
WD
396 {"ipv4", '4', POPT_ARG_VAL, &default_af_hint, AF_INET, 0, 0 },
397 {"ipv6", '6', POPT_ARG_VAL, &default_af_hint, AF_INET6, 0, 0 },
06963d0f 398#endif
8b54f004 399 {0,0,0,0, 0, 0, 0}
2855f61f 400};
7a6421fa 401
06963d0f 402
e51094b7 403static char err_buf[200];
cd8185f2 404
2855f61f 405
dafe63ca
MP
406/**
407 * Store the option error message, if any, so that we can log the
408 * connection attempt (which requires parsing the options), and then
409 * show the error later on.
410 **/
cd8185f2
AT
411void option_error(void)
412{
e51094b7
WD
413 if (!err_buf[0]) {
414 strcpy(err_buf, "Error parsing options: "
415 "option may be supported on client but not on server?\n");
cd8185f2 416 }
e51094b7 417
e51094b7 418 rprintf(FERROR, RSYNC_NAME ": %s", err_buf);
cd8185f2
AT
419}
420
dafe63ca
MP
421
422/**
27ed20f7
WD
423 * Tweak the option table to disable all options that the rsyncd.conf
424 * file has told us to refuse.
dafe63ca 425 **/
27ed20f7 426static void set_refuse_options(char *bp)
cd8185f2 427{
27ed20f7
WD
428 struct poptOption *op;
429 char *cp;
430
431 while (1) {
432 if ((cp = strchr(bp, ' ')) != NULL)
433 *cp= '\0';
55afbb52
WD
434 for (op = long_options; ; op++) {
435 if (!op->longName) {
436 rprintf(FLOG,
437 "Unknown option %s in \"refuse options\" setting\n",
438 bp);
439 break;
440 }
27ed20f7 441 if (strcmp(bp, op->longName) == 0) {
c67d1386 442 op->val = (op - long_options)+OPT_REFUSED_BASE;
27ed20f7
WD
443 break;
444 }
cd8185f2 445 }
27ed20f7
WD
446 if (!cp)
447 break;
448 *cp = ' ';
449 bp = cp + 1;
cd8185f2 450 }
cd8185f2
AT
451}
452
453
2855f61f
MP
454static int count_args(char const **argv)
455{
dfa32483 456 int i = 0;
2855f61f 457
dfa32483
WD
458 while (argv[i] != NULL)
459 i++;
460
461 return i;
2855f61f
MP
462}
463
464
dafe63ca
MP
465/**
466 * Process command line arguments. Called on both local and remote.
467 *
468 * @retval 1 if all options are OK; with globals set to appropriate
469 * values
470 *
471 * @retval 0 on error, with err_buf containing an explanation
472 **/
2855f61f 473int parse_arguments(int *argc, const char ***argv, int frommain)
7a6421fa 474{
d853783f 475 int opt;
cd8185f2 476 char *ref = lp_refuse_options(module_id);
7be73df4 477 const char *arg;
dfa32483 478 poptContext pc;
d853783f 479
27ed20f7
WD
480 if (ref && *ref)
481 set_refuse_options(ref);
482
dfa32483 483 /* TODO: Call poptReadDefaultConfig; handle errors. */
cd8185f2 484
dfa32483
WD
485 /* The context leaks in case of an error, but if there's a
486 * problem we always exit anyhow. */
487 pc = poptGetContext(RSYNC_NAME, *argc, *argv, long_options, 0);
2855f61f
MP
488
489 while ((opt = poptGetNextOpt(pc)) != -1) {
dfa32483
WD
490 /* most options are handled automatically by popt;
491 * only special cases are returned and listed here. */
2855f61f 492
d853783f
AT
493 switch (opt) {
494 case OPT_VERSION:
dfa32483 495 print_rsync_version(FINFO);
d853783f 496 exit_cleanup(0);
dfa32483 497
5b56cc19 498 case OPT_MODIFY_WINDOW:
dfa32483
WD
499 /* The value has already been set by popt, but
500 * we need to remember that we're using a
501 * non-default setting. */
5b56cc19
AT
502 modify_window_set = 1;
503 break;
1de50993
WD
504
505 case OPT_DELETE_AFTER:
506 delete_after = 1;
507 delete_mode = 1;
508 break;
509
b33b791e
DD
510 case OPT_DELETE_EXCLUDED:
511 delete_excluded = 1;
512 delete_mode = 1;
513 break;
514
d853783f 515 case OPT_EXCLUDE:
fa0c1939
WD
516 if (am_server || sanitize_paths)
517 return 0; /* Impossible... */
357406ec 518 add_exclude(&exclude_list, poptGetOptArg(pc), 0);
d853783f
AT
519 break;
520
521 case OPT_INCLUDE:
fa0c1939
WD
522 if (am_server || sanitize_paths)
523 return 0; /* Impossible... */
8645af1d 524 add_exclude(&exclude_list, poptGetOptArg(pc),
357406ec 525 XFLG_DEF_INCLUDE);
d853783f
AT
526 break;
527
528 case OPT_EXCLUDE_FROM:
fa0c1939
WD
529 if (am_server || sanitize_paths)
530 return 0; /* Impossible... */
7be73df4 531 arg = poptGetOptArg(pc);
7be73df4 532 add_exclude_file(&exclude_list, arg,
357406ec 533 XFLG_FATAL_ERRORS);
d853783f
AT
534 break;
535
93695764 536 case OPT_INCLUDE_FROM:
fa0c1939
WD
537 if (am_server || sanitize_paths)
538 return 0; /* Impossible... */
7be73df4 539 arg = poptGetOptArg(pc);
7be73df4 540 add_exclude_file(&exclude_list, arg,
357406ec 541 XFLG_FATAL_ERRORS | XFLG_DEF_INCLUDE);
93695764
DD
542 break;
543
d853783f
AT
544 case 'h':
545 usage(FINFO);
546 exit_cleanup(0);
547
d853783f
AT
548 case 'v':
549 verbose++;
550 break;
7a6421fa 551
b86f0cef 552 case 'q':
f98c60bf
WD
553 if (frommain)
554 quiet++;
b86f0cef
DD
555 break;
556
d853783f
AT
557 case OPT_SENDER:
558 if (!am_server) {
559 usage(FERROR);
65417579 560 exit_cleanup(RERR_SYNTAX);
d853783f
AT
561 }
562 am_sender = 1;
563 break;
564
d9fcc198
AT
565 case 'P':
566 do_progress = 1;
567 keep_partial = 1;
568 break;
569
088aac85 570 case OPT_WRITE_BATCH:
9b3318b0 571 /* batch_name is already set */
088aac85
DD
572 write_batch = 1;
573 break;
574
76f79ba7 575 case OPT_READ_BATCH:
9b3318b0 576 /* batch_name is already set */
6902ed17
MP
577 read_batch = 1;
578 break;
ea5164d1 579
99218d82
WD
580 case OPT_TIMEOUT:
581 if (io_timeout && io_timeout < select_timeout)
582 select_timeout = io_timeout;
583 break;
584
59c95e42
DD
585 case OPT_LINK_DEST:
586#if HAVE_LINK
59c95e42
DD
587 link_dest = 1;
588 break;
589#else
d175d7e1 590 snprintf(err_buf, sizeof err_buf,
dfa32483 591 "hard links are not supported on this %s\n",
59c95e42 592 am_server ? "server" : "client");
59c95e42
DD
593 return 0;
594#endif
595
d853783f 596 default:
55afbb52 597 /* A large opt value means that set_refuse_options()
c67d1386
WD
598 * turned this option off (opt-BASE is its index). */
599 if (opt >= OPT_REFUSED_BASE) {
600 struct poptOption *op =
601 &long_options[opt-OPT_REFUSED_BASE];
27ed20f7
WD
602 int n = snprintf(err_buf, sizeof err_buf,
603 "This server does not support --%s\n",
604 op->longName) - 1;
605 if (op->shortName) {
606 snprintf(err_buf+n, sizeof err_buf-n,
607 " (-%c)\n", op->shortName);
608 }
609 } else {
610 snprintf(err_buf, sizeof err_buf,
611 "%s%s: %s\n",
612 am_server ? "on remote machine: " : "",
613 poptBadOption(pc, POPT_BADOPTION_NOALIAS),
614 poptStrerror(opt));
615 }
dfa32483 616 return 0;
d853783f 617 }
7a6421fa 618 }
2855f61f 619
e1add893 620#if !SUPPORT_LINKS
54e87b4b 621 if (preserve_links && !am_sender) {
e1add893
WD
622 snprintf(err_buf, sizeof err_buf,
623 "symlinks are not supported on this %s\n",
624 am_server ? "server" : "client");
e1add893
WD
625 return 0;
626 }
627#endif
628
629#if !SUPPORT_HARD_LINKS
630 if (preserve_hard_links) {
631 snprintf(err_buf, sizeof err_buf,
632 "hard links are not supported on this %s\n",
633 am_server ? "server" : "client");
e1add893
WD
634 return 0;
635 }
636#endif
637
088aac85 638 if (write_batch && read_batch) {
d175d7e1
WD
639 rprintf(FERROR,
640 "write-batch and read-batch can not be used together\n");
641 exit_cleanup(RERR_SYNTAX);
088aac85 642 }
94327ff0
WD
643 if (write_batch || read_batch) {
644 if (dry_run) {
645 rprintf(FERROR,
646 "--%s-batch cannot be used with --dry_run (-n)\n",
647 write_batch ? "write" : "read");
648 exit_cleanup(RERR_SYNTAX);
649 }
650 if (am_server) {
651 rprintf(FINFO,
652 "ignoring --%s-batch option sent to server\n",
653 write_batch ? "write" : "read");
654 /* We don't actually exit_cleanup(), so that we can
655 * still service older version clients that still send
656 * batch args to server. */
657 read_batch = write_batch = 0;
658 batch_name = NULL;
659 }
b9f592fb 660 }
9b3318b0 661 if (batch_name && strlen(batch_name) > MAX_BATCH_NAME_LEN) {
beb93684 662 rprintf(FERROR,
9b3318b0
WD
663 "the batch-file name must be %d characters or less.\n",
664 MAX_BATCH_NAME_LEN);
beb93684
WD
665 exit_cleanup(RERR_SYNTAX);
666 }
088aac85 667
ce58b1b4
WD
668 if (tmpdir && strlen(tmpdir) >= MAXPATHLEN - 10) {
669 rprintf(FERROR, "the --temp-dir path is WAY too long.\n");
670 exit_cleanup(RERR_SYNTAX);
671 }
672
dfa32483 673 if (archive_mode) {
ea5164d1
WD
674 if (!files_from)
675 recurse = 1;
dfa32483
WD
676#if SUPPORT_LINKS
677 preserve_links = 1;
678#endif
679 preserve_perms = 1;
680 preserve_times = 1;
681 preserve_gid = 1;
682 preserve_uid = 1;
683 preserve_devices = 1;
684 }
685
ea5164d1
WD
686 if (relative_paths < 0)
687 relative_paths = files_from? 1 : 0;
688
7be73df4
WD
689 *argv = poptGetArgs(pc);
690 if (*argv)
691 *argc = count_args(*argv);
692 else
693 *argc = 0;
694
695 if (sanitize_paths) {
696 int i;
697 for (i = *argc; i-- > 0; )
698 (*argv)[i] = alloc_sanitize_path((*argv)[i], NULL);
699 if (tmpdir)
700 tmpdir = alloc_sanitize_path(tmpdir, curr_dir);
701 if (compare_dest)
702 compare_dest = alloc_sanitize_path(compare_dest, curr_dir);
7be73df4
WD
703 if (backup_dir)
704 backup_dir = alloc_sanitize_path(backup_dir, curr_dir);
705 if (files_from)
706 files_from = alloc_sanitize_path(files_from, curr_dir);
707 }
708
5df1fcf2
WD
709 if (daemon_opt) {
710 daemon_opt = 0;
711 am_daemon = 1;
712 return 1;
713 }
714
d175d7e1 715 if (!backup_suffix)
e0391f81 716 backup_suffix = backup_dir ? "" : BACKUP_SUFFIX;
d175d7e1 717 backup_suffix_len = strlen(backup_suffix);
80ddadb7
WD
718 if (strchr(backup_suffix, '/') != NULL) {
719 rprintf(FERROR, "--suffix cannot contain slashes: %s\n",
720 backup_suffix);
721 exit_cleanup(RERR_SYNTAX);
722 }
e0391f81
WD
723 if (backup_dir) {
724 backup_dir_len = strlcpy(backup_dir_buf, backup_dir, sizeof backup_dir_buf);
725 backup_dir_remainder = sizeof backup_dir_buf - backup_dir_len;
726 if (backup_dir_remainder < 32) {
727 rprintf(FERROR, "the --backup-dir path is WAY too long.\n");
728 exit_cleanup(RERR_SYNTAX);
729 }
730 if (backup_dir_buf[backup_dir_len - 1] != '/') {
731 backup_dir_buf[backup_dir_len++] = '/';
732 backup_dir_buf[backup_dir_len] = '\0';
733 }
8dcf9335 734 if (verbose > 1 && !am_sender)
e0391f81 735 rprintf(FINFO, "backup_dir is %s\n", backup_dir_buf);
8dcf9335 736 } else if (!backup_suffix_len && (!am_server || !am_sender)) {
d175d7e1
WD
737 rprintf(FERROR,
738 "--suffix cannot be a null string without --backup-dir\n");
739 exit_cleanup(RERR_SYNTAX);
740 }
741
e2559dbe
S
742 if (do_progress && !verbose)
743 verbose = 1;
744
3c74c3a3
WD
745 if (bwlimit) {
746 bwlimit_writemax = (size_t)bwlimit * 128;
747 if (bwlimit_writemax < 512)
748 bwlimit_writemax = 512;
749 }
750
ea5164d1
WD
751 if (files_from) {
752 char *colon;
3e89da86 753 if (*argc != 2 && !(am_server && am_sender && *argc == 1)) {
ea5164d1
WD
754 usage(FERROR);
755 exit_cleanup(RERR_SYNTAX);
756 }
63596e1c 757 if (strcmp(files_from, "-") == 0) {
ea5164d1 758 filesfrom_fd = 0;
63596e1c
WD
759 if (am_server)
760 remote_filesfrom_file = "-";
761 }
ea5164d1
WD
762 else if ((colon = find_colon(files_from)) != 0) {
763 if (am_server) {
764 usage(FERROR);
765 exit_cleanup(RERR_SYNTAX);
766 }
767 remote_filesfrom_file = colon+1 + (colon[1] == ':');
768 if (strcmp(remote_filesfrom_file, "-") == 0) {
769 rprintf(FERROR, "Invalid --files-from remote filename\n");
770 exit_cleanup(RERR_SYNTAX);
771 }
772 } else {
ea5164d1
WD
773 filesfrom_fd = open(files_from, O_RDONLY|O_BINARY);
774 if (filesfrom_fd < 0) {
775 rsyserr(FERROR, errno,
776 "failed to open files-from file %s",
777 files_from);
778 exit_cleanup(RERR_FILEIO);
779 }
780 }
781 }
782
b11ed3b1 783 return 1;
7a6421fa
AT
784}
785
786
dafe63ca
MP
787/**
788 * Construct a filtered list of options to pass through from the
789 * client to the server.
790 *
791 * This involves setting options that will tell the server how to
792 * behave, and also filtering out options that are processed only
793 * locally.
794 **/
7a6421fa
AT
795void server_options(char **args,int *argc)
796{
d853783f
AT
797 int ac = *argc;
798 static char argstr[50];
f98c60bf 799 char *arg;
ef5d23eb 800
d853783f
AT
801 int i, x;
802
93689aa5
DD
803 if (blocking_io == -1)
804 blocking_io = 0;
805
d853783f
AT
806 args[ac++] = "--server";
807
1312d9fc
WD
808 if (daemon_over_rsh) {
809 args[ac++] = "--daemon";
810 *argc = ac;
811 /* if we're passing --daemon, we're done */
812 return;
813 }
814
d853783f
AT
815 if (!am_sender)
816 args[ac++] = "--sender";
817
818 x = 1;
819 argstr[0] = '-';
f98c60bf 820 for (i = 0; i < verbose; i++)
d853783f 821 argstr[x++] = 'v';
f0b36a48 822
b86f0cef 823 /* the -q option is intentionally left out */
d853783f
AT
824 if (make_backups)
825 argstr[x++] = 'b';
826 if (update_only)
827 argstr[x++] = 'u';
828 if (dry_run)
829 argstr[x++] = 'n';
830 if (preserve_links)
831 argstr[x++] = 'l';
832 if (copy_links)
833 argstr[x++] = 'L';
716e73d4
WD
834 if (keep_dirlinks && am_sender)
835 argstr[x++] = 'K';
1bfbf40b 836
dfa32483 837 if (whole_file > 0)
d853783f 838 argstr[x++] = 'W';
bceec82f
MP
839 /* We don't need to send --no-whole-file, because it's the
840 * default for remote transfers, and in any case old versions
841 * of rsync will not understand it. */
dfa32483 842
d853783f
AT
843 if (preserve_hard_links)
844 argstr[x++] = 'H';
845 if (preserve_uid)
846 argstr[x++] = 'o';
847 if (preserve_gid)
848 argstr[x++] = 'g';
849 if (preserve_devices)
850 argstr[x++] = 'D';
851 if (preserve_times)
852 argstr[x++] = 't';
853 if (preserve_perms)
854 argstr[x++] = 'p';
855 if (recurse)
856 argstr[x++] = 'r';
857 if (always_checksum)
858 argstr[x++] = 'c';
859 if (cvs_exclude)
860 argstr[x++] = 'C';
861 if (ignore_times)
862 argstr[x++] = 'I';
863 if (relative_paths)
864 argstr[x++] = 'R';
865 if (one_file_system)
866 argstr[x++] = 'x';
867 if (sparse_files)
868 argstr[x++] = 'S';
869 if (do_compression)
870 argstr[x++] = 'z';
f0b36a48 871
dfa32483 872 /* this is a complete hack - blame Rusty
f0b36a48
AT
873
874 this is a hack to make the list_only (remote file list)
875 more useful */
dfa32483 876 if (list_only && !recurse)
f0b36a48
AT
877 argstr[x++] = 'r';
878
d853783f
AT
879 argstr[x] = 0;
880
f98c60bf
WD
881 if (x != 1)
882 args[ac++] = argstr;
d853783f 883
195bd906 884 if (block_size) {
f98c60bf
WD
885 if (asprintf(&arg, "-B%u", block_size) < 0)
886 goto oom;
887 args[ac++] = arg;
dfa32483 888 }
d853783f 889
0b73ca12 890 if (max_delete && am_sender) {
f98c60bf
WD
891 if (asprintf(&arg, "--max-delete=%d", max_delete) < 0)
892 goto oom;
893 args[ac++] = arg;
dfa32483
WD
894 }
895
d853783f 896 if (io_timeout) {
f98c60bf
WD
897 if (asprintf(&arg, "--timeout=%d", io_timeout) < 0)
898 goto oom;
899 args[ac++] = arg;
dfa32483 900 }
d853783f 901
ef5d23eb 902 if (bwlimit) {
f98c60bf
WD
903 if (asprintf(&arg, "--bwlimit=%d", bwlimit) < 0)
904 goto oom;
905 args[ac++] = arg;
ef5d23eb
DD
906 }
907
d175d7e1
WD
908 if (backup_dir) {
909 args[ac++] = "--backup-dir";
910 args[ac++] = backup_dir;
911 }
912
913 /* Only send --suffix if it specifies a non-default value. */
f98c60bf 914 if (strcmp(backup_suffix, backup_dir ? "" : BACKUP_SUFFIX) != 0) {
191e40da 915 /* We use the following syntax to avoid weirdness with '~'. */
f98c60bf
WD
916 if (asprintf(&arg, "--suffix=%s", backup_suffix) < 0)
917 goto oom;
918 args[ac++] = arg;
d853783f
AT
919 }
920
b33b791e
DD
921 if (delete_excluded)
922 args[ac++] = "--delete-excluded";
f98c60bf
WD
923 else if (delete_mode)
924 args[ac++] = "--delete";
b33b791e 925
f83f0548
AT
926 if (size_only)
927 args[ac++] = "--size-only";
928
5b56cc19 929 if (modify_window_set) {
f98c60bf
WD
930 if (asprintf(&arg, "--modify-window=%d", modify_window) < 0)
931 goto oom;
932 args[ac++] = arg;
5b56cc19
AT
933 }
934
c8d895de 935 if (checksum_seed) {
221ddb94 936 if (asprintf(&arg, "--checksum-seed=%d", checksum_seed) < 0)
c8d895de
WD
937 goto oom;
938 args[ac++] = arg;
939 }
940
d853783f
AT
941 if (keep_partial)
942 args[ac++] = "--partial";
943
944 if (force_delete)
945 args[ac++] = "--force";
946
57df171b
AT
947 if (delete_after)
948 args[ac++] = "--delete-after";
949
ef55c686
AT
950 if (ignore_errors)
951 args[ac++] = "--ignore-errors";
952
b5313607
DD
953 if (copy_unsafe_links)
954 args[ac++] = "--copy-unsafe-links";
955
d853783f
AT
956 if (safe_symlinks)
957 args[ac++] = "--safe-links";
958
959 if (numeric_ids)
960 args[ac++] = "--numeric-ids";
961
0b73ca12 962 if (only_existing && am_sender)
1347d512
AT
963 args[ac++] = "--existing";
964
dfa32483 965 if (opt_ignore_existing && am_sender)
3d6feada
MP
966 args[ac++] = "--ignore-existing";
967
d853783f
AT
968 if (tmpdir) {
969 args[ac++] = "--temp-dir";
970 args[ac++] = tmpdir;
971 }
972
375a4556
DD
973 if (compare_dest && am_sender) {
974 /* the server only needs this option if it is not the sender,
975 * and it may be an older version that doesn't know this
976 * option, so don't send it if client is the sender.
977 */
59c95e42 978 args[ac++] = link_dest ? "--link-dest" : "--compare-dest";
375a4556
DD
979 args[ac++] = compare_dest;
980 }
981
ea5164d1
WD
982 if (files_from && (!am_sender || remote_filesfrom_file)) {
983 if (remote_filesfrom_file) {
984 args[ac++] = "--files-from";
985 args[ac++] = remote_filesfrom_file;
986 if (eol_nulls)
987 args[ac++] = "--from0";
988 } else {
989 args[ac++] = "--files-from=-";
990 args[ac++] = "--from0";
991 }
992 }
993
d853783f 994 *argc = ac;
f98c60bf
WD
995 return;
996
997 oom:
998 out_of_memory("server_options");
7a6421fa
AT
999}
1000
ea5164d1
WD
1001/**
1002 * Return the position of a ':' IF it is not part of a filename (i.e. as
1003 * long as it doesn't occur after a slash.
1004 */
1005char *find_colon(char *s)
1006{
1007 char *p, *p2;
1008
1009 p = strchr(s,':');
f98c60bf
WD
1010 if (!p)
1011 return NULL;
ea5164d1
WD
1012
1013 /* now check to see if there is a / in the string before the : - if there is then
1014 discard the colon on the assumption that the : is part of a filename */
1015 p2 = strchr(s,'/');
f98c60bf
WD
1016 if (p2 && p2 < p)
1017 return NULL;
ea5164d1
WD
1018
1019 return p;
1020}