2 * libwebsockets-test-server - libwebsockets test implementation
4 * Copyright (C) 2010-2015 Andy Green <andy@warmcat.com>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation:
9 * version 2.1 of the License.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
21 #include "test-server.h"
24 * This demo server shows how to use libwebsockets for one or more
25 * websocket protocols in the same server
27 * It defines the following websocket protocols:
29 * dumb-increment-protocol: once the socket is opened, an incrementing
30 * ascii string is sent down it every 50ms.
31 * If you send "reset\n" on the websocket, then
32 * the incrementing number is reset to 0.
34 * lws-mirror-protocol: copies any received packet to every connection also
35 * using this protocol, including the sender
42 PROTOCOL_DUMB_INCREMENT,
50 * We take a strict whitelist approach to stop ../ attacks
58 * this is just an example of parsing handshake headers, you don't need this
59 * in your code unless you will filter allowing connections by the header
63 dump_handshake_info(struct lws *wsi)
67 const unsigned char *c;
70 c = lws_token_to_string(n);
76 len = lws_hdr_total_length(wsi, n);
77 if (!len || len > sizeof(buf) - 1) {
82 lws_hdr_copy(wsi, buf, sizeof buf, n);
83 buf[sizeof(buf) - 1] = '\0';
85 fprintf(stderr, " %s = %s\n", (char *)c, buf);
90 const char * get_mimetype(const char *file)
97 if (!strcmp(&file[n - 4], ".ico"))
98 return "image/x-icon";
100 if (!strcmp(&file[n - 4], ".png"))
103 if (!strcmp(&file[n - 5], ".html"))
109 /* this protocol server (always the first one) handles HTTP,
111 * Some misc callbacks that aren't associated with a protocol also turn up only
112 * here on the first protocol server.
115 int callback_http(struct lws *wsi, enum lws_callback_reasons reason, void *user,
116 void *in, size_t len)
118 struct per_session_data__http *pss =
119 (struct per_session_data__http *)user;
120 static unsigned char buffer[4096];
121 unsigned long amount, file_len;
122 char leaf_path[1024];
123 const char *mimetype;
133 struct lws_pollargs *pa = (struct lws_pollargs *)in;
137 case LWS_CALLBACK_HTTP:
139 dump_handshake_info(wsi);
141 /* dump the individual URI Arg parameters */
143 while (lws_hdr_copy_fragment(wsi, buf, sizeof(buf),
144 WSI_TOKEN_HTTP_URI_ARGS, n) > 0) {
145 lwsl_info("URI Arg %d: %s\n", ++n, buf);
149 lws_return_http_status(wsi,
150 HTTP_STATUS_BAD_REQUEST, NULL);
154 /* this example server has no concept of directories */
155 if (strchr((const char *)in + 1, '/')) {
156 lws_return_http_status(wsi,
157 HTTP_STATUS_FORBIDDEN, NULL);
161 /* if a legal POST URL, let it continue and accept data */
162 if (lws_hdr_total_length(wsi, WSI_TOKEN_POST_URI))
165 /* check for the "send a big file by hand" example case */
167 if (!strcmp((const char *)in, "/leaf.jpg")) {
168 if (strlen(resource_path) > sizeof(leaf_path) - 10)
170 sprintf(leaf_path, "%s/leaf.jpg", resource_path);
172 /* well, let's demonstrate how to send the hard way */
174 p = buffer + LWS_PRE;
175 end = p + sizeof(buffer) - LWS_PRE;
177 pss->fd = lws_plat_file_open(wsi, leaf_path, &file_len,
180 if (pss->fd == LWS_INVALID_FILE)
184 * we will send a big jpeg file, but it could be
185 * anything. Set the Content-Type: appropriately
186 * so the browser knows what to do with it.
188 * Notice we use the APIs to build the header, which
189 * will do the right thing for HTTP 1/1.1 and HTTP2
190 * depending on what connection it happens to be working
193 if (lws_add_http_header_status(wsi, 200, &p, end))
195 if (lws_add_http_header_by_token(wsi, WSI_TOKEN_HTTP_SERVER,
196 (unsigned char *)"libwebsockets",
199 if (lws_add_http_header_by_token(wsi,
200 WSI_TOKEN_HTTP_CONTENT_TYPE,
201 (unsigned char *)"image/jpeg",
204 if (lws_add_http_header_content_length(wsi,
208 if (lws_finalize_http_header(wsi, &p, end))
212 * send the http headers...
213 * this won't block since it's the first payload sent
214 * on the connection since it was established
215 * (too small for partial)
217 * Notice they are sent using LWS_WRITE_HTTP_HEADERS
218 * which also means you can't send body too in one step,
219 * this is mandated by changes in HTTP2
222 n = lws_write(wsi, buffer + LWS_PRE, p - (buffer + LWS_PRE),
223 LWS_WRITE_HTTP_HEADERS);
226 lws_plat_file_close(wsi, pss->fd);
230 * book us a LWS_CALLBACK_HTTP_WRITEABLE callback
232 lws_callback_on_writable(wsi);
236 /* if not, send a file the easy way */
237 strcpy(buf, resource_path);
238 if (strcmp(in, "/")) {
239 if (*((const char *)in) != '/')
241 strncat(buf, in, sizeof(buf) - strlen(resource_path));
242 } else /* default file to serve */
243 strcat(buf, "/test.html");
244 buf[sizeof(buf) - 1] = '\0';
246 /* refuse to serve files we don't understand */
247 mimetype = get_mimetype(buf);
249 lwsl_err("Unknown mimetype for %s\n", buf);
250 lws_return_http_status(wsi,
251 HTTP_STATUS_UNSUPPORTED_MEDIA_TYPE, NULL);
255 /* demonstrates how to set a cookie on / */
257 other_headers = NULL;
259 if (!strcmp((const char *)in, "/") &&
260 !lws_hdr_total_length(wsi, WSI_TOKEN_HTTP_COOKIE)) {
261 /* this isn't very unguessable but it'll do for us */
262 gettimeofday(&tv, NULL);
263 n = sprintf(b64, "test=LWS_%u_%u_COOKIE;Max-Age=360000",
264 (unsigned int)tv.tv_sec,
265 (unsigned int)tv.tv_usec);
267 p = (unsigned char *)leaf_path;
269 if (lws_add_http_header_by_name(wsi,
270 (unsigned char *)"set-cookie:",
271 (unsigned char *)b64, n, &p,
272 (unsigned char *)leaf_path + sizeof(leaf_path)))
274 n = (char *)p - leaf_path;
275 other_headers = leaf_path;
278 n = lws_serve_http_file(wsi, buf, mimetype, other_headers, n);
279 if (n < 0 || ((n > 0) && lws_http_transaction_completed(wsi)))
280 return -1; /* error or can't reuse connection: close the socket */
283 * notice that the sending of the file completes asynchronously,
284 * we'll get a LWS_CALLBACK_HTTP_FILE_COMPLETION callback when
290 case LWS_CALLBACK_HTTP_BODY:
291 strncpy(buf, in, 20);
296 lwsl_notice("LWS_CALLBACK_HTTP_BODY: %s... len %d\n",
297 (const char *)buf, (int)len);
301 case LWS_CALLBACK_HTTP_BODY_COMPLETION:
302 lwsl_notice("LWS_CALLBACK_HTTP_BODY_COMPLETION\n");
303 /* the whole of the sent body arrived, close or reuse the connection */
304 lws_return_http_status(wsi, HTTP_STATUS_OK, NULL);
307 case LWS_CALLBACK_HTTP_FILE_COMPLETION:
310 case LWS_CALLBACK_HTTP_WRITEABLE:
312 * we can send more of whatever it is we were sending
315 /* we'd like the send this much */
316 n = sizeof(buffer) - LWS_PRE;
318 /* but if the peer told us he wants less, we can adapt */
319 m = lws_get_peer_write_allowance(wsi);
321 /* -1 means not using a protocol that has this info */
323 /* right now, peer can't handle anything */
326 if (m != -1 && m < n)
327 /* he couldn't handle that much */
330 n = lws_plat_file_read(wsi, pss->fd,
333 /* problem reading, close conn */
337 /* sent it all, close conn */
341 * To support HTTP2, must take care about preamble space
343 * identification of when we send the last payload frame
344 * is handled by the library itself if you sent a
345 * content-length header
347 m = lws_write(wsi, buffer + LWS_PRE,
350 /* write failed, close conn */
354 * http2 won't do this
357 /* partial write, adjust */
358 if (lws_plat_file_seek_cur(wsi, pss->fd, m - n) ==
362 if (m) /* while still active, extend timeout */
364 PENDING_TIMEOUT_HTTP_CONTENT, 5);
366 /* if we have indigestion, let him clear it
367 * before eating more */
368 if (lws_partial_buffered(wsi))
371 } while (!lws_send_pipe_choked(wsi));
374 lws_callback_on_writable(wsi);
377 /* true if still partial pending */
378 if (lws_partial_buffered(wsi)) {
379 lws_callback_on_writable(wsi);
382 lws_plat_file_close(wsi, pss->fd);
386 lws_plat_file_close(wsi, pss->fd);
390 * callback for confirming to continue with client IP appear in
391 * protocol 0 callback since no websocket protocol has been agreed
392 * yet. You can just ignore this if you won't filter on client IP
393 * since the default uhandled callback return is 0 meaning let the
394 * connection continue.
396 case LWS_CALLBACK_FILTER_NETWORK_CONNECTION:
398 /* if we returned non-zero from here, we kill the connection */
402 * callbacks for managing the external poll() array appear in
403 * protocol 0 callback
406 case LWS_CALLBACK_LOCK_POLL:
408 * lock mutex to protect pollfd state
409 * called before any other POLL related callback
410 * if protecting wsi lifecycle change, len == 1
412 test_server_lock(len);
415 case LWS_CALLBACK_UNLOCK_POLL:
417 * unlock mutex to protect pollfd state when
418 * called after any other POLL related callback
419 * if protecting wsi lifecycle change, len == 1
421 test_server_unlock(len);
425 case LWS_CALLBACK_ADD_POLL_FD:
427 if (count_pollfds >= max_poll_elements) {
428 lwsl_err("LWS_CALLBACK_ADD_POLL_FD: too many sockets to track\n");
432 fd_lookup[pa->fd] = count_pollfds;
433 pollfds[count_pollfds].fd = pa->fd;
434 pollfds[count_pollfds].events = pa->events;
435 pollfds[count_pollfds++].revents = 0;
438 case LWS_CALLBACK_DEL_POLL_FD:
439 if (!--count_pollfds)
441 m = fd_lookup[pa->fd];
442 /* have the last guy take up the vacant slot */
443 pollfds[m] = pollfds[count_pollfds];
444 fd_lookup[pollfds[count_pollfds].fd] = m;
447 case LWS_CALLBACK_CHANGE_MODE_POLL_FD:
448 pollfds[fd_lookup[pa->fd]].events = pa->events;
452 case LWS_CALLBACK_GET_THREAD_ID:
454 * if you will call "lws_callback_on_writable"
455 * from a different thread, return the caller thread ID
456 * here so lws can use this information to work out if it
457 * should signal the poll() loop to exit and restart early
460 /* return pthread_getthreadid_np(); */
470 /* if we're on HTTP1.1 or 2.0, will keep the idle connection alive */
472 if (lws_http_transaction_completed(wsi))