2015年大二上-数据结构-树和二叉树-2-(4)中序线索化二叉树

/*
*Copyright (c) 2014,烟台大学计算机学院
*All rights reserved.
*文件名称:Annpion.cpp
*作者:王耀鹏
*完成日期:2016年1月9日
*版本号:v1.0
*
*问题描述:中序线索化二叉树
*输入描述:无
*输出描述:输出中序线索化二叉树
*/
#include <stdio.h>
#include <malloc.h>
#define MaxSize 100
typedef char ElemType;
typedef struct node
{
    ElemType data;
    int ltag,rtag;
    struct node *lchild;
    struct node *rchild;
} TBTNode;
TBTNode *pre;                //全局变量
void CreateTBTNode(TBTNode *&b,char *str)
{
    TBTNode *St[MaxSize],*p=NULL;
    int top=-1,i=0,k;
    char ch;
    b=NULL;
    ch=str[i];
    while(ch!='\0')
    {
        switch(ch)
        {
        case '(':
            ++top;
            St[top]=p;
            k=1;
            break;
        case ')':
            --top;
            break;
        case ',':
            k=2;
            break;
        default:
            p=(TBTNode *)malloc(sizeof(TBTNode));
            p->data=ch;
            p->lchild=p->rchild=NULL;
            if(b==NULL)
                b=p;
            else
            {
                switch(k)
                {
                case 1:
                    St[top]->lchild=p;
                    break;
                case 2:
                    St[top]->rchild=p;
                    break;
                }
            }
        }
        ++i;
        ch=str[i];
    }
}
void Thread(TBTNode *&p)
{
    if(p!=NULL)
    {
        Thread(p->lchild);    //左子树线索化
        if(p->lchild==NULL)   //前驱线索
        {
            p->lchild=pre;    //建立当前结点的前驱线索
            p->ltag=1;
        }
        else
            p->ltag=0;
        if(pre->rchild==NULL) //后继线索
        {
            pre->rchild=p;    //建立前驱结点的后继线索
            pre->rtag=1;
        }
        else
            pre->rtag=0;
        pre=p;
        Thread(p->rchild);
    }
}
TBTNode *CreaThread(TBTNode *b)
{

    TBTNode *root;
    root=(TBTNode *)malloc(sizeof(TBTNode));
    root->ltag=0;
    root->rtag=1;
    root->rchild=b;
    if(b==NULL)
        root->lchild=root;
    else
    {
        root->lchild=b;
        pre=root;            //pre是*p的前驱结点,供加线索用
        Thread(b);           //中序遍历线索化二叉树
        pre->rchild=root;    //最后处理,加入指向根结点的线索
        pre->rtag=1;
        root->rchild=pre;    //根结点右线索化
    }
    return root;
}
void DispTBTNode(TBTNode *b)
{
    if(b!=NULL)
    {
        printf("%c",b->data);
        if(b->lchild!=NULL ||b->rchild!=NULL)
        {
            printf("(");
            DispTBTNode(b->lchild);
            if(b->rchild!=NULL)
                printf(",");
            DispTBTNode(b->rchild);
            printf(")");
        }
    }
}
void ThInOrder(TBTNode *tb)
{
    TBTNode *p=tb->lchild;
    while(p!=tb)
    {
        while(p->ltag==0)
            p=p->lchild;
        printf("%c ",p->data);
        while(p->rtag==1 && p->rchild!=tb)
        {
            p=p->rchild;
            printf("%c ",p->data);
        }
        p=p->rchild;
    }
}
int main()
{
    TBTNode *b,*tb;
    CreateTBTNode(b,"A(B(D(,G)),C(E,F))");
    printf(" 二叉树:");
    DispTBTNode(b);
    printf("\n");
    tb=CreaThread(b);
    printf(" 线索中序序列:");
    ThInOrder(tb);
    printf("\n");
    return 0;
}

运行结果：