- introduced autotools
[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 <constants.h>
30 #include <defs.h>
31 #include <log.h>
32
33 #include <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 int byte_count;
65 char buffer[64];
66
67 sock = socket(AF_UNIX, SOCK_STREAM, 0);
68 if (sock < 0)
69 {
70 plog("socket() failed: %s", strerror(errno));
71 return -1;
72 }
73 if (connect(sock, (struct sockaddr *)&ctl_addr,
74 offsetof(struct sockaddr_un, sun_path) + strlen(ctl_addr.sun_path)) < 0)
75 {
76 plog("connect(charon_ctl) failed: %s", strerror(errno));
77 close(sock);
78 return -1;
79 }
80
81 /* send message */
82 if (write(sock, msg, msg->length) != msg->length)
83 {
84 plog("write(charon_ctl) failed: %s", strerror(errno));
85 close(sock);
86 return -1;
87 }
88 while ((byte_count = read(sock, buffer, sizeof(buffer)-1)) > 0)
89 {
90 buffer[byte_count] = '\0';
91 plog("%s", buffer);
92 }
93 if (byte_count < 0)
94 {
95 plog("read() failed: %s", strerror(errno));
96 }
97
98 close(sock);
99 return 0;
100 }
101
102 static char *
103 connection_name(starter_conn_t *conn)
104 {
105 /* if connection name is '%auto', create a new name like conn_xxxxx */
106 static char buf[32];
107
108 if (streq(conn->name, "%auto"))
109 {
110 sprintf(buf, "conn_%ld", conn->id);
111 return buf;
112 }
113 return conn->name;
114 }
115
116
117 int starter_stroke_add_conn(starter_conn_t *conn)
118 {
119 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
120 int res;
121
122 msg->length = sizeof(stroke_msg_t);
123 msg->type = STR_ADD_CONN;
124
125 msg->add_conn.name = push_string(&msg, connection_name(conn));
126
127 msg->add_conn.me.id = push_string(&msg, conn->left.id);
128 msg->add_conn.me.cert = push_string(&msg, conn->left.cert);
129 msg->add_conn.me.address = push_string(&msg, inet_ntoa(conn->left.addr.u.v4.sin_addr));
130 msg->add_conn.me.subnet = push_string(&msg, inet_ntoa(conn->left.subnet.addr.u.v4.sin_addr));
131 msg->add_conn.me.subnet_mask = conn->left.subnet.maskbits;
132
133 msg->add_conn.other.id = push_string(&msg, conn->right.id);
134 msg->add_conn.other.cert = push_string(&msg, conn->right.cert);
135 msg->add_conn.other.address = push_string(&msg, inet_ntoa(conn->right.addr.u.v4.sin_addr));
136 msg->add_conn.other.subnet = push_string(&msg, inet_ntoa(conn->right.subnet.addr.u.v4.sin_addr));
137 msg->add_conn.other.subnet_mask = conn->right.subnet.maskbits;
138
139 res = send_stroke_msg(msg);
140 free(msg);
141 return res;
142 }
143
144 int starter_stroke_del_conn(starter_conn_t *conn)
145 {
146 return 0;
147 }
148 int starter_stroke_route_conn(starter_conn_t *conn)
149 {
150 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
151 int res;
152
153 msg->length = sizeof(stroke_msg_t);
154 msg->type = STR_INSTALL;
155 msg->install.name = push_string(&msg, connection_name(conn));
156 res = send_stroke_msg(msg);
157 free(msg);
158 return res;
159 }
160
161 int starter_stroke_initiate_conn(starter_conn_t *conn)
162 {
163 stroke_msg_t *msg = malloc(sizeof(stroke_msg_t));
164 int res;
165
166 msg->length = sizeof(stroke_msg_t);
167 msg->type = STR_INITIATE;
168 msg->initiate.name = push_string(&msg, connection_name(conn));
169 res = send_stroke_msg(msg);
170 free(msg);
171 return res;
172 }