c的数据库编程 1267.txt

用C来实现数据库编程

            else 
      printf("out record\n");
     break;
 case 2:
     printf("\n");
     printf("no:");
     scanf("%d",&mdf_number);
            if (head != nil) {
  c = head;
  l = c->next;
  modified_num = 0;
  for (i = 1; i <= count; i++) {
      if (c->number == mdf_number) {
   modify_it(c,l,i);
   modified_num = modified_num + 1;
   c = l;
   c = c->next;
      }
      else  {
   c = l;
   l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 3:
     printf("\n");
     printf("name:");
     gets(mdf_name);
     if (head != nil) {
  c = head;
  l = c->next;
  modified_num = 0;
  for (i = 1; i <= count; i++) {
                    if (strcmp(c->name,mdf_name) == 0) {
                        modify_it(c,l,i);
   modified_num = modified_num + 1;
                        c = l;
   c = c->next;
      }
      else  {
   c = l;
   l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 4:
     printf("\n");
     printf("sex:");
     scanf("%c",&mdf_sex);
     if (head != nil) {
  c = head;
  l = c->next;
  modified_num = 0;
  for (i = 1; i <= count; i++) {
      if (c->sex == mdf_sex) {
   modify_it(c,l,i);
   modified_num = modified_num + 1;
                        c = l;
   c = c->next;
                    }
                    else  {
                        c = l;
                        l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 5:
     printf("\n");
     printf("birthday:");
     scanf("%d%d%d",&mdf_birthdate.da_year,&mdf_birthdate.da_mon,
      &mdf_birthdate.da_day);
     if (head != nil) {
  c = head;
                l = c->next;
                modified_num = 0;
  long_m = mdf_birthdate.da_year;
                long_m = long_m * 100;
  long_m = long_m + mdf_birthdate.da_mon;
                long_m = long_m * 100;
  long_m = long_m + mdf_birthdate.da_day;
  for (i = 1; i <= count; i++) {
      long_c = c->birthdate.da_year;
                    long_c = long_c * 100;
      long_c = long_c + c->birthdate.da_mon;
      long_c = long_c * 100;
      long_c = long_c + c->birthdate.da_day;
      if ((long_c == long_m)) {
                        modify_it(c,l,i);
   modified_num = modified_num + 1;
                        c = l;
                        c = c->next;
                    }
                    else  {
                        c = l;
                        l = c->next;
                    }
  }    /*FOR*/
                if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 6:
     printf("\n");
     printf("experience:");
     scanf("%d",&mdf_experience);
            if (head != nil) {
                c = head;
                l = c->next;
                modified_num = 0;
                for (i = 1; i <= count; i++) {
                    if (c->experience == mdf_experience) {
   modify_it(c,l,i);
   modified_num = modified_num + 1;
   c = l;
   c = c->next;
      }
      else  {
   c = l;
   l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 7:
     printf("\n");
     printf("force:");
     scanf("%d",&mdf_force);
     if (head != nil) {
  c = head;
  l = c->next;
  modified_num = 0;
  for (i = 1; i <= count; i++) {
      if (c->force == mdf_force) {
   modify_it(c,l,i);
   modified_num = modified_num + 1;
   c = l;
   c = c->next;
      }
      else  {
   c = l;
   l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 case 8:
     printf("\n");
     printf("smartness:");
     scanf("%d",&mdf_smartness);
            if (head != nil) {
  c = head;
                l = c->next;
  modified_num = 0;
                for (i = 1; i <= count; i++) {
                    if (c->smartness == mdf_smartness) {
                        modify_it(c,l,i);
                        modified_num = modified_num + 1;
                        c = l;
   c = c->next;
                    }
                    else  {
                        c = l;
                        l = c->next;
      }    /*IF*/
  }    /*FOR*/
  if (modified_num != 0)
      printf(" %d modify\n",modified_num);
  else
      printf("no record\n");
     }
     else
      printf("no record\n");
     break;
 default:
     printf("modify error\n");
     break;
    }    /*CASE*/

}

void read_record (void)
{

int n,i,len;
char *path;
char panduan;

    count = 0;    /*文件初始化*/
    printf("\n");
    printf("give the name of dbf like pb.txt:\n");
    gets(path);
    if((db_file=fopen(path,"rt"))==NULL)
 printf("this file is not exist");
    else
    {
    fseek(db_file,0,SEEK_SET);
    fscanf(db_file,"%d",&n);    /*读取最大记录数*/
    for (i = 1; i <=n; i++) {    /*数据载入缓冲*/
 fscanf(db_file,"%d",&number_c);
 fscanf(db_file,"%10s",&name_c);
 fseek(db_file,1,SEEK_CUR);
 fscanf(db_file,"%c",&sex_c);
 fscanf(db_file,"%5d",&birthdate_c.da_year);
 fscanf(db_file,"%3d",&birthdate_c.da_day);
 fscanf(db_file,"%3d",&birthdate_c.da_mon);
 fscanf(db_file,"%4d",&experience_c);
 fscanf(db_file,"%4d",&force_c);
 fscanf(db_file,"%4d",&smartness_c);
 add_record();
    }
    printf("file read end\n");
    printf("record number is %d \n",i-1);
    }

}

void input_record (void)
{

int n,err;

    n = count + 1;
    printf("\n");
    printf("after enter\n");
    number_c=0;
    while ( number_c!=-1 ) {
 printf("record %d\n",n);
 printf("No:");
 scanf("%d",&number_c);
 printf("name:");
 gets(name_c);
 gets(name_c);
 printf("sex(M,F):");
 scanf("%c",&sex_c);
 printf("birthda_day(1978 16 1):");
 scanf("%d %d %d",&birthdate_c.da_year,&birthdate_c.da_day,&birthdate_c.da_mon);
 printf("experience:");
 scanf("%d",&experience_c);
 printf("force:");
 scanf("%d",&force_c);
 printf("smartness:");
 scanf("%d",&smartness_c);
 printf("\n");
 err = check_record(&number_c,&sex_c,&birthdate_c,&experience_c,
  &force_c,&smartness_c);
 switch (err) {
     case 0:
  add_record();
  n = n + 1;
  break;
     case 1:
  printf("no wrong:1-1000\n");

  printf("try again\n");
  break;
     case 2:
  printf("sex wrong:M male F female\n");

  printf("try again\n");
  break;
     case 3:
  printf("birthday wrong:1978 1 16\n");

  printf("try again\n");
  break;
     case 4:
  printf("experience wrong:0-100\n");

  printf("try again\n");
  break;
     case 5:
  printf("force wrong:0-100\n");

  printf("try again\n");
  break;
     case 6:
  printf("smartness wrong:0-100\n");

  printf("try again\n");
  break;
 }
 printf("enter to continue,-1 to end");
 printf("\n");
    }

}

void insert_record (void)
{

int i,
    n,
    p;
struct node *c,
     *l;

    if (head != nil) {
        printf("\n");
 printf("insert record:");
 scanf("%d",&n);
 if ((n >= 1) && (n <= count)) {
     c = nil;
            l = nil;
            for (i = 1; i <= n; i++) {
                if (i == 1) {
                    c = head;
                    l = c->next;
                }
                else  {
                    c = l;
                    l = c->next;
                }
            }
     insert_it(&c,n,&p);
     if (p == 1)
  printf("insert over\n");
     else
  printf("insert wrong\n");
 }
 else
     printf("out record\n");
    }
    else  {
 insert_it(&head,1,&p);
     if (p == 1)
  printf("insert over\n");
     else
  printf("insert wrong\n");
    }

}

void command_select (char command_line[])
{

    if ((strcmp(command_line,"APPEND") == 0) || (strcmp(command_line,
            "ADD") == 0)) {
 strcpy (command_line,"");//clear command_line
 input_record();//input
    }
    else if ((strcmp(command_line,"DEL") == 0) || (strcmp(command_line,
     "DELETE") == 0)) {
 strcpy (command_line,"");
 del_record();//delete
    }
    else if (strcmp(command_line,"SAVE") == 0) {
 strcpy (command_line,"");
 save_record();//save
    }
    else if (strcmp(command_line,"LOAD") == 0) {
 strcpy (command_line,"");
 read_record();//load
    }
    else if (strcmp(command_line,"INSERT") == 0) {
 strcpy (command_line,"");
 insert_record();//insert
    }
    else if ((strcmp(command_line,"SHOW") == 0) || (strcmp(command_line,
     "DIR") == 0)) {
 strcpy (command_line,"");
 output_record();//show
    }
    else if (strcmp(command_line,"FIND") == 0) {
 strcpy (command_line,"");
 find_record();//find
    }
    else if (strcmp(command_line,"SORT") == 0) {
 strcpy (command_line,"");
 sort_record();//sort
    }
    else if (strcmp(command_line,"MODIFY") == 0) {
 strcpy (command_line,"");
 modify_record();//modify
    }
    else if (strcmp(command_line,"HELP") == 0) {
 strcpy (command_line,"");


 printf("command help:");
 printf("APPEND,");
 printf("DELETE,");
 printf("SAVE,");
 printf("LOAD,");
 printf("INSERT,");
 printf("SHOW,");
 printf("FIND,");
 printf("SORT,");
 printf("CLOSE,");
 printf("MODIFY,");
 printf("QUIT,");
 printf("HELP");
    }
    else if (strcmp(command_line,"CLOSE") == 0) {
 strcpy (command_line,"");
        close_database(1);
    }
    else if ((strcmp(command_line,"QUIT") == 0) || (strcmp(command_line,
     "EXIT") == 0))
 strcpy (command_line,"QUIT");//exit
    else  {
 strcpy (command_line,"");
 printf("wrong command\n");//wrong
    }
}

void optimize(char command[])
{

char ch;
int i;

    ch = command[0];
    i = 1;
    while (ch != 0) {
 if ((ch > 96) && (ch < 123))
     command[i - 1] = ch - 32;
 i = i + 1;
 ch = command[i - 1];
    }

}


void main()
{
    head = nil;    /*变量初始化*/
    current = nil;
    last = nil;
    count = 0;
    tmp = 0;
    strcpy (command_line,"");
    while (strcmp(command_line,"QUIT") != 0) {//press quit to end
 printf("\n");
 printf("PB.COMMAND>");
 gets(command_line);//get command
 optimize(command_line);//up key
 command_select(command_line);//select command
 /*if current<>nil then writeln('test:  ',current^.name);*/    }

}