/* algo4-3.c 文本行編輯 */
 #include"c1.h"
 #include"c4-2.h" /* 采用串的堆分配存儲結(jié)構(gòu) */
 #include"bo4-2.c" /* 串的堆分配基本操作 */

 #define MAX_LEN 25 /* 文件最大行數(shù) */
 #define LINE_LEN 75 /* 每行字符數(shù)最大值+1 */
 #define NAME_LEN 20 /* 文件名最大長度(包括盤符、路徑)+1 */

 /* 全局變量 */
 HString T[MAX_LEN];
 char str[LINE_LEN],filename[NAME_LEN]="";
 FILE *fp;
 int n=0; /* 文件行數(shù) */

 void Open()
 { /* 打開文件(新或舊) */
   int i;
   if(filename[0]) /* 文件已打開 */
     printf("已存在打開的文件\n");
   else
   {
     printf("請輸入文件名(可包括盤符、路徑，不超過%d個字符): ",NAME_LEN-1);
     scanf("%s%*c",filename);
     fp=fopen(filename,"r");
     if(fp) /* 已存在此文件 */
     {
       do
       {
         fgets(str,LINE_LEN,fp);
         i=strlen(str);
         str[i-1]=0; /* 將10強制改為0 */
         i--;
         if(i>0)
         {
           StrAssign(&T[n],str);
           n++;
           if(n>MAX_LEN)
           {
             printf("文件太大\n");
             return;
           }
         }
       }while(i>0);
       fclose(fp);
     }
     else
       printf("新文件\n");
   }
 }

 void List()
 { /* 顯示文件內(nèi)容 */
   int i;
   for(i=0;i<n;i++)
   {
     printf("%d: ",i+1);
     StrPrint(T[i]);
   }
   getchar();
 }

 void Insert()
 { /* 插入行 */
   int i,l,m;
   printf("在第l行前插m行,請輸入l m: ");
   scanf("%d%d%*c",&l,&m);
   if(n+m>MAX_LEN)
   {
     printf("插入行太多\n");
     return;
   }
   if(n>=l-1&&l>0)
   {
     for(i=n-1;i>=l-1;i--)
       T[i+m]=T[i];
     n+=m;
     printf("請順序輸入待插入內(nèi)容:\n");
     for(i=l-1;i<l-1+m;i++)
     {
       gets(str);
       InitString(&T[i]);
       StrAssign(&T[i],str);
     }
   }
   else
     printf("行超出范圍\n");
 }

 void Delete()
 { /* 刪除行 */
   int i,l,m;
   printf("從第l行起刪除m行,請輸入l m: ");
   scanf("%d%d%*c",&l,&m);
   if(n>=l+m-1&&l>0)
   {
     for(i=l-1+m;i<n;i++)
       T[i-m]=T[i];
     for(i=n-m;i<n;i++)
       InitString(&T[i]);
     n-=m;
   }
   else
     printf("行超出范圍\n");
 }

 void Copy()
 { /* 拷貝行 */
   int i,l,m,k;
   printf("把第l行開始的m行插在原k行之前,請輸入l m k: ");
   scanf("%d%d%d%*c",&l,&m,&k);
   if(n+m>MAX_LEN)
   {
     printf("拷貝行太多\n");
     return;
   }
   if(n>=k-1&&n>=l-1+m&&(k>=l+m||k<=l))
   {
     for(i=n-1;i>=k-1;i--)
       T[i+m]=T[i];
     n+=m;
     if(k<=l)
       l+=m;
     for(i=l-1;i<l-1+m;i++)
     {
       InitString(&T[i+k-l]);
       StrCopy(&T[i+k-l],T[i]);
     }
   }
   else
     printf("行超出范圍\n");
 }

 void Modify()
 { /* 修改行 */
   int i;
   printf("請輸入待修改的行號: ");
   scanf("%d%*c",&i);
   if(i>0&&i<=n) /* 行號合法 */
   {
     printf("%d: ",i);
     StrPrint(T[i-1]);
     printf("請輸入新內(nèi)容: ");
     gets(str);
     StrAssign(&T[i-1],str);
   }
   else
     printf("行號超出范圍\n");
 }

 void Search()
 { /* 查找字符串 */
   int i,k,f=1; /* f為繼續(xù)查找標(biāo)志 */
   char b;
   HString s;
   printf("請輸入待查找的字符串: ");
   scanf("%s%*c",str);
   InitString(&s);
   StrAssign(&s,str);
   for(i=0;i<n&&f;i++) /* 逐行查找 */
   {
     k=1; /* 由每行第1個字符起查找 */
     while(k)
     {
       k=Index(T[i],s,k); /* 由本行的第k個字符開始查找 */
       if(k) /* 找到 */
       {
         printf("第%d行: ",i+1);
         StrPrint(T[i]);
         printf("第%d個字符處找到。繼續(xù)查找嗎(Y/N)? ",k);
         b=getchar();
         getchar();
         if(b!='Y'&&b!='y') /* 中斷查找 */
         {
           f=0;
           break;
         }
         else
           k++;
       }
     }
   }
   if(f)
     printf("沒找到\n");
 }

 void Replace1()
 { /* 替換字符串 */
   int i,k,f=1; /* f為繼續(xù)替換標(biāo)志 */
   char b;
   HString s,t;
   printf("請輸入待替換的字符串: ");
   scanf("%s%*c",str);
   InitString(&s);
   StrAssign(&s,str);
   printf("替換為: ");
   scanf("%s%*c",str);
   InitString(&t);
   StrAssign(&t,str);
   for(i=0;i<n&&f;i++) /* 逐行查找、替換 */
   {
     k=1; /* 由每行第1個字符起查找 */
     while(k)
     {
       k=Index(T[i],s,k); /* 由本行的第k個字符開始查找 */
       if(k) /* 找到 */
       {
         printf("第%d行: ",i+1);
         StrPrint(T[i]);
         printf("第%d個字符處找到。是否替換(Y/N)? ",k);
         b=getchar();
         getchar();
         if(b=='Y'||b=='y')
         {
           StrDelete(&T[i],k,StrLength(s));
           StrInsert(&T[i],k,t);
         }
         printf("繼續(xù)替換嗎(Y/N)?");
         b=getchar();
         getchar();
         if(b!='Y'&&b!='y') /* 中斷查找、替換 */
         {
           f=0;
           break;
         }
         else
           k+=StrLength(t);
       }
     }
   }
   if(f)
     printf("沒找到\n");
 }

 void Save()
 { /* 存盤 */
   int i;
   getchar();
   fp=fopen(filename,"w");
   if(fp)
   {
     for(i=0;i<n;i++)
     {
       T[i].ch[T[i].length]=0;
       fputs(T[i].ch,fp);
       fputc(10,fp);
     }
     fputc(10,fp);
     fclose(fp);
   }
   else
     printf("存盤失敗\n");
 }

 void main()
 {
   Status s=TRUE;
   int i,k;
   for(i=0;i<MAX_LEN;i++) /* 初始化串 */
     InitString(&T[i]);
   while(s)
   {
     printf("請選擇: 1.打開文件(新或舊)  2.顯示文件內(nèi)容\n");
     printf("        3.插入行  4.刪除行  5.拷貝行  6.修改行\(zhòng)n");
     printf("        7.查找字符串        8.替換字符串\n");
     printf("        9.存盤退出          0.放棄編輯\n");
     scanf("%d",&k);
     switch(k)
     {
       case 1: Open();
               break;
       case 2: List();
               break;
       case 3: Insert();
               break;
       case 4: Delete();
               break;
       case 5: Copy();
               break;
       case 6: Modify();
               break;
       case 7: Search();
               break;
       case 8: Replace1();
               break;
       case 9: Save();
       case 0: s=FALSE;
     }
   }
 }