xref: /openbmc/linux/tools/testing/vsock/control.c (revision a5b2c10c)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /* Control socket for client/server test execution
3  *
4  * Copyright (C) 2017 Red Hat, Inc.
5  *
6  * Author: Stefan Hajnoczi <stefanha@redhat.com>
7  */
8 
9 /* The client and server may need to coordinate to avoid race conditions like
10  * the client attempting to connect to a socket that the server is not
11  * listening on yet.  The control socket offers a communications channel for
12  * such coordination tasks.
13  *
14  * If the client calls control_expectln("LISTENING"), then it will block until
15  * the server calls control_writeln("LISTENING").  This provides a simple
16  * mechanism for coordinating between the client and the server.
17  */
18 
19 #include <errno.h>
20 #include <netdb.h>
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <unistd.h>
25 #include <sys/types.h>
26 #include <sys/socket.h>
27 
28 #include "timeout.h"
29 #include "control.h"
30 
31 static int control_fd = -1;
32 
33 /* Open the control socket, either in server or client mode */
34 void control_init(const char *control_host,
35 		  const char *control_port,
36 		  bool server)
37 {
38 	struct addrinfo hints = {
39 		.ai_socktype = SOCK_STREAM,
40 	};
41 	struct addrinfo *result = NULL;
42 	struct addrinfo *ai;
43 	int ret;
44 
45 	ret = getaddrinfo(control_host, control_port, &hints, &result);
46 	if (ret != 0) {
47 		fprintf(stderr, "%s\n", gai_strerror(ret));
48 		exit(EXIT_FAILURE);
49 	}
50 
51 	for (ai = result; ai; ai = ai->ai_next) {
52 		int fd;
53 		int val = 1;
54 
55 		fd = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
56 		if (fd < 0)
57 			continue;
58 
59 		if (!server) {
60 			if (connect(fd, ai->ai_addr, ai->ai_addrlen) < 0)
61 				goto next;
62 			control_fd = fd;
63 			printf("Control socket connected to %s:%s.\n",
64 			       control_host, control_port);
65 			break;
66 		}
67 
68 		if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR,
69 			       &val, sizeof(val)) < 0) {
70 			perror("setsockopt");
71 			exit(EXIT_FAILURE);
72 		}
73 
74 		if (bind(fd, ai->ai_addr, ai->ai_addrlen) < 0)
75 			goto next;
76 		if (listen(fd, 1) < 0)
77 			goto next;
78 
79 		printf("Control socket listening on %s:%s\n",
80 		       control_host, control_port);
81 		fflush(stdout);
82 
83 		control_fd = accept(fd, NULL, 0);
84 		close(fd);
85 
86 		if (control_fd < 0) {
87 			perror("accept");
88 			exit(EXIT_FAILURE);
89 		}
90 		printf("Control socket connection accepted...\n");
91 		break;
92 
93 next:
94 		close(fd);
95 	}
96 
97 	if (control_fd < 0) {
98 		fprintf(stderr, "Control socket initialization failed.  Invalid address %s:%s?\n",
99 			control_host, control_port);
100 		exit(EXIT_FAILURE);
101 	}
102 
103 	freeaddrinfo(result);
104 }
105 
106 /* Free resources */
107 void control_cleanup(void)
108 {
109 	close(control_fd);
110 	control_fd = -1;
111 }
112 
113 /* Write a line to the control socket */
114 void control_writeln(const char *str)
115 {
116 	ssize_t len = strlen(str);
117 	ssize_t ret;
118 
119 	timeout_begin(TIMEOUT);
120 
121 	do {
122 		ret = send(control_fd, str, len, MSG_MORE);
123 		timeout_check("send");
124 	} while (ret < 0 && errno == EINTR);
125 
126 	if (ret != len) {
127 		perror("send");
128 		exit(EXIT_FAILURE);
129 	}
130 
131 	do {
132 		ret = send(control_fd, "\n", 1, 0);
133 		timeout_check("send");
134 	} while (ret < 0 && errno == EINTR);
135 
136 	if (ret != 1) {
137 		perror("send");
138 		exit(EXIT_FAILURE);
139 	}
140 
141 	timeout_end();
142 }
143 
144 /* Return the next line from the control socket (without the trailing newline).
145  *
146  * The program terminates if a timeout occurs.
147  *
148  * The caller must free() the returned string.
149  */
150 char *control_readln(void)
151 {
152 	char *buf = NULL;
153 	size_t idx = 0;
154 	size_t buflen = 0;
155 
156 	timeout_begin(TIMEOUT);
157 
158 	for (;;) {
159 		ssize_t ret;
160 
161 		if (idx >= buflen) {
162 			char *new_buf;
163 
164 			new_buf = realloc(buf, buflen + 80);
165 			if (!new_buf) {
166 				perror("realloc");
167 				exit(EXIT_FAILURE);
168 			}
169 
170 			buf = new_buf;
171 			buflen += 80;
172 		}
173 
174 		do {
175 			ret = recv(control_fd, &buf[idx], 1, 0);
176 			timeout_check("recv");
177 		} while (ret < 0 && errno == EINTR);
178 
179 		if (ret == 0) {
180 			fprintf(stderr, "unexpected EOF on control socket\n");
181 			exit(EXIT_FAILURE);
182 		}
183 
184 		if (ret != 1) {
185 			perror("recv");
186 			exit(EXIT_FAILURE);
187 		}
188 
189 		if (buf[idx] == '\n') {
190 			buf[idx] = '\0';
191 			break;
192 		}
193 
194 		idx++;
195 	}
196 
197 	timeout_end();
198 
199 	return buf;
200 }
201 
202 /* Wait until a given line is received or a timeout occurs */
203 void control_expectln(const char *str)
204 {
205 	char *line;
206 
207 	line = control_readln();
208 
209 	control_cmpln(line, str, true);
210 
211 	free(line);
212 }
213 
214 bool control_cmpln(char *line, const char *str, bool fail)
215 {
216 	if (strcmp(str, line) == 0)
217 		return true;
218 
219 	if (fail) {
220 		fprintf(stderr, "expected \"%s\" on control socket, got \"%s\"\n",
221 			str, line);
222 		exit(EXIT_FAILURE);
223 	}
224 
225 	return false;
226 }
227