libhydra: Remove empty unused library
[strongswan.git] / src / frontends / osx / charon-xpc / charon-xpc.c
1 /*
2 * Copyright (C) 2013 Martin Willi
3 * Copyright (C) 2013 revosec AG
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; either version 2 of the License, or (at your
8 * option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
9 *
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
12 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * for more details.
14 */
15
16 #include <sys/types.h>
17 #include <sys/utsname.h>
18 #include <unistd.h>
19 #include <stdio.h>
20 #include <signal.h>
21 #include <pthread.h>
22 #include <errno.h>
23
24 #include <library.h>
25 #include <daemon.h>
26 #include <threading/thread.h>
27 #include <utils/backtrace.h>
28
29 #include "xpc_dispatch.h"
30
31 /**
32 * XPC dispatcher class
33 */
34 static xpc_dispatch_t *dispatcher;
35
36 /**
37 * atexit() cleanup for dispatcher
38 */
39 void dispatcher_cleanup()
40 {
41 DESTROY_IF(dispatcher);
42 }
43
44 /**
45 * Loglevel configuration
46 */
47 static level_t levels[DBG_MAX];
48
49 /**
50 * hook in library for debugging messages
51 */
52 extern void (*dbg) (debug_t group, level_t level, char *fmt, ...);
53
54 /**
55 * Logging hook for library logs, using stderr output
56 */
57 static void dbg_stderr(debug_t group, level_t level, char *fmt, ...)
58 {
59 va_list args;
60
61 if (level <= 1)
62 {
63 va_start(args, fmt);
64 fprintf(stderr, "00[%N] ", debug_names, group);
65 vfprintf(stderr, fmt, args);
66 fprintf(stderr, "\n");
67 va_end(args);
68 }
69 }
70
71 /**
72 * Run the daemon and handle unix signals
73 */
74 static int run()
75 {
76 sigset_t set;
77
78 sigemptyset(&set);
79 sigaddset(&set, SIGINT);
80 sigaddset(&set, SIGTERM);
81 sigprocmask(SIG_BLOCK, &set, NULL);
82
83 while (TRUE)
84 {
85 int sig;
86
87 sig = sigwaitinfo(&set, NULL);
88 if (sig == -1)
89 {
90 if (errno == EINTR)
91 { /* ignore signals we didn't wait for */
92 continue;
93 }
94 DBG1(DBG_DMN, "waiting for signal failed: %s", strerror(errno));
95 return 1;
96 }
97 switch (sig)
98 {
99 case SIGINT:
100 DBG1(DBG_DMN, "signal of type SIGINT received. Shutting down");
101 charon->bus->alert(charon->bus, ALERT_SHUTDOWN_SIGNAL, sig);
102 return 0;
103 case SIGTERM:
104 DBG1(DBG_DMN, "signal of type SIGTERM received. Shutting down");
105 charon->bus->alert(charon->bus, ALERT_SHUTDOWN_SIGNAL, sig);
106 return 0;
107 }
108 }
109 }
110
111 /**
112 * Handle SIGSEGV/SIGILL signals raised by threads
113 */
114 static void segv_handler(int signal)
115 {
116 backtrace_t *backtrace;
117
118 DBG1(DBG_DMN, "thread %u received %d", thread_current_id(), signal);
119 backtrace = backtrace_create(2);
120 backtrace->log(backtrace, NULL, TRUE);
121 backtrace->destroy(backtrace);
122
123 DBG1(DBG_DMN, "killing ourself, received critical signal");
124 abort();
125 }
126
127 /**
128 * PF_ROUTE for some reason does not send an event for the first address
129 * installed after a fresh boot. Fix this by installing a fake tun address
130 * just to remove it afterwards.
131 */
132 static void fixup_pf_route()
133 {
134 tun_device_t *tun;
135 host_t *host;
136
137 tun = tun_device_create(NULL);
138 if (tun)
139 {
140 if (tun->up(tun))
141 {
142 host = host_create_from_string("127.0.0.99", 0);
143 tun->set_address(tun, host, 32);
144 host->destroy(host);
145 }
146 tun->destroy(tun);
147 }
148 }
149
150 /**
151 * Main function, starts the daemon.
152 */
153 int main(int argc, char *argv[])
154 {
155 struct sigaction action;
156 struct utsname utsname;
157 int group;
158
159 dbg = dbg_stderr;
160 atexit(library_deinit);
161 if (!library_init(NULL, "charon-xpc"))
162 {
163 exit(SS_RC_LIBSTRONGSWAN_INTEGRITY);
164 }
165 if (lib->integrity)
166 {
167 if (!lib->integrity->check_file(lib->integrity, "charon-xpc", argv[0]))
168 {
169 exit(SS_RC_DAEMON_INTEGRITY);
170 }
171 }
172 atexit(libcharon_deinit);
173 if (!libcharon_init())
174 {
175 exit(SS_RC_INITIALIZATION_FAILED);
176 }
177 for (group = 0; group < DBG_MAX; group++)
178 {
179 levels[group] = LEVEL_CTRL;
180 }
181 charon->load_loggers(charon, levels, TRUE);
182
183 lib->settings->set_default_str(lib->settings, "charon-xpc.port", "0");
184 lib->settings->set_default_str(lib->settings, "charon-xpc.port_nat_t", "0");
185 lib->settings->set_default_str(lib->settings,
186 "charon-xpc.close_ike_on_child_failure", "yes");
187 lib->settings->set_default_str(lib->settings,
188 "charon-xpc.plugins.osx-attr.append", "no");
189 if (!charon->initialize(charon,
190 lib->settings->get_str(lib->settings, "charon-xpc.load",
191 "nonce pkcs1 openssl keychain ctr ccm gcm kernel-libipsec "
192 "kernel-pfroute socket-default eap-identity eap-mschapv2 "
193 "eap-md5 xauth-generic osx-attr")))
194 {
195 exit(SS_RC_INITIALIZATION_FAILED);
196 }
197
198 if (uname(&utsname) != 0)
199 {
200 memset(&utsname, 0, sizeof(utsname));
201 }
202 DBG1(DBG_DMN, "Starting charon-xpc IKE daemon (strongSwan %s, %s %s, %s)",
203 VERSION, utsname.sysname, utsname.release, utsname.machine);
204
205 /* add handler for SEGV and ILL,
206 * INT, TERM and HUP are handled by sigwaitinfo() in run() */
207 action.sa_handler = segv_handler;
208 action.sa_flags = 0;
209 sigemptyset(&action.sa_mask);
210 sigaddset(&action.sa_mask, SIGINT);
211 sigaddset(&action.sa_mask, SIGTERM);
212 sigaddset(&action.sa_mask, SIGHUP);
213 sigaction(SIGSEGV, &action, NULL);
214 sigaction(SIGILL, &action, NULL);
215 sigaction(SIGBUS, &action, NULL);
216 action.sa_handler = SIG_IGN;
217 sigaction(SIGPIPE, &action, NULL);
218
219 pthread_sigmask(SIG_SETMASK, &action.sa_mask, NULL);
220
221 dispatcher = xpc_dispatch_create();
222 if (!dispatcher)
223 {
224 exit(SS_RC_INITIALIZATION_FAILED);
225 }
226 atexit(dispatcher_cleanup);
227
228 charon->start(charon);
229 fixup_pf_route();
230 return run();
231 }