/*用鏈表實(shí)現(xiàn)學(xué)生成績(jī)信息的管理*/ 
#include<stdio.h>
#include<stdlib.h>
#include<string.h>
struct stud_node{
	int num;
	char name[24];
	int score;
	struct stud_node *next;
};
struct stud_node *Create_Stu_Doc();   /*新建鏈表*/
struct stud_node *InsertDoc(struct stud_node *head,struct stud_node *stud);   /*插入*/
struct stud_node *DeleteDoc(struct stud_node *head,int num);       /*刪除*/
void Print_Stu_Doc(struct stud_node *head);              /*遍歷*/
 
int main(void)
{
	struct stud_node *head,*p;
	int choice,num,score;
	char name[20];
	int size = sizeof(struct stud_node);
	
	do{
		printf("1:Create\n 2:Insert\n 3: Delete\n 4:Print\n 0:Exit\n");
		scanf("%d",&choice);
		switch(choice){
			case 1:
			    head = Create_Stu_Doc();
			    break;
			case 2:
				printf("Input num,name and score:\n");
				scanf("%d %s %d",&num,name,&score);
				p = (struct stud_node *)malloc(size);
				p->num = num;
				strcpy(p->name,name);
				p->score = score;
				head = InsertDoc(head,p);
				break;
			case 3:
				printf("Input num:\n");
				scanf("%d",&num);
				head = DeleteDoc(head,num);
				break;
			case 4:
				Print_Stu_Doc(head);
				break;
			case 0:
				break;
		}
	}
	while(choice != 0);
	
	return 0;
 } 
/*新建鏈表*/
struct stud_node *Create_Stu_Doc(){
	struct stud_node *head,*p;
	int num,score;
	char name[20];
	int size = sizeof(struct stud_node);
	
	head = NULL;
	printf("Input num,name and score:\n");
	scanf("%d %s %d",&num,name,&score);
	while(num != 0){
		p=(struct stud_node *)malloc(size);
		p->num = num;
		strcpy(p->name,name);
		p->score = score;
		head = InsertDoc(head,p);    /*調(diào)用插入函數(shù)*/
		scanf("%d %s %d",&num,name,&score); 
	}
	return head;
} 
/*插入操作*/
struct stud_node *InsertDoc(struct stud_node *head,struct stud_node *stud){
	struct stud_node *ptr,*ptr1,*ptr2;
	ptr2 = head;
	ptr = stud;             /*ptr指向待插入的新的學(xué)生記錄結(jié)點(diǎn)*/
	/*原鏈表為空鏈表時(shí)的插入*/
	if(head == NULL){
		head = ptr;
		head->next = NULL;
	}else{
		while((ptr->num > ptr2->num)&&(ptr2->next != NULL)){
			ptr1 = ptr2;
			ptr2 = ptr2->next;         /*ptr1,ptr2各往后移一個(gè)結(jié)點(diǎn)*/ 
		}                             
		if(ptr->num <= ptr2->num){     /*在ptr1與ptr2之間插入新結(jié)點(diǎn)*/ 
			if(head == ptr2){
			head=ptr;
		}
		else{
			ptr1->next = ptr;
			ptr->next = ptr2;
		}
		}
		else{                         
			ptr2->next = ptr;          /*新插入結(jié)點(diǎn)成為尾結(jié)點(diǎn)*/
			ptr->next =NULL; 
		}
	}
	return head;
} 
/*刪除操作*/
struct stud_node *DeleteDoc(struct stud_node *head,int num){
	struct stud_node *ptr1,*ptr2;
	/*要被刪除結(jié)點(diǎn)為表頭結(jié)點(diǎn)*/ 
	while(head != NULL && head->num==num){
		ptr2=head;
		head=head->next;
		free(ptr2);
	}
	if(head==NULL){
        return NULL;	
	}         /*鏈表為空*/ 
	/*要被刪除結(jié)點(diǎn)為非表頭結(jié)點(diǎn)*/
	ptr1=head;
	ptr2=head->next;      /*從表頭的下一個(gè)結(jié)點(diǎn)搜索所有符合刪除要求的結(jié)點(diǎn)*/
	while(ptr2 != NULL){
		if(ptr2->num == num)/*ptr2所指結(jié)點(diǎn)符合刪除要求*/{
			ptr1->next=ptr2->next;
			free(ptr2);
		}
		else{
			ptr1 = ptr2;         /*ptr1后移一個(gè)結(jié)點(diǎn)*/ 
			ptr2 = ptr1->next;        /*ptr2指向ptr1的后一個(gè)結(jié)點(diǎn)*/ 
		}
	} 
	return head;
} 
/*遍歷操作*/
void Print_Stu_Doc(struct stud_node *head){
	struct stud_node *ptr;
	  if(head==NULL){
	  	printf("\nNo Records\n");
	  	return;
	  }
	  printf("\nThe Students'Records Are:\n");
	  printf("Num\t Name\t Score\t");
	  for(ptr=head;ptr!=NULL;ptr=ptr->next){
	  	printf("%d\t%s\t%d\n",ptr->num,ptr->name,ptr->score);
	  }
} 

/*按輸入順序建立單向鏈表*/
struct stud_node *Create_Stu_Doc(){
	int num,score;
	char name[20];
	int size = sizeof(struct stud_node);
	struct stud_node *head,*tail,*p;
	head=tail=NULL;
	printf("Input num,name and score:\n");
	scanf("%d %s %d",&num,name,&score);
	while(num!=0){
		p=(struct stud_node *)malloc(size);
		p->num = num;
		strcpy(p->name,name);
		p->score = score;
		p->next = NULL;
		if(head == NULL){
			head = p;
		}else{
			tail->next=p;       /*把原來(lái)鏈表的尾結(jié)點(diǎn)的next域指向該新增的結(jié)點(diǎn)*/
			tail=p;
		}
		scanf("%d %s %d",&num,name,&score);
	}
	return head;
}