用散列查找来解决《电话狂人问题》

7-14 电话聊天狂人 (25分)
给定大量手机用户通话记录，找出其中通话次数最多的聊天狂人。

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

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

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

根据浙大数据结构与算法课程提供的散列表方法来解决此题。

#include<stdio.h>
#include<stdlib.h>
#include<math.h>
#include<string.h>
#define max 12
#define MAX 1000000
#define maxd 5
typedef struct lnode *ptrtolnode;
struct lnode{//定义一个电话号码的节点类型
	char data[max];//电话号码数组
	ptrtolnode next;//指向下一个节点的指针
	int count;//该电话号码出现的次数
};
typedef ptrtolnode position;
typedef ptrtolnode list;
typedef struct tblnode *hashtable;
struct tblnode{//一个散列表类型
	int tablemax;//表的最大长度
	list heads;//链表的头节点指针
}; 
/*nextprim函数求一个不超过MAX的大于tablemax的最小素数，
作为散列表的最大长度*/
int nextprim(int n){
	int p,i;
	p=(n%2)?n+2:n+1;//求大于tablemax的奇数
	while(p<=MAX){//判断是否是素数
		for(i=sqrt(p);i>2;i--){
			if(p%i==0){
				break;
			}
		}
		if(i==2){
			break;
		}
		else{
			p+=2;
		} 
	}
	return p;
}
/*建立一个散列表，并进行初始化*/
hashtable creat(int n){
	int i;
	int m=nextprim(n);
	hashtable p=(hashtable)malloc(sizeof(struct tblnode));
	p->tablemax=m;
	p->heads=(list)malloc(m*sizeof(struct lnode));
	for(i=0;i<m;i++){
		p->heads[i].count=0;
		p->heads[i].data[0]='\0';
		p->heads[i].next=NULL;
	}
	return p;
}
/*散列函数的构造，从电环号码的后五位的第一位乘以32的五次方，后五位的第二位乘以32的四次方，一次类推,最后除以tablemax得到映射值*/
int hash(hashtable H,char *p){
	unsigned int h=0;
	while(*p!='\0'){
		h=(h<<5)+*p++;//向左位移五位，在二进制中相当于乘以了32；
	}
	return h%H->tablemax;
}
/*寻找是否有何和p相同的电环号码，并返回P的指针*/
position find(hashtable h,char *p){
	position P;
	unsigned int pos;
	pos=hash(h,p+max-maxd-1);
	P=h->heads[pos].next;
	while(P&&strcmp(p,P->data)){
		P=P->next;
	}
	return P;
}
/*插入函数*/
int insert(hashtable h,char *p){
	position P,newcell;
	P=find(h,p);
	unsigned int pos;
	/*判断是否已经存在相同的电环号码，如果已经存在则在原来的数据基  础上，count++。
	若不存在则新建一个节点，运用头插法将新节点插入到链表中*/
	if(!P){
		newcell=(position)malloc(sizeof(struct lnode));
		strcpy(newcell->data,p);
		newcell->count=1;
		pos=hash(h,p+max-maxd-1);
		newcell->next=h->heads[pos].next;
		h->heads[pos].next=newcell;
		return 1;
	}
	else{
		P->count++;
		return 0;
	}
}
/*扫描函数*/
void scanandoutput(hashtable h){
	int i;
	int maxcount=0,phcount=0;
	char minphone[max];
	minphone[0]='\0';
	/*maxcount用来记录最大通话记录，phcount用来记录最大通话记录有多少人，
	minphone数组用记录最大通话记录中最小的电话号码*/
	list p;
	for(i=0;i<h->tablemax;i++){
		p=h->heads[i].next;
		while(p){
			if(p->count>maxcount){
				maxcount=p->count;
				strcpy(minphone,p->data);
				phcount=1;
			}
			else if(p->count==maxcount){
				phcount++;
				if(strcmp(minphone,p->data)>0)
				//注意strcmp(minphone,p->data)>0，此时minphone大于p->data.
				strcpy(minphone,p->data);
			}
			p=p->next;
		}
	}
	if(phcount==1){
		printf("%s %d\n",minphone,maxcount);
	}
	else if(phcount>1){
		printf("%s %d %d\n",minphone,maxcount,phcount);
	}
}
//释放每一个节点
void destroytable(hashtable h){
	int i;
	list p,temp;
	for(i=0;i<h->tablemax;i++){
		temp=p=h->heads[i].next;
		while(p){
			temp=p->next;
			free(p);
			p=temp;
		}
	}
	free(h->heads);
	free(h);
}
int main(){
	int n,i;
	scanf("%d",&n);
	char key[max];
	hashtable h=creat(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;
}