线索二叉树

//线索二叉树


#include<stdio.h>
#include<stdlib.h>

//定义类型
typedef char ElemType;

//枚举类型,定义线索存储标志位
//Link(0):表示指向左右孩子的指针
//Thread(1):表示指向前驱后继的线索
typedef enum {Link,Thread}PointerTag;
//定义结点

typedef struct BiThrNode
{
    char data;
    struct BiThrNode *lchild,*rchild;//以同样的结构定义左孩子，右孩子：递归
    PointerTag ltag;
    PointerTag rtag;
}BiThrNode,*BiThrTree;

//全局变量，始终指向刚刚访问过的结点
BiThrTree pre;

//创建一棵二叉树，约定用户遵照前序遍历的方式输入数据
void CreateBiThrTree(BiThrTree *T)
{
    char c;

    scanf("%c",&c);
    if(' '==c)
    {
        *T=NULL;
    }
    else
    {
        *T=(BiThrNode *)malloc(sizeof(BiThrNode));
        (*T)->data=c;
        (*T)->ltag=Link;
        (*T)->rtag=Link;

        CreateBiThrTree(&(*T)->lchild);
        CreateBiThrTree(&(*T)->rchild);
    }
}

//中序遍历线索化
void InThreading(BiThrTree T)
{
    if(T)
    {
        InThreading( T->lchild);//递归左孩子线索化

        //结点处理,如果该结点没有左孩子，设置ltag为Thread，并把lchild指向刚刚访问的结点
        if(!T->lchild)
        {
            T->ltag=Thread;
            T->lchild=pre;
        }

        if(!pre->rchild)
        {
            pre->rtag=Thread;
            pre->rchild=T;
        }

        pre=T;

        InThreading( T->rchild);//递归右孩子线索化
    }
}

void InOrderThreading(BiThrTree *p,BiThrTree T)
{
    *p=(BiThrTree)malloc(sizeof(BiThrNode));
    (*p)->ltag=Link;
    (*p)->rtag=Thread;
    (*p)->rchild=*p;
    if(!T)
    {
        (*p)->lchild=*p;
    }
    else
    {
        (*p)->lchild=T;
        pre=*p;
        InThreading(T);
        pre->rchild=*p;
        pre->rtag=Thread;
        (*p)->rchild=pre;
    }
}

void visit(char c)
{
    printf("%c",c);
}

//中序遍历二叉树，非递归
void InOrderTraverse(BiThrTree T)
{
    BiThrTree p;
    p=T->lchild;

    while(p!=T)
    {
        while(p->ltag==Link)
        {
            p=p->lchild;
        }
        visit(p->data);

        while(p->rtag==Thread && p->rchild !=T)
        {
            p=p->rchild;
            visit(p->data);
        }
        p=p->rchild;
    }
}

int main()
{
    BiThrTree P,T=NULL;

    CreateBiThrTree(&T);

    InOrderThreading(&P,T);

    printf("中序遍历输出结果为：\n");

    InOrderTraverse(P);

    return 0;
}