B-tree詳解及實現(C語言)
阿新 • • 發佈:2018-12-25
// // MBTree.c // MBTree // // Created by Wuyixin on 2017/8/4. // Copyright © 2017年 Coding365. All rights reserved. // #include "MBTree.h" static KeyType Unavailable = INT_MIN; /* 生成節點並初始化 */ static MBTree MallocNewNode(){ MBTree NewNode; int i; NewNode = malloc(sizeof(struct MBNode)); if (NewNode == NULL) exit(EXIT_FAILURE); i = 0; while (i < M + 1){ NewNode->Key[i] = Unavailable; NewNode->Children[i] = NULL; i++; } NewNode->KeyNum = 0; return NewNode; } /* 初始化 */ extern MBTree Initialize(){ MBTree T; if (M < (3)){ printf("M最小等於3!"); exit(EXIT_FAILURE); } /* 根結點 */ T = MallocNewNode(); return T; } /* 尋找一個兄弟節點,其儲存的關鍵字未滿,否則返回NULL */ static Position FindSibling(Position Parent,int i){ Position Sibling; int Limit; Limit = M; Sibling = NULL; if (i == 0){ if (Parent->Children[1]->KeyNum < Limit) Sibling = Parent->Children[1]; } else if (Parent->Children[i - 1]->KeyNum < Limit) Sibling = Parent->Children[i - 1]; else if (i + 1 < Parent->KeyNum && Parent->Children[i + 1]->KeyNum < Limit){ Sibling = Parent->Children[i + 1]; } return Sibling; } /* 查詢兄弟節點,其關鍵字數大於M/2 ;沒有返回NULL*/ static Position FindSiblingKeyNum_M_2(Position Parent,int i,int *j){ int Limit; Position Sibling; Sibling = NULL; Limit = LIMIT_M_2; if (i == 0){ if (Parent->Children[1]->KeyNum > Limit){ Sibling = Parent->Children[1]; *j = 1; } } else{ if (Parent->Children[i - 1]->KeyNum > Limit){ Sibling = Parent->Children[i - 1]; *j = i - 1; } else if (i + 1 < Parent->KeyNum && Parent->Children[i + 1]->KeyNum > Limit){ Sibling = Parent->Children[i + 1]; *j = i + 1; } } return Sibling; } /* 當要對X插入Key的時候,i是X在Parent的位置,j是Key要插入的位置 當要對Parent插入X節點的時候,i是要插入的位置,Key和j的值沒有用 */ static Position InsertElement(int isKey, Position Parent,Position X,KeyType Key,int i,int j){ int k; if (isKey){ /* 插入key */ k = X->KeyNum - 1; while (k >= j){ X->Key[k + 1] = X->Key[k];k--; } X->Key[j] = Key; if (Parent != NULL) Parent->Key[i] = X->Key[0]; X->KeyNum++; }else{ /* 插入節點 */ k = Parent->KeyNum - 1; while (k >= i){ Parent->Children[k + 1] = Parent->Children[k]; Parent->Key[k + 1] = Parent->Key[k]; k--; } Parent->Key[i] = X->Key[0]; Parent->Children[i] = X; Parent->KeyNum++; } return X; } static Position RemoveElement(int isKey, Position Parent,Position X,int i,int j){ int k,Limit; if (isKey){ Limit = X->KeyNum; /* 刪除key */ k = j + 1; while (k < Limit){ X->Key[k - 1] = X->Key[k];k++; } X->Key[X->KeyNum - 1] = Unavailable; Parent->Key[i] = X->Key[0]; X->KeyNum--; }else{ /* 刪除節點 */ Limit = Parent->KeyNum; k = i + 1; while (k < Limit){ Parent->Children[k - 1] = Parent->Children[k]; Parent->Key[k - 1] = Parent->Key[k]; k++; } Parent->Children[Parent->KeyNum - 1] = NULL; Parent->Key[Parent->KeyNum - 1] = Unavailable; Parent->KeyNum--; } return X; } /* Src和Dst是兩個相鄰的節點,i是Src在Parent中的位置; 將Src的元素移動到Dst中 ,n是移動元素的個數*/ static Position MoveElement(Position Src,Position Dst,Position Parent,int i,int n){ KeyType TmpKey; Position Child; int j,SrcInFront; SrcInFront = 0; if (Src->Key[0] < Dst->Key[0]) SrcInFront = 1; j = 0; /* 節點Src在Dst前面 */ if (SrcInFront){ if (Src->Children[0] != NULL){ while (j < n) { Child = Src->Children[Src->KeyNum - 1]; RemoveElement(0, Src, Child, Src->KeyNum - 1, Unavailable); InsertElement(0, Dst, Child, Unavailable, 0, Unavailable); j++; } }else{ while (j < n) { TmpKey = Src->Key[Src->KeyNum -1]; RemoveElement(1, Parent, Src, i, Src->KeyNum - 1); InsertElement(1, Parent, Dst, TmpKey, i + 1, 0); j++; } } Parent->Key[i + 1] = Dst->Key[0]; }else{ if (Src->Children[0] != NULL){ while (j < n) { Child = Src->Children[0]; RemoveElement(0, Src, Child, 0, Unavailable); InsertElement(0, Dst, Child, Unavailable, Dst->KeyNum, Unavailable); j++; } }else{ while (j < n) { TmpKey = Src->Key[0]; RemoveElement(1, Parent, Src, i, 0); InsertElement(1, Parent, Dst, TmpKey, i - 1, Dst->KeyNum); j++; } } Parent->Key[i] = Src->Key[0]; } return Parent; } /* 分裂節點 */ static MBTree SplitNode(Position Parent,Position X,int i){ int j,k,Limit; Position NewNode; NewNode = MallocNewNode(); k = 0; j = X->KeyNum / 2; Limit = X->KeyNum; while (j < Limit){ if (X->Children[0] != NULL){ NewNode->Children[k] = X->Children[j]; X->Children[j] = NULL; } NewNode->Key[k] = X->Key[j]; X->Key[j] = Unavailable; NewNode->KeyNum++;X->KeyNum--; j++;k++; } if (Parent != NULL) InsertElement(0, Parent, NewNode, Unavailable, i + 1, Unavailable); else{ /* 如果是X是根,那麼建立新的根並返回 */ Parent = MallocNewNode(); InsertElement(0, Parent, X, Unavailable, 0, Unavailable); InsertElement(0, Parent, NewNode, Unavailable, 1, Unavailable); return Parent; } return X; } /* 合併節點,X只有一個關鍵字,S有大於或等於M/2個關鍵字*/ static Position MergeNode(Position Parent, Position X,Position S,int i){ int Limit; /* S的關鍵字數目大於M/2 */ if (S->KeyNum > LIMIT_M_2){ /* 從S中移動一個元素到X中 */ MoveElement(S, X, Parent, i,1); }else{ /* 將X全部元素移動到S中,並把X刪除 */ Limit = X->KeyNum; MoveElement(X,S, Parent, i,Limit); RemoveElement(0, Parent, X, i, Unavailable); free(X); X = NULL; } return Parent; } static MBTree RecursiveInsert(MBTree T,KeyType Key,int i,MBTree Parent){ int j,Limit; Position Sibling; /* 查詢分支 */ j = 0; while (j < T->KeyNum && Key >= T->Key[j]){ /* 重複值不插入 */ if (Key == T->Key[j]) return T; j++; } if (j != 0 && T->Children[0] != NULL) j--; /* 樹葉 */ if (T->Children[0] == NULL) T = InsertElement(1, Parent, T, Key, i, j); /* 內部節點 */ else T->Children[j] = RecursiveInsert(T->Children[j], Key, j, T); /* 調整節點 */ Limit = M; if (T->KeyNum > Limit){ /* 根 */ if (Parent == NULL){ /* 分裂節點 */ T = SplitNode(Parent, T, i); } else{ Sibling = FindSibling(Parent, i); if (Sibling != NULL){ /* 將T的一個元素(Key或者Child)移動的Sibing中 */ MoveElement(T, Sibling, Parent, i, 1); }else{ /* 分裂節點 */ T = SplitNode(Parent, T, i); } } } if (Parent != NULL) Parent->Key[i] = T->Key[0]; return T; } /* 插入 */ extern MBTree Insert(MBTree T,KeyType Key){ return RecursiveInsert(T, Key, 0, NULL); } static MBTree RecursiveRemove(MBTree T,KeyType Key,int i,MBTree Parent){ int j,NeedAdjust; Position Sibling,Tmp; Sibling = NULL; /* 查詢分支 */ j = 0; while (j < T->KeyNum && Key >= T->Key[j]){ if (Key == T->Key[j]) break; j++; } if (T->Children[0] == NULL){ /* 沒找到 */ if (Key != T->Key[j] || j == T->KeyNum) return T; }else if (j == T->KeyNum || Key < T->Key[j]) j--; /* 樹葉 */ if (T->Children[0] == NULL){ T = RemoveElement(1, Parent, T, i, j); }else{ T->Children[j] = RecursiveRemove(T->Children[j], Key, j, T); } NeedAdjust = 0; /* 樹的根或者是一片樹葉,或者其兒子數在2到M之間 */ if (Parent == NULL && T->Children[0] != NULL && T->KeyNum < 2) NeedAdjust = 1; /* 除根外,所有非樹葉節點的兒子數在[M/2]到M之間。(符號[]表示向上取整) */ else if (Parent != NULL && T->Children[0] != NULL && T->KeyNum < LIMIT_M_2) NeedAdjust = 1; /* (非根)樹葉中關鍵字的個數也在[M/2]和M之間 */ else if (Parent != NULL && T->Children[0] == NULL && T->KeyNum < LIMIT_M_2) NeedAdjust = 1; /* 調整節點 */ if (NeedAdjust){ /* 根 */ if (Parent == NULL){ if(T->Children[0] != NULL && T->KeyNum < 2){ Tmp = T; T = T->Children[0]; free(Tmp); return T; } }else{ /* 查詢兄弟節點,其關鍵字數目大於M/2 */ Sibling = FindSiblingKeyNum_M_2(Parent, i,&j); if (Sibling != NULL){ MoveElement(Sibling, T, Parent, j, 1); }else{ if (i == 0) Sibling = Parent->Children[1]; else Sibling = Parent->Children[i - 1]; Parent = MergeNode(Parent, T, Sibling, i); T = Parent->Children[i]; } } } return T; } /* 刪除 */ extern MBTree Remove(MBTree T,KeyType Key){ return RecursiveRemove(T, Key, 0, NULL); } /* 銷燬 */ extern MBTree Destroy(MBTree T){ int i,j; if (T != NULL){ i = 0; while (i < T->KeyNum + 1){ Destroy(T->Children[i]);i++; } printf("Destroy:("); /* 樹葉的Key從0開始,內部節點從1開始 */ if (T->Children[0] == NULL) j = 0; else j = 1; while (j < T->KeyNum)/* T->Key[i] != Unavailable*/ printf("%d:",T->Key[j++]); printf(") "); free(T); T = NULL; } return T; } static void RecursiveTravel(MBTree T,int Level){ int i; if (T != NULL){ printf(" "); printf("[Level:%d]-->",Level); printf("("); /* 樹葉的Key從0開始,內部節點從1開始 */ if (T->Children[0] == NULL) i = 0; else i = 1; while (i < T->KeyNum)/* T->Key[i] != Unavailable*/ printf("%d:",T->Key[i++]); printf(")"); Level++; i = 0; while (i <= T->KeyNum) { RecursiveTravel(T->Children[i], Level); i++; } } } /* 遍歷 */ extern void Travel(MBTree T){ RecursiveTravel(T, 0); printf("\n"); }