3 * $Id: tripe.c,v 1.10 2003/05/16 12:09:03 mdw Exp $
7 * (c) 2001 Straylight/Edgeware
10 /*----- Licensing notice --------------------------------------------------*
12 * This file is part of Trivial IP Encryption (TrIPE).
14 * TrIPE is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation; either version 2 of the License, or
17 * (at your option) any later version.
19 * TrIPE is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
24 * You should have received a copy of the GNU General Public License
25 * along with TrIPE; if not, write to the Free Software Foundation,
26 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
29 /*----- Revision history --------------------------------------------------*
32 * Revision 1.10 2003/05/16 12:09:03 mdw
33 * Allow binding to a chosen address.
35 * Revision 1.9 2003/04/15 14:11:09 mdw
36 * Rationalize the behaviour of the `-G' and `-U' options.
38 * Revision 1.8 2002/01/13 17:28:29 mdw
39 * Don't turn tracing on if tracing is turned off (!).
41 * Revision 1.7 2002/01/13 17:14:05 mdw
42 * Don't include the tracing option in the help if not compiled in.
44 * Revision 1.6 2001/06/19 22:08:37 mdw
45 * Moved buffers to peer.c.
47 * Revision 1.5 2001/02/16 21:43:12 mdw
48 * Provide a more helpful usage message.
50 * Revision 1.4 2001/02/16 21:41:31 mdw
53 * Revision 1.3 2001/02/04 17:10:40 mdw
54 * Remove a debugging @abort@ call.
56 * Revision 1.2 2001/02/03 22:33:00 mdw
57 * Stuff more randomness into the pool in the interval timer.
59 * Revision 1.1 2001/02/03 20:26:37 mdw
64 /*----- Header files ------------------------------------------------------*/
68 /*----- Global variables --------------------------------------------------*/
72 /*----- Static variables --------------------------------------------------*/
75 #define T_INTERVAL MIN(1)
77 /*----- Main code ---------------------------------------------------------*/
79 /* --- @interval@ --- *
81 * Arguments: @struct timeval *tv@ = time when called
82 * @void *v@ = boring pointer
86 * Use: Called periodically to do housekeeping tasks.
89 void interval(struct timeval
*tv
, void *v
)
92 T( trace(T_PEER
, "peer: interval timer"); )
93 rand_seed(RAND_GLOBAL
, HASHSZ
);
96 tvv
.tv_sec
+= T_INTERVAL
;
97 sel_addtimer(&sel
, &it
, &tvv
, interval
, v
);
102 * Arguments: @int argc@ = number of command line arguments
103 * @char *argv[]@ = vector of arguments
105 * Returns: Zero if OK, nonzero on error.
107 * Use: Main program. Provides a simple VPN.
110 static void usage(FILE *fp
)
112 pquis(fp
, "Usage: $ [-D] [-d dir] [-p port] [-U user] [-G group]\n\
113 [-k priv-keyring] [-K pub-keyring] [-t key-tag]\n\
114 [-a socket] [-T trace-opts]\n");
117 static void version(FILE *fp
)
119 pquis(fp
, "$, version " VERSION
"\n");
122 static void help(FILE *fp
)
130 -h, --help Display this help text.\n\
131 -v, --version Display version number.\n\
132 -u, --usage Display pointless usage message.\n\
134 -D, --daemon Run in the background.\n\
135 -d, --directory=DIR Switch to directory DIR (default $TRIPEDIR).\n\
136 -p, --port=PORT Select UDP port to listen to.\n\
137 -u, --setuid=USER Set uid to USER after initialization.\n\
138 -g, --setgid=GROUP Set gid to GROUP after initialization.\n\
139 -k, --priv-keyring=FILE Get private key from FILE.\n\
140 -K, --pub-keyring=FILE Get public keys from FILE.\n\
141 -t, --tag=KEYTAG Use private key labelled TAG.\n\
142 -a, --admin-socket=FILE Use FILE as the adminstration socket.\n\
144 -T, --trace=OPTIONS Turn on tracing options.\n\
149 int main(int argc
, char *argv
[])
151 const char *kr_priv
= "keyring", *kr_pub
= "keyring.pub";
152 const char *tag_priv
= "tripe-dh";
153 const char *csock
= "tripesock";
154 const char *dir
= "/var/lib/tripe";
157 struct in_addr baddr
= { INADDR_ANY
};
166 T( trace_on(stderr
, 0); )
168 if ((p
= getenv("TRIPEDIR")) != 0)
172 static const struct option opts
[] = {
173 { "help", 0, 0, 'h' },
174 { "version", 0, 0, 'v' },
175 { "usage", 0, 0, 'u' },
177 { "daemon", 0, 0, 'D' },
178 { "uid", OPTF_ARGREQ
, 0, 'U' },
179 { "setuid", OPTF_ARGREQ
, 0, 'U' },
180 { "gid", OPTF_ARGREQ
, 0, 'G' },
181 { "setgid", OPTF_ARGREQ
, 0, 'G' },
182 { "bind-address", OPTF_ARGREQ
, 0, 'b' },
183 { "port", OPTF_ARGREQ
, 0, 'p' },
184 { "directory", OPTF_ARGREQ
, 0, 'd' },
185 { "priv-keyring", OPTF_ARGREQ
, 0, 'k' },
186 { "pub-keyring", OPTF_ARGREQ
, 0, 'K' },
187 { "tag", OPTF_ARGREQ
, 0, 't' },
188 { "admin-socket", OPTF_ARGREQ
, 0, 'a' },
190 { "trace", OPTF_ARGREQ
, 0, 'T' },
196 int i
= mdwopt(argc
, argv
, "hvu DU:G: b:p:d:k:K:t:a:" T("T:"),
217 unsigned long i
= strtoul(optarg
, &p
, 0);
221 pw
= getpwnam(optarg
);
223 die(EXIT_FAILURE
, "user `%s' not found", optarg
);
231 unsigned long i
= strtoul(optarg
, &p
, 0);
235 gr
= getgrnam(optarg
);
237 die(EXIT_FAILURE
, "group `%s' not found", optarg
);
242 struct hostent
*h
= gethostbyname(optarg
);
244 die(EXIT_FAILURE
, "unknown host name `%s'", optarg
);
245 memcpy(&baddr
, h
->h_addr
, sizeof(struct in_addr
));
249 unsigned long i
= strtoul(optarg
, &p
, 0);
251 struct servent
*s
= getservbyname(optarg
, "udp");
253 die(EXIT_FAILURE
, "unknown service name `%s'", optarg
);
254 i
= ntohs(s
->s_port
);
256 if (i
== 0 || i
>= 65536)
257 die(EXIT_FAILURE
, "bad port number %lu", i
);
277 tr_flags
= traceopt(tr_opts
, optarg
, tr_flags
, 0);
278 trace_level(tr_flags
);
287 if (optind
< argc
|| (f
& f_bogus
)) {
293 die(EXIT_FAILURE
, "can't set current directory to `%s': %s",
294 dir
, strerror(errno
));
299 rand_noisesrc(RAND_GLOBAL
, &noise_source
);
300 rand_seed(RAND_GLOBAL
, RMD160_HASHSZ
);
301 signal(SIGPIPE
, SIG_IGN
);
305 a_create(STDIN_FILENO
, STDOUT_FILENO
);
306 if (g
!= (gid_t
)-1) {
307 if (setgid(g
) || (getuid() == 0 && setgroups(1, &g
))) {
308 die(EXIT_FAILURE
, "couldn't setgid to %u: %s",
309 (unsigned)g
, strerror(errno
));
312 if (u
!= (uid_t
)-1) {
314 die(EXIT_FAILURE
, "couldn't setuid to %u: %s",
315 (unsigned)u
, strerror(errno
));
318 km_init(kr_priv
, kr_pub
, tag_priv
);
322 die(EXIT_FAILURE
, "couldn't become a daemon: %s", strerror(errno
));
328 tv
.tv_sec
= time(0) + T_INTERVAL
;
330 sel_addtimer(&sel
, &it
, &tv
, interval
, 0);
336 if (!sel_select(&sel
))
338 else if (errno
!= EINTR
&& errno
!= EAGAIN
) {
339 a_warn("select failed: %s", strerror(errno
));
342 a_warn("too many select errors: bailing out");
352 /*----- That's all, folks -------------------------------------------------*/