0252aa691c950cd8e76d4902ae9d8bfce1316104
5 * (c) 2001 Straylight/Edgeware
8 /*----- Licensing notice --------------------------------------------------*
10 * This file is part of Trivial IP Encryption (TrIPE).
12 * TrIPE is free software: you can redistribute it and/or modify it under
13 * the terms of the GNU General Public License as published by the Free
14 * Software Foundation; either version 3 of the License, or (at your
15 * option) any later version.
17 * TrIPE is distributed in the hope that it will be useful, but WITHOUT
18 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
19 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
22 * You should have received a copy of the GNU General Public License
23 * along with TrIPE. If not, see <https://www.gnu.org/licenses/>.
26 /*----- Header files ------------------------------------------------------*/
30 /*----- Global variables --------------------------------------------------*/
34 /*----- Static variables --------------------------------------------------*/
37 #define T_INTERVAL MIN(1)
39 static unsigned iv_nreasons
= 0;
40 static struct timeval iv_next
= { 0, 0 };
41 static int lpdone
= 0;
43 /*----- The interval timer ------------------------------------------------*/
45 /* --- @interval@ --- *
47 * Arguments: @struct timeval *tv@ = time when called
48 * @void *v@ = boring pointer
52 * Use: Called periodically to do housekeeping tasks.
55 static void interval(struct timeval
*tv
, void *v
)
57 T( trace(T_PEER
, "peer: interval timer"); )
59 rand_seed(RAND_GLOBAL
, MAXHASHSZ
);
61 iv_next
.tv_sec
+= T_INTERVAL
;
62 sel_addtimer(&sel
, &it
, &iv_next
, interval
, v
);
65 /* --- @iv_addreason@ --- *
71 * Use: Adds an `interval timer reason'; if there are no others, the
72 * interval timer is engaged.
75 void iv_addreason(void)
81 if (TV_CMP(&tv
, >=, &iv_next
)) interval(&tv
, 0);
82 else sel_addtimer(&sel
, &it
, &iv_next
, interval
, 0);
87 /* --- @iv_rmreason@ --- *
93 * Use: Removes an interval timer reason; if there are none left, the
94 * interval timer is disengaged.
97 void iv_rmreason(void)
99 assert(iv_nreasons
); iv_nreasons
--;
100 if (!iv_nreasons
) sel_rmtimer(&it
);
103 /*----- The main loop -----------------------------------------------------*/
105 /* --- @lp_init@ --- *
111 * Use: Initializes the main loop. Most importantly, this sets up
112 * the select multiplexor that everything else hooks onto.
117 rand_noisesrc(RAND_GLOBAL
, &noise_source
);
118 rand_seed(RAND_GLOBAL
, MAXHASHSZ
);
119 gettimeofday(&iv_next
, 0); iv_next
.tv_sec
+= T_INTERVAL
;
120 signal(SIGPIPE
, SIG_IGN
);
125 /* --- @lp_end@ --- *
131 * Use: Requests an exit from the main loop.
134 void lp_end(void) { lpdone
= 1; }
136 /* --- @lp_run@ --- *
140 * Returns: Zero on successful termination; @-1@ if things went wrong.
142 * Use: Cranks the main loop until it should be cranked no more.
152 if (!sel_select(&sel
)) nerr
= 0;
153 else if (errno
!= EINTR
&& errno
!= EAGAIN
) {
154 a_warn("SERVER", "select-error", "?ERRNO", A_END
);
157 a_warn("ABORT", "repeated-select-errors", A_END
);
166 /*----- Main code ---------------------------------------------------------*/
170 * Arguments: @int argc@ = number of command line arguments
171 * @char *argv[]@ = vector of arguments
173 * Returns: Zero if OK, nonzero on error.
175 * Use: Main program. Provides a simple VPN.
178 static void usage(FILE *fp
)
180 pquis(fp
, "Usage: $ [-DF] [-d DIR] [-b ADDR] [-p PORT] [-n TUNNEL]\n\
181 [-U USER] [-G GROUP] [-a SOCKET] [-m MODE] [-T TRACE-OPTS]\n\
182 [-k PRIV-KEYRING] [-K PUB-KEYRING] [-t KEY-TAG]\n");
185 static void version(FILE *fp
) { pquis(fp
, "$, version " VERSION
"\n"); }
187 static void help(FILE *fp
)
195 -h, --help Display this help text.\n\
196 -v, --version Display version number.\n\
197 -u, --usage Display pointless usage message.\n\
198 --tunnels Display IP tunnel drivers and exit.\n\
200 -4, --ipv4 Transport over IPv4 only.\n\
201 -6, --ipv6 Transport over IPv6 only.\n\
202 -D, --daemon Run in the background.\n\
203 -F, --foreground Quit when stdin reports end-of-file.\n\
204 -d, --directory=DIR Switch to directory DIR [default " CONFIGDIR
"].\n\
205 -b, --bind-address=ADDR Bind UDP socket to this IP ADDR.\n\
206 -p, --port=PORT Select UDP port to listen to "
207 "[default " STR(TRIPE_PORT
) "].\n\
208 -n, --tunnel=TUNNEL Seelect default tunnel driver.\n\
209 -U, --setuid=USER Set uid to USER after initialization.\n\
210 -G, --setgid=GROUP Set gid to GROUP after initialization.\n\
211 -k, --priv-keyring=FILE Get private key from FILE.\n\
212 -K, --pub-keyring=FILE Get public keys from FILE.\n\
213 -t, --tag=KEYTAG Use private key labelled TAG.\n\
214 -a, --admin-socket=FILE Use FILE as the adminstration socket.\n\
215 -m, --admin-perms=MODE Permissions to set on admin socket [default 600].\n\
217 -T, --trace=OPTIONS Turn on tracing options.\n\
222 int main(int argc
, char *argv
[])
224 const char *kr_priv
= "keyring", *kr_pub
= "keyring.pub";
225 const char *tag_priv
= 0;
226 const char *csock
= SOCKETDIR
"/tripesock";
227 int csockmode
= 0600;
228 const char *dir
= CONFIGDIR
;
230 const char *bindhost
= 0, *bindsvc
= STR(TRIPE_PORT
);
231 struct addrinfo aihint
= { 0 }, *ailist
;
241 #define f_foreground 4u
244 T( trace_on(stderr
, 0); )
246 if ((p
= getenv("TRIPEDIR")) != 0)
248 if ((p
= getenv("TRIPESOCK")) != 0)
250 tun_default
= tunnels
[0];
251 aihint
.ai_family
= AF_UNSPEC
;
254 static const struct option opts
[] = {
255 { "help", 0, 0, 'h' },
256 { "version", 0, 0, 'v' },
257 { "usage", 0, 0, 'u' },
258 { "tunnels", 0, 0, '0' },
260 { "ipv4", 0, 0, '4' },
261 { "ipv6", 0, 0, '6' },
262 { "daemon", 0, 0, 'D' },
263 { "foreground", 0, 0, 'F' },
264 { "uid", OPTF_ARGREQ
, 0, 'U' },
265 { "setuid", OPTF_ARGREQ
, 0, 'U' },
266 { "gid", OPTF_ARGREQ
, 0, 'G' },
267 { "setgid", OPTF_ARGREQ
, 0, 'G' },
268 { "bind-address", OPTF_ARGREQ
, 0, 'b' },
269 { "tunnel", OPTF_ARGREQ
, 0, 'n' },
270 { "port", OPTF_ARGREQ
, 0, 'p' },
271 { "directory", OPTF_ARGREQ
, 0, 'd' },
272 { "priv-keyring", OPTF_ARGREQ
, 0, 'k' },
273 { "pub-keyring", OPTF_ARGREQ
, 0, 'K' },
274 { "tag", OPTF_ARGREQ
, 0, 't' },
275 { "admin-socket", OPTF_ARGREQ
, 0, 'a' },
276 { "admin-perms", OPTF_ARGREQ
, 0, 'm' },
278 { "trace", OPTF_ARGREQ
, 0, 'T' },
284 i
= mdwopt(argc
, argv
, "hvu46DFU:G:b:n:p:d:k:K:t:a:m:" T("T:"),
300 aihint
.ai_family
= AF_INET
;
303 aihint
.ai_family
= AF_INET6
;
309 u
= u_getuser(optarg
, &g
);
312 g
= u_getgroup(optarg
);
328 die(EXIT_FAILURE
, "unknown tunnel `%s'", optarg
);
329 if (mystrieq(optarg
, tunnels
[i
]->name
))
332 tun_default
= tunnels
[i
];
348 csockmode
= strtol(optarg
, &p
, 8);
349 if (*p
) die(EXIT_FAILURE
, "bad permissions: `%s'", optarg
);
356 tr_flags
= traceopt(tr_opts
, optarg
, tr_flags
, 0);
357 trace_level(tr_flags
);
362 for (i
= 0; tunnels
[i
]; i
++)
363 puts(tunnels
[i
]->name
);
372 if (optind
< argc
|| (f
& f_bogus
)) {
376 if (!(~f
& (f_daemon
| f_foreground
)))
377 die(EXIT_FAILURE
, "foreground operation for a daemon is silly");
379 aihint
.ai_protocol
= IPPROTO_UDP
;
380 aihint
.ai_socktype
= SOCK_DGRAM
;
381 aihint
.ai_flags
= AI_PASSIVE
| AI_ADDRCONFIG
;
382 if ((err
= getaddrinfo(bindhost
, bindsvc
, &aihint
, &ailist
)) != 0) {
383 die(EXIT_FAILURE
, "couldn't resolve hostname %c%s%c, port `%s': %s",
384 bindhost ?
'`' : '<',
385 bindhost ? bindhost
: "nil",
386 bindhost ?
'\'' : '>',
387 bindsvc
, gai_strerror(err
));
391 die(EXIT_FAILURE
, "can't set current directory to `%s': %s",
392 dir
, strerror(errno
));
397 if (!(f
& f_daemon
)) {
402 if (f
& f_foreground
)
404 a_create(STDIN_FILENO
, STDOUT_FILENO
, af
);
409 for (i
= 0; tunnels
[i
]; i
++)
411 p_bind(ailist
); freeaddrinfo(ailist
);
413 for (i
= 0; tunnels
[i
]; i
++) {
414 if (tunnels
[i
]->flags
&TUNF_PRIVOPEN
) {
415 ps_split(f
& f_daemon
);
422 a_listen(csock
, u
, g
, csockmode
);
424 km_init(kr_priv
, kr_pub
, tag_priv
);
428 a_warn("SERVER", "daemon-error", "?ERRNO", A_END
);
443 /*----- That's all, folks -------------------------------------------------*/