tongxunlu.txt

数据结构课程设计。。。。C语言。。。通讯录

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#define MAXL 120

typedef struct saddr { 
 char *NAME;
 char *PHONENUM;
 char *STREET;
 char *CITY;
 char *EIP;
 char *STATE;
 struct saddr *next, *prior;
} TXL;

char buffer[MAXL], fNAME[40],sNAME[40];
FILE *fp;
int flag= 0;

TXL *load();
void enter(), make(), search(), delete(), display(), show(),
save(), freeall(), help();
int getstr(FILE*, char **), getbuffer(FILE *);

int main(int argc, char **argv)
{ 
TXL *head;
FILE *fp;
char c,c2,c3;
if (argc == 1) {
printf("                  **********************************\n");
printf("                          欢迎使用本通讯录系统\n");
printf("                  **********************************\n\n");
loop2:printf("  请输入通信录文件路径： ");
scanf("%s%*c", fNAME);
}
else{
strcpy(fNAME, *++argv);
}
if((fp=fopen(fNAME,"r+"))==NULL)
printf("  该地址不存在通讯录，新建立...\n");
else
printf("  通讯录 %s 载入成功...\n",fNAME);
head = load(fNAME);
while (1) {
loop:
printf("\n\t\t ***************************************");
printf("\n\t\t                 操作菜单               ");
printf("\n\t\t ***************************************");
printf("\n\t\t| 1(输入)\t2(显示)\t\t3(查找) |");
printf("\n\t\t| 4(删除)\t5(载入)\t\t6(保存) |");
printf("\n\t\t| 7(另存)\t8(退出)\t\t9(帮助) |");
printf("\n\t\t ***************************************\n");
printf("\n  请选择要进行的操作:");
while (getbuffer(stdin) == 0);
if ((c = buffer[0]) == '8')
{{printf("  即将退出本通讯录系统...确认请按Y，重新选择请按其他键：");
c2=getchar();
if ((c2!='y')&&(c2!='Y')) goto loop;}
if (flag) {
printf("  本通讯录已被修改，是否保存？(y/n) ");
while (!(((c = getchar()) >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z')))continue;
if (c == 'y' || c == 'Y')
save(head, fNAME);
}
freeall(head);
break;
}
switch(c){
case '1' :
enter(head);
break;
case '2' :
show(head);
break;
case '3' :
search(head);
break;
case '4' :
delete(head);
break;
case '5' :
if (flag) {
printf("  通讯录 %s 已被修改，是否保存？(y/n)\n ",fNAME);
while (!(((c = getchar()) >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z')))continue;
if (c == 'y' || c == 'Y')
save(head, fNAME);
printf("  文件%s已保存.",fNAME);
}
freeall(head);
flag= 0;
goto loop2;
break;
case '6' :
save(head, fNAME);
flag= 0;
printf("  文件%s已保存.",fNAME);
break;
case '7' :
loop7:printf("  请输入保存路径：\n");
scanf("%s%*c", sNAME);
if((fp=fopen(sNAME,"r+"))!=NULL)
printf("此地址已存在.覆盖请按Y,否则请按其他键...");
c3=getchar();
if (c3== 'y' || c3== 'Y')
{save(head, sNAME);
printf("  文件已保存到%s\n",sNAME);
flag=0;}
else goto loop7;
break;
case '9':
help();
break;
default :
{printf("  输入错误，请重试...");
help();}
break;
}
}/*while (1)   */
return 0;
}/*int main    */

/* 输入通讯录信息 */
void enter( TXL *ptr)
{ 
char *spt;
TXL *p;

while (1) {
loop1:printf("  请输入姓名： (直接回车则退出录入) ");
if (getstr(stdin, &spt) ==0) break;

while (p) {
if (strcmp(buffer, p->NAME) == 0) break;
p = p->next;
}
if (p)
{display(p);
printf("\n") ;
printf("  该姓名已存在!请先删除原信息或重新输入 \n");
goto loop1;}


p = (TXL *)malloc(sizeof(TXL));
p->NAME = spt;
loop4:printf("  请输入电话号码: ");
getstr(stdin, &p->PHONENUM);
if (check(p->PHONENUM))
goto loop4;
printf("  请输入街道: ");
getstr(stdin, &p->STREET);
printf("  请输入城市：");
getstr(stdin, &p->CITY);
loop5:printf("  请输入邮编：");
getstr(stdin, &p->EIP);
if (check(p->EIP))
goto loop5;
printf("  请输入国家：");
getstr(stdin, &p->STATE);
p->next = NULL;
p->prior = NULL;
make(ptr, p);
flag= 1;
}
}
/* 将*p插入双向链表 */
void make(TXL *ptr, TXL *p)
{ 
TXL *prior, *suc;
 
prior = ptr;
suc = prior->next;
while (suc) {
if (strcmp(suc->NAME,p->NAME) >= 0) break;
prior = suc;
suc = prior->next;
}
prior->next = p;
p->prior = prior;
p->next = suc;
if(suc) suc->prior = p;
} 

/* 以姓名为关键字查找*/
void search( TXL *ptr )
{ 
TXL *p;
 
printf("  请输入要查找的姓名：");
while (getbuffer(stdin) == 0);
p = ptr->next;
while (p) {
if (strcmp(buffer, p->NAME) == 0) break;
p = p->next;
}
if (p)
display(p);
else
printf("  该姓名不存在于通讯录中！\n");
}
/* 删除通信录信息 */
void delete( TXL *ptr )
{
TXL *prior, *suc;
 printf("  请输入要删除的姓名： ");
 while (getbuffer(stdin) == 0) ; /* 跳过空行 */
 prior = ptr;
 suc = prior->next;
 while (suc) {
if (strcmp(suc->NAME, buffer) == 0) break;
prior = suc;
suc = prior->next;
}
if (suc) {
printf("  %s 已被删除\n",suc->NAME);
if (suc->next)
suc->next->prior = prior;
prior->next = suc->next;
free(suc->NAME);
free(suc->PHONENUM);
free(suc->STREET);
free(suc->CITY);
free(suc->EIP);
free(suc->STATE);
free(suc);
flag= 1;
 }
 else
printf("  该姓名不存在于通讯录中！\n");
} 


/* 显示所有通讯录信息*/
void display( TXL *ptr )
{
  printf("\n");
  printf("    姓名 : %s", ptr->NAME);
  printf("    \t电话 ：%s", ptr->PHONENUM);
  printf("    \t街道 : %s\n", ptr->STREET);
  printf("    城市 : %s", ptr->CITY);
  printf("    \t邮编 : %s", ptr->EIP);
  printf("    \t国家 ：%s\n", ptr->STATE);
  ptr=ptr->next;
}
void show( TXL *ptr )
{
TXL *p;
p = ptr->next;
/*while (p) {
if (strcmp(buffer, p->NAME) == 0) break;
p = p->next;
}*/
while(p){
display(p);
p=p->next;
}
}

/* 帮助菜单 */
void help()
{
 printf("\n***************************************\n");
 printf("帮助菜单:\n");
 printf("  1 : 录入新的通讯录信息.\n");
 printf("  2 : 显示所有通讯录信息.\n");
 printf("  3 : 以姓名为关键字查找通讯录信息.\n");
 printf("  4 : 删除通讯录信息.\n");
 printf("  5 ：载入通讯录文件.\n");
 printf("  6 : 保存通讯录文件.\n");
 printf("  7 ：另存为...\n");
 printf("  8 : 退出本通讯录系统.\n");
 printf("***************************************\n");
} 
/* 保存 */
void save(TXL *head, char *fNAME)
{
FILE *fp;
TXL *p;

p = head->next;
if ((fp = fopen(fNAME, "w")) == NULL) {
fprintf(stderr, "Can't open %s.\n", fNAME);
return;
}
while (p != NULL) {
fprintf(fp, "%s\n%s\n%s\n%s\n%s\n%s\n", p->NAME, p->PHONENUM, p->STREET, p->CITY, p->EIP,p->STATE);
p = p->next;
}
fclose(fp);
}
/* 载入 */
TXL *load(char *fNAME)
{
TXL *p, *h;

h = (TXL *)malloc(sizeof(TXL));
h->prior = NULL;
h->next = NULL;
if ((fp = fopen(fNAME, "r")) == NULL)
return h; /* 原先没有文件，返回空链表 */
while (!feof(fp)) {
p = (TXL *)malloc(sizeof(TXL));
if(getstr(fp, &p->NAME) == 0) {
free(p);
break;
}
getstr(fp, &p->PHONENUM);
getstr(fp, &p->STREET);
getstr(fp, &p->CITY);
getstr(fp, &p->EIP);
getstr(fp, &p->STATE);
make(h, p);
}
fclose(fp);
return h;
} 
/* 从文件读入一行，并删除前导和尾随空白符后保存于堆空间 */
int getstr(FILE *rfp, char **s) 
{
int len;
if ((len = getbuffer(rfp)) == 0) {
*s = NULL;
return 0;
}
*s = (char *)malloc(len+1);
strcpy(*s, buffer);
return len;
}
/* 从文件读入一行，并删除前导和尾随空白符后保存于buffer */
int getbuffer(FILE *rfp)
{
int len;
char *hp, *tp;
if (fgets(buffer, MAXL, rfp) == NULL)
return 0;
hp = buffer;
while(*hp == ' ' || *hp == '\t')
hp++;
tp = hp + strlen(hp) - 1;
while (tp >= hp && (*tp == ' ' || *tp == '\t' || *tp == '\n'))
tp--;
*(tp+1) = '\0';
for(tp = buffer; *tp++ = *hp++;);
len = strlen(buffer);
return len;
}
/* 释放内存空间 */
void freeall(TXL *head)
{
TXL *p;
p = head->next;
free(head);
while (p != NULL) {
if (p->NAME != NULL)
free(p->NAME);
if (p->PHONENUM !=NULL)
free(p->PHONENUM);
if (p->STREET != NULL)
free(p->STREET);
if (p->CITY != NULL)
free(p->CITY);
if (p->EIP != NULL)
free(p->EIP);
if (p->STATE!= NULL)
free(p->STATE);
head = p->next;
free(p);
p = head;
}
} 

/*检查电话号码和邮编是否符合规范*/
int check(char ch[])
{int a=0,len;
len=strlen(ch);
for(a=0;a<len;a++)
{if(((ch[a]<'0')&&(ch[a]!='-'))||((ch[a]>'9')&&(ch[a]!='-')))
{printf("输入错误，请重试...\n");
return 1;
break;}
else if(a==len-1)
return 0;} }