#include<stdio.h>
#include<stdlib.h>
#include<string.h>
struct StuInfo//學生信息
{
 char cName[10];
 char cSex;
 char cNumber[6];
 char cTel[13];
 int iYear;
 int iMonth;
};
typedef struct StuInfo INFO;
void AddStu()//增加學生函數
{
 int iLenth;
 FILE *fp = NULL;
 INFO toAdd;//臨時存儲新學生信息

 system("CLS");
 fp = fopen("SavedStudents.txt", "a+"); //a+讀寫指針在文件尾
 if(fp == NULL)
 {
  puts("Error01");
  getchar();getchar();
  return;
 }
 puts("輸入信息：\n姓名\t性別\t學號\t出生年月\t手機號");
 scanf("%s %c %s %d.%d %s", toAdd.cName, &toAdd.cSex, toAdd.cNumber, &toAdd.iYear, &toAdd.iMonth, toAdd.cTel);
 //合法性判斷
 if(toAdd.cSex != 'F'&&toAdd.cSex != 'M')//性別只能為F或者M
 {
  puts("性別格式錯誤！請重新輸入性別：");
  scanf("%c", &toAdd.cSex);
 }
 if(toAdd.iYear <= 1980 || toAdd.iYear >= 2017 || toAdd.iMonth>12)
 {
  puts("日期錯誤！請重新輸入出生日期：");
  scanf("%d.%d", &toAdd.iYear, &toAdd.iMonth);//日期格式為1990.1格式
 }
 iLenth = strlen(toAdd.cTel);//手機號長度
 if(iLenth != 11)
 {
  puts("手機號碼格式錯誤！請重新輸入手機號：");
  scanf("%s", toAdd.cTel);
 }
 iLenth = strlen(toAdd.cNumber);
 if(iLenth != 5)
 {
  puts("學號格式錯誤！請重新輸入學號：");
  scanf("%s", toAdd.cNumber);
 }
 //判斷結束


 fwrite(&toAdd, sizeof(INFO), 1, fp);
 fclose(fp);
 puts("寫入成功!");
 puts("按回車返回");
 getchar();getchar();
 return;
}
void DeleteStu()//通過學號刪除學生信息
{
 FILE *fp = NULL;
 INFO Stu[100];
 int i = 0, iCount = 0, iRecord = 0;
 char cNumber[6];

 system("CLS");
 fp = fopen("SavedStudents.txt", "a+");
 if(fp == NULL)
 {
  puts("Error01");
  getchar();getchar();
  return;
 }
 rewind(fp);
 puts("姓名\t性別\t學號\t出生年月\t手機號");
 for(i = 0, iCount = 0;fread(&Stu[i], sizeof(INFO), 1, fp);++i, ++iCount)
 {
  printf("%s\t%c\t%s\t%d.%d\t\t%s\n", Stu[i].cName, Stu[i].cSex, Stu[i].cNumber, Stu[i].iYear, Stu[i].iMonth, Stu[i].cTel);
 }

 fclose(fp);
 fp = fopen("SavedStudents.txt", "w+"); //覆蓋重寫
 rewind(fp);

 puts("輸入要刪除學生的學號：");
 scanf("%s", cNumber);
 for(i = 0;i<iCount;i++)
 {
  if(strcmp(cNumber, Stu[i].cNumber) == 0)
  {
   iRecord = i;
   break;
  }
 }
 for(i = 0;i<iCount;++i)
 {
  if(i == iRecord)//刪除實質為：不向文件寫入該條信息
  {
   continue;
  }
  else
  {
   fwrite(&Stu[i], sizeof(INFO), 1, fp);
  }
 }
 fclose(fp);
 puts("刪除完成！");


 puts("按回車返回");
 getchar();getchar();
 return;
}
void GetInfo()//通過學號取得學生信息
{
 FILE *fp;
 INFO Stu[100];
 char cNumber[6];
 int iLenth, iCount = 0, i;

 system("CLS");
 fp = fopen("SavedStudents.txt", "a+"); //a+讀寫指針在文件尾
 if(fp == NULL)
 {
  puts("Error01");
  getchar();getchar();
  return;
 }
 rewind(fp);
 for(;fread(&Stu[iCount], sizeof(INFO), 1, fp);++iCount);//讀入并計數
 puts("輸入你要查詢的學號：如：Y1001");
 scanf("%s", cNumber);
 iLenth = strlen(cNumber);
 if(iLenth != 5)
 {
  puts("學號格式錯誤！");
  puts("按回車返回");
  getchar();getchar();
  return;
 }
 for(i = 0;i<iCount;++i)
 {
  if(strcmp(Stu[i].cNumber, cNumber) == 0)
  {
   puts("姓名\t性別\t學號\t出生年月\t手機號");
   printf("%s\t%c\t%s\t%d.%d\t\t%s\n", Stu[i].cName, Stu[i].cSex, Stu[i].cNumber, Stu[i].iYear, Stu[i].iMonth, Stu[i].cTel);
   break;
  }
  if(i == iCount - 1)
  {
   puts("沒有找到匹配學號！");
  }
 }

 puts("按回車返回");
 getchar();getchar();
 return;
}
void ListAllInfo()//查看所有學生信息
{
 FILE *fp = NULL;
 INFO Stu[100], Temp;
 int iCount = 0, i = 0, j = 0;
 system("CLS");
 fp = fopen("SavedStudents.txt", "a+");
 if(fp == NULL)
 {
  puts("Error01");
  getchar();getchar();
  return;
 }
 rewind(fp);

 for(i = 0, iCount = 0;fread(&Stu[i], sizeof(INFO), 1, fp);++i, ++iCount);

 for(i = 0;i<iCount;i++)
 {
  for(j = 0;j<iCount - 1;j++)
  {
   if(strcmp(Stu[j].cNumber, Stu[j + 1].cNumber)>0)
   {
    Temp = Stu[j];
    Stu[j] = Stu[j + 1];
    Stu[j + 1] = Temp;
   }
  }
 }

 puts("姓名\t性別\t學號\t出生年月\t手機號");
 for(i = 0;i<iCount;++i)
 {
  printf("%s\t%c\t%s\t%d.%d\t\t%s\n", Stu[i].cName, Stu[i].cSex, Stu[i].cNumber, Stu[i].iYear, Stu[i].iMonth, Stu[i].cTel);
 }


 printf("\n共找到[%d]條記錄", iCount);
 puts("\n按回車返回");
 getchar();getchar();
 return;
}
void SortAndOut()//排序學生
{
 FILE *fp = NULL;
 INFO Stu[100], Temp;
 int i, j, iCount = 0;

 system("CLS");
 fp = fopen("SavedStudents.txt", "a+");
 if(fp == NULL)
 {
  puts("Error01");
  getchar();getchar();
  return;
 }
 rewind(fp);
 for(;fread(&Stu[iCount], sizeof(INFO), 1, fp);++iCount);//讀入并計數
 for(i = 0;i<iCount - 1;++i)
 {
  for(j = 0;j<iCount - 1;++j)
  {
   if(Stu[j].iYear>Stu[j + 1].iYear)
   {
    Temp = Stu[j];
    Stu[j] = Stu[j + 1];
    Stu[j + 1] = Temp;
   }
   if(Stu[j].iYear == Stu[j + 1].iYear&&Stu[j].iMonth>Stu[j + 1].iMonth)
   {
    Temp = Stu[j];
    Stu[j] = Stu[j + 1];
    Stu[j + 1] = Temp;
   }
  }
 }
 puts("姓名\t性別\t學號\t出生年月\t手機號");
 for(i = 0;i<iCount;++i)
 {
  printf("%s\t%c\t%s\t%d.%d\t\t%s\n", Stu[i].cName, Stu[i].cSex, Stu[i].cNumber, Stu[i].iYear, Stu[i].iMonth, Stu[i].cTel);
 }

 puts("按回車返回");
 getchar();getchar();
 return;
}

int main()
{
 int iChoice;
 puts("1.增加學生\n2.刪除學生\n3.查詢學生\n4.顯示所有學生信息(默認學號排序)\n5.按出生年月排序輸出\n0.退出\n輸入選擇：");
 scanf("%d", &iChoice);
 while(iChoice != 0)//主界面
 {
  switch(iChoice)
  {
  case 1:AddStu();break;
  case 2:DeleteStu();break;
  case 3:GetInfo();break;
  case 4:ListAllInfo();break;
  case 5:SortAndOut();break;
  default:break;
  }
  system("CLS");
  puts("1.增加學生\n2.刪除學生\n3.查詢學生\n4.顯示所有學生信息(默認學號排序)\n5.按出生年月排序輸出\n0.退出\n輸入選擇：");
  scanf("%d", &iChoice);
 }

 return 0;
}