Problem:
Binary Tree

A rooted binary tree is a tree with a root node in which every node has at most two children.

Your task is to write a program which reads a rooted binary tree T and prints the following information for each node u of T:

node ID of u

parent of u

sibling of u

the number of children of u

depth of u

height of u

node type (root, internal node or leaf)

If two nodes have the same parent, they are siblings. Here, if u and v have the same parent, we say u is a sibling of v (vice versa).

The height of a node in a tree is the number of edges on the longest simple downward path from the node to a leaf.

Here, the given binary tree consists of n nodes and evey node has a unique ID from 0 to n-1.

Input

The first line of the input includes an integer n, the number of nodes of the tree.

In the next n lines, the information of each node is given in the following format:

id left right

id is the node ID, left is ID of the left child and right is ID of the right child. If the node does not have the left (right) child, the left(right) is indicated by -1.

Output

Print the information of each node in the following format:

node id: parent = p, sibling = s, degree = deg, depth = dep, height = h, type

p is ID of its parent. If the node does not have a parent, print -1.

s is ID of its sibling. If the node does not have a sibling, print -1.

deg, dep and h are the number of children, depth and height of the node respectively.

type is a type of nodes represented by a string (root, internal node or leaf. If the root can be considered as a leaf or an internal node, print root.

Please follow the format presented in a sample output below.

Constraints

1 ≤ n ≤ 25

Sample Input 1

9
0 1 4
1 2 3
2 -1 -1
3 -1 -1
4 5 8
5 6 7
6 -1 -1
7 -1 -1
8 -1 -1

Sample Output 1

node 0: parent = -1, sibling = -1, degree = 2, depth = 0, height = 3, root
node 1: parent = 0, sibling = 4, degree = 2, depth = 1, height = 1, internal node
node 2: parent = 1, sibling = 3, degree = 0, depth = 2, height = 0, leaf
node 3: parent = 1, sibling = 2, degree = 0, depth = 2, height = 0, leaf
node 4: parent = 0, sibling = 1, degree = 2, depth = 1, height = 2, internal node
node 5: parent = 4, sibling = 8, degree = 2, depth = 2, height = 1, internal node
node 6: parent = 5, sibling = 7, degree = 0, depth = 3, height = 0, leaf
node 7: parent = 5, sibling = 6, degree = 0, depth = 3, height = 0, leaf
node 8: parent = 4, sibling = 5, degree = 0, depth = 2, height = 0, leaf

Reference

Introduction to Algorithms, Thomas H. Cormen, Charles E. Leiserson, Ronald L. Rivest, and Clifford Stein. The MIT Press.

Solution in C (judge verdict: Wrong Answer)

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <math.h>

//============================================================================
#define pred(x) ((x)-1)
#define succ(x) ((x)+1)
//============================================================================
struct Node{
    short  id;
    struct Node *parent;
    struct Node *left, *right;
};
typedef struct Node TNode;
//============================================================================
struct Chain{
    struct Chain *prev;
    TNode *node;
    struct Chain *next;
};
typedef struct Chain TChain;
TChain *RootChain;
//============================================================================
//============================================================================
//----------------------------------------------------------------------------
//----------------------------------------------------------------------------
//----------------------------------------------------------------------------
//----------------------------------------------------------------------------
TChain *ChainAlloc(void)
{
    TChain *ptr;
    ptr=malloc(sizeof(TChain));
    if (ptr==NULL)
        exit(1);
    memset(ptr, 0, sizeof(TChain));
    return ptr;
}
//----------------------------------------------------------------------------
void inschain(TChain *chn, TNode *node)
{
    while(chn->next!=NULL)
        chn=chn->next;
    chn->next=ChainAlloc();
    chn->next->node=node;
    chn->next->prev=chn;
}
//----------------------------------------------------------------------------
void delchain(TChain *chn)
{
    if (chn->prev){
        chn->prev->next=chn->next;
    }
    if (chn->next){
        chn->next->prev=chn->prev;
    }
    free(chn);
}
//----------------------------------------------------------------------------
TChain *searchchain(TChain *chn, short id)
{
    do{
        if (chn->node->id==id)
            return chn;
        if (chn->node->left && chn->node->left->id==id)
            return chn;
        if (chn->node->right && chn->node->right->id==id)
            return chn;
        chn=chn->next;
    }while(chn!=NULL);
    return NULL;
}
//----------------------------------------------------------------------------
void pushnode(TNode *node)
{
    if (RootChain==NULL){
        RootChain=ChainAlloc();
        RootChain->node=node;
    }else{
        inschain(RootChain, node);
    }
}
//----------------------------------------------------------------------------
TNode *popnode(short id)
{
    TChain *chn; TNode *node;

    node=NULL;
    chn=searchchain(RootChain, id);
    if (chn){
        if (chn->node->id==id)
            node=chn->node;
        else
        if (chn->node->left && chn->node->left->id==id)
            node=chn->node->left;
        else
        if (chn->node->right && chn->node->right->id==id)
            node=chn->node->right;
        if (node==chn->node)
            delchain(chn);
    }
    return node;
}
//----------------------------------------------------------------------------
TNode *nodealloc(void)
{
    TNode *node;
    node=malloc(sizeof(TNode));
    if (node==NULL){
        fprintf(stderr, "not enough memry\n");
        exit(1);
    }
    memset(node, 0, sizeof(TNode));
    return node;
}
//----------------------------------------------------------------------------
TNode *existid(TNode *node, short id)
{
    TNode *nd;

    if (node==NULL || node->id==id)
        return node;
    if ((nd=existid(node->left, id))!=NULL)
        return nd;
    nd=existid(node->right, id);
    return nd;
}
//----------------------------------------------------------------------------
void putnode(TNode **root, TNode **node, TNode *parent, short id)
{
    TNode *nd;

    if ((nd=existid(*root, id))==NULL)
        nd=popnode(id);
    if (nd==NULL){
        *node=nodealloc();
    }else{
        *node=nd;
        //nd->parent=*node;
        if (*root==nd){
            *root=parent;
            while((*root)->parent!=NULL)
                *root=(*root)->parent;
        }
    }
    (*node)->id=id;
    (*node)->parent=parent;
}
//----------------------------------------------------------------------------
void getnode(FILE *file, TNode **node)
{
    long id,left,right; TNode *ser;

    fscanf(file, "%ld", &id);
    fscanf(file, "%ld", &left);
    fscanf(file, "%ld", &right);
    if (*node==NULL){
        *node=nodealloc();
        ser=*node;
        pushnode(*node);
    }else
        ser=existid(*node, id);
    if (ser==NULL){
        ser=popnode(id);
        if (ser==NULL){
            ser=nodealloc();
            pushnode(ser);
        }
    }
    ser->id=id;
    if (0<=left)
        putnode(node, &ser->left, ser, left);
    if (0<=right)
        putnode(node, &ser->right, ser, right);
}
//----------------------------------------------------------------------------
short depth(TNode *node)
{
    short n;

    for (n=0; node->parent!=NULL; n++)
        node=node->parent;
    return n;
}
//----------------------------------------------------------------------------
short height(TNode *node)
{
    short l,r;

    if (node==NULL)
        return -1;
    l=succ(height(node->left));
    r=succ(height(node->right));
    return (r<l)?l:r;
}
//----------------------------------------------------------------------------
char *root="root";
char *internalroot="internal node";
char *leaf="leaf";
char *nodetype(TNode *node)
{
    if (node->parent==NULL)
        return root;
    if (node->left!=NULL || node->right!=NULL)
        return internalroot;
    return leaf;
}
//----------------------------------------------------------------------------
void output(TNode *root, long n)
{
    short i,j,cnt,id,sib,deg; TNode *node;

    for (i=cnt=0; cnt<n; i++){
        node=existid(root, i);
        if (node!=NULL){
            cnt++;
            sib=-1;
            if (node->parent!=NULL && node->parent->left!=NULL && node->parent->right!=NULL){
                if (node->parent->left==node)
                    sib=node->parent->right->id;
                else
                    sib=node->parent->left->id;
            }
            deg=(node->left==NULL)?0:1;
            deg+=(node->right==NULL)?0:1;
            id=(node->parent==NULL)?-1:node->parent->id;
            printf("node %d: ", node->id);
            printf("parent = %d, ", id);
            printf("sibling = %d, ", sib);
            printf("degree = %d, ", deg);
            printf("depth = %d, ", depth(node));
            printf("height = %d, ", height(node));
            printf("%s\n", nodetype(node));
        }
    }
}
//----------------------------------------------------------------------------
void input(FILE *file)
{
    long i,n,m; TNode *root; char buffer[20];

    RootChain=NULL;
    fgets(buffer, sizeof(buffer)-1, file);
    sscanf(buffer, "%ld", &n);
    for (i=0, root=NULL; i<n; i++){
        getnode(file, &root);
        //printf("%08X\n", root);
    }
    while(root->parent)
        root=root->parent;
    output(root, n);
}
//============================================================================
#ifndef DESKTOP
int main()
{
    input(stdin);
    return 0;
}
#endif