Subversion Repositories PlanixRsrch.SVN

/*
 * Copyright 2019, The PLANIX Project
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met:
 *
 * 1. Redistributions of source code must retain the above copyright notice,
 * this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 * notice, this list of conditions and the following disclaimer in the
 * documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
 * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

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

#include "mavl.h"


static void 
print0(struct mavlnode *n, int depth, int cdepth, int x, 
                char *buffer,int width,
                void (*pcb)(char*,struct mavlnode *))
{
        char temp[180];
        int de;
        de = cdepth;
        if (!n)
                return;
        if (cdepth==depth){
                pcb(temp,n);
                (void)strcpy(buffer+x,temp); 
                return ;        
        }
        if (cdepth>depth)
                return;
        print0(n->s[0],depth,cdepth+1,x-width/(2<<(de+1)),buffer,width,pcb);
        print0(n->s[1],depth,cdepth+1,x+width/(2<<(de+1)),buffer,width,pcb);

}

void
mavl_print(struct mavl *t, void (*pcb)(char*,struct mavlnode *), int width)
{
        int de;
        char * buffer;
        buffer = malloc(sizeof(char)*(width+1));

        for (de=0;de<10;de++){
                (void)memset(buffer,' ',(size_t)width);
                print0(t->root,de,0,width/2,buffer,width,pcb);
                buffer[width+1]=0;
                (void)printf("%s\n",buffer);
        }

        free(buffer);
}