ツリーの様々な基本演算方法を実現する

(1)二叉木の括弧は、「A(B(D,E(H(J,K(L,M(,N))),C(F,G(,I))」を表す.(2)出力ツリーb(3)出力’H’ノードの左,右子ノード値(4)出力ツリーbの高さ(5)リリースツリー{付加部:(6)出力ツリーの幅(7)出力ツリーのノード数(8)出力ツリーのリーフノードの数}

#include 
#include 
#define MaxSize 100
typedef char ElemType;
typedef struct node
{
    ElemType data;              //    
    struct node *lchild;        //     
    struct node *rchild;        //     
} BTNode;
extern void CreateBTNode(BTNode *&b,char *str);
extern BTNode *FindNode(BTNode *b,ElemType x);
extern BTNode *LchildNode(BTNode *p);
extern BTNode *RchildNode(BTNode *p);
extern int BTNodeDepth(BTNode *b);
extern void DispBTNode(BTNode *b);
//extern int BTWidth(BTNode *b);
//extern int Nodes(BTNode *b);
//extern int LeafNodes(BTNode *b);
extern void DestroyBTNode(BTNode *&b);
int main()
{   BTNode *b,*p,*lp,*rp;;
    CreateBTNode(b,"A(B(D,E(H(J,K(L,M(,N))))),C(F,G(,I)))");
    printf("          :
");
    printf("  (1)     :");DispBTNode(b);printf("
");
    printf("  (2)H  :");
    p=FindNode(b,'H');
    if (p!=NULL)
    {   lp=LchildNode(p);
        if (lp!=NULL)
            printf("    %c ",lp->data);
        else
            printf("     ");
        rp=RchildNode(p);
        if (rp!=NULL)
            printf("    %c",rp->data);
        else
            printf("     ");
    }
    printf("
");
    printf("  (3)   b   :%d
",BTNodeDepth(b));
    //printf("  (4)   b   :%d
",BTWidth(b));
    //printf("  (5)   b     :%d
",Nodes(b));
    //printf("  (6)   b       :%d
",LeafNodes(b));
    printf("  (7)     b
");
    DestroyBTNode(b);
}

void CreateBTNode(BTNode *&b,char *str)     // str      
{
    BTNode *St[MaxSize],*p=NULL;
    int top=-1,k,j=0;
    char ch;
    b=NULL;             //           
    ch=str[j];
    while (ch!='\0')    //str       
    {
        switch(ch)
        {
        case '(':top++;St[top]=p;k=1; break;        //    
        case ')':top--;break;
        case ',':k=2; break;                        //    
        default:p=(BTNode *)malloc(sizeof(BTNode));
            p->data=ch;p->lchild=p->rchild=NULL;
                    if (b==NULL)                    //p         
                        b=p;
                    else                            //         
                    {
                        switch(k)
                        {
                        case 1:St[top]->lchild=p;break;
                        case 2:St[top]->rchild=p;break;
                        }
                    }
        }
        j++;
        ch=str[j];
    }
}
BTNode *FindNode(BTNode *b,ElemType x)  //  data  x     
{
    BTNode *p;
    if (b==NULL)
         return NULL;
    else if (b->data==x)
         return b;
    else
    {
        p=FindNode(b->lchild,x);
        if (p!=NULL)
            return p;
        else
            return FindNode(b->rchild,x);
    }
}
BTNode *LchildNode(BTNode *p)   //  *p          
{
    return p->lchild;
}
BTNode *RchildNode(BTNode *p)   //  *p          
{
    return p->rchild;
}
int BTNodeDepth(BTNode *b)  //    b   
{
    int lchilddep,rchilddep;
    if (b==NULL)
        return(0);                          //      0
    else
    {
        lchilddep=BTNodeDepth(b->lchild);   //        lchilddep
        rchilddep=BTNodeDepth(b->rchild);   //        rchilddep
        return (lchilddep>rchilddep)? (lchilddep+1):(rchilddep+1);
    }
}
void DispBTNode(BTNode *b)  //           
{
    if (b!=NULL)
    {
        printf("%c",b->data);
        if (b->lchild!=NULL || b->rchild!=NULL)
        {
            printf("(");
            DispBTNode(b->lchild);
            if (b->rchild!=NULL) printf(",");
            DispBTNode(b->rchild);
            printf(")");
        }
    }
}
/*
int BTWidth(BTNode *b)  //    b   
{
    struct
    {
        int lno;        //       
        BTNode *p;      //    
    } Qu[MaxSize];      //         
    int front,rear;                         //         
    int lnum,max,i,n;
    front=rear=0;                           //      
    if (b!=NULL)
    {
        rear++;
        Qu[rear].p=b;                       //       
        Qu[rear].lno=1;                     //         1
        while (rear!=front)                 //     
        {
            front++;
            b=Qu[front].p;                  //    
            lnum=Qu[front].lno;
            if (b->lchild!=NULL)            //     
            {
                rear++;
                Qu[rear].p=b->lchild;
                Qu[rear].lno=lnum+1;
            }
            if (b->rchild!=NULL)            //     
            {
                rear++;
                Qu[rear].p=b->rchild;
                Qu[rear].lno=lnum+1;
            }
        }
        max=0;lnum=1;i=1;
        while (i<=rear)
        {
            n=0;
            while (i<=rear && Qu[i].lno==lnum)
            {
                n++;i++;
            }
            lnum=Qu[i].lno;
            if (n>max) max=n;
        }
        return max;
    }
    else
        return 0;
}

int Nodes(BTNode *b)    //    b     
{
    int num1,num2;
    if (b==NULL)
        return 0;
    else if (b->lchild==NULL && b->rchild==NULL)
        return 1;
    else
    {
        num1=Nodes(b->lchild);
        num2=Nodes(b->rchild);
        return (num1+num2+1);
    }
}
int LeafNodes(BTNode *b)    //    b       
{
    int num1,num2;
    if (b==NULL)
        return 0;
    else if (b->lchild==NULL && b->rchild==NULL)
        return 1;
    else
    {
        num1=LeafNodes(b->lchild);
        num2=LeafNodes(b->rchild);
        return (num1+num2);
    }
}
*/
void DestroyBTNode(BTNode *&b)
{
    if (b!=NULL)
    {
        DestroyBTNode(b->lchild);
        DestroyBTNode(b->rchild);
        free(b);
    }
}