- using random SPIs now, but without collision checks
[strongswan.git] / src / starter / starterstroke.c
1 /* Stroke for charon is the counterpart to whack from pluto
2 * Copyright (C) 2006 Martin Willi - Hochschule fuer Technik Rapperswil
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU General Public License as published by the
6 * Free Software Foundation; either version 2 of the License, or (at your
7 * option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
8 *
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * for more details.
13 *
14 * RCSID $Id: starterstroke.c $
15 */
16
17 #include <sys/types.h>
18 #include <sys/socket.h>
19 #include <sys/un.h>
20 #include <linux/stddef.h>
21 #include <unistd.h>
22 #include <stdlib.h>
23 #include <errno.h>
24 #include <netinet/in.h>
25 #include <arpa/inet.h>
26
27 #include <freeswan.h>
28
29 #include "../pluto/constants.h"
30 #include "../pluto/defs.h"
31 #include "../pluto/log.h"
32
33 #include "../charon/stroke/stroke.h"
34
35 #include "starterstroke.h"
36 #include "confread.h"
37 #include "files.h"
38
39 static char* push_string(stroke_msg_t **strm, char *string)
40 {
41 stroke_msg_t *stroke_msg;
42 size_t string_length;
43
44 if (string == NULL)
45 {
46 return NULL;
47 }
48 stroke_msg = *strm;
49 string_length = strlen(string) + 1;
50 stroke_msg->length += string_length;
51
52 stroke_msg = realloc(stroke_msg, stroke_msg->length);
53 strcpy((char*)stroke_msg + stroke_msg->length - string_length, string);
54
55 *strm = stroke_msg;
56 return (char*)(u_int)stroke_msg->length - string_length;
57 }
58
59 static int
60 send_stroke_msg (stroke_msg_t *msg)
61 {
62 struct sockaddr_un ctl_addr = { AF_UNIX, CHARON_CTL_FILE };
63 int sock;
64
65 sock = socket(AF_UNIX, SOCK_STREAM, 0);
66 if (sock < 0)
67 {
68 plog("socket() failed: %s", strerror(errno));
69 return -1;
70 }
71 if (connect(sock, (struct sockaddr *)&ctl_addr,
72 offsetof(struct sockaddr_un, sun_path) + strlen(ctl_addr.sun_path)) < 0)
73 {
74 plog("connect(charon_ctl) failed: %s", strerror(errno));
75 close(sock);
76 return -1;
77 }
78
79 /* send message */
80 if (write(sock, msg, msg->length) != msg->length)
81 {
82 plog("write(charon_ctl) failed: %s", strerror(errno));
83 close(sock);
84 return -1;
85 }
86
87 close(sock);
88 return 0;
89 }
90
91 static char *
92 connection_name(starter_conn_t *conn)
93 {
94 /* if connection name is '%auto', create a new name like conn_xxxxx */
95 static char buf[32];
96
97 if (streq(conn->name, "%auto"))
98 {
99 sprintf(buf, "conn_%ld", conn->id);
100 return buf;
101 }
102 return conn->name;
103 }
104
105
106 int starter_stroke_add_conn(starter_conn_t *conn)
107 {
108 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
109 int res;
110
111 msg->length = sizeof(stroke_msg_t);
112 msg->type = STR_ADD_CONN;
113
114 msg->add_conn.name = push_string(&msg, connection_name(conn));
115
116 msg->add_conn.me.id = push_string(&msg, conn->left.id);
117 msg->add_conn.me.cert = push_string(&msg, conn->left.cert);
118 msg->add_conn.me.address = push_string(&msg, inet_ntoa(conn->left.addr.u.v4.sin_addr));
119 msg->add_conn.me.subnet = push_string(&msg, inet_ntoa(conn->left.subnet.addr.u.v4.sin_addr));
120 msg->add_conn.me.subnet_mask = conn->left.subnet.maskbits;
121
122 msg->add_conn.other.id = push_string(&msg, conn->right.id);
123 msg->add_conn.other.cert = push_string(&msg, conn->right.cert);
124 msg->add_conn.other.address = push_string(&msg, inet_ntoa(conn->right.addr.u.v4.sin_addr));
125 msg->add_conn.other.subnet = push_string(&msg, inet_ntoa(conn->right.subnet.addr.u.v4.sin_addr));
126 msg->add_conn.other.subnet_mask = conn->right.subnet.maskbits;
127
128 res = send_stroke_msg(msg);
129 free(msg);
130 return res;
131 }
132
133 int starter_stroke_del_conn(starter_conn_t *conn)
134 {
135 return 0;
136 }
137 int starter_stroke_route_conn(starter_conn_t *conn)
138 {
139 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
140 int res;
141
142 msg->length = sizeof(stroke_msg_t);
143 msg->type = STR_INSTALL;
144 msg->install.name = push_string(&msg, connection_name(conn));
145 res = send_stroke_msg(msg);
146 free(msg);
147 return res;
148 }
149
150 int starter_stroke_initiate_conn(starter_conn_t *conn)
151 {
152 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
153 int res;
154
155 msg->length = sizeof(stroke_msg_t);
156 msg->type = STR_INITIATE;
157 msg->initiate.name = push_string(&msg, connection_name(conn));
158 res = send_stroke_msg(msg);
159 free(msg);
160 return res;
161 }