ipaddr_tool.c

Go to the documentation of this file.

 
#include "ipaddr_tool.h"
 
tList*  read_ipaddr_file(char* fn)
{
    tList* lp;
    tList* lt;
 
    lp = read_tList_file(fn, 2);
    if (lp==NULL) return NULL;
 
    lt = to_ipaddress_list(lp);
    del_all_tList(&lp);
 
    return lt;
}
 
 
tList*  read_ipaddr_fp(FILE* fp)
{
    tList* lp;
    tList* lt;
 
    lp = read_tList_fp(fp, 1);
    if (lp==NULL) return NULL;
 
    lt = to_ipaddress_list(lp);
    del_all_tList(&lp);
 
    return lt;
}
 
 
tList*  to_ipaddress_list(tList* lp)
{
    unsigned char* num;
    char*          addr;
    tList* ls = NULL;
    tList* lt = NULL;
 
    if (lp==NULL) return NULL;
    if (lp->ldat.key.buf==NULL) return NULL;
 
    while (lp!=NULL) {
        if (lp->ldat.key.buf!=NULL && strlen((const char*)lp->ldat.key.buf)>0) {
            if ((lp->ldat.key.buf)[0]!='#') {
                num = to_address_num8_ipv4((char*)lp->ldat.key.buf, 1);
                if (num!=NULL) {
                    addr = to_address_char8_ipv4(num);
                    free(num);
                    if (addr!=NULL) {
                        ls = add_tList_node_str(ls, addr, NULL);
                        free(addr);
                    }   // ここで addr==NULL となる場合はメモリ不足のみ
                }
                else {
                    addr = awk((char*)lp->ldat.key.buf, '/', 1);
                    if (addr!=NULL) {
                        int i = 0;
                        while(addr[i]!='\0' && addr[i]!=',' && addr[i]!=' ') i++;
                        addr[i] = '\0';
                        ls = add_tList_node_str(ls, addr, NULL);
                        free(addr);
                    }
                }
                if (lt==NULL) lt = ls;
            }
        }
        lp = lp->next;
    }
    
    return lt;
}
 
 
int  is_host_in_list(tList* lp, unsigned char* num, char* hname)
{
    unsigned char* addr;
 
    if (lp==NULL) return FALSE;
    if (lp->ldat.key.buf==NULL) return FALSE;
    if (hname==NULL && num==NULL) return FALSE;
 
    while (lp!=NULL) {
        if (lp->ldat.key.buf!=NULL && strlen((const char*)lp->ldat.key.buf)>0) {
            addr = to_address_num8_ipv4((char*)lp->ldat.key.buf, 0);
            if (addr==NULL && hname!=NULL) {
                if (!strnrvscmp((const char*)lp->ldat.key.buf, hname, (int)strlen((const char*)lp->ldat.key.buf))) return TRUE;
            }
            else if(addr!=NULL && num!=NULL) {
                if (is_same_network_num_ipv4(addr, num, &(addr[4]))) return TRUE;
            }
        }
        lp = lp->next;
    }
    
    return FALSE;
}
 
 
int  is_ipaddr_num_in_list(tList* lp, unsigned char* num)
{
    unsigned char* addr;
 
    if (lp==NULL || num==NULL) return FALSE;
    if (lp->ldat.key.buf==NULL) return FALSE;
 
    while (lp!=NULL) {
        if (lp->ldat.key.buf!=NULL && strlen((const char*)lp->ldat.key.buf)>0) {
            addr = to_address_num8_ipv4((char*)lp->ldat.key.buf, 1);
            if (addr!=NULL) {
                if (is_same_network_num_ipv4(num, addr, &(addr[4]))) return TRUE;
            }
        }
        lp = lp->next;
    }
    
    return FALSE;
}
 
 
void  print_address_in_list(FILE* fp, tList* lp)
{
    unsigned char* addr;
 
    while (lp!=NULL) {
        if (lp->ldat.key.buf!=NULL && strlen((const char*)lp->ldat.key.buf)>0) {
            addr = to_address_num8_ipv4((char*)lp->ldat.key.buf, 1);
            if (addr!=NULL) {   
                fprintf(fp, "[%d.%d.%d.%d/%d.%d.%d.%d]\n", addr[0],addr[1],addr[2],addr[3],addr[4],addr[5],addr[6],addr[7]);
            }
            else {      // 恐らくドメイン名
                fprintf(fp, "[%s]\n", lp->ldat.key.buf);
            }
        }
        lp = lp->next;
    }
    return;
}