7-14 电话聊天狂人 (25 分)

#include <stdio.h>  
#include <stdlib.h>  
#include <string.h>  
#include <math.h>  
#define KEYLENGTH 12        //关键词字符串最大长度  
#define MAXTABLESIZE 1000000    //允许开辟的最大散列表长度  
#define MAXD 5      //参与散列映射计算的字符个数  
typedef char ElementType[KEYLENGTH ];  
typedef int Index; //散列地址类型  
  
//单链表定义  
typedef struct LNode *PtrToLNode;  
struct LNode {  
    ElementType Data;  
    PtrToLNode Next;  
    int Count;  
};  
typedef PtrToLNode Position;  
typedef PtrToLNode List;  
  
//散列表结点定义  
typedef struct TblNode *HashTable;  //散列表类型  
struct TblNode {  
    int TableSize; //表的最大长度  
    List Heads;    //指向链表头结点的数组  
};  
  
int NextPrime( int N ) {  
    //返回大于N且不超过MAXTABLESIZE的最小素数  
    int i, p = ( N % 2 ) ? N + 2 : N + 1;   //从大于N的下一个奇数开始  
    while ( p <= MAXTABLESIZE ) {  
        double q = p;  
        for ( i = (int)sqrt(q); i > 2; i-- )  
            if ( !(p % i) ) break; //p不是素数  
        if ( i == 2 ) break; // for正常结束，说明p是素数  
        else p += 2; //否则试探下一个奇数  
    }  
    return p;  
}  
  
HashTable CreateTable ( int TableSize ) {  
    HashTable H;  
    int i;  
    H = (HashTable)malloc(sizeof(struct TblNode));  
    H->TableSize = NextPrime(TableSize); //保证散列表最大长度是素数  
    //以下分配链表头结点数组  
    H->Heads = (List)malloc(H->TableSize * sizeof(struct LNode)); //分配表头结点数组空间  
    for ( i = 0; i < H->TableSize; i++ ) { //初始化表头结点  
        H->Heads[i].Data[0] = '\0';  
        H->Heads[i].Next = NULL;    //链表为NULL  
        H->Heads[i].Count = 0;  //对应号码的个数为0  
    }  
    return H;   //最后将表头结点数组的首地址返回  
}  
  
//hash函数  
Index Hash ( const char *Key, int TableSize ) {  
    unsigned int h = 0; //散列函数值，初始化为0  
    while ( *Key != '\0' ) //位移映射  
        h = ( h << 5 ) + *Key++;    //左移五位
    return h % TableSize;  
}  
  
Position Find ( HashTable H, ElementType Key ) {  
    Position P;  
    Index Pos;  
    Pos = Hash( Key + KEYLENGTH - MAXD, H->TableSize ); //初始散列位置（利用hash函数快速定位）  
    P = H->Heads[Pos].Next;     //从该链表的第1个结点开始  
    while ( P && strcmp( P->Data, Key ) )   //寻找是否有Key，退出的条件：P为NULL， 或者是找到了  
        P = P->Next;  
  
    return P;   //此时P或者指向找到的结点，或者为NULL  
}  
  
int Insert ( HashTable H, ElementType Key ) {  
    Position P, NewCell;  
    Index Pos;  
    P = Find( H, Key ); //先定位：找到or找不到  
    if ( !P ) { //关键词未找到，可以插入（声明临时节点存储待插入的数据，然后利用hash函数找到对应的位置，之后是链表的头插法）  
        NewCell = (Position)malloc(sizeof(struct LNode));  
        strcpy(NewCell->Data, Key);  
        NewCell->Count = 1; //个数+1  
        Pos = Hash( Key + KEYLENGTH - MAXD, H->TableSize ); //初始散列位置  
        //将NewCell插入为H->Heads[Pos]链表的第一个结点（头插法）  
        NewCell->Next = H->Heads[Pos].Next;  
        H->Heads[Pos].Next = NewCell;  
  
        return 1;  
    }  
    else { //关键词已存在  
        P->Count++;  
        return 0;  
    }  
}  
  
void DestroyTable( HashTable H ) {  //释放空间  
    int i;  
    Position P, Tmp;  
    //释放每个链表的结点  
    for( i = 0; i < H->TableSize; i++ ) {  
        P = H->Heads[i].Next;  
        while ( P ) {   //依次释放链表每一个元素的空间  
            Tmp = P->Next;  
            free( P );  
            P = Tmp;  
        }  
    }  
    free( H->Heads ); //释放头结点数组  
    free( H );        //释放散列表头结点  
}  
  
void ScanAndOutput ( HashTable H ) {  
    int i, MaxCnt = 0, PCnt = 0;  
    ElementType MinPhone;  
    List Ptr;  
    MinPhone[0] = '\0';  
    for ( i = 0; i < H->TableSize; i++ ) { //扫描链表  
        Ptr = H->Heads[i].Next; //从该链表的第1个结点开始  
        while ( Ptr ) {  
            //要找最大的通话次数  
            if ( Ptr->Count > MaxCnt ) { //更新最大通话次数  
                MaxCnt = Ptr->Count;  
                strcpy( MinPhone, Ptr->Data );  
                PCnt = 1;  
            }  
            else if ( Ptr->Count == MaxCnt ) {  
                PCnt++; //狂人计数  
                if ( strcmp( MinPhone, Ptr->Data ) > 0 )  
                    strcpy( MinPhone, Ptr->Data ); //更新狂人的最小手机号码  
            }  
            Ptr = Ptr->Next;  
        }  
    }  
    printf("%s %d", MinPhone, MaxCnt);  
    if ( PCnt > 1 )  
        printf(" %d", PCnt);  
    printf("\n");  
}  
int main () {  
    int N, i;  
    ElementType Key;  
    HashTable H;  
    scanf("%d", &N);  
    H = CreateTable( N * 2 );   //创建一个散列表  
    for ( i = 0; i < N; i++ ) {  
        scanf("%s", Key); Insert( H, Key );  
        scanf("%s", Key); Insert( H, Key );  
    }  
    ScanAndOutput( H );  
    DestroyTable( H );  
  
    return 0;  
}