Создание и обработка структур типа «дерево» в си

#include <stdio.h>
#include <string.h>
#include <malloc.h>
#define BSZ  32
 
typedef struct node {
    struct node* left;
    struct node* right;
    int  key;
    char name[BSZ];
} tree_t;
 
struct node* tree_insert(tree_t** tr, int key, const char* name);
void  tree_remove(tree_t** tr, int key);
char* tree_find(tree_t* tr, int key);
void  tree_print(FILE* _out, const tree_t* tr);
void  tree_clear(tree_t* tr);
 
int main(void){
    char   s[BSZ], *p;
    int     k;
    tree_t* tr = NULL;
    FILE*   fp = fopen("file.txt", "r");
    if(fp == NULL){
        puts("File not found!");
        return 0;
    }
/*
    в файле содержится такая информация:
    200 PASCAL
    150 SNOBOL
    250 LISP
    220 ACTOR
    100 FORTRAN
*/
    while(fscanf(fp, "%d %31[^\n]", &k, s) == 2)
        tree_insert(&tr, k, s);
    fclose(fp);
 
    //поиск
    p = tree_find(tr, 150);
    if(p != NULL){
        printf("find: %s\n", p);
        strcpy(p, "C/C++");
    }
 
    //удаление
    tree_remove(&tr, 200);
    tree_remove(&tr, 250);
 
    //вывод
    tree_print(stdout, tr);
    tree_clear(tr);
    getchar();
    return 0;
}
 
//вставка
struct node* tree_insert(tree_t** tr, int key, const char* name){
    tree_t* p = *tr;
    while(p != NULL){
        if(key == p->key)
            return p;
        else if(key < p->key){
            tr = &p->left;
            p  = p->left;
        } else {
            tr = &p->right;
            p  = p->right;
        }
    }
 
    p = (tree_t*)malloc(sizeof(tree_t));
    if(p != NULL){
        p->left = p->right = NULL;
        p->key  = key;
        strcpy(p->name, name);
        *tr = p;
    }
    return p;
}
 
//удаление
void tree_remove(tree_t** tr, int key){
    tree_t* i, *t, *p = *tr;
    while(p != NULL){
        if(key == p->key)
            break;
        else if(key < p->key){
            tr = &p->left;
            p  = p->left;
        } else {
            tr = &p->right;
            p  = p->right;
        }
    }
 
    if(p == NULL)
        return;
    else if(p->right == NULL)
        *tr = p->left;
    else {
        t = p->right;
        if(t->left == NULL){
            t->left = p->left;
            *tr = t;
        } else {
            i = t->left;
            while(i->left != NULL){
                t = i;
                i = t->left;
            }
            t->left  = i->right;
            i->left  = p->left;
            i->right = p->right;
            *tr = i;
        }
    }
    free(p);
}
 
//поиск
char* tree_find(tree_t* tr, int key){
    while(tr != NULL){
        if(key == tr->key)
            return &tr->name[0];
        else if(key < tr->key)
            tr = tr->left;
        else
            tr = tr->right;
    }
    return NULL;
}
 
//вывод
void tree_print(FILE* _out, const tree_t* tr){
    if(tr == NULL)
        return;
    if(tr->left != NULL)
        tree_print(_out, tr->left);
 
    fprintf(_out, "id: %d\tname: %s\n", tr->key, tr->name);
 
    if(tr->right != NULL)
        tree_print(_out, tr->right);
}
 
//удаление всех
void tree_clear(tree_t* tr){
    if(tr == NULL)
        return;
 
    if(tr->left != NULL)
        tree_clear(tr->left);
    if(tr->right != NULL)
        tree_clear(tr->right);
    free(tr);
}