proxy.cpp 26.3 KB
Newer Older
Pieter Hintjens's avatar
Pieter Hintjens committed
1
/*
2
    Copyright (c) 2007-2016 Contributors as noted in the AUTHORS file
Pieter Hintjens's avatar
Pieter Hintjens committed
3

4
    This file is part of libzmq, the ZeroMQ core engine in C++.
Pieter Hintjens's avatar
Pieter Hintjens committed
5

6 7 8
    libzmq is free software; you can redistribute it and/or modify it under
    the terms of the GNU Lesser General Public License (LGPL) as published
    by the Free Software Foundation; either version 3 of the License, or
Pieter Hintjens's avatar
Pieter Hintjens committed
9 10
    (at your option) any later version.

11 12 13 14 15 16 17 18 19 20 21 22 23 24
    As a special exception, the Contributors give you permission to link
    this library with independent modules to produce an executable,
    regardless of the license terms of these independent modules, and to
    copy and distribute the resulting executable under terms of your choice,
    provided that you also meet, for each linked independent module, the
    terms and conditions of the license of that module. An independent
    module is a module which is not derived from or based on this library.
    If you modify this library, you must extend this exception to your
    version of the library.

    libzmq is distributed in the hope that it will be useful, but WITHOUT
    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
    FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
    License for more details.
Pieter Hintjens's avatar
Pieter Hintjens committed
25 26 27 28 29

    You should have received a copy of the GNU Lesser General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

30
#include "precompiled.hpp"
31

Pieter Hintjens's avatar
Pieter Hintjens committed
32
#include <stddef.h>
33
#include "poller.hpp"
34
#include "proxy.hpp"
Pieter Hintjens's avatar
Pieter Hintjens committed
35
#include "likely.hpp"
36
#include "msg.hpp"
Pieter Hintjens's avatar
Pieter Hintjens committed
37

38 39
#if defined ZMQ_POLL_BASED_ON_POLL && !defined ZMQ_HAVE_WINDOWS                \
  && !defined ZMQ_HAVE_AIX
Pieter Hintjens's avatar
Pieter Hintjens committed
40 41 42
#include <poll.h>
#endif

43 44 45 46 47
// These headers end up pulling in zmq.h somewhere in their include
// dependency chain
#include "socket_base.hpp"
#include "err.hpp"

48 49 50 51 52 53 54
#ifdef ZMQ_HAVE_POLLER

#include "socket_poller.hpp"

//  Macros for repetitive code.

//  PROXY_CLEANUP() must not be used before these variables are initialized.
55 56 57 58 59 60 61 62 63 64
#define PROXY_CLEANUP()                                                        \
    do {                                                                       \
        delete poller_all;                                                     \
        delete poller_in;                                                      \
        delete poller_control;                                                 \
        delete poller_receive_blocked;                                         \
        delete poller_send_blocked;                                            \
        delete poller_both_blocked;                                            \
        delete poller_frontend_only;                                           \
        delete poller_backend_only;                                            \
65
    } while (false)
66 67


68 69 70 71 72 73
#define CHECK_RC_EXIT_ON_FAILURE()                                             \
    do {                                                                       \
        if (rc < 0) {                                                          \
            PROXY_CLEANUP ();                                                  \
            return close_and_return (&msg, -1);                                \
        }                                                                      \
74
    } while (false)
75 76 77

#endif //  ZMQ_HAVE_POLLER

78 79 80 81 82 83 84 85 86 87 88 89 90 91

// Control socket messages

typedef struct
{
    uint64_t msg_in;
    uint64_t bytes_in;
    uint64_t msg_out;
    uint64_t bytes_out;
} zmq_socket_stats_t;


// Utility functions

92
int capture (class zmq::socket_base_t *capture_,
93
             zmq::msg_t *msg_,
94
             int more_ = 0)
95 96 97 98 99 100 101
{
    //  Copy message to capture socket if any
    if (capture_) {
        zmq::msg_t ctrl;
        int rc = ctrl.init ();
        if (unlikely (rc < 0))
            return -1;
102
        rc = ctrl.copy (*msg_);
103 104
        if (unlikely (rc < 0))
            return -1;
105
        rc = capture_->send (&ctrl, more_ ? ZMQ_SNDMORE : 0);
106 107 108 109 110 111
        if (unlikely (rc < 0))
            return -1;
    }
    return 0;
}

112
int forward (class zmq::socket_base_t *from_,
113
             zmq_socket_stats_t *from_stats_,
114
             class zmq::socket_base_t *to_,
115
             zmq_socket_stats_t *to_stats_,
116
             class zmq::socket_base_t *capture_,
117
             zmq::msg_t *msg_)
118
{
119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
    // Forward a burst of messages
    for (unsigned int i = 0; i < zmq::proxy_burst_size; i++) {
        int more;
        size_t moresz;
        size_t complete_msg_size = 0;

        // Forward all the parts of one message
        while (true) {
            int rc = from_->recv (msg_, ZMQ_DONTWAIT);
            if (rc < 0) {
                if (likely (errno == EAGAIN && i > 0))
                    return 0; // End of burst
                else
                    return -1;
            }

            complete_msg_size += msg_->size ();

            moresz = sizeof more;
            rc = from_->getsockopt (ZMQ_RCVMORE, &more, &moresz);
            if (unlikely (rc < 0))
                return -1;

            //  Copy message to capture socket if any
            rc = capture (capture_, msg_, more);
            if (unlikely (rc < 0))
                return -1;

            rc = to_->send (msg_, more ? ZMQ_SNDMORE : 0);
            if (unlikely (rc < 0))
                return -1;

            if (more == 0)
                break;
        }

        // A multipart message counts as 1 packet:
        from_stats_->msg_in++;
        from_stats_->bytes_in += complete_msg_size;
        to_stats_->msg_out++;
        to_stats_->bytes_out += complete_msg_size;
160
    }
161 162 163 164

    return 0;
}

165
static int loop_and_send_multipart_stat (zmq::socket_base_t *control_,
166 167 168
                                         uint64_t stat_,
                                         bool first_,
                                         bool more_)
169 170 171 172 173 174
{
    int rc;
    zmq::msg_t msg;

    //  VSM of 8 bytes can't fail to init
    msg.init_size (sizeof (uint64_t));
175
    memcpy (msg.data (), &stat_, sizeof (uint64_t));
176

177
    //  if the first message is handed to the pipe successfully then the HWM
178 179 180
    //  is not full, which means failures are due to interrupts (on Windows pipes
    //  are TCP sockets), so keep retrying
    do {
181 182
        rc = control_->send (&msg, more_ ? ZMQ_SNDMORE : 0);
    } while (!first_ && rc != 0 && errno == EAGAIN);
183 184 185 186

    return rc;
}

187
int reply_stats (class zmq::socket_base_t *control_,
188 189
                 zmq_socket_stats_t *frontend_stats_,
                 zmq_socket_stats_t *backend_stats_)
190
{
191
    // first part: frontend stats - the first send might fail due to HWM
192
    if (loop_and_send_multipart_stat (control_, frontend_stats_->msg_in, true,
193 194
                                      true)
        != 0)
195
        return -1;
196

197
    loop_and_send_multipart_stat (control_, frontend_stats_->bytes_in, false,
198
                                  true);
199
    loop_and_send_multipart_stat (control_, frontend_stats_->msg_out, false,
200
                                  true);
201
    loop_and_send_multipart_stat (control_, frontend_stats_->bytes_out, false,
202
                                  true);
203 204

    // second part: backend stats
205
    loop_and_send_multipart_stat (control_, backend_stats_->msg_in, false,
206
                                  true);
207
    loop_and_send_multipart_stat (control_, backend_stats_->bytes_in, false,
208
                                  true);
209 210 211
    loop_and_send_multipart_stat (control_, backend_stats_->msg_out, false,
                                  true);
    loop_and_send_multipart_stat (control_, backend_stats_->bytes_out, false,
212
                                  false);
213

214 215
    return 0;
}
Pieter Hintjens's avatar
Pieter Hintjens committed
216

217

218 219
#ifdef ZMQ_HAVE_POLLER

220 221 222 223
int zmq::proxy (class socket_base_t *frontend_,
                class socket_base_t *backend_,
                class socket_base_t *capture_,
                class socket_base_t *control_)
224 225 226 227 228 229 230 231 232 233 234 235 236
{
    msg_t msg;
    int rc = msg.init ();
    if (rc != 0)
        return -1;

    //  The algorithm below assumes ratio of requests and replies processed
    //  under full load to be 1:1.

    int more;
    size_t moresz = sizeof (more);

    //  Proxy can be in these three states
237 238
    enum
    {
239 240 241 242 243 244 245 246 247 248 249
        active,
        paused,
        terminated
    } state = active;

    bool frontend_equal_to_backend;
    bool frontend_in = false;
    bool frontend_out = false;
    bool backend_in = false;
    bool backend_out = false;
    bool control_in = false;
250
    zmq::socket_poller_t::event_t events[3];
251 252
    zmq_socket_stats_t frontend_stats;
    zmq_socket_stats_t backend_stats;
253 254
    memset (&frontend_stats, 0, sizeof (frontend_stats));
    memset (&backend_stats, 0, sizeof (backend_stats));
255 256 257 258

    //  Don't allocate these pollers from stack because they will take more than 900 kB of stack!
    //  On Windows this blows up default stack of 1 MB and aborts the program.
    //  I wanted to use std::shared_ptr here as the best solution but that requires C++11...
259 260 261 262 263 264 265 266
    zmq::socket_poller_t *poller_all =
      new (std::nothrow) zmq::socket_poller_t; //  Poll for everything.
    zmq::socket_poller_t *poller_in = new (std::nothrow) zmq::
      socket_poller_t; //  Poll only 'ZMQ_POLLIN' on all sockets. Initial blocking poll in loop.
    zmq::socket_poller_t *poller_control = new (std::nothrow) zmq::
      socket_poller_t; //  Poll only for 'ZMQ_POLLIN' on 'control_', when proxy is paused.
    zmq::socket_poller_t *poller_receive_blocked = new (std::nothrow)
      zmq::socket_poller_t; //  All except 'ZMQ_POLLIN' on 'frontend_'.
267 268 269

    //  If frontend_==backend_ 'poller_send_blocked' and 'poller_receive_blocked' are the same, 'ZMQ_POLLIN' is ignored.
    //  In that case 'poller_send_blocked' is not used. We need only 'poller_receive_blocked'.
270
    //  We also don't need 'poller_both_blocked', 'poller_backend_only' nor 'poller_frontend_only' no need to initialize it.
271
    //  We save some RAM and time for initialization.
272 273 274 275 276 277 278 279
    zmq::socket_poller_t *poller_send_blocked =
      NULL; //  All except 'ZMQ_POLLIN' on 'backend_'.
    zmq::socket_poller_t *poller_both_blocked =
      NULL; //  All except 'ZMQ_POLLIN' on both 'frontend_' and 'backend_'.
    zmq::socket_poller_t *poller_frontend_only =
      NULL; //  Only 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' on 'frontend_'.
    zmq::socket_poller_t *poller_backend_only =
      NULL; //  Only 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' on 'backend_'.
280 281

    if (frontend_ != backend_) {
282 283 284 285 286 287 288 289
        poller_send_blocked = new (std::nothrow)
          zmq::socket_poller_t; //  All except 'ZMQ_POLLIN' on 'backend_'.
        poller_both_blocked = new (std::nothrow) zmq::
          socket_poller_t; //  All except 'ZMQ_POLLIN' on both 'frontend_' and 'backend_'.
        poller_frontend_only = new (std::nothrow) zmq::
          socket_poller_t; //  Only 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' on 'frontend_'.
        poller_backend_only = new (std::nothrow) zmq::
          socket_poller_t; //  Only 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' on 'backend_'.
290 291 292 293
        frontend_equal_to_backend = false;
    } else
        frontend_equal_to_backend = true;

294 295 296 297
    if (poller_all == NULL || poller_in == NULL || poller_control == NULL
        || poller_receive_blocked == NULL
        || ((poller_send_blocked == NULL || poller_both_blocked == NULL)
            && !frontend_equal_to_backend)) {
298 299 300 301
        PROXY_CLEANUP ();
        return close_and_return (&msg, -1);
    }

302 303
    zmq::socket_poller_t *poller_wait =
      poller_in; //  Poller for blocking wait, initially all 'ZMQ_POLLIN'.
304

305 306 307
    //  Register 'frontend_' and 'backend_' with pollers.
    rc = poller_all->add (frontend_, NULL,
                          ZMQ_POLLIN | ZMQ_POLLOUT); //  Everything.
308
    CHECK_RC_EXIT_ON_FAILURE ();
309
    rc = poller_in->add (frontend_, NULL, ZMQ_POLLIN); //  All 'ZMQ_POLLIN's.
310 311 312 313 314 315 316 317 318
    CHECK_RC_EXIT_ON_FAILURE ();

    if (frontend_equal_to_backend) {
        //  If frontend_==backend_ 'poller_send_blocked' and 'poller_receive_blocked' are the same,
        //  so we don't need 'poller_send_blocked'. We need only 'poller_receive_blocked'.
        //  We also don't need 'poller_both_blocked', no need to initialize it.
        rc = poller_receive_blocked->add (frontend_, NULL, ZMQ_POLLOUT);
        CHECK_RC_EXIT_ON_FAILURE ();
    } else {
319 320
        rc = poller_all->add (backend_, NULL,
                              ZMQ_POLLIN | ZMQ_POLLOUT); //  Everything.
321
        CHECK_RC_EXIT_ON_FAILURE ();
322
        rc = poller_in->add (backend_, NULL, ZMQ_POLLIN); //  All 'ZMQ_POLLIN's.
323
        CHECK_RC_EXIT_ON_FAILURE ();
324 325
        rc = poller_both_blocked->add (
          frontend_, NULL, ZMQ_POLLOUT); //  Waiting only for 'ZMQ_POLLOUT'.
326
        CHECK_RC_EXIT_ON_FAILURE ();
327 328
        rc = poller_both_blocked->add (
          backend_, NULL, ZMQ_POLLOUT); //  Waiting only for 'ZMQ_POLLOUT'.
329
        CHECK_RC_EXIT_ON_FAILURE ();
330 331 332
        rc = poller_send_blocked->add (
          backend_, NULL,
          ZMQ_POLLOUT); //  All except 'ZMQ_POLLIN' on 'backend_'.
333
        CHECK_RC_EXIT_ON_FAILURE ();
334 335 336
        rc = poller_send_blocked->add (
          frontend_, NULL,
          ZMQ_POLLIN | ZMQ_POLLOUT); //  All except 'ZMQ_POLLIN' on 'backend_'.
337
        CHECK_RC_EXIT_ON_FAILURE ();
338 339 340
        rc = poller_receive_blocked->add (
          frontend_, NULL,
          ZMQ_POLLOUT); //  All except 'ZMQ_POLLIN' on 'frontend_'.
341
        CHECK_RC_EXIT_ON_FAILURE ();
342 343 344
        rc = poller_receive_blocked->add (
          backend_, NULL,
          ZMQ_POLLIN | ZMQ_POLLOUT); //  All except 'ZMQ_POLLIN' on 'frontend_'.
345
        CHECK_RC_EXIT_ON_FAILURE ();
346 347
        rc =
          poller_frontend_only->add (frontend_, NULL, ZMQ_POLLIN | ZMQ_POLLOUT);
348
        CHECK_RC_EXIT_ON_FAILURE ();
349 350
        rc =
          poller_backend_only->add (backend_, NULL, ZMQ_POLLIN | ZMQ_POLLOUT);
351
        CHECK_RC_EXIT_ON_FAILURE ();
352 353 354 355 356 357 358 359
    }

    //  Register 'control_' with pollers.
    if (control_ != NULL) {
        rc = poller_all->add (control_, NULL, ZMQ_POLLIN);
        CHECK_RC_EXIT_ON_FAILURE ();
        rc = poller_in->add (control_, NULL, ZMQ_POLLIN);
        CHECK_RC_EXIT_ON_FAILURE ();
360 361 362
        rc = poller_control->add (
          control_, NULL,
          ZMQ_POLLIN); //  When proxy is paused we wait only for ZMQ_POLLIN on 'control_' socket.
363 364 365 366 367 368 369 370
        CHECK_RC_EXIT_ON_FAILURE ();
        rc = poller_receive_blocked->add (control_, NULL, ZMQ_POLLIN);
        CHECK_RC_EXIT_ON_FAILURE ();
        if (!frontend_equal_to_backend) {
            rc = poller_send_blocked->add (control_, NULL, ZMQ_POLLIN);
            CHECK_RC_EXIT_ON_FAILURE ();
            rc = poller_both_blocked->add (control_, NULL, ZMQ_POLLIN);
            CHECK_RC_EXIT_ON_FAILURE ();
371 372 373 374
            rc = poller_frontend_only->add (control_, NULL, ZMQ_POLLIN);
            CHECK_RC_EXIT_ON_FAILURE ();
            rc = poller_backend_only->add (control_, NULL, ZMQ_POLLIN);
            CHECK_RC_EXIT_ON_FAILURE ();
375 376 377 378 379 380 381 382 383 384
        }
    }

    bool request_processed, reply_processed;

    while (state != terminated) {
        //  Blocking wait initially only for 'ZMQ_POLLIN' - 'poller_wait' points to 'poller_in'.
        //  If one of receiving end's queue is full ('ZMQ_POLLOUT' not available),
        //  'poller_wait' is pointed to 'poller_receive_blocked', 'poller_send_blocked' or 'poller_both_blocked'.
        rc = poller_wait->wait (events, 3, -1);
385
        if (rc < 0 && errno == EAGAIN)
386 387 388 389 390
            rc = 0;
        CHECK_RC_EXIT_ON_FAILURE ();

        //  Some of events waited for by 'poller_wait' have arrived, now poll for everything without blocking.
        rc = poller_all->wait (events, 3, 0);
391
        if (rc < 0 && errno == EAGAIN)
392 393 394 395
            rc = 0;
        CHECK_RC_EXIT_ON_FAILURE ();

        //  Process events.
396
        for (int i = 0; i < rc; i++) {
397 398 399
            if (events[i].socket == frontend_) {
                frontend_in = (events[i].events & ZMQ_POLLIN) != 0;
                frontend_out = (events[i].events & ZMQ_POLLOUT) != 0;
400
            } else
401 402 403 404 405 406 407
              //  This 'if' needs to be after check for 'frontend_' in order never
              //  to be reached in case frontend_==backend_, so we ensure backend_in=false in that case.
              if (events[i].socket == backend_) {
                backend_in = (events[i].events & ZMQ_POLLIN) != 0;
                backend_out = (events[i].events & ZMQ_POLLOUT) != 0;
            } else if (events[i].socket == control_)
                control_in = (events[i].events & ZMQ_POLLIN) != 0;
408 409 410 411 412 413 414 415 416 417 418 419 420 421
        }


        //  Process a control command if any.
        if (control_in) {
            rc = control_->recv (&msg, 0);
            CHECK_RC_EXIT_ON_FAILURE ();
            rc = control_->getsockopt (ZMQ_RCVMORE, &more, &moresz);
            if (unlikely (rc < 0) || more) {
                PROXY_CLEANUP ();
                return close_and_return (&msg, -1);
            }

            //  Copy message to capture socket if any.
422
            rc = capture (capture_, &msg);
423 424 425 426 427
            CHECK_RC_EXIT_ON_FAILURE ();

            if (msg.size () == 5 && memcmp (msg.data (), "PAUSE", 5) == 0) {
                state = paused;
                poller_wait = poller_control;
428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445
            } else if (msg.size () == 6
                       && memcmp (msg.data (), "RESUME", 6) == 0) {
                state = active;
                poller_wait = poller_in;
            } else {
                if (msg.size () == 9
                    && memcmp (msg.data (), "TERMINATE", 9) == 0)
                    state = terminated;
                else {
                    if (msg.size () == 10
                        && memcmp (msg.data (), "STATISTICS", 10) == 0) {
                        rc = reply_stats (control_, &frontend_stats,
                                          &backend_stats);
                        CHECK_RC_EXIT_ON_FAILURE ();
                    } else {
                        //  This is an API error, we assert
                        puts ("E: invalid command sent to proxy");
                        zmq_assert (false);
446
                    }
447
                }
448
            }
449
            control_in = false;
450 451 452 453 454 455
        }

        if (state == active) {
            //  Process a request, 'ZMQ_POLLIN' on 'frontend_' and 'ZMQ_POLLOUT' on 'backend_'.
            //  In case of frontend_==backend_ there's no 'ZMQ_POLLOUT' event.
            if (frontend_in && (backend_out || frontend_equal_to_backend)) {
456
                rc = forward (frontend_, &frontend_stats, backend_,
457
                              &backend_stats, capture_, &msg);
458 459 460
                CHECK_RC_EXIT_ON_FAILURE ();
                request_processed = true;
                frontend_in = backend_out = false;
461 462
            } else
                request_processed = false;
463 464

            //  Process a reply, 'ZMQ_POLLIN' on 'backend_' and 'ZMQ_POLLOUT' on 'frontend_'.
465
            //  If 'frontend_' and 'backend_' are the same this is not needed because previous processing
466 467 468
            //  covers all of the cases. 'backend_in' is always false if frontend_==backend_ due to
            //  design in 'for' event processing loop.
            if (backend_in && frontend_out) {
469
                rc = forward (backend_, &backend_stats, frontend_,
470
                              &frontend_stats, capture_, &msg);
471 472 473
                CHECK_RC_EXIT_ON_FAILURE ();
                reply_processed = true;
                backend_in = frontend_out = false;
474 475
            } else
                reply_processed = false;
476 477 478 479 480

            if (request_processed || reply_processed) {
                //  If request/reply is processed that means we had at least one 'ZMQ_POLLOUT' event.
                //  Enable corresponding 'ZMQ_POLLIN' for blocking wait if any was disabled.
                if (poller_wait != poller_in) {
481
                    if (request_processed) { //  'frontend_' -> 'backend_'
482 483
                        if (poller_wait == poller_both_blocked)
                            poller_wait = poller_send_blocked;
484 485 486
                        else if (poller_wait == poller_receive_blocked
                                 || poller_wait == poller_frontend_only)
                            poller_wait = poller_in;
487
                    }
488
                    if (reply_processed) { //  'backend_' -> 'frontend_'
489 490
                        if (poller_wait == poller_both_blocked)
                            poller_wait = poller_receive_blocked;
491 492 493
                        else if (poller_wait == poller_send_blocked
                                 || poller_wait == poller_backend_only)
                            poller_wait = poller_in;
494 495 496
                    }
                }
            } else {
497 498 499 500
                //  No requests have been processed, there were no 'ZMQ_POLLIN' with corresponding 'ZMQ_POLLOUT' events.
                //  That means that out queue(s) is/are full or one out queue is full and second one has no messages to process.
                //  Disable receiving 'ZMQ_POLLIN' for sockets for which there's no 'ZMQ_POLLOUT',
                //  or wait only on both 'backend_''s or 'frontend_''s 'ZMQ_POLLIN' and 'ZMQ_POLLOUT'.
501
                if (frontend_in) {
502 503 504 505 506 507 508 509
                    if (frontend_out)
                        // If frontend_in and frontend_out are true, obviously backend_in and backend_out are both false.
                        // In that case we need to wait for both 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' only on 'backend_'.
                        // We'll never get here in case of frontend_==backend_ because then frontend_out will always be false.
                        poller_wait = poller_backend_only;
                    else {
                        if (poller_wait == poller_send_blocked)
                            poller_wait = poller_both_blocked;
510 511
                        else if (poller_wait == poller_in)
                            poller_wait = poller_receive_blocked;
512
                    }
513 514 515 516
                }
                if (backend_in) {
                    //  Will never be reached if frontend_==backend_, 'backend_in' will
                    //  always be false due to design in 'for' event processing loop.
517 518 519 520 521 522 523
                    if (backend_out)
                        // If backend_in and backend_out are true, obviously frontend_in and frontend_out are both false.
                        // In that case we need to wait for both 'ZMQ_POLLIN' and 'ZMQ_POLLOUT' only on 'frontend_'.
                        poller_wait = poller_frontend_only;
                    else {
                        if (poller_wait == poller_receive_blocked)
                            poller_wait = poller_both_blocked;
524 525
                        else if (poller_wait == poller_in)
                            poller_wait = poller_send_blocked;
526
                    }
527 528 529 530 531 532 533 534 535 536
                }
            }
        }
    }
    PROXY_CLEANUP ();
    return close_and_return (&msg, 0);
}

#else //  ZMQ_HAVE_POLLER

537 538 539 540
int zmq::proxy (class socket_base_t *frontend_,
                class socket_base_t *backend_,
                class socket_base_t *capture_,
                class socket_base_t *control_)
Pieter Hintjens's avatar
Pieter Hintjens committed
541 542 543
{
    msg_t msg;
    int rc = msg.init ();
Pieter Hintjens's avatar
Pieter Hintjens committed
544
    if (rc != 0)
Pieter Hintjens's avatar
Pieter Hintjens committed
545 546
        return -1;

547
    //  The algorithm below assumes ratio of requests and replies processed
Pieter Hintjens's avatar
Pieter Hintjens committed
548
    //  under full load to be 1:1.
549

Pieter Hintjens's avatar
Pieter Hintjens committed
550
    int more;
Pieter Hintjens's avatar
Pieter Hintjens committed
551
    size_t moresz;
552 553 554
    zmq_pollitem_t items[] = {{frontend_, 0, ZMQ_POLLIN, 0},
                              {backend_, 0, ZMQ_POLLIN, 0},
                              {control_, 0, ZMQ_POLLIN, 0}};
555
    int qt_poll_items = (control_ ? 3 : 2);
556 557
    zmq_pollitem_t itemsout[] = {{frontend_, 0, ZMQ_POLLOUT, 0},
                                 {backend_, 0, ZMQ_POLLOUT, 0}};
Pieter Hintjens's avatar
Pieter Hintjens committed
558

559
    zmq_socket_stats_t frontend_stats;
560
    memset (&frontend_stats, 0, sizeof (frontend_stats));
561
    zmq_socket_stats_t backend_stats;
562
    memset (&backend_stats, 0, sizeof (backend_stats));
563

Pieter Hintjens's avatar
Pieter Hintjens committed
564
    //  Proxy can be in these three states
565 566
    enum
    {
Pieter Hintjens's avatar
Pieter Hintjens committed
567 568 569 570 571 572
        active,
        paused,
        terminated
    } state = active;

    while (state != terminated) {
Pieter Hintjens's avatar
Pieter Hintjens committed
573
        //  Wait while there are either requests or replies to process.
574
        rc = zmq_poll (&items[0], qt_poll_items, -1);
Pieter Hintjens's avatar
Pieter Hintjens committed
575
        if (unlikely (rc < 0))
576
            return close_and_return (&msg, -1);
Pieter Hintjens's avatar
Pieter Hintjens committed
577

578
        //  Get the pollout separately because when combining this with pollin it maxes the CPU
579 580 581
        //  because pollout shall most of the time return directly.
        //  POLLOUT is only checked when frontend and backend sockets are not the same.
        if (frontend_ != backend_) {
582
            rc = zmq_poll (&itemsout[0], 2, 0);
583
            if (unlikely (rc < 0)) {
584
                return close_and_return (&msg, -1);
585 586
            }
        }
587

588
        //  Process a control command if any
589
        if (control_ && items[2].revents & ZMQ_POLLIN) {
Pieter Hintjens's avatar
Pieter Hintjens committed
590 591
            rc = control_->recv (&msg, 0);
            if (unlikely (rc < 0))
592
                return close_and_return (&msg, -1);
Pieter Hintjens's avatar
Pieter Hintjens committed
593 594 595 596

            moresz = sizeof more;
            rc = control_->getsockopt (ZMQ_RCVMORE, &more, &moresz);
            if (unlikely (rc < 0) || more)
597
                return close_and_return (&msg, -1);
Pieter Hintjens's avatar
Pieter Hintjens committed
598 599

            //  Copy message to capture socket if any
600
            rc = capture (capture_, &msg);
601
            if (unlikely (rc < 0))
602
                return close_and_return (&msg, -1);
603

604
            if (msg.size () == 5 && memcmp (msg.data (), "PAUSE", 5) == 0)
Pieter Hintjens's avatar
Pieter Hintjens committed
605
                state = paused;
606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623
            else if (msg.size () == 6 && memcmp (msg.data (), "RESUME", 6) == 0)
                state = active;
            else if (msg.size () == 9
                     && memcmp (msg.data (), "TERMINATE", 9) == 0)
                state = terminated;
            else {
                if (msg.size () == 10
                    && memcmp (msg.data (), "STATISTICS", 10) == 0) {
                    rc =
                      reply_stats (control_, &frontend_stats, &backend_stats);
                    if (unlikely (rc < 0))
                        return close_and_return (&msg, -1);
                } else {
                    //  This is an API error, we assert
                    puts ("E: invalid command sent to proxy");
                    zmq_assert (false);
                }
            }
624
        }
625
        //  Process a request
626 627 628
        if (state == active && items[0].revents & ZMQ_POLLIN
            && (frontend_ == backend_ || itemsout[1].revents & ZMQ_POLLOUT)) {
            rc = forward (frontend_, &frontend_stats, backend_, &backend_stats,
629
                          capture_, &msg);
630
            if (unlikely (rc < 0))
631
                return close_and_return (&msg, -1);
632 633
        }
        //  Process a reply
634 635 636 637
        if (state == active && frontend_ != backend_
            && items[1].revents & ZMQ_POLLIN
            && itemsout[0].revents & ZMQ_POLLOUT) {
            rc = forward (backend_, &backend_stats, frontend_, &frontend_stats,
638
                          capture_, &msg);
639
            if (unlikely (rc < 0))
640
                return close_and_return (&msg, -1);
Pieter Hintjens's avatar
Pieter Hintjens committed
641 642
        }
    }
643 644

    return close_and_return (&msg, 0);
Pieter Hintjens's avatar
Pieter Hintjens committed
645
}
646 647

#endif //  ZMQ_HAVE_POLLER