资源描述
#include < s t dio°h >
#incl ude〈 s t dlib。h>
#in elude〈 string。h>
#in clude<c t ype. h〉
#defin e NULL 0
#d efine LEN s ize o f(Boo k )
struct A
(char Name[20];
int all,left,bor row;
struct A * n ext;
};
typedef stru e t A Book;
int Di splay_ Main_Me nu();/* 主菜单显示* /
Book *Cre ate();/*功能函数声明*/
void Disp lay ( Book *h e ad);
Book *Insert(Boo k * hea d,Book *s);
Boo k *Inse rt_a_record ( Book *hea d );
Book * Delete(Bo o k *head, char * n ame );
Boo k *Delete_a_record(Book * head );
Book * Borrow (Boo k * h ead,char * name,int sum);
Book *Borrow_a_Book(Book * h ead );
Book *Retur n(B ook *head,cha r * name, i nt sum);
Book *Ret urn_ a_Boo k (Book *head );
Book *Query(Book *he a d,cha r *name);
void Qu e ry_a_r e cord(Boo k *h e ad);
Book * Addfr o mTe x t(Book *head,char *filename);
Book *Wr i te t oText(Bo o k *hea d , cha r * fi l ename);
void Quit(Book *head);
vo i d main() /*主函数部分*/
(Book *head;/*定义变量*/
e har f ilen ame[20];
in t keyw or d=111,a;
print f("Pl ease in p ut keyword: ”);
s canf("%d”,&a);
i f(a!=keyword) exit(0);
else print f(" Welc o me! ”);
head = NULL; / *置首指针为空*/
for(;;)
(
s w itch (Disp lay _Ma inMenu())
(
cas e 1 : print f (”1.Creat e BookList\n" );/* 调用 C reate 函数创建链
表*/
hea d=Creat e ();
system(" pause");
bre a k;
cas e 2:prin t f(”Disp 1 a y All Bo oks\ nn);
Display(head); /*调用D isplay 函数显示所有*/system (”pau se” );b rea k ;
cas e 3:printf(”Insert a Record \n”);
h ead= Insert _a_re c ord(head);/ * 调用 I nser t _a_r eco rd函数插入*/
system(”pau s e”);break;
case 4:pr i ntf("Dele t e a Book\n”);
hea d =Delete_a_re c ord (head);/* 调用 Delete_a_record 函数删除*/
s ystem(”paus e ”);break;
case 5:printf (" Borrow a Book\n Input BookNa me an d sum you bor row: ”);
head= Bor row_ a_Book ( head );
system(”pause”);break;
case 6:printf(”R e turn a Book\nIn p u t BookName and s um yo u ret urn:");
hea d =Retur n _a_Bo o k (head);
system(”pa u se”);b r eak;
case 7 :printf ( ”Qu er y\nInp ut th e B ookName you wan t:”);
Que ry_ a_recor d( hea d);/*调用查询函数 */system ("pause”);b r eak;
cas e 8:printf ( "Input the name o f Text File\ n”);
s c anf(”% s”,fi 1 ename ) ;/*输入文件名 */he a d=Ad d fromText( h ead, fi lename );
sy stem ( "pau se”); break;
case 9: printf("Input th e nam e of the NewText F i le\n");
scanf(”%s", file name );/*输入要写入的文件名*/head=Wr itetoText (head, filen ame );
system("pause ");break;
cas e 0: printf("Goodbye\n”);
Quit(head);
exit(O);
}
}
}
i n t Display_Ma inM e nu() /*显示菜单的函数*/
{char x;
d o{
sy ste m(”c 1s");
p r intf (” ** ********** *********** *\n”);
printf("l.Create BookList\n”);
printf("2.Display A l 1 Books\n");
printf("3.I n sert a BookInformation\n");
printf
print
printf
printf
(”4.Delete a Book\n” );
f (” 5.Bo rrow a Book \n”);
(”6.Return a Book\n");
(”7.Q u ery \n”);
printf("8.Add Reco rds From a File\n”)print f (”9.Write t o a File\n");
printf (” O.Good bye \n” );
printf ( ”** ****** ******* * ********\n")p rin tf (" Please c h oose from 0—9: ”);printf (”\n");
x =getcha r();
}while(x〈’0' || x> '9’);
r etur n( x—’ O ’);
}
Book *C r eate() /*创建链表的函数,返回首指针*/{B o ok *hea d, * newrecord;
char ch;
pr intf("Input a Book\n”);
head=NULL;/*首指针置空* /
do
/*动态分配存储空间*/
newr eco rd-> Name,&newreco rd>all);
{n ewr e cor d = (B ook * ) ma l loc(LEN);
scanf(” % s%d",
newre cord—>le f t=newre c ord> all;n e wrecord->borrow=0;
/*调用Insert函
/ *接收最后输入
h e ad=I nsert(he ad,ne w reco r d);
t cha r ();
g e
的回车符*/
pri
c
数判断位置插入*/ntf(”Add ano ther B ook Y/N?\n");
h = getchar ();
/*接收回车符*/
/ *判断是否继续*/
getchar();
}while(ch!=’n’&&ch! =’N’);
return(head);
}
Book *Ins ert(Book * head,Book *s)/*插入结点的函数*/
{ Boo k *p0, *p1, *p2;
p1=head;pO=s;
i f(head= = NULL)
while(strcmp(pO—>
{head = p0;pO->next= NUL L; }
Name,p1- > Name)>0&& (pl—>next!=NULL)){p2= pp1=p l—>n ext;
}
if(str c mp(p0 -> Name,p1-> Nam e) <=0 ){ p0 > nex t=pl;
if ( head==p1) h e ad= p 0;
else p 2 —> n ext = p0;
}
else
{pl-〉next=p0;
p0—〉nex t=NULL;
}
re t urn(he a d);
}
Boo k *Inse r t_a_re cord(Book * head )
{ Book * newrec ord;
n ewrecord = (Book *)mal loc ( LEN ) ; /*动态分配存储空间 */scanf( "%s % d”,n ewr e cord ->Na me, &newrec ord-> all);
n e wrec o rd—>b o rrow=0;
newrec o rd>lef t=newrec ord-〉all;
he a d=In s er t (head,newr e cord);
p rint f (” Insert succe ssfully\n");/* 输出插入成功的信息* /return(h ead);
}
Boo k *Delete(B ook *head,char *name )/* 删除功能函数*/
{ Boo k *p1 ,* p2;
if (head = =NULL)
p r intf (” Sorry N o record! \n” );
p1=head;
while ( strcmp(p1—〉N ame, name ) ! =0&&p1—〉next!=NULL) /{p2
= p1;p1 = pl- > next;}
if(strcmp(pl->Name, name)== 0 )
{if(p1==head)head=p1—〉next;
else {p2->next=p1—>next;
p r intf(” d elete % s successful ly \n”,name) ;}
}
r e turn (head);
}
B ook * Delete_a_ record (Book * h ead)
{ char nam e [20],ch;
Book *p;
s c anf("% s ”,name );
getchar();
p = Query (head, name);
if( p==NULL) pr i ntf (”Cannot F ind %s\n”,n ame);
else {printf(”Delete %s, Y/N?\n”,name);
ch=getchar();
s y stem(” pause");
if(ch==’ y’| |ch=='Y')
while(p!=NULL)
{head =Dele t e(head,name );
p=Que r y ( head,name);
}
}
re turn (h ead );
}
B ook *Borrow_a_Book(Book *head )
{ cha r name [20], c h ;
int n;
B ook *p;
scanf("%s%d",name,&n);
getchar(); /
p=Que r y (he ad,name );
if(p = =NULL) p r intf(”Ca nnot Find %s\n”,name);
else pr i ntf ("Are y ou sur e to borrow? %s, Y/N? \n”,name );ch=getcha r();
system ( ”pau se");
if( c h=='y,| |ch==' Y')
head= B orrow ( head, name,n );
return( h ead);
}
Book *Bor r ow(Bo ok * head, char *name,int s um)
{ Book *p1;
pl=hea d;
while ( strcmp ( p1->Name, name)! =0&&p1 -〉nex t !=NULL)
{pl = pl—〉next; }
if (strcmp(p1—〉Name,name)==0)
pl-〉borro w=sum;
p1-〉l ef t=p1 >all-sum;
return(head);
}
Boo k *Retu r n_a_Book(B ook * head)
{ cha r name[20] , ch;
int n;
Book *p;
scanf ("%s%d”,name,&n);
get char();/*接收回车*/
p=Query(head,name);
if(p==NULL) print f ("C annot Find %s\n",name);/*找不到结点*/
e lse printf(”Are you sure to ret urn? % s , Y/N?\n”,name );ch= g e t cha r();
system ( " p aus e");
if(ch = = 'y'||ch=='Y')
he ad=Ret u rn ( head, name,n);
return(head);
}
Book *Ret u rn ( Book * head, c har *name, int sum){ Book *p1;p1=head;whi le(s trcm p (pl-〉Name ,name)!=0&&p 1-> nex t!=NULL) /*p1不是要找的结点,且后面还有结点*/
(pl =p1-> next;}/ *p1 后移一个结点*/
if(strcmp(p1 >Na me, name ) ==0)/ *找到了 *
/
pl->borrow=pl—>borrow-sum;
pl —> left =p1> lef t+ sum;return(head);}void Displ ay(Book *head)( Book * p;int i;
p= head;
prin t f (”Num B ookN a meTot alLeftBorrow\n”);
for(i=l;p!=NULL;i++)
{
printf(n% —5d%—14 s % - 10d%—10d% - 5d\n”,
i,p> Name,p—〉all,p—〉left,p->b orr o w);p = p> next;
if(i% l 0==0 )
(system ("pa u se^);/*按回车继续显示*/
printf(”Num BookNam etot a l left borr ow\n");
}
}
}
Book *Que r y(Boo k *head,char *name)( Book *p;p=head;
while(strcmp(name, p->Name)!=0&&p—>next!=NULL)p=p -> next;
if(s t rcmp(name,p->Name)==0 )/ * 找到 了,返回结点地址* /
return(p);
else/*找不到返回空指针*/
return(NULL);}void Query_a_record(Book * head){ char name [20];Book *p;scanf("%s", n ame);p=Query(head,name);i f (p!=NULL) /*找到 了* /
{ printf(”Find succe ssfu l ly\n%s total: %d left:%d
borrow: %d\n”,
p-〉Name, p—> all,p—〉left,p >borrow);
}
els e
printf(" Can’t find the re cor d s o f %s\n”,n ame); / *找不到*/}
Book *Add f romText (Book * hea d, char * fi 1 ename)
{ FILE * fp;
int n,i;
i f ( (fp=fopen(filename, ”r”))==NULL)
{printf(”Cannot fi nd file:%s\n”,fi1ename);/*打不开所指定文件*/
r e tur n (head ) ;}
f scan f ( fp, ”%d", &n);/* 待插入记录个数* /
f or(i=0;i〈n;i++)
{Book *p;
p=(B o ok *)malloc(LEN);
f getc (fp);/*读取换行符*/
fscanf(fp," %s% d %d%d”,p> Name,&p—〉a1l,&p—〉left, &p—〉borrow);
head=I nse r t(head,p) ;/*插入结点* /
}
prin t f (”Add from %s suc ces sfully\n", filen ame);
fc1ose(fp);
return(head);
}
B ook *Writ eto Text(Book * head,char *fi len ame)
{FILE *fp; Book * p;
i f (head==NULL)
{printf(”No R ecord!\n”);
return( h ead);}
fp=fopen(filename,”w");/*打开文件*/
p=head;
whi1e(p! = NULL)
{ fprintf (fp, "%—14s%-10d%—10d%—10d \n\n", p—>Name, p—>all,
p->left, p—> borrow) ;/*文件输出*/
p=p—>next;}
pri ntf (”Wr it e to %s succes sfully\n”,file name);/*输
出写到文件完毕的信息*/
fclose(fp);
return(head);
}
void Quit (Book *head)
{B ook * p, *pl,*p2;FILE *fp;
char f i lename [ ]="last";
p 2 =p1= head;
if(head! =NU L L)
( f p=f open(fil ename, ”w”);/* 打开文件*/
p = head;
whil e (p! = NULL)
{ fprintf ( fp, ”%s %d %d %d\n",p-〉Name, p—〉a l l, p-〉left, p—〉b orrow ) ; /*文件输出*/
p=p—>ne x t; }
printf(”Write to % s successfully\n”,f i lename);/*输出写到文件完毕
的信息*/
fclos e (fp ) ;}
while(p1! =NULL) / * pl指向的结点不是空指针*/
(p 2 =p1->ne xt;
free(pl); /*释放存储空间*/
p1=p2;/*p 1后移一个结点*/
} }
展开阅读全文