2 ** Copyright (C) 2006 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
3 ** Copyright (C) 2009 Thadeu Lima de Souza Cascardo <cascardo@holoscopio.com>
5 ** This program is free software; you can redistribute it and/or modify
6 ** it under the terms of the GNU General Public License as published by
7 ** the Free Software Foundation; either version 2 of the License, or
8 ** (at your option) any later version.
10 ** This program is distributed in the hope that it will be useful,
11 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
12 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 ** GNU General Public License for more details.
15 ** You should have received a copy of the GNU General Public License
16 ** along with this program; if not, write to the Free Software
17 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25 #include <gnutls/gnutls.h>
26 #include <netinet/in.h>
27 #include <arpa/inet.h>
33 #include "hcconn_ssl.h"
34 #include "tcp_connect.h"
38 #define CONFFILE SYSCONFDIR "/popproxy.conf"
49 server_conn_new (char *server, char *port, int ssl)
55 fd = hc_tcp_connect (server, port);
58 g_warning ("Could not connect to server at %s:%s.", server, port);
61 conn = hc_conn_new (NULL, NULL);
62 r = hc_conn_set_driver_channel (conn, fd);
71 ssl_conn = hc_conn_new (NULL, NULL);
72 r = hc_conn_set_driver_ssl_client (ssl_conn, conn);
75 hc_conn_close (ssl_conn);
83 client_conn_new (int fd, struct pop_address *address)
89 conn = hc_conn_new (NULL, NULL);
90 r = hc_conn_set_driver_channel (conn, fd);
98 ssl_conn = hc_conn_new (NULL, NULL);
99 hc_conn_set_driver_ssl_server (ssl_conn, conn);
100 if (address && address->priority)
101 hc_conn_ssl_server_set_priority (ssl_conn, address->priority);
105 hc_conn_close (ssl_conn);
106 hc_conn_close (conn);
109 pop_conn = hc_conn_new (NULL, NULL);
110 r = hc_conn_set_driver_pop (pop_conn, ssl_conn);
113 hc_conn_close (pop_conn);
114 hc_conn_close (ssl_conn);
121 push_other (HCConn *conn, HCEvent event, gpointer data)
128 while ((r = hc_conn_read (conn, buffer, sizeof (buffer))) > 0)
129 hc_conn_write (data, buffer, r);
132 hc_conn_close (conn);
133 hc_conn_close (data);
139 ssl_connected (HCConn *client_conn, HCEvent event, gpointer data)
141 struct pop_address *address = data;
143 if (event != HC_EVENT_CONNECT)
145 g_debug ("Did not get connect event when trying to handshake:"
147 hc_conn_close (client_conn);
150 server_conn = server_conn_new (address->server, address->port,
152 if (server_conn == NULL)
154 g_debug ("Failure to create connection to server.");
155 hc_conn_close (client_conn);
158 hc_conn_set_callback (client_conn, push_other, server_conn);
159 hc_conn_set_callback (server_conn, push_other, client_conn);
163 new_client (int fd, struct sockaddr *addr, socklen_t saddr, gpointer data)
166 struct pop_address *address = data;
169 g_critical ("Server has received an error event.");
173 /* FIXME: Should be independent of address type. */
174 g_message ("Received connection from %s.",
175 inet_ntoa (((struct sockaddr_in *) addr)->sin_addr));
177 client_conn = client_conn_new (fd, address);
178 if (client_conn == NULL)
183 hc_conn_set_callback (client_conn, ssl_connected, address);
187 static gchar *configfile;
188 static gboolean foreground;
190 static GOptionEntry opt_entries[] =
192 { "config-file", 'c', 0, G_OPTION_ARG_FILENAME, &configfile,
193 "Configuration file location", "file" },
194 { "foreground", 'f', 0, G_OPTION_ARG_NONE, &foreground,
195 "Run in foreground", 0 },
199 int main (int argc, char **argv)
202 GOptionContext *opt_ctx;
208 gchar *server_address;
211 gchar *server_priority;
215 struct pop_address pop_address;
217 signal (SIGPIPE, SIG_IGN);
219 gnutls_global_init ();
221 configfile = CONFFILE;
222 opt_ctx = g_option_context_new ("");
223 g_option_context_add_main_entries (opt_ctx, opt_entries, NULL);
226 if (!g_option_context_parse (opt_ctx, &argc, &argv, &error))
228 g_critical ("Could not parse command line options: %s.",
230 g_error_free (error);
233 g_option_context_free (opt_ctx);
235 keyfile = g_key_file_new ();
238 if (g_key_file_load_from_file (keyfile, configfile,
239 G_KEY_FILE_NONE, &error) == FALSE)
241 g_critical ("Could not load configuration file %s: %s.",
242 configfile, error->message);
243 g_error_free (error);
248 certfile = g_key_file_get_string (keyfile, "global", "certfile",
250 if (certfile == NULL && error != NULL)
252 g_critical ("No certification file specified: %s.",
254 g_error_free (error);
258 ssl_keyfile = g_key_file_get_string (keyfile, "global", "keyfile",
260 if (ssl_keyfile == NULL && error != NULL)
262 ssl_keyfile = g_strdup (certfile);
263 g_error_free (error);
268 conf_address = g_key_file_get_string (keyfile, "global", "address",
270 if (conf_address == NULL && error != NULL)
272 conf_address = g_strdup ("0.0.0.0");
273 g_error_free (error);
276 port = g_key_file_get_string (keyfile, "global", "port", &error);
277 if (port == NULL && error != NULL)
279 port = g_strdup ("110");
280 g_error_free (error);
283 server_address = g_key_file_get_string (keyfile, "global", "server",
285 if (server_address == NULL && error != NULL)
287 server_address = g_strdup ("127.0.0.1");
288 g_error_free (error);
291 server_port = g_key_file_get_string (keyfile, "global", "server_port",
293 if (server_port == NULL && error != NULL)
295 server_port = g_strdup ("995");
296 g_error_free (error);
299 server_ssl = g_key_file_get_boolean (keyfile, "global", "server_ssl",
301 if (server_ssl == 0 && error != NULL)
304 g_error_free (error);
307 server_priority = g_key_file_get_string (keyfile, "global", "priority",
309 if (server_priority == NULL && error != NULL)
311 server_priority = g_strdup ("NORMAL");
312 g_error_free (error);
316 policy = g_key_file_get_string (keyfile, "global", "policy",
318 if (policy == NULL && error != NULL)
320 policy = g_strdup ("deny");
321 g_error_free (error);
324 if (!strcmp (policy, "allow"))
325 ACCESS_DEFAULT = ACCESS_ALLOW;
329 pop_address.server = server_address;
330 pop_address.port = server_port;
331 pop_address.ssl = server_ssl;
332 pop_address.priority = server_priority;
334 server_fd = hc_tcp_server (port);
337 g_critical ("Could not create server.");
340 hc_server_add_watch (server_fd, new_client, &pop_address);
344 g_message ("Listening at %s:%s.", conf_address, port);
345 if (ACCESS_DEFAULT == ACCESS_ALLOW)
346 g_message ("Authorizing users by default.");
351 g_free (conf_address);
354 hc_conn_ssl_server_init_credentials (certfile, ssl_keyfile);
357 g_free (ssl_keyfile);
359 g_main_loop_run (g_main_loop_new (g_main_context_default (), TRUE));
361 gnutls_global_deinit ();
363 g_free (server_address);
364 g_free (server_port);