11-散列1 电话聊天狂人 (25 分)

给定大量手机用户通话记录，找出其中通话次数最多的聊天狂人。

输入格式:
输入首先给出正整数N（≤10
​5
​​ ），为通话记录条数。随后N行，每行给出一条通话记录。简单起见，这里只列出拨出方和接收方的11位数字构成的手机号码，其中以空格分隔。

输出格式:
在一行中给出聊天狂人的手机号码及其通话次数，其间以空格分隔。如果这样的人不唯一，则输出狂人中最小的号码及其通话次数，并且附加给出并列狂人的人数。

输入样例:
4
13005711862 13588625832
13505711862 13088625832
13588625832 18087925832
15005713862 13588625832
输出样例:
13588625832 3

#include<stdio.h>
#include<math.h> 
#include<string.h>
#include<stdlib.h> 
#include<stdbool.h>

#define KEYLENGTH 11
#define MAXTABLESIZE 1000000
#define MAXD 5

typedef char ElementType[KEYLENGTH+1];
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; /* 指向链表头结点的数组  */ 
};

Index Hash(int a, int T){
	Index H; 
	if(a<T){
		H = a;
		return H;		
	}
	else{
		while(a>=T){
			a = a/10;
		}
		H = a;
		return H;
	}
}

int NextPrime(int N){
	/* 返回大于N且不超过MAXTABLESIZE的最小素数 */ 
	int i, p = (N%2) ? N+2 : N+1; /* 从大于N的下一个奇数开始 */
	while( p<= MAXTABLESIZE){
		for (i=(int)sqrt(p); 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;
		H->Heads[i].Count = 0;
	}
	return H;
}

Position Find(HashTable H, ElementType Key){
	Position P;
	Index Pos;
	
	/* 初始散列位置 */
	Pos = Hash(atoi(Key+KEYLENGTH-MAXD), H->TableSize);
	
	P = H->Heads[Pos].Next; /* 从该链表的第1个结点开始 */
	/* 当未到表尾， 并且Key未找到时 */
	while(P&&strcmp(P->Data, Key)){
		P = P->Next;
	}
	return P; 
}

void Insert(HashTable H, ElementType Key){
	Position P, NewCell;
	Index Pos;
	
	P = Find(H, Key); 
	if(!P){/* 关键词未找到，可以插入 */
		NewCell = (Position)malloc(sizeof(struct LNode));
		strcpy(NewCell->Data, Key);
		NewCell->Count = 1;
		Pos = Hash(atoi(Key+KEYLENGTH-MAXD), H->TableSize);
		/* 将NewCell插入为H->Heads[Pos]链表的第1个结点 */
		NewCell->Next = H->Heads[Pos].Next;
		H->Heads[Pos].Next = NewCell;	 
	}
	else{/* 关键词已存在 */
	P->Count++;
	}
}

void ScanAndOutput(HashTable H){
	int i;
	int MaxCnt =  0;
	int PCnt = 0;
	ElementType MinPhone;
	List Ptr;
	MinPhone[0] = '\0';
	for(i=0; i<H->TableSize; i++){/* 扫描链表 */
		Ptr = H->Heads[i].Next;
		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");
}

void DestoryTable(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);
}

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 );
	DestoryTable( H );
	return 0; 
}