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_context *context,
  76                         struct lws *wsi,
  77                         enum lws_callback_reasons reason,
  78                         void *user, void *in, size_t len)
  79 {
  80         switch (reason) {
  81
  82         case LWS_CALLBACK_CLIENT_ESTABLISHED:
  83                 lwsl_info("dumb: LWS_CALLBACK_CLIENT_ESTABLISHED\n");
  84                 break;
  85
  86         case LWS_CALLBACK_CLOSED:
  87                 lwsl_notice("dumb: LWS_CALLBACK_CLOSED\n");
  88                 wsi_dumb = NULL;
  89                 break;
  90
  91         case LWS_CALLBACK_CLIENT_RECEIVE:
  92                 ((char *)in)[len] = '\0';
  93                 lwsl_info("rx %d '%s'\n", (int)len, (char *)in);
  94                 break;
  95
  96         /* because we are protocols[0] ... */
  97
  98         case LWS_CALLBACK_CLIENT_CONNECTION_ERROR:
  99                 if (wsi == wsi_dumb) {
 100                         lwsl_err("dumb: LWS_CALLBACK_CLIENT_CONNECTION_ERROR\n");
 101                         wsi_dumb = NULL;
 102                 }
 103                 if (wsi == wsi_mirror) {
 104                         lwsl_err("mirror: LWS_CALLBACK_CLIENT_CONNECTION_ERROR\n");
 105                         wsi_mirror = NULL;
 106                 }
 107                 break;
 108
 109         case LWS_CALLBACK_CLIENT_CONFIRM_EXTENSION_SUPPORTED:
 110                 if ((strcmp(in, "deflate-stream") == 0) && deny_deflate) {
 111                         lwsl_notice("denied deflate-stream extension\n");
 112                         return 1;
 113                 }
 114                 if ((strcmp(in, "deflate-frame") == 0) && deny_deflate) {
 115                         lwsl_notice("denied deflate-frame extension\n");
 116                         return 1;
 117                 }
 118                 if ((strcmp(in, "x-google-mux") == 0) && deny_mux) {
 119                         lwsl_notice("denied x-google-mux extension\n");
 120                         return 1;
 121                 }
 122                 break;
 123
 124         default:
 125                 break;
 126         }
 127
 128         return 0;
 129 }
 130
 131
 132 /* lws-mirror_protocol */
 133
 134
 135 static int
 136 callback_lws_mirror(struct lws_context *context,
 137                     struct lws *wsi,
 138                     enum lws_callback_reasons reason,
 139                     void *user, void *in, size_t len)
 140 {
 141         unsigned char buf[LWS_SEND_BUFFER_PRE_PADDING + 4096 +
 142                           LWS_SEND_BUFFER_POST_PADDING];
 143         unsigned int rands[4];
 144         int l = 0;
 145         int n;
 146
 147         switch (reason) {
 148         case LWS_CALLBACK_CLIENT_ESTABLISHED:
 149
 150                 lwsl_notice("mirror: LWS_CALLBACK_CLIENT_ESTABLISHED\n");
 151
 152                 lws_get_random(context, rands, sizeof(rands[0]));
 153                 mirror_lifetime = 16384 + (rands[0] & 65535);
 154                 /* useful to test single connection stability */
 155                 if (longlived)
 156                         mirror_lifetime += 500000;
 157
 158                 lwsl_info("opened mirror connection with "
 159                           "%d lifetime\n", mirror_lifetime);
 160
 161                 /*
 162                  * mirror_lifetime is decremented each send, when it reaches
 163                  * zero the connection is closed in the send callback.
 164                  * When the close callback comes, wsi_mirror is set to NULL
 165                  * so a new connection will be opened
 166                  *
 167                  * start the ball rolling,
 168                  * LWS_CALLBACK_CLIENT_WRITEABLE will come next service
 169                  */
 170                 lws_callback_on_writable(context, wsi);
 171                 break;
 172
 173         case LWS_CALLBACK_CLOSED:
 174                 lwsl_notice("mirror: LWS_CALLBACK_CLOSED mirror_lifetime=%d\n", mirror_lifetime);
 175                 wsi_mirror = NULL;
 176                 break;
 177
 178         case LWS_CALLBACK_CLIENT_WRITEABLE:
 179                 for (n = 0; n < 1; n++) {
 180                         lws_get_random(context, rands, sizeof(rands));
 181                         l += sprintf((char *)&buf[LWS_SEND_BUFFER_PRE_PADDING + l],
 182                                         "c #%06X %d %d %d;",
 183                                         (int)rands[0] & 0xffffff,
 184                                         (int)rands[1] % 500,
 185                                         (int)rands[2] % 250,
 186                                         (int)rands[3] % 24);
 187                 }
 188
 189                 n = lws_write(wsi, &buf[LWS_SEND_BUFFER_PRE_PADDING], l,
 190                               opts | LWS_WRITE_TEXT);
 191                 if (n < 0)
 192                         return -1;
 193                 if (n < l) {
 194                         lwsl_err("Partial write LWS_CALLBACK_CLIENT_WRITEABLE\n");
 195                         return -1;
 196                 }
 197
 198                 mirror_lifetime--;
 199                 if (!mirror_lifetime) {
 200                         lwsl_info("closing mirror session\n");
 201                         return -1;
 202                 }
 203                 /* get notified as soon as we can write again */
 204                 lws_callback_on_writable(context, wsi);
 205                 break;
 206
 207         default:
 208                 break;
 209         }
 210
 211         return 0;
 212 }
 213
 214
 215 /* list of supported protocols and callbacks */
 216
 217 static struct lws_protocols protocols[] = {
 218         {
 219                 "dumb-increment-protocol,fake-nonexistant-protocol",
 220                 callback_dumb_increment,
 221                 0,
 222                 20,
 223         },
 224         {
 225                 "fake-nonexistant-protocol,lws-mirror-protocol",
 226                 callback_lws_mirror,
 227                 0,
 228                 128,
 229         },
 230         { NULL, NULL, 0, 0 } /* end */
 231 };
 232
 233 void sighandler(int sig)
 234 {
 235         force_exit = 1;
 236 }
 237
 238 static struct option options[] = {
 239         { "help",       no_argument,            NULL, 'h' },
 240         { "debug",      required_argument,      NULL, 'd' },
 241         { "port",       required_argument,      NULL, 'p' },
 242         { "ssl",        no_argument,            NULL, 's' },
 243         { "version",    required_argument,      NULL, 'v' },
 244         { "undeflated", no_argument,            NULL, 'u' },
 245         { "nomux",      no_argument,            NULL, 'n' },
 246         { "longlived",  no_argument,            NULL, 'l' },
 247         { NULL, 0, 0, 0 }
 248 };
 249
 250 static int ratelimit_connects(unsigned int *last, int secs)
 251 {
 252         struct timeval tv;
 253
 254         gettimeofday(&tv, NULL);
 255         if (tv.tv_sec - (*last) < secs)
 256                 return 0;
 257
 258         *last = tv.tv_sec;
 259
 260         return 1;
 261 }
 262
 263 int main(int argc, char **argv)
 264 {
 265         int n = 0, ret = 0, port = 7681, use_ssl = 0;
 266         unsigned int rl_dumb = 0, rl_mirror = 0;
 267         struct lws_context_creation_info info;
 268         struct lws_context *context;
 269         int ietf_version = -1; /* latest */
 270         const char *address;
 271
 272         memset(&info, 0, sizeof info);
 273
 274         fprintf(stderr, "libwebsockets test client\n"
 275                         "(C) Copyright 2010-2015 Andy Green <andy@warmcat.com> "
 276                         "licensed under LGPL2.1\n");
 277
 278         if (argc < 2)
 279                 goto usage;
 280
 281         while (n >= 0) {
 282                 n = getopt_long(argc, argv, "nuv:hsp:d:l", options, NULL);
 283                 if (n < 0)
 284                         continue;
 285                 switch (n) {
 286                 case 'd':
 287                         lws_set_log_level(atoi(optarg), NULL);
 288                         break;
 289                 case 's':
 290                         use_ssl = 2; /* 2 = allow selfsigned */
 291                         break;
 292                 case 'p':
 293                         port = atoi(optarg);
 294                         break;
 295                 case 'l':
 296                         longlived = 1;
 297                         break;
 298                 case 'v':
 299                         ietf_version = atoi(optarg);
 300                         break;
 301                 case 'u':
 302                         deny_deflate = 1;
 303                         break;
 304                 case 'n':
 305                         deny_mux = 1;
 306                         break;
 307                 case 'h':
 308                         goto usage;
 309                 }
 310         }
 311
 312         if (optind >= argc)
 313                 goto usage;
 314
 315         signal(SIGINT, sighandler);
 316
 317         address = argv[optind];
 318
 319         /*
 320          * create the websockets context.  This tracks open connections and
 321          * knows how to route any traffic and which protocol version to use,
 322          * and if each connection is client or server side.
 323          *
 324          * For this client-only demo, we tell it to not listen on any port.
 325          */
 326
 327         info.port = CONTEXT_PORT_NO_LISTEN;
 328         info.protocols = protocols;
 329 #ifndef LWS_NO_EXTENSIONS
 330         info.extensions = lws_get_internal_extensions();
 331 #endif
 332         info.gid = -1;
 333         info.uid = -1;
 334
 335         context = lws_create_context(&info);
 336         if (context == NULL) {
 337                 fprintf(stderr, "Creating libwebsocket context failed\n");
 338                 return 1;
 339         }
 340
 341         /*
 342          * sit there servicing the websocket context to handle incoming
 343          * packets, and drawing random circles on the mirror protocol websocket
 344          *
 345          * nothing happens until the client websocket connection is
 346          * asynchronously established... calling lws_client_connect() only
 347          * instantiates the connection logically, lws_service() progresses it
 348          * asynchronously.
 349          */
 350
 351         while (!force_exit) {
 352
 353                 if (!wsi_dumb && ratelimit_connects(&rl_dumb, 2)) {
 354                         lwsl_notice("dumb: connecting\n");
 355                         wsi_dumb = lws_client_connect(context, address, port,
 356                                 use_ssl, "/", argv[optind], argv[optind],
 357                                 protocols[PROTOCOL_DUMB_INCREMENT].name,
 358                                 ietf_version);
 359                 }
 360
 361                 if (!wsi_mirror && ratelimit_connects(&rl_mirror, 2)) {
 362                         lwsl_notice("mirror: connecting\n");
 363                         wsi_mirror = lws_client_connect(context,
 364                                 address, port, use_ssl,  "/",
 365                                 argv[optind], argv[optind],
 366                                 protocols[PROTOCOL_LWS_MIRROR].name,
 367                                 ietf_version);
 368                 }
 369
 370                 lws_service(context, 500);
 371         }
 372
 373         lwsl_err("Exiting\n");
 374         lws_context_destroy(context);
 375
 376         return ret;
 377
 378 usage:
 379         fprintf(stderr, "Usage: libwebsockets-test-client "
 380                                 "<server address> [--port=<p>] "
 381                                 "[--ssl] [-k] [-v <ver>] "
 382                                 "[-d <log bitfield>] [-l]\n");
 383         return 1;
 384 }