local_lat.cpp 2.87 KB
Newer Older
Martin Sustrik's avatar
Martin Sustrik committed
1
/*
2
    Copyright (c) 2007-2012 iMatix Corporation
Martin Sustrik's avatar
Martin Sustrik committed
3
    Copyright (c) 2009-2011 250bpm s.r.o.
4
    Copyright (c) 2007-2011 Other contributors as noted in the AUTHORS file
Martin Sustrik's avatar
Martin Sustrik committed
5 6 7 8

    This file is part of 0MQ.

    0MQ is free software; you can redistribute it and/or modify it under
9
    the terms of the GNU Lesser General Public License as published by
Martin Sustrik's avatar
Martin Sustrik committed
10 11 12 13 14 15
    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
16
    GNU Lesser General Public License for more details.
Martin Sustrik's avatar
Martin Sustrik committed
17

18
    You should have received a copy of the GNU Lesser General Public License
Martin Sustrik's avatar
Martin Sustrik committed
19 20 21
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

22
#include "../include/zmq.h"
23
#include "../include/zmq_utils.h"
Martin Sustrik's avatar
Martin Sustrik committed
24 25 26 27 28 29 30
#include <stdio.h>
#include <stdlib.h>

int main (int argc, char *argv [])
{
    const char *bind_to;
    int roundtrip_count;
31
    size_t message_size;
Martin Sustrik's avatar
Martin Sustrik committed
32 33 34 35
    void *ctx;
    void *s;
    int rc;
    int i;
36
    zmq_msg_t msg;
Martin Sustrik's avatar
Martin Sustrik committed
37 38

    if (argc != 4) {
39 40
        printf ("usage: local_lat <bind-to> <message-size> "
            "<roundtrip-count>\n");
Martin Sustrik's avatar
Martin Sustrik committed
41 42 43
        return 1;
    }
    bind_to = argv [1];
44 45
    message_size = atoi (argv [2]);
    roundtrip_count = atoi (argv [3]);
Martin Sustrik's avatar
Martin Sustrik committed
46

47
    ctx = zmq_init (1);
48 49 50 51
    if (!ctx) {
        printf ("error in zmq_init: %s\n", zmq_strerror (errno));
        return -1;
    }
Martin Sustrik's avatar
Martin Sustrik committed
52 53

    s = zmq_socket (ctx, ZMQ_REP);
54 55 56 57
    if (!s) {
        printf ("error in zmq_socket: %s\n", zmq_strerror (errno));
        return -1;
    }
Martin Sustrik's avatar
Martin Sustrik committed
58 59

    rc = zmq_bind (s, bind_to);
60 61 62 63
    if (rc != 0) {
        printf ("error in zmq_bind: %s\n", zmq_strerror (errno));
        return -1;
    }
Martin Sustrik's avatar
Martin Sustrik committed
64

65
    rc = zmq_msg_init (&msg);
66 67 68 69
    if (rc != 0) {
        printf ("error in zmq_msg_init: %s\n", zmq_strerror (errno));
        return -1;
    }
70

Martin Sustrik's avatar
Martin Sustrik committed
71
    for (i = 0; i != roundtrip_count; i++) {
72 73 74
        rc = zmq_recvmsg (s, &msg, 0);
        if (rc < 0) {
            printf ("error in zmq_recvmsg: %s\n", zmq_strerror (errno));
75 76 77 78 79 80
            return -1;
        }
        if (zmq_msg_size (&msg) != message_size) {
            printf ("message of incorrect size received\n");
            return -1;
        }
81 82 83
        rc = zmq_sendmsg (s, &msg, 0);
        if (rc < 0) {
            printf ("error in zmq_sendmsg: %s\n", zmq_strerror (errno));
84 85
            return -1;
        }
Martin Sustrik's avatar
Martin Sustrik committed
86 87
    }

88
    rc = zmq_msg_close (&msg);
89 90 91 92
    if (rc != 0) {
        printf ("error in zmq_msg_close: %s\n", zmq_strerror (errno));
        return -1;
    }
93

94
    zmq_sleep (1);
Martin Sustrik's avatar
Martin Sustrik committed
95

96
    rc = zmq_close (s);
97 98 99 100
    if (rc != 0) {
        printf ("error in zmq_close: %s\n", zmq_strerror (errno));
        return -1;
    }
101

102
    rc = zmq_term (ctx);
103 104 105 106
    if (rc != 0) {
        printf ("error in zmq_term: %s\n", zmq_strerror (errno));
        return -1;
    }
107

Martin Sustrik's avatar
Martin Sustrik committed
108 109
    return 0;
}