local_lat.c 2.7 KB
Newer Older
Martin Sustrik's avatar
Martin Sustrik committed
1
/*
2
    Copyright (c) 2007-2010 iMatix Corporation
Martin Sustrik's avatar
Martin Sustrik committed
3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32

    This file is part of 0MQ.

    0MQ is free software; you can redistribute it and/or modify it under
    the terms of the Lesser GNU 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
    Lesser GNU General Public License for more details.

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

#include <zmq.h>
#include <stdio.h>
#include <stdlib.h>

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

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

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

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

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

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

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

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

91
    zmq_sleep (1);
Martin Sustrik's avatar
Martin Sustrik committed
92

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

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

Martin Sustrik's avatar
Martin Sustrik committed
105 106
    return 0;
}