文本编辑程序

 

一个 3 行文本存储结构示例：

 

typedef int Status; /* Status是函数的类型,其值是函数结果状态代码，如OK等 */
typedef int Boolean; /* Boolean是布尔类型,其值是TRUE或FALSE */#include<malloc.h> /* malloc()等 */
#include<stdio.h> /* EOF(=^Z或F6),NULL */
#include<process.h> /* exit() *//* 函数结果状态代码 */
#define TRUE 1
#define FALSE 0
#define OK 1
#define ERROR 0
#define INFEASIBLE -1
#define OVERFLOW -2 /*  文本行编辑 */
#define MAX_LEN 25 /* 文件最大行数 */
#define LINE_LEN 75 /* 每行字符数最大值+1 */
#define NAME_LEN 20 /* 文件名最大长度(包括盘符、路径)+1 *//* ---------------------------      串的堆分配存储表示   ------------------------------*/typedef struct
{char *ch; /* 若是非空串,则按串长分配存储区,否则ch为NULL */int length; /* 串长度 */
}HString;/* ------------------------------------------------------------------------------------------*//* 全局变量 */
HString T[MAX_LEN];
char str[LINE_LEN], filename[NAME_LEN] = "";
FILE *fp;
int n = 0; /* 文件行数 *//* ---------------------------   需要用到的串的堆分配存储的基本操作  --------------------------*/Status StrAssign(HString *T, char *chars)
{ /* 生成一个其值等于串常量chars的串T */int i, j;if ((*T).ch)free((*T).ch); /* 释放T原有空间 */i = strlen(chars); /* 求chars的长度i */if (!i){ /* chars的长度为0 */(*T).ch = NULL;(*T).length = 0;}else{ /* chars的长度不为0 */(*T).ch = (char*)malloc(i * sizeof(char)); /* 分配串空间 */if (!(*T).ch) /* 分配串空间失败 */exit(OVERFLOW);for (j = 0; j < i; j++) /* 拷贝串 */(*T).ch[j] = chars[j];(*T).length = i;}return OK;
}Status StrCopy(HString *T, HString S)
{ /* 初始条件:串S存在。操作结果: 由串S复制得串T */int i;if ((*T).ch)free((*T).ch); /* 释放T原有空间 */(*T).ch = (char*)malloc(S.length * sizeof(char)); /* 分配串空间 */if (!(*T).ch) /* 分配串空间失败 */exit(OVERFLOW);for (i = 0; i < S.length; i++) /* 拷贝串 */(*T).ch[i] = S.ch[i];(*T).length = S.length;return OK;
}int StrLength(HString S)
{ /* 返回S的元素个数,称为串的长度 */return S.length;
}void InitString(HString *T)
{ /* 初始化(产生空串)字符串T。另加 */(*T).length = 0;(*T).ch = NULL;
}int Index(HString S, HString T, int pos) /* 算法4.1 */
{ /* T为非空串。若主串S中第pos个字符之后存在与T相等的子串, *//* 则返回第一个这样的子串在S中的位置,否则返回0 */int n, m, i;HString sub;InitString(&sub);if (pos > 0){n = StrLength(S);m = StrLength(T);i = pos;while (i <= n - m + 1){SubString(&sub, S, i, m);if (StrCompare(sub, T) != 0)++i;elsereturn i;}}return 0;
}Status StrInsert(HString *S, int pos, HString T) /* 算法4.4 */
{ /* 1≤pos≤StrLength(S)+1。在串S的第pos个字符之前插入串T */int i;if (pos<1 || pos>(*S).length + 1) /* pos不合法 */return ERROR;if (T.length) /* T非空,则重新分配空间,插入T */{(*S).ch = (char*)realloc((*S).ch, ((*S).length + T.length) * sizeof(char));if (!(*S).ch)exit(OVERFLOW);for (i = (*S).length - 1; i >= pos - 1; --i) /* 为插入T而腾出位置 */(*S).ch[i + T.length] = (*S).ch[i];for (i = 0; i < T.length; i++)(*S).ch[pos - 1 + i] = T.ch[i]; /* 插入T */(*S).length += T.length;}return OK;
}Status StrDelete(HString *S, int pos, int len)
{ /* 从串S中删除第pos个字符起长度为len的子串 */int i;if ((*S).length < pos + len - 1)exit(ERROR);for (i = pos - 1; i <= (*S).length - len; i++)(*S).ch[i] = (*S).ch[i + len];(*S).length -= len;(*S).ch = (char*)realloc((*S).ch, (*S).length * sizeof(char));return OK;
}void StrPrint(HString T)
{ /* 输出T字符串。另加 */int i;for (i = 0; i < T.length; i++)printf("%c", T.ch[i]);printf("\n");
}Status SubString(HString *Sub, HString S, int pos, int len)
{ /* 用Sub返回串S的第pos个字符起长度为len的子串。 *//* 其中,1≤pos≤StrLength(S)且0≤len≤StrLength(S)-pos+1 */int i;if (pos<1 || pos>S.length || len<0 || len>S.length - pos + 1)return ERROR;if ((*Sub).ch)free((*Sub).ch); /* 释放旧空间 */if (!len) /* 空子串 */{(*Sub).ch = NULL;(*Sub).length = 0;}else{ /* 完整子串 */(*Sub).ch = (char*)malloc(len * sizeof(char));if (!(*Sub).ch)exit(OVERFLOW);for (i = 0; i <= len - 1; i++)(*Sub).ch[i] = S.ch[pos - 1 + i];(*Sub).length = len;}return OK;
}int StrCompare(HString S, HString T)
{ /* 若S>T,则返回值>0;若S=T,则返回值=0;若S<T,则返回值<0 */int i;for (i = 0; i < S.length&&i < T.length; ++i)if (S.ch[i] != T.ch[i])return S.ch[i] - T.ch[i];return S.length - T.length;
}/* ------------------------------------------------------------------------------------------*/void Open()
{ /* 打开文件(新或旧) */int i;errno_t err;if (filename[0]) /* 文件已打开 */printf("已存在打开的文件\n");else{printf("请输入文件名(可包括盘符、路径，不超过%d个字符): ", NAME_LEN - 1);gets(filename);gets(filename);//scanf_s("%s%*c", filename);err = fopen_s(&fp,filename, "r");if (fp) /* 已存在此文件 */{fgets(str, LINE_LEN, fp);i = strlen(str);while (i > 0){str[i - 1] = 0; /*将换行符强制改为串结束符0（ASCII码为0)*/i--;if (i > 0){StrAssign(&T[n], str);n++;if (n > MAX_LEN){printf("文件太大\n");return;}}if (fgets(str, LINE_LEN, fp)){i = strlen(str);}else{return;}		}fclose(fp);}elseprintf("新文件\n");}
}void List()
{ /* 显示文件内容 */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_s("%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");for (i = l - 1; i < l - 1 + m; i++){gets(str);InitString(&T[i]);StrAssign(&T[i], str);}}elseprintf("行超出范围\n");
}void Delete()
{ /* 删除行 */int i, l, m;printf("从第l行起删除m行,请输入l m: ");scanf_s("%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;}elseprintf("行超出范围\n");
}void Copy()
{ /* 拷贝行 */int i, l, m, k;printf("把第l行开始的m行插在原k行之前,请输入l m k: ");scanf_s("%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]);}}elseprintf("行超出范围\n");
}void Modify()
{ /* 修改行 */int i;printf("请输入待修改的行号: ");scanf_s("%d%*c", &i);if (i > 0 && i <= n) /* 行号合法 */{printf("%d: ", i);StrPrint(T[i - 1]);printf("请输入新内容: ");gets(str);StrAssign(&T[i - 1], str);}elseprintf("行号超出范围\n");
}void Search()
{ /* 查找字符串 */int i, k, f = 1; /* f为继续查找标志 */char b;HString s;printf("请输入待查找的字符串: ");gets(str);gets(str);//scanf_s("%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个字符处找到。继续查找吗(Y/N)? ", k);b = getchar();getchar();if (b != 'Y'&&b != 'y') /* 中断查找 */{f = 0;break;}elsek++;}}}if (f)printf("没找到\n");
}void Replace1()
{ /* 替换字符串 */int i, k, f = 1; /* f为继续替换标志 */char b;HString s, t;printf("请输入待替换的字符串: ");gets(str);gets(str);//scanf_s("%s%*c", str);InitString(&s);StrAssign(&s, str);printf("替换为: ");gets(str);//scanf_s("%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("继续替换吗(Y/N)?");b = getchar();getchar();if (b != 'Y'&&b != 'y') /* 中断查找、替换 */{f = 0;break;}elsek += StrLength(t);}}}if (f)printf("没找到\n");
}void Save()
{ /* 存盘 */int i;getchar();errno_t err;printf(filename);err = fopen_s(&fp,filename, "w");if (err==0){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);}elseprintf("存盘失败\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");printf("        3.插入行  4.删除行  5.拷贝行  6.修改行\n");printf("        7.查找字符串        8.替换字符串\n");printf("        9.存盘退出          0.放弃编辑\n");scanf_s("%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;}}
}

 

运行结果：