test_spec_rep.cpp 4.42 KB
Newer Older
1
/*
2
    Copyright (c) 2007-2014 Contributors as noted in the AUTHORS file
3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

    This file is part of 0MQ.

    0MQ is free software; you can redistribute it and/or modify it under
    the terms of the GNU Lesser General Public License as published by
    the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.

    0MQ 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.

    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/>.
*/

#include "testutil.hpp"

22 23 24
const char *bind_address = 0;
const char *connect_address = 0;

25 26 27 28 29 30
void test_fair_queue_in (void *ctx)
{
    void *rep = zmq_socket (ctx, ZMQ_REP);
    assert (rep);

    int timeout = 100;
31
    int rc = zmq_setsockopt (rep, ZMQ_RCVTIMEO, &timeout, sizeof (int));
32 33
    assert (rc == 0);

34
    rc = zmq_bind (rep, bind_address);
35 36
    assert (rc == 0);

37 38 39 40 41
    const size_t services = 5;
    void *reqs [services];
    for (size_t peer = 0; peer < services; ++peer) {
        reqs [peer] = zmq_socket (ctx, ZMQ_REQ);
        assert (reqs [peer]);
42

43
        rc = zmq_setsockopt (reqs [peer], ZMQ_RCVTIMEO, &timeout, sizeof (int));
44 45
        assert (rc == 0);

46
        rc = zmq_connect (reqs [peer], connect_address);
47 48 49
        assert (rc == 0);
    }

50
    s_send_seq (reqs [0], "A", SEQ_END);
51 52
    s_recv_seq (rep, "A", SEQ_END);
    s_send_seq (rep, "A", SEQ_END);
53
    s_recv_seq (reqs [0], "A", SEQ_END);
54

55
    s_send_seq (reqs [0], "A", SEQ_END);
56 57
    s_recv_seq (rep, "A", SEQ_END);
    s_send_seq (rep, "A", SEQ_END);
58
    s_recv_seq (reqs [0], "A", SEQ_END);
59

60 61
    // TODO: following test fails randomly on some boxes
#ifdef SOMEONE_FIXES_THIS
62
    // send N requests
63
    for (size_t peer = 0; peer < services; ++peer) {
64
        char * str = strdup("A");
65 66
        str [0] += peer;
        s_send_seq (reqs [peer], str, SEQ_END);
67 68 69 70
        free (str);
    }

    // handle N requests
71
    for (size_t peer = 0; peer < services; ++peer) {
72
        char * str = strdup("A");
73
        str [0] += peer;
74
        //  Test fails here
75 76
        s_recv_seq (rep, str, SEQ_END);
        s_send_seq (rep, str, SEQ_END);
77
        s_recv_seq (reqs [peer], str, SEQ_END);
78 79
        free (str);
    }
80
#endif
81
    close_zero_linger (rep);
82

83 84
    for (size_t peer = 0; peer < services; ++peer)
        close_zero_linger (reqs [peer]);
85 86 87 88

    // Wait for disconnects.
    rc = zmq_poll (0, 0, 100);
    assert (rc == 0);
89 90 91 92 93 94 95
}

void test_envelope (void *ctx)
{
    void *rep = zmq_socket (ctx, ZMQ_REP);
    assert (rep);

96
    int rc = zmq_bind (rep, bind_address);
97 98 99 100 101
    assert (rc == 0);

    void *dealer = zmq_socket (ctx, ZMQ_DEALER);
    assert (dealer);

102
    rc = zmq_connect (dealer, connect_address);
103 104 105 106 107 108 109 110 111 112 113 114 115 116
    assert (rc == 0);

    // minimal envelope
    s_send_seq (dealer, 0, "A", SEQ_END);
    s_recv_seq (rep, "A", SEQ_END);
    s_send_seq (rep, "A", SEQ_END);
    s_recv_seq (dealer, 0, "A", SEQ_END);

    // big envelope
    s_send_seq (dealer, "X", "Y", 0, "A", SEQ_END);
    s_recv_seq (rep, "A", SEQ_END);
    s_send_seq (rep, "A", SEQ_END);
    s_recv_seq (dealer, "X", "Y", 0, "A", SEQ_END);

117 118
    close_zero_linger (rep);
    close_zero_linger (dealer);
119

120 121
    // Wait for disconnects.
    rc = zmq_poll (0, 0, 100);
122 123 124
    assert (rc == 0);
}

125
int main (void)
126
{
127
    setup_test_environment();
128 129 130
    void *ctx = zmq_ctx_new ();
    assert (ctx);

131
    const char *binds [] = { "inproc://a", "tcp://127.0.0.1:5555" };
132
    const char *connects [] = { "inproc://a", "tcp://localhost:5555" };
133

134 135 136
    for (int transport = 0; transport < 2; ++transport) {
        bind_address = binds [transport];
        connect_address = connects [transport];
137 138 139 140 141 142 143 144 145 146 147 148 149

        // SHALL receive incoming messages from its peers using a fair-queuing
        // strategy.
        test_fair_queue_in (ctx);

        // For an incoming message:
        // SHALL remove and store the address envelope, including the delimiter.
        // SHALL pass the remaining data frames to its calling application.
        // SHALL wait for a single reply message from its calling application.
        // SHALL prepend the address envelope and delimiter.
        // SHALL deliver this message back to the originating peer.
        test_envelope (ctx);
    }
150 151 152 153 154 155

    int rc = zmq_ctx_term (ctx);
    assert (rc == 0);

    return 0 ;
}