读取纯真IP数据库

#include 
#include 
#include 
#include 

#define QQWry   "QQWry.Dat"
#define of3(b)  ((unsigned char)(b)[0] | ((unsigned char)(b)[1] << 8) | ((unsigned char)(b)[2] << 16))

int fd;

off_t
read_offset(off_t offset)
{
    char b[4];

    if (pread(fd, b, 3, offset) != 3)
    {
        fprintf(stderr, "Invalid QQWry.Dat.\n");
        exit(1);
    }

    return of3(b);
}

void
read_country_name(off_t offset, char *name)
{
    if (offset == 0) strcpy(name, "unkown");
    else while (pread(fd, name, 1, offset++) == 1 && *name++ != '\0');
}

void
read_area_name(off_t offset, char *name)
{
    pread(fd, name, 1, offset);
    (name[0] == 1 || name[0] == 2) && (offset = read_offset(offset + 1));
    read_country_name(offset, name);
}

#define p(n)    (unsigned char)buffer[n]
void
print_ip_dotted_quad(char *buffer)
{
    printf("%d.%d.%d.%d ", p(3), p(2), p(1), p(0));
}

void
print_ip_record(off_t offset)
{
    char buffer[32], country[128], area[512];
    off_t off1;

    // pread(fd, buffer, 4, offset); print_ip_dotted_quad(buffer);
    offset += 4;
    pread(fd, buffer, 1, offset);
    switch (buffer[0])
    {
        case 0x01:
            off1 = read_offset(offset + 1);
            pread(fd, buffer, 1, off1);
            if (buffer[0] == 0x02)
            {
                read_country_name(read_offset(off1 + 1), country);
                read_area_name(off1 + 4, area);
            }
            else 
            {
                read_country_name(off1, country);
                read_area_name(off1 + strlen(country) + 1, area);
            }
            break;
        case 0x02:
            read_country_name(read_offset(offset + 1), country);
            read_area_name(offset + 4, area);
            break;
        default:
            read_country_name(offset, country);
            read_area_name(offset + strlen(country) + 1, area);
            break;
    }
    !strcmp(area, " CZ88.NET") && (area[0] = '\0');
    printf("%s %s\n", country, area);
}

int
main(int argc, char *argv[])
{
    unsigned int first, last, offset;
    in_addr_t find;
    unsigned char buffer[8];

    if (inet_pton(AF_INET, argv[1], &find) <= 0)
    {
        struct hostent *h;

        h = gethostbyname(argv[1]);
        if (h == NULL)
        {
            perror(argv[1]);
            return 1;
        }
        memcpy(&find, h->h_addr, h->h_length);
    }
    find = ntohl(find);

    if ((fd = open(QQWry, O_RDONLY)) < 0)
    {
        perror(QQWry);
        return 2;
    }
    pread(fd, &first, sizeof(first), 0);
    pread(fd, &last, sizeof(last), sizeof(first));
    for (offset = first; offset <= last && pread(fd, buffer, 7, offset) == 7; offset += 7)
    {
        if (*(in_addr_t *)buffer > find)
        {
            // print_ip_dotted_quad(buffer);
            pread(fd, buffer, 7, offset - 7);
            print_ip_record((off_t)of3(buffer + 4));
            break;
        }
    }
    if (offset > last)
        printf("Not found.\n");

    close(fd);
    return 0;
}
点击查看《》,下载 

文件:	QQWry.zip
大小:	1KB
下载:	下载