/*
 * Copyright (C) 2012 by Darren Reed.
 *
 * See the IPFILTER.LICENCE file for details on licencing.
 *
 * $Id: parsewhoisline.c,v 1.2.2.5 2012/07/22 08:04:24 darren_r Exp $
 */
#include "ipf.h"

/*
Microsoft Corp MICROSOFT19 (NET-198-136-97-0-1) 198.137.97.0 - 198.137.97.255
Microsoft Corp SAVV-S233053-6 (NET-206-79-74-32-1) 206.79.74.32 - 206.79.74.47
 */
int
parsewhoisline(char *line, addrfamily_t *addrp, addrfamily_t *maskp)
{
        struct in_addr a1, a2;
        char *src = line;
        char *s = NULL;

        if (line == NULL)
                return (-1);

        while (*src != '\0') {
                s = strchr(src, '(');
                if (s == NULL)
                        break;

                if (strncmp(s, "(NET", 4)) {
                        src = s + 1;
                }
                break;
        }

        if (s == NULL)
                return (-1);

        memset(addrp, 0x00, sizeof(*maskp));
        memset(maskp, 0x00, sizeof(*maskp));

        if (*(s + 4) == '6') {
#ifdef USE_INET6
                i6addr_t a61, a62;

                s = strchr(s, ')');
                if (s == NULL || *++s != ' ')
                        return (-1);
                /*
                 * Parse the IPv6
                 */
                if (inet_pton(AF_INET6, s, &a61.in6) != 1)
                        return (-1);

                s = strchr(s, ' ');
                if (s == NULL || strncmp(s, " - ", 3))
                        return (-1);

                s += 3;
                if (inet_pton(AF_INET6, s, &a62) != 1)
                        return (-1);

                addrp->adf_addr = a61;
                addrp->adf_family = AF_INET6;
                addrp->adf_len = offsetof(addrfamily_t, adf_addr) +
                                 sizeof(struct in6_addr);

                maskp->adf_addr.i6[0] = ~(a62.i6[0] ^ a61.i6[0]);
                maskp->adf_addr.i6[1] = ~(a62.i6[1] ^ a61.i6[1]);
                maskp->adf_addr.i6[2] = ~(a62.i6[2] ^ a61.i6[2]);
                maskp->adf_addr.i6[3] = ~(a62.i6[3] ^ a61.i6[3]);

                /*
                 * If the mask that's been generated isn't a consecutive mask
                 * then we can't add it into a pool.
                 */
                if (count6bits(maskp->adf_addr.i6) == -1)
                        return (-1);

                maskp->adf_family = AF_INET6;
                maskp->adf_len = addrp->adf_len;

                if (IP6_MASKNEQ(&addrp->adf_addr.in6, &maskp->adf_addr.in6,
                                &addrp->adf_addr.in6)) {
                        return (-1);
                }
                return (0);
#else
                return (-1);
#endif
        }

        s = strchr(s, ')');
        if (s == NULL || *++s != ' ')
                return (-1);

        s++;

        if (inet_aton(s, &a1) != 1)
                return (-1);

        s = strchr(s, ' ');
        if (s == NULL || strncmp(s, " - ", 3))
                return (-1);

        s += 3;
        if (inet_aton(s, &a2) != 1)
                return (-1);

        addrp->adf_addr.in4 = a1;
        addrp->adf_family = AF_INET;
        addrp->adf_len = offsetof(addrfamily_t, adf_addr) +
                         sizeof(struct in_addr);
        maskp->adf_addr.in4.s_addr = ~(a2.s_addr ^ a1.s_addr);

        /*
         * If the mask that's been generated isn't a consecutive mask then
         * we can't add it into a pool.
         */
        if (count4bits(maskp->adf_addr.in4.s_addr) == -1)
                return (-1);

        maskp->adf_family = AF_INET;
        maskp->adf_len = addrp->adf_len;
        bzero((char *)maskp + maskp->adf_len, sizeof(*maskp) - maskp->adf_len);
        if ((addrp->adf_addr.in4.s_addr & maskp->adf_addr.in4.s_addr) !=
            addrp->adf_addr.in4.s_addr)
                return (-1);
        return (0);
}