数据结构C语言版_栈实现行编辑程序

#include <stdio.h>

#include <malloc.h>

#include <io.h>

/*

数据结构C语言版栈实现行编辑程序

P49-P50

编译环境：Dev-C++ 4.9.9.2

日期：2011年2月12日

*/

typedef char SElemType; // 栈的元素类型

#define STACK_INIT_SIZE 10 // 存储空间初始分配量

#define STACKINCREMENT 2 // 存储空间分配增量

// 栈的顺序存储表示 P46

typedef struct SqStack

{

SElemType *base; // 在栈构造之前和销毁之后，base的值为NULL SElemType *top; // 栈顶指针

int stacksize; // 当前已分配的存储空间，以元素为单位

}SqStack; // 顺序栈

FILE *fp;

// 构造一个空栈S。

int InitStack(SqStack *S)

{

// 为栈底分配一个指定大小的存储空间

(*S).base = (SElemType *)malloc(STACK_INIT_SIZE*sizeof(SElemType)); if( !(*S).base )

exit(0); // 存储分配失败

(*S).top = (*S).base; // 栈底与栈顶相同表示一个空栈

(*S).stacksize = STACK_INIT_SIZE;

return 1;

}

// 销毁栈S，S不再存在。

int DestroyStack(SqStack *S)

{

free((*S).base); //释放栈底的空间，并置空

(*S).top = NULL;

(*S).stacksize = 0;

return 1;

}

// 把S置为空栈。

int ClearStack(SqStack *S)

{

(*S).top = (*S).base; //栈底栈顶相同为空栈

return 1;

}

// 插入元素e为新的栈顶元素。

int Push(SqStack *S, SElemType e)

{

if((*S).top - (*S).base >= (*S).stacksize) // 栈满，追加存储空间{

(*S).base = (SElemType *)realloc((*S).base,

((*S).stacksize + STACKINCREMENT) * sizeof(SElemType));

if( !(*S).base )

exit(0); // 存储分配失败

(*S).top = (*S).base+(*S).stacksize;

(*S).stacksize += STACKINCREMENT;

}

*((*S).top)++=e;

// 这个等式的++ * 优先级相同，但是它们的运算方式，是自右向左

return 1;

}

// 若栈不空，则删除S的栈顶元素，用e返回其值，并返回1；否则返回0。int Pop(SqStack *S,SElemType *e)

{

if((*S).top == (*S).base)

return 0;

*e = *--(*S).top;

// 这个等式的++ * 优先级相同，但是它们的运算方式，是自右向左

return 1;

}

// 从栈底到栈顶依次对栈中每个元素调用函数visit()。

int StackTraverse(SqStack S,int(*visit)(SElemType))

{

while(S.top>S.base)

printf("\n");

return 1;

}

// 将字符c送至fp所指的文件中.

int copy(SElemType c)

{

fputc(c,fp);

return 1;

}

// 算法3.2 P50

// 利用字符栈s，从终端接收一行并送至调用过程的数据区。

void LineEdit()

{

SqStack s;

char ch,c;

InitStack(&s);

printf("请输入一个文本文件,ctrl+z结束输入，#退格，@清空当前行:\n"); ch = getchar();

while(ch != EOF) // EOF为Ctrl + z键，全文结束符

{

while(ch != EOF && ch != '\n')

{

switch(ch)

{

case '#':

Pop(&s, &c);

break; // 仅当栈非空时退栈

case '@':

ClearStack(&s);

break; // 重置s为

空栈

default :

Push(&s,ch); // 有效字符进栈

}

ch=getchar(); // 从终端接收下一个字符

}

StackTraverse(s,copy); // 将从栈底到栈顶的栈内字符传送至文件

ClearStack(&s); // 重置s为空栈

fputc('\n', fp);

if(ch != EOF)

ch = getchar();

}

DestroyStack(&s);

}

int main()

{

fp = fopen("1", "w"); // 在当前目录下建立1文件，用于写数据，if( fp ) // 如已有同名文件则先删除原文件

{

LineEdit();

fclose(fp); // 关闭fp所指的文件

}

else

printf("建立文件失败!\n");

system("pause");

return 0;

}

/*

输出效果：

请输入一个文本文件,ctrl+z结束输入，#退格，@清空当前行:

whli##ilr#e(s#*s)

outcha@putchar(*s=#++);

请按任意键继续. . .

下面是"1"中的内容：

while(*s)

putchar(*s++);

*/