test-server/test-client.c

   1 /*
   2  * libwebsockets-test-client - libwebsockets test implementation
   3  *
   4  * Copyright (C) 2011 Andy Green <andy@warmcat.com>
   5  *
   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.
  10  *
  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.
  15  *
  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,
  19  *  MA  02110-1301  USA
  20  */
  21
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <getopt.h>
  25 #include <string.h>
  26 #include <signal.h>
  27
  28 #ifdef _WIN32
  29 #define random rand
  30 #include "gettimeofday.h"
  31 #else
  32 #include <syslog.h>
  33 #include <sys/time.h>
  34 #include <unistd.h>
  35 #endif
  36
  37 #include "../lib/libwebsockets.h"
  38
  39 static int deny_deflate, deny_mux, longlived, mirror_lifetime;
  40 static struct lws *wsi_dumb, *wsi_mirror;
  41 static volatile int force_exit;
  42 static unsigned int opts;
  43
  44 /*
  45  * This demo shows how to connect multiple websockets simultaneously to a
  46  * websocket server (there is no restriction on their having to be the same
  47  * server just it simplifies the demo).
  48  *
  49  *  dumb-increment-protocol:  we connect to the server and print the number
  50  *                              we are given
  51  *
  52  *  lws-mirror-protocol: draws random circles, which are mirrored on to every
  53  *                              client (see them being drawn in every browser
  54  *                              session also using the test server)
  55  */
  56
  57 enum demo_protocols {
  58
  59         PROTOCOL_DUMB_INCREMENT,
  60         PROTOCOL_LWS_MIRROR,
  61
  62         /* always last */
  63         DEMO_PROTOCOL_COUNT
  64 };
  65
  66
  67 /*
  68  * dumb_increment protocol
  69  *
  70  * since this also happens to be protocols[0], some callbacks that are not
  71  * bound to a specific protocol also turn up here.
  72  */
  73
  74 static int
  75 callback_dumb_increment(struct lws *wsi, enum lws_callback_reasons reason,
  76                         void *user, void *in, size_t len)
  77 {
  78         switch (reason) {
  79
  80         case LWS_CALLBACK_CLIENT_ESTABLISHED:
  81                 lwsl_info("dumb: LWS_CALLBACK_CLIENT_ESTABLISHED\n");
  82                 break;
  83
  84         case LWS_CALLBACK_CLOSED:
  85                 lwsl_notice("dumb: LWS_CALLBACK_CLOSED\n");
  86                 wsi_dumb = NULL;
  87                 break;
  88
  89         case LWS_CALLBACK_CLIENT_RECEIVE:
  90                 ((char *)in)[len] = '\0';
  91                 lwsl_info("rx %d '%s'\n", (int)len, (char *)in);
  92                 break;
  93
  94         /* because we are protocols[0] ... */
  95
  96         case LWS_CALLBACK_CLIENT_CONNECTION_ERROR:
  97                 if (wsi == wsi_dumb) {
  98                         lwsl_err("dumb: LWS_CALLBACK_CLIENT_CONNECTION_ERROR\n");
  99                         wsi_dumb = NULL;
 100                 }
 101                 if (wsi == wsi_mirror) {
 102                         lwsl_err("mirror: LWS_CALLBACK_CLIENT_CONNECTION_ERROR\n");
 103                         wsi_mirror = NULL;
 104                 }
 105                 break;
 106
 107         case LWS_CALLBACK_CLIENT_CONFIRM_EXTENSION_SUPPORTED:
 108                 if ((strcmp(in, "deflate-stream") == 0) && deny_deflate) {
 109                         lwsl_notice("denied deflate-stream extension\n");
 110                         return 1;
 111                 }
 112                 if ((strcmp(in, "x-webkit-deflate-frame") == 0))
 113                         return 1;
 114                 if ((strcmp(in, "deflate-frame") == 0))
 115                         return 1;
 116                 break;
 117
 118         default:
 119                 break;
 120         }
 121
 122         return 0;
 123 }
 124
 125
 126 /* lws-mirror_protocol */
 127
 128
 129 static int
 130 callback_lws_mirror(struct lws *wsi, enum lws_callback_reasons reason,
 131                     void *user, void *in, size_t len)
 132 {
 133         unsigned char buf[LWS_PRE + 4096];
 134         unsigned int rands[4];
 135         int l = 0;
 136         int n;
 137
 138         switch (reason) {
 139         case LWS_CALLBACK_CLIENT_ESTABLISHED:
 140
 141                 lwsl_notice("mirror: LWS_CALLBACK_CLIENT_ESTABLISHED\n");
 142
 143                 lws_get_random(lws_get_context(wsi), rands, sizeof(rands[0]));
 144                 mirror_lifetime = 16384 + (rands[0] & 65535);
 145                 /* useful to test single connection stability */
 146                 if (longlived)
 147                         mirror_lifetime += 500000;
 148
 149                 lwsl_info("opened mirror connection with "
 150                           "%d lifetime\n", mirror_lifetime);
 151
 152                 /*
 153                  * mirror_lifetime is decremented each send, when it reaches
 154                  * zero the connection is closed in the send callback.
 155                  * When the close callback comes, wsi_mirror is set to NULL
 156                  * so a new connection will be opened
 157                  *
 158                  * start the ball rolling,
 159                  * LWS_CALLBACK_CLIENT_WRITEABLE will come next service
 160                  */
 161                 lws_callback_on_writable(wsi);
 162                 break;
 163
 164         case LWS_CALLBACK_CLOSED:
 165                 lwsl_notice("mirror: LWS_CALLBACK_CLOSED mirror_lifetime=%d\n", mirror_lifetime);
 166                 wsi_mirror = NULL;
 167                 break;
 168
 169         case LWS_CALLBACK_CLIENT_WRITEABLE:
 170                 for (n = 0; n < 1; n++) {
 171                         lws_get_random(lws_get_context(wsi), rands, sizeof(rands));
 172                         l += sprintf((char *)&buf[LWS_PRE + l],
 173                                         "c #%06X %u %u %u;",
 174                                         rands[0] & 0xffffff,    /* colour */
 175                                         rands[1] & 511,         /* x */
 176                                         rands[2] & 255,         /* y */
 177                                         (rands[3] & 31) + 1);   /* radius */
 178                 }
 179
 180                 n = lws_write(wsi, &buf[LWS_PRE], l,
 181                               opts | LWS_WRITE_TEXT);
 182                 if (n < 0)
 183                         return -1;
 184                 if (n < l) {
 185                         lwsl_err("Partial write LWS_CALLBACK_CLIENT_WRITEABLE\n");
 186                         return -1;
 187                 }
 188
 189                 mirror_lifetime--;
 190                 if (!mirror_lifetime) {
 191                         lwsl_info("closing mirror session\n");
 192                         return -1;
 193                 }
 194                 /* get notified as soon as we can write again */
 195                 lws_callback_on_writable(wsi);
 196                 break;
 197
 198         default:
 199                 break;
 200         }
 201
 202         return 0;
 203 }
 204
 205
 206 /* list of supported protocols and callbacks */
 207
 208 static struct lws_protocols protocols[] = {
 209         {
 210                 "dumb-increment-protocol,fake-nonexistant-protocol",
 211                 callback_dumb_increment,
 212                 0,
 213                 20,
 214         },
 215         {
 216                 "fake-nonexistant-protocol,lws-mirror-protocol",
 217                 callback_lws_mirror,
 218                 0,
 219                 128,
 220         },
 221         { NULL, NULL, 0, 0 } /* end */
 222 };
 223
 224 static const struct lws_extension exts[] = {
 225         {
 226                 "permessage-deflate",
 227                 lws_extension_callback_pm_deflate,
 228                 "permessage-deflate; client_max_window_bits"
 229         },
 230         {
 231                 "deflate-frame",
 232                 lws_extension_callback_pm_deflate,
 233                 "deflate_frame"
 234         },
 235         { NULL, NULL, NULL /* terminator */ }
 236 };
 237
 238
 239
 240 void sighandler(int sig)
 241 {
 242         force_exit = 1;
 243 }
 244
 245 static struct option options[] = {
 246         { "help",       no_argument,            NULL, 'h' },
 247         { "debug",      required_argument,      NULL, 'd' },
 248         { "port",       required_argument,      NULL, 'p' },
 249         { "ssl",        no_argument,            NULL, 's' },
 250         { "version",    required_argument,      NULL, 'v' },
 251         { "undeflated", no_argument,            NULL, 'u' },
 252         { "nomux",      no_argument,            NULL, 'n' },
 253         { "longlived",  no_argument,            NULL, 'l' },
 254         { NULL, 0, 0, 0 }
 255 };
 256
 257 static int ratelimit_connects(unsigned int *last, unsigned int secs)
 258 {
 259         struct timeval tv;
 260
 261         gettimeofday(&tv, NULL);
 262         if (tv.tv_sec - (*last) < secs)
 263                 return 0;
 264
 265         *last = tv.tv_sec;
 266
 267         return 1;
 268 }
 269
 270 int main(int argc, char **argv)
 271 {
 272         int n = 0, ret = 0, port = 7681, use_ssl = 0, ietf_version = -1;
 273         unsigned int rl_dumb = 0, rl_mirror = 0;
 274         struct lws_context_creation_info info;
 275         struct lws_client_connect_info i;
 276         struct lws_context *context;
 277         const char *prot;
 278
 279         memset(&info, 0, sizeof info);
 280
 281         fprintf(stderr, "libwebsockets test client\n"
 282                         "(C) Copyright 2010-2015 Andy Green <andy@warmcat.com> "
 283                         "licensed under LGPL2.1\n");
 284
 285         if (argc < 2)
 286                 goto usage;
 287
 288         while (n >= 0) {
 289                 n = getopt_long(argc, argv, "nuv:hsp:d:l", options, NULL);
 290                 if (n < 0)
 291                         continue;
 292                 switch (n) {
 293                 case 'd':
 294                         lws_set_log_level(atoi(optarg), NULL);
 295                         break;
 296                 case 's':
 297                         use_ssl = 2; /* 2 = allow selfsigned */
 298                         break;
 299                 case 'p':
 300                         port = atoi(optarg);
 301                         break;
 302                 case 'l':
 303                         longlived = 1;
 304                         break;
 305                 case 'v':
 306                         ietf_version = atoi(optarg);
 307                         break;
 308                 case 'u':
 309                         deny_deflate = 1;
 310                         break;
 311                 case 'n':
 312                         deny_mux = 1;
 313                         break;
 314                 case 'h':
 315                         goto usage;
 316                 }
 317         }
 318
 319         if (optind >= argc)
 320                 goto usage;
 321
 322         signal(SIGINT, sighandler);
 323
 324         memset(&i, 0, sizeof(i));
 325
 326         i.port = port;
 327         if (lws_parse_uri(argv[optind], &prot, &i.address, &i.port, &i.path))
 328                 goto usage;
 329
 330         if (!strcmp(prot, "http://") || !strcmp(prot, "ws://"))
 331                 use_ssl = 0;
 332         if (!strcmp(prot, "https://") || !strcmp(prot, "wss://"))
 333                 use_ssl = 1;
 334
 335         /*
 336          * create the websockets context.  This tracks open connections and
 337          * knows how to route any traffic and which protocol version to use,
 338          * and if each connection is client or server side.
 339          *
 340          * For this client-only demo, we tell it to not listen on any port.
 341          */
 342
 343         info.port = CONTEXT_PORT_NO_LISTEN;
 344         info.protocols = protocols;
 345         info.gid = -1;
 346         info.uid = -1;
 347
 348         context = lws_create_context(&info);
 349         if (context == NULL) {
 350                 fprintf(stderr, "Creating libwebsocket context failed\n");
 351                 return 1;
 352         }
 353
 354         i.context = context;
 355         i.ssl_connection = use_ssl;
 356         i.host = i.address;
 357         i.origin = i.address;
 358         i.ietf_version_or_minus_one = ietf_version;
 359         i.client_exts = exts;
 360         /*
 361          * sit there servicing the websocket context to handle incoming
 362          * packets, and drawing random circles on the mirror protocol websocket
 363          *
 364          * nothing happens until the client websocket connection is
 365          * asynchronously established... calling lws_client_connect() only
 366          * instantiates the connection logically, lws_service() progresses it
 367          * asynchronously.
 368          */
 369
 370         while (!force_exit) {
 371
 372                 if (!wsi_dumb && ratelimit_connects(&rl_dumb, 2u)) {
 373                         lwsl_notice("dumb: connecting\n");
 374                         i.protocol = protocols[PROTOCOL_DUMB_INCREMENT].name;
 375                         wsi_dumb = lws_client_connect_via_info(&i);
 376                 }
 377
 378                 if (!wsi_mirror && ratelimit_connects(&rl_mirror, 2u)) {
 379                         lwsl_notice("mirror: connecting\n");
 380                         i.protocol = protocols[PROTOCOL_LWS_MIRROR].name;
 381                         wsi_mirror = lws_client_connect_via_info(&i);
 382                 }
 383
 384                 lws_service(context, 500);
 385         }
 386
 387         lwsl_err("Exiting\n");
 388         lws_context_destroy(context);
 389
 390         return ret;
 391
 392 usage:
 393         fprintf(stderr, "Usage: libwebsockets-test-client "
 394                                 "<server address> [--port=<p>] "
 395                                 "[--ssl] [-k] [-v <ver>] "
 396                                 "[-d <log bitfield>] [-l]\n");
 397         return 1;
 398 }