vpr/SRC/pack/print_netlist.c

Go to the documentation of this file.

#include <assert.h>
#include <stdio.h>
#include <string.h>
#include "util.h"
#include "vpr_types.h"
#include "globals.h"
#include "print_netlist.h"
#include "read_xml_arch_file.h"

/******************** Subroutines local to this module ***********************/

static void print_pinnum(FILE * fp,
                         int pinnum);


/********************* Subroutine definitions ********************************/

/** Prints out the netlist related data structures into the file    
 * fname.                                                          
 */
void
print_netlist(char *foutput,
              char *net_file)
{

    int i, j, max_pin;
    int num_global_nets;
    int num_p_inputs, num_p_outputs;
    FILE *fp;

    num_global_nets = 0;
    num_p_inputs = 0;
    num_p_outputs = 0;

    /* Count number of global nets */
    for(i = 0; i < num_nets; i++)
        {
            if(clb_net[i].is_global)
                {
                    num_global_nets++;
                }
        }

    /* Count I/O input and output pads */
    for(i = 0; i < num_blocks; i++)
        {
            if(block[i].type == IO_TYPE)
                {
                    for(j = 0; j < IO_TYPE->num_pins; j++)
                        {
                            if(block[i].nets[j] != OPEN)
                                {
                                    if(IO_TYPE->
                                       class_inf[IO_TYPE->pin_class[j]].
                                       type == DRIVER)
                                        {
                                            num_p_inputs++;
                                        }
                                    else
                                        {
                                            assert(IO_TYPE->
                                                   class_inf[IO_TYPE->
                                                             pin_class[j]].
                                                   type == RECEIVER);
                                            num_p_outputs++;
                                        }
                                }
                        }
                }
        }


    fp = my_fopen(foutput, "w", 0);

    fprintf(fp, "Input netlist file: %s\n", net_file);
    fprintf(fp, "num_p_inputs: %d, num_p_outputs: %d, num_clbs: %d\n",
            num_p_inputs, num_p_outputs, num_blocks);
    fprintf(fp, "num_blocks: %d, num_nets: %d, num_globals: %d\n",
            num_blocks, num_nets, num_global_nets);
    fprintf(fp, "\nNet\tName\t\t#Pins\tDriver\t\tRecvs. (block, pin)\n");

    for(i = 0; i < num_nets; i++)
        {
            fprintf(fp, "\n%d\t%s\t", i, clb_net[i].name);
            if(strlen(clb_net[i].name) < 8)
                fprintf(fp, "\t");      /* Name field is 16 chars wide */
            fprintf(fp, "%d", clb_net[i].num_sinks + 1);
            for(j = 0; j <= clb_net[i].num_sinks; j++)
                fprintf(fp, "\t(%4d,%4d)", clb_net[i].node_block[j],
                        clb_net[i].node_block_pin[j]);
        }

    fprintf(fp, "\nBlock\tName\t\tType\tPin Connections\n\n");

    for(i = 0; i < num_blocks; i++)
        {
            fprintf(fp, "\n%d\t%s\t", i, block[i].name);
            if(strlen(block[i].name) < 8)
                fprintf(fp, "\t");      /* Name field is 16 chars wide */
            fprintf(fp, "%s", block[i].type->name);

            max_pin = block[i].type->num_pins;

            for(j = 0; j < max_pin; j++)
                print_pinnum(fp, block[i].nets[j]);
        }

    fprintf(fp, "\n");

/* TODO: Print out pb info */

    fclose(fp);
}


/** This routine prints out either OPEN or the pin number, to file fp. */
static void
print_pinnum(FILE * fp,
             int pinnum)
{
    if(pinnum == OPEN)
        fprintf(fp, "\tOPEN");
    else
        fprintf(fp, "\t%d", pinnum);
}