/* $OpenBSD: broadcast_bind.c,v 1.2 2015/12/02 20:45:00 mpi Exp $ */

/*
 * Copyright (c) 2015 Vincent Gross <vgross@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <err.h>
#include <errno.h>
#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>

#include <arpa/inet.h>

#include <sys/socket.h>

#include <netinet/in.h>


int
test_bind(char *paddr, struct in_addr *addr, u_int16_t port, int type,
    int expected_errno)
{
        int s, rc;
        struct sockaddr_in sin;

        memset(&sin, 0, sizeof(sin));
        sin.sin_family = AF_INET;
        sin.sin_len = sizeof(sin);
        sin.sin_port = htons(port);
        memcpy(&sin.sin_addr, addr, sizeof(*addr));

        s = socket(PF_INET, type, 0);
        if (s < 0) {
                warn("socket(PF_INET, %d, 0)", type);
                return (1);
        }

        rc = bind(s, (struct sockaddr *)&sin, sin.sin_len);
        if ((rc == 0 && expected_errno == 0) ||
            (rc != 0 && expected_errno == errno)) {
                close(s);
                return (0);
        }

        warn("bind(%s,%d) (type %d) expected %d, got %d", paddr, port, type,
            expected_errno, errno);
        close(s);

        return (1);
}

int
main(int argc, char *argv[])
{
        int rc;
        struct in_addr uc_addr, err_addr, bc_addr;
        int port = 30000;

        if (argc != 4)
                errx(1, "needs 2 arguments: <unicast> <error> <broadcast>");

        rc = inet_pton(AF_INET, argv[1], &uc_addr);
        if (rc != 1) {
                if (rc)
                        err(1, "inet_pton(unicast)");
                else
                        errx(1, "inet_pton(unicast): error parsing %s",
                            argv[1]);
        }
        rc = inet_pton(AF_INET, argv[2], &err_addr);
        if (rc != 1) {
                if (rc)
                        err(1, "inet_pton(error)");
                else
                        errx(1, "inet_pton(error): error parsing %s", argv[2]);
        }
        rc = inet_pton(AF_INET, argv[3], &bc_addr);
        if (rc != 1) {
                if (rc)
                        err(1, "inet_pton(broadcast)");
                else
                        errx(1, "inet_pton(broadcast): error parsing %s",
                            argv[3]);
        }

        rc = 0;
        rc |= test_bind(argv[1], &uc_addr, port, SOCK_STREAM, 0);
        rc |= test_bind(argv[2], &err_addr, port, SOCK_STREAM, EADDRNOTAVAIL);
        rc |= test_bind(argv[3], &bc_addr, port, SOCK_STREAM, EADDRNOTAVAIL);

        rc |= test_bind(argv[2], &err_addr, port, SOCK_STREAM, EADDRNOTAVAIL);
        rc |= test_bind(argv[3], &bc_addr, port, SOCK_DGRAM, 0);

        return (rc);
}