Subversion Repositories Vertical

/* $Id: print_quartus.c,v 1.1.1.1 2003/11/04 23:34:57 mjames Exp $ */

/* Quartus pin fit file creator

 *

 * $Log: print_quartus.c,v $

 * Revision 1.1.1.1  2003/11/04 23:34:57  mjames

 * Imported into local repositrory

 *

 * Revision 1.12  2003/01/02 21:37:16  mjames

 * Experiment on creating NOT_ROUTABLE_H and NOT_ROUTABLE_L

 * properties on the nets so that pin jumpers can be made without a problem.

 *

 * Still need to sort out pin assignments made to these not_routable nets

 * which will become legal in some cases so that pullups and pulldown

 * pins can be used on the FPGA.

 *

 * Revision 1.11  2002/09/09 10:12:02  mjames

 * Moved pin remapping function to pin ident editing function from

 * sorting pin name routine.

 *

 * Revision 1.10  2002/08/14 12:06:41  mjames

 * Removed debug level setting function that should not have been here

 *

 * Revision 1.9  2002/08/06 12:52:38  mjames

 * Merge in from latest version

 *

 *

 * Revision 1.9  2002/04/10 14:29:10  mjames

 * Moved setting debug level to cmdutil.c

 *

 * Amended print external command to list all net names on socket pins

 * whether routed or not.

 *

 * Revision 1.8  2002/01/16 10:08:13  mjames

 * removed unused variable

 *

 * Revision 1.7  2001/10/31 22:20:12  mjames

 * Tidying up problematical comments caused by CVS

 * 'intelligent' comment guessing

 *

 * Revision 1.6  2001/10/22 10:58:18  mjames

 * Added required header files

 *

 * Revision 1.5  2001/09/21 14:20:38  mjames

 * Changed layout of printout to include device type if needed

 *

 * Revision 1.4  2001/07/09 15:38:02  mjames

 * Corrected printout errors that made reference to deleted net objects.

 *

 * Revision 1.3  2001/07/09 09:34:23  mjames

 * Printing only named nets that are routable, to create

 * the correct Quatus configuration file

 *

 * Revision 1.2  2001/07/06 12:47:13  MJAMES

 * Slight changes made for use with Quartus

 *

 * Revision 1.1  2001/06/06 12:10:19  mjames

 * Move from HPUX

 * */

/* ********************************************************************** */

#include <stdio.h>

#include <string.h>

#include <stdlib.h>

#include <ctype.h>

#include <time.h>

#include <sys/types.h>

#include <regex.h>

#include "vertcl_main.h" 

#include "expression.h"

#include "generic.h"

#include "database.h"

#include "printout.h"

#include "print_vhdl.h"

#include "print_vlog.h"

#include "sorting.h"

#include "cmdparse.h"

#include "cmdlog.h"

#include "equivalent.h"

#if defined NEED_DECODE_PIN

static char * decode_quartus_pin[]=

{

  "NONE",

  "input",

  "output",

  "output", /* buffer is a sort of Output pin (lower case is for info only )*/

  "inout",

  "CONFIG_PIN",

  "POWER_PIN"};

#endif

void print_quartus_pinfit(FILE * f,socket_t * dev, int options)

{

  node_t * n;

  /* sort all the nodes into alphabetical order */

  sort_nodes(dev,NO_EXTRACT_XY);

  if(dev->is_external)

    fprintf(f,"#  External Connection\n\n");

  else

    fprintf(f,"#  Internal Socket\n\n");

  /* if it hasnt got a name, use its identifier */

  if(!ISNULLSTR(dev->name))

    fprintf(f,"CHIP (%s) {\n",check_null_str(dev->name));

  else

    fprintf(f,"CHIP (%s) {\n",dev->identifier);

  if (!ISNULLSTR(dev->type))

    {

    fprintf(f," ASSIGNED TO AN \"%s\";\n",check_null_str(dev->type));

    }

  n=dev->nodes;

  while(n)  {

    if(n->net && IS_ROUTABLE(n->net->how_routed) && (n->net->list_ref == &named_list)) {

      fprintf(f,"\t%-20s : LOCATION = Pin_%-10s;\n",

                n->net->name,

                n->identifier);

      }

    n=n->sktnext; /* traverse to next pin on socket */

    };

    fprintf(f,"  }\n");

}