bo9-5.cpp

数据结构书上源代码（严蔚敏C语言版）以及二叉树的各种基本算法

 // bo9-5.cpp 动态查找表(双链键树)的基本操作
 Status InitDSTable(DLTree &DT)
 { // 操作结果: 构造一个空的双链键树DT
   DT=NULL;
   return OK;
 }

 void DestroyDSTable(DLTree &DT)
 { // 初始条件: 双链键树DT存在。操作结果: 销毁双链键树DT
   if(DT) // 非空树
   {
     if(DT->kind==BRANCH&&DT->first) // *DT是分支结点且有孩子
       DestroyDSTable(DT->first); // 销毁孩子子树
     if(DT->next) // 有兄弟
       DestroyDSTable(DT->next); // 销毁兄弟子树
     free(DT); // 释放根结点
     DT=NULL; // 空指针赋0
   }
 }

 Record *SearchDLTree(DLTree T,KeysType K)
 { // 在非空双链键树T中查找关键字等于K的记录，若存在，
   // 则返回指向该记录的指针，否则返回空指针。算法9.15，有改动
   DLTree p;
   int i;
   if(T)
   {
     p=T; // 初始化
     i=0;
     while(p&&i<K.num)
     {
       while(p&&p->symbol!=K.ch[i]) // 查找关键字的第i位
         p=p->next;
       if(p&&i<K.num) // 准备查找下一位
         p=p->first;
       ++i;
     } // 查找结束
     if(!p) // 查找不成功
       return NULL;
     else // 查找成功
       return p->infoptr;
   }
   else
     return NULL; // 树空
 }

 void InsertDSTable(DLTree &DT,Record *r)
 { // 初始条件: 双链键树DT存在，r为待插入的数据元素的指针
   // 操作结果: 若DT中不存在其关键字等于(*r).key.ch的数据元素，
   //           则按关键字顺序插r到DT中
   DLTree p=NULL,q,ap;
   int i=0;
   KeysType K=r->key;
   if(!DT&&K.num) // 空树且关键字符串非空
   {
     DT=ap=(DLTree)malloc(sizeof(DLTNode));
     for(;i<K.num;i++) // 插入分支结点
     {
       if(p)
         p->first=ap;
       ap->next=NULL;
       ap->symbol=K.ch[i];
       ap->kind=BRANCH;
       p=ap;
       ap=(DLTree)malloc(sizeof(DLTNode));
     }
     p->first=ap; // 插入叶子结点
     ap->next=NULL;
     ap->symbol=Nil;
     ap->kind=LEAF;
     ap->infoptr=r;
   }
   else // 非空树
   {
     p=DT; // 指向根结点
     while(p&&i<K.num)
     {
       while(p&&p->symbol<K.ch[i]) // 沿兄弟结点查找
       {
         q=p;
         p=p->next;
       }
       if(p&&p->symbol==K.ch[i]) // 找到与K.ch[i]相符的结点
       {
         q=p;
         p=p->first; // p指向将与K.ch[i+1]比较的结点
         ++i;
       }
       else // 没找到,插入关键字
       {
         ap=(DLTree)malloc(sizeof(DLTNode));
         if(q->first==p)
           q->first=ap; // 在长子的位置插入
         else // q->next==p
           q->next=ap; // 在兄弟的位置插入
         ap->next=p;
         ap->symbol=K.ch[i];
         ap->kind=BRANCH;
         p=ap;
         ap=(DLTree)malloc(sizeof(DLTNode));
         i++;
         for(;i<K.num;i++) // 插入分支结点
         {
           p->first=ap;
           ap->next=NULL;
           ap->symbol=K.ch[i];
           ap->kind=BRANCH;
           p=ap;
           ap=(DLTree)malloc(sizeof(DLTNode));
         }
         p->first=ap; // 插入叶子结点
         ap->next=NULL;
         ap->symbol=Nil;
         ap->kind=LEAF;
         ap->infoptr=r;
       }
     }
   }
 }

 struct SElemType // 定义栈元素类型
 {
   char ch;
   DLTree p;
 };
 #include"c3-1.h"
 #include"bo3-1.cpp"
 void TraverseDSTable(DLTree DT,void(*Vi)(Record))
 { // 初始条件: 双链键树DT存在，Vi是对结点操作的应用函数，
   //           ViR是对记录操作的应用函数
   // 操作结果: 按关键字的顺序输出关键字及其对应的记录
   SqStack s;
   SElemType e;
   DLTree p;
   int i=0,n=8;
   if(DT)
   {
     InitStack(s);
     e.p=DT;
     e.ch=DT->symbol;
     Push(s,e);
     p=DT->first;
     while(p->kind==BRANCH) // 分支结点
     {
       e.p=p;
       e.ch=p->symbol;
       Push(s,e);
       p=p->first;
     }
     e.p=p;
     e.ch=p->symbol;
     Push(s,e);
     Vi(*(p->infoptr));
     i++;
     while(!StackEmpty(s))
     {
       Pop(s,e);
       p=e.p;
       if(p->next) // 有兄弟结点
       {
         p=p->next;
         while(p->kind==BRANCH) // 分支结点
         {
           e.p=p;
           e.ch=p->symbol;
           Push(s,e);
           p=p->first;
         }
         e.p=p;
         e.ch=p->symbol;
         Push(s,e);
         Vi(*(p->infoptr));
         i++;
         if(i%n==0)
           printf("\n"); // 输出n个元素后换行
       }
     }
   }
 }