// algo12-1.cpp 根據(jù)事務(wù)文件成批地更改主文件并得到一個(gè)新的主文件
 #include"c1.h"
 struct RedType // 主文件記錄類型
 {
   int accounts; // 帳號(hào)
   int amount; // 余額
 };
 struct RcdType // 事務(wù)文件記錄類型(比主文件記錄類型多了成員code)
 {
   int accounts; // 帳號(hào)
   int amount; // 存取的數(shù)量(存為+,取為-)
   char code; // 修改要求(I:插入 U:修改 D:刪除)
 };
 #define key accounts
 RedType P(RcdType g)
 { // 把g加工為q的結(jié)構(gòu)返回
   RedType q;
   q.accounts=g.accounts;
   q.amount=g.amount;
   return q;
 }

 void Q(RedType &f,RcdType g)
 { // 將f和g歸并成一個(gè)f結(jié)構(gòu)的記錄
   f.amount+=g.amount;
 }

 void MergeFile(FILE *f,FILE *g,FILE *h)
 { // 由按關(guān)鍵字遞增有序的非空順序文件f和g歸并得到新文件h，三個(gè)文件均已
   // 打開，其中，f和g為只讀文件，文件中各附加一個(gè)最大關(guān)鍵字記錄，
   // 且g文件中對(duì)該記錄的操作為插入。h為只寫文件。算法12.1
   RedType fr,fn;
   RcdType gr;
   int i;
   fread(&fr,sizeof(RedType),1,f);
   fread(&gr,sizeof(RcdType),1,g);
   while(!feof(f)||!feof(g))
   {
     if(fr.key<gr.key)
       i=1;
     else if(gr.code=='D'&&fr.key==gr.key)
       i=2;
     else if(gr.code=='I'&&fr.key>gr.key)
       i=3;
     else if(gr.code=='U'&&fr.key==gr.key)
       i=4;
     else
       i=0;
     switch(i)
     {
       case 1: // 復(fù)制“舊”主文件中記錄
               fwrite(&fr,sizeof(RedType),1,h);
               if(!feof(f))
                 fread(&fr,sizeof(RedType),1,f);
               break;
       case 2: // 刪除“舊”主文件中記錄，即不復(fù)制
               if(!feof(f))
                 fread(&fr,sizeof(RedType),1,f);
               if(!feof(g))
                 fread(&gr,sizeof(RcdType),1,g);
               break;
       case 3: // 插入
               fn=P(gr); // 函數(shù)P把gr加工為h的結(jié)構(gòu)
               fwrite(&fn,sizeof(RedType),1,h);
               if(!feof(g))
                 fread(&gr,sizeof(RcdType),1,g);
               break;
       case 4: // 更改“舊”主文件中記錄
               Q(fr,gr); // 函數(shù)Q將fr和gr歸并成一個(gè)h結(jié)構(gòu)的記錄
               fwrite(&fr,sizeof(RedType),1,h);
               if(!feof(f))
                 fread(&fr,sizeof(RedType),1,f);
               if(!feof(g))
                 fread(&gr,sizeof(RcdType),1,g);
               break;
       default:exit(ERROR); // 其它均為出錯(cuò)情況
     }
   }
 }

 void print(RedType t)
 {
   printf("%6d%4d\n",t.accounts,t.amount);
 }

 void printc(RcdType t)
 {
   printf("%6d%6d%8c\n",t.accounts,t.amount,t.code);
 }

 void main()
 {
   RedType c,a[8]={{1,50},{5,78},{12,100},{14,95},{15,360},{18,200},{20,510},{INT_MAX,0}}; // 主文件數(shù)據(jù)
   RcdType d,b[6]={{8,100,'I'},{12,-25,'U'},{14,38,'U'},{18,-200,'D'},{21,60,'I'},{INT_MAX,0,'U'}}; // 已排序的事務(wù)文件數(shù)據(jù)
   FILE *f,*g,*h;
   int j;
   f=fopen("old","wb"); // 以寫的方式打開主文件old
   fwrite(a,sizeof(RedType),8,f); // 將數(shù)組a中的數(shù)據(jù)寫入文件old
   fclose(f); // 關(guān)閉文件old，形成主文件
   f=fopen("change","wb"); // 以寫的方式打開事務(wù)文件change
   fwrite(b,sizeof(RcdType),6,f); // 將數(shù)組b中的數(shù)據(jù)寫入文件change
   fclose(f); // 關(guān)閉文件change，形成已排序的事務(wù)文件
   f=fopen("old","rb"); // 以讀的方式打開主文件old
   printf("主文件內(nèi)容:\n");
   printf("  帳號(hào) 余額\n");
   do
   {
     j=fread(&c,sizeof(RedType),1,f);
     if(j==1)
       print(c); // 輸出r的內(nèi)容
   }while(j==1);
   rewind(f); // 使f的指針重新返回文件的起始位置，以便重新讀入內(nèi)存
   g=fopen("change","rb"); // 以讀的方式打開已排序的事務(wù)文件change
   printf("已排序的事務(wù)文件內(nèi)容:\n");
   printf("  帳號(hào) 存取數(shù)量 修改要求\n");
   do
   {
     j=fread(&d,sizeof(RcdType),1,g);
     if(j==1)
       printc(d); // 輸出r的內(nèi)容
   }while(j==1);
   rewind(g); // 使g的指針重新返回文件的起始位置，以便重新讀入內(nèi)存
   h=fopen("new","wb"); // 以寫的方式打開新主文件new
   MergeFile(f,g,h); // 生成新主文件
   fclose(f); // 關(guān)閉文件old
   fclose(g); // 關(guān)閉文件change
   fclose(h); // 關(guān)閉文件new
   f=fopen("new","rb"); // 以讀的方式打開新主文件new
   printf("新主文件內(nèi)容:\n");
   printf("  帳號(hào) 余額\n");
   do
   {
     j=fread(&c,sizeof(RedType),1,f);
     if(j==1)
       print(c); // 輸出r的內(nèi)容
   }while(j==1);
   fclose(f); // 關(guān)閉文件new
 }