2001-03-11 01:29:38 +01:00
|
|
|
#ifndef __compile_H
|
|
|
|
|
#define __compile_H
|
|
|
|
|
/*
|
2003-01-26 00:48:05 +01:00
|
|
|
* Copyright (c) 2001-2003 Stephen Williams (steve@icarus.com)
|
2001-03-11 01:29:38 +01:00
|
|
|
*
|
|
|
|
|
* This source code is free software; you can redistribute it
|
|
|
|
|
* and/or modify it in source code form under the terms of the GNU
|
|
|
|
|
* General Public License as published by the Free Software
|
|
|
|
|
* Foundation; either version 2 of the License, or (at your option)
|
|
|
|
|
* any later version.
|
|
|
|
|
*
|
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
|
*
|
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
|
|
|
|
|
*/
|
2002-08-12 03:34:58 +02:00
|
|
|
#ifdef HAVE_CVS_IDENT
|
2004-12-11 03:31:25 +01:00
|
|
|
#ident "$Id: compile.h,v 1.57 2004/12/11 02:31:29 steve Exp $"
|
2001-03-11 01:29:38 +01:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
# include <stdio.h>
|
2001-03-20 07:16:23 +01:00
|
|
|
# include "parse_misc.h"
|
2001-03-18 05:35:18 +01:00
|
|
|
# include "vpi_user.h"
|
2004-12-11 03:31:25 +01:00
|
|
|
# include "vvp_net.h"
|
2001-03-11 01:29:38 +01:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* The functions described here are the compile time support
|
|
|
|
|
* functions. Various bits of the compile process are taken care of
|
|
|
|
|
* here. What is called when is mostly controlled by the parser.
|
|
|
|
|
*
|
|
|
|
|
* Before compilation takes place, the compile_init function must be
|
|
|
|
|
* called once to set stuff up.
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
extern void compile_init(void);
|
|
|
|
|
|
|
|
|
|
extern void compile_cleanup(void);
|
|
|
|
|
|
2002-07-15 02:21:42 +02:00
|
|
|
extern bool verbose_flag;
|
|
|
|
|
|
2001-11-06 04:07:21 +01:00
|
|
|
/*
|
|
|
|
|
* Connect a list of symbols to a contiguous set of ipoints.
|
|
|
|
|
* Constants C<?> are handled by setting the ival of the ipoint.
|
|
|
|
|
*/
|
2004-12-11 03:31:25 +01:00
|
|
|
extern void inputs_connect(vvp_net_t*fdx, unsigned argc, struct symb_s*argv);
|
|
|
|
|
extern void input_connect(vvp_net_t*fdx, unsigned port, char*label);
|
2001-11-06 04:07:21 +01:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Add a functor to the symbol table
|
|
|
|
|
*/
|
2004-12-11 03:31:25 +01:00
|
|
|
extern void define_functor_symbol(const char*label, vvp_net_t*ipt);
|
2001-11-06 04:07:21 +01:00
|
|
|
|
2001-03-22 23:38:13 +01:00
|
|
|
/*
|
|
|
|
|
* This is a count of errors encountered during compilation. If this
|
|
|
|
|
* is non-zero, then simulation is not recommended.
|
|
|
|
|
*/
|
|
|
|
|
extern unsigned compile_errors;
|
|
|
|
|
|
2001-03-23 03:40:22 +01:00
|
|
|
extern const char* module_path;
|
|
|
|
|
extern void compile_load_vpi_module(char*name);
|
|
|
|
|
|
2001-07-01 01:03:16 +02:00
|
|
|
extern void compile_vpi_time_precision(long pre);
|
|
|
|
|
|
2001-03-11 01:29:38 +01:00
|
|
|
/*
|
|
|
|
|
* This function is called by the parser to compile a functor
|
|
|
|
|
* statement. The strings passed in are allocated by the lexor, but
|
|
|
|
|
* this function will free them. (Or save them permanently.) This
|
|
|
|
|
* includes the argv array and the strings it references.
|
|
|
|
|
*
|
2003-02-10 00:33:26 +01:00
|
|
|
* The argc and argv are a list of char* that are the port parameters
|
2001-03-11 01:29:38 +01:00
|
|
|
* of the functor. The compile should match those port parameters up
|
|
|
|
|
* to existing functors to manage the linking.
|
|
|
|
|
*/
|
2001-05-02 06:05:16 +02:00
|
|
|
extern void compile_functor(char*label, char*type,
|
2001-12-14 03:04:49 +01:00
|
|
|
vvp_delay_t delay, unsigned ostr0,
|
|
|
|
|
unsigned ostr1,
|
2001-03-20 07:16:23 +01:00
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-03-11 01:29:38 +01:00
|
|
|
|
|
|
|
|
|
2001-05-09 04:53:25 +02:00
|
|
|
/*
|
|
|
|
|
* This is called by the parser to make a resolver. This is a special
|
|
|
|
|
* kind of functor; a strength aware functor.
|
|
|
|
|
*/
|
|
|
|
|
extern void compile_resolver(char*label, char*type,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
|
|
|
|
|
2004-12-11 03:31:25 +01:00
|
|
|
extern void compile_part_select(char*label, char*src,
|
|
|
|
|
unsigned base, unsigned wid);
|
|
|
|
|
|
2001-11-01 04:00:19 +01:00
|
|
|
/*
|
|
|
|
|
* This is called by the parser to make force functors.
|
|
|
|
|
*/
|
|
|
|
|
extern void compile_force(char*label, struct symb_s signal,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
|
|
|
|
|
2001-06-05 05:05:41 +02:00
|
|
|
/*
|
2001-06-15 06:07:57 +02:00
|
|
|
* This is called by the parser to make the various arithmetic and
|
|
|
|
|
* comparison functors.
|
2001-06-05 05:05:41 +02:00
|
|
|
*/
|
2004-06-30 04:15:57 +02:00
|
|
|
extern void compile_arith_div(char*label, long width, bool signed_flag,
|
2001-10-16 04:47:37 +02:00
|
|
|
unsigned argc, struct symb_s*argv);
|
2002-01-03 05:19:01 +01:00
|
|
|
extern void compile_arith_mod(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-06-17 01:45:05 +02:00
|
|
|
extern void compile_arith_mult(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-06-05 05:05:41 +02:00
|
|
|
extern void compile_arith_sum(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-06-07 05:09:03 +02:00
|
|
|
extern void compile_arith_sub(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2004-06-16 18:33:25 +02:00
|
|
|
extern void compile_cmp_eq(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
|
|
|
|
extern void compile_cmp_ne(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2003-04-11 07:15:38 +02:00
|
|
|
extern void compile_cmp_ge(char*label, long width, bool signed_flag,
|
2001-06-15 06:07:57 +02:00
|
|
|
unsigned argc, struct symb_s*argv);
|
2003-04-11 07:15:38 +02:00
|
|
|
extern void compile_cmp_gt(char*label, long width, bool signed_flag,
|
2001-06-15 06:07:57 +02:00
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-07-06 06:46:44 +02:00
|
|
|
extern void compile_shiftl(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-07-07 04:57:33 +02:00
|
|
|
extern void compile_shiftr(char*label, long width,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2001-06-05 05:05:41 +02:00
|
|
|
|
2002-12-21 01:55:57 +01:00
|
|
|
extern void compile_timescale(long units);
|
2001-05-09 04:53:25 +02:00
|
|
|
|
2001-03-21 06:13:03 +01:00
|
|
|
extern void compile_vpi_symbol(const char*label, vpiHandle obj);
|
2001-07-11 06:43:57 +02:00
|
|
|
extern void compile_vpi_lookup(vpiHandle *objref, char*label);
|
2001-03-21 06:13:03 +01:00
|
|
|
|
2003-03-11 00:37:07 +01:00
|
|
|
extern void compile_param_string(char*label, char*name,
|
|
|
|
|
char*str, char*value);
|
|
|
|
|
|
2002-03-18 01:19:34 +01:00
|
|
|
/*
|
|
|
|
|
* This function schedules a lookup of an indexed label. The ref
|
|
|
|
|
* points to the vvp_ipoint_t that receives the result. The result may
|
|
|
|
|
* be assigned later, if the symbol is defined later in the source
|
|
|
|
|
* file, so the memory that ref points to must persist.
|
|
|
|
|
*/
|
|
|
|
|
extern void functor_ref_lookup(vvp_ipoint_t *ref, char*lab, unsigned idx);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* This function schedules a lookup of the labeled instruction. The
|
|
|
|
|
* code points to a code structure that points to the instruction
|
|
|
|
|
* field that receives the result, and the label is the name to
|
|
|
|
|
* lookup. The lookup will free the label text when it is done.
|
|
|
|
|
*/
|
|
|
|
|
extern void code_label_lookup(struct vvp_code_s *code, char *label);
|
|
|
|
|
|
2004-10-04 03:10:51 +02:00
|
|
|
/*
|
2001-04-25 06:35:05 +02:00
|
|
|
* The `compile_udp_def' function creates a UDP. The `table' is a
|
2004-10-04 03:10:51 +02:00
|
|
|
* NULL terminated array of char*, as assembled by `compile_udp_table'.
|
|
|
|
|
* `compile_udp_table' is called with `table'==NULL to create a new
|
2001-04-25 06:35:05 +02:00
|
|
|
* table, or with an existing table to append to.
|
|
|
|
|
*
|
2004-10-04 03:10:51 +02:00
|
|
|
* `compile_udp_functor' creates a mode-3 functor referring to the
|
|
|
|
|
* labeled UDP.
|
2001-04-24 04:23:58 +02:00
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
extern void compile_udp_def(int sequ, char*label, char *name,
|
|
|
|
|
unsigned nin, unsigned init, char **table);
|
|
|
|
|
|
|
|
|
|
extern void compile_udp_functor(char*label, char*type,
|
2001-12-06 04:31:24 +01:00
|
|
|
vvp_delay_t delay,
|
2001-04-24 04:23:58 +02:00
|
|
|
unsigned argc, struct symb_s*argv);
|
|
|
|
|
|
|
|
|
|
extern char **compile_udp_table(char **table, char *row);
|
|
|
|
|
|
2001-05-01 03:09:39 +02:00
|
|
|
/*
|
|
|
|
|
* Memory Instances, Ports, and Initialization
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
extern void compile_memory(char *label, char *name, int lsb, int msb,
|
|
|
|
|
unsigned idxs, long *idx);
|
|
|
|
|
|
2004-10-04 03:10:51 +02:00
|
|
|
extern void compile_memory_port(char *label, char *memid,
|
2001-05-01 03:09:39 +02:00
|
|
|
unsigned lsb, unsigned msb,
|
2001-06-15 05:28:30 +02:00
|
|
|
unsigned naddr,
|
2001-05-01 03:09:39 +02:00
|
|
|
unsigned argc, struct symb_s *argv);
|
|
|
|
|
|
|
|
|
|
extern void compile_memory_init(char *memid, unsigned idx, unsigned char val);
|
|
|
|
|
|
2002-03-18 01:19:34 +01:00
|
|
|
/*
|
|
|
|
|
* Compile the .ufunc statement.
|
|
|
|
|
*/
|
|
|
|
|
extern void compile_ufunc(char*label, char*code, unsigned wid,
|
|
|
|
|
unsigned argc, struct symb_s*argv,
|
|
|
|
|
unsigned portc, struct symb_s*portv,
|
|
|
|
|
unsigned retc, struct symb_s*retv);
|
2001-05-01 03:09:39 +02:00
|
|
|
|
2001-03-26 06:00:39 +02:00
|
|
|
/*
|
|
|
|
|
* The compile_event function takes the parts of the event statement
|
|
|
|
|
* and makes the various objects needed to simulate it. This includes
|
|
|
|
|
* the functor that receives the signals and the event_t that holds
|
|
|
|
|
* the threads.
|
|
|
|
|
*/
|
|
|
|
|
extern void compile_event(char*label, char*type,
|
|
|
|
|
unsigned argc, struct symb_s*argv);
|
2002-05-18 04:34:11 +02:00
|
|
|
extern void compile_named_event(char*label, char*type);
|
2001-03-26 06:00:39 +02:00
|
|
|
|
2003-01-26 00:48:05 +01:00
|
|
|
/*
|
|
|
|
|
* Word declarations include a label, a type symbol, and a vpi name.
|
|
|
|
|
*/
|
|
|
|
|
extern void compile_word(char*label, char*type, char*name);
|
|
|
|
|
|
2001-03-11 01:29:38 +01:00
|
|
|
/*
|
|
|
|
|
* A code statement is a label, an opcode and up to 3 operands. There
|
|
|
|
|
* are a few lexical types that the parser recognizes of the operands,
|
|
|
|
|
* given by the ltype_e enumeration. The compile_code function takes
|
|
|
|
|
* the label, mnemonic and parsed operands and writes a properly
|
|
|
|
|
* formed instruction into the code space. The label is set into the
|
|
|
|
|
* symbol table with the address of the instruction.
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#define OPERAND_MAX 3
|
2001-03-20 07:16:23 +01:00
|
|
|
enum ltype_e { L_NUMB, L_SYMB };
|
2001-03-11 01:29:38 +01:00
|
|
|
|
|
|
|
|
struct comp_operands_s {
|
|
|
|
|
unsigned argc;
|
|
|
|
|
struct {
|
|
|
|
|
enum ltype_e ltype;
|
|
|
|
|
union {
|
|
|
|
|
unsigned long numb;
|
2001-03-20 07:16:23 +01:00
|
|
|
struct symb_s symb;
|
2001-03-11 01:29:38 +01:00
|
|
|
};
|
|
|
|
|
} argv[OPERAND_MAX];
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
typedef struct comp_operands_s*comp_operands_t;
|
|
|
|
|
|
|
|
|
|
extern void compile_code(char*label, char*mnem, comp_operands_t opa);
|
2001-04-18 06:21:23 +02:00
|
|
|
extern void compile_disable(char*label, struct symb_s symb);
|
2001-05-20 02:46:12 +02:00
|
|
|
|
2001-03-18 05:35:18 +01:00
|
|
|
extern void compile_vpi_call(char*label, char*name,
|
|
|
|
|
unsigned argc, vpiHandle*argv);
|
2001-05-20 02:46:12 +02:00
|
|
|
|
2003-01-27 01:14:37 +01:00
|
|
|
/* Compile a function call. The vbit and vwid encode the return
|
|
|
|
|
type. If the vwid >0, the return type is a vector. If the vwid is
|
|
|
|
|
<0, the return type is -vpiRealConst or some other constant subtype
|
|
|
|
|
code that represents the function type. */
|
2001-05-20 02:46:12 +02:00
|
|
|
extern void compile_vpi_func_call(char*label, char*name,
|
2003-01-27 01:14:37 +01:00
|
|
|
unsigned vbit, int vwid,
|
2001-05-20 02:46:12 +02:00
|
|
|
unsigned argc, vpiHandle*argv);
|
|
|
|
|
|
2001-04-18 06:21:23 +02:00
|
|
|
extern void compile_fork(char*label, struct symb_s targ_s,
|
|
|
|
|
struct symb_s scope_s);
|
2001-04-01 08:40:44 +02:00
|
|
|
extern void compile_codelabel(char*label);
|
2001-03-11 01:29:38 +01:00
|
|
|
|
2001-03-18 01:37:55 +01:00
|
|
|
/*
|
|
|
|
|
* The parser uses these functions to compile .scope statements.
|
|
|
|
|
* The implementations of these live in the vpi_scope.cc file.
|
|
|
|
|
*/
|
2003-05-29 04:21:45 +02:00
|
|
|
extern void compile_scope_decl(char*typ, char*lab, char*nam,char*tnam,char*par);
|
2001-03-18 01:37:55 +01:00
|
|
|
extern void compile_scope_recall(char*sym);
|
|
|
|
|
|
2001-03-11 01:29:38 +01:00
|
|
|
/*
|
|
|
|
|
* The parser uses this function to declare a thread. The start_sym is
|
|
|
|
|
* the start instruction, and must already be defined.
|
|
|
|
|
*/
|
2003-09-04 22:26:30 +02:00
|
|
|
extern void compile_thread(char*start_sym, char*flag);
|
2001-03-11 01:29:38 +01:00
|
|
|
|
|
|
|
|
/*
|
2001-03-20 07:16:23 +01:00
|
|
|
* This function is called to create a var vector with the given name.
|
2001-03-11 01:29:38 +01:00
|
|
|
*/
|
2001-04-05 03:34:26 +02:00
|
|
|
extern void compile_variable(char*label, char*name,
|
2002-06-21 06:58:55 +02:00
|
|
|
int msb, int lsb, char signed_flag);
|
2001-03-11 01:29:38 +01:00
|
|
|
|
2001-04-05 03:34:26 +02:00
|
|
|
extern void compile_net(char*label, char*name,
|
|
|
|
|
int msb, int lsb, bool signed_flag,
|
2001-03-25 01:35:35 +01:00
|
|
|
unsigned argc, struct symb_s*argv);
|
|
|
|
|
|
2001-03-11 01:29:38 +01:00
|
|
|
/*
|
|
|
|
|
* $Log: compile.h,v $
|
2004-12-11 03:31:25 +01:00
|
|
|
* Revision 1.57 2004/12/11 02:31:29 steve
|
|
|
|
|
* Rework of internals to carry vectors through nexus instead
|
|
|
|
|
* of single bits. Make the ivl, tgt-vvp and vvp initial changes
|
|
|
|
|
* down this path.
|
|
|
|
|
*
|
2004-10-04 03:10:51 +02:00
|
|
|
* Revision 1.56 2004/10/04 01:10:59 steve
|
|
|
|
|
* Clean up spurious trailing white space.
|
|
|
|
|
*
|
2004-06-30 04:15:57 +02:00
|
|
|
* Revision 1.55 2004/06/30 02:15:57 steve
|
|
|
|
|
* Add signed LPM divide.
|
|
|
|
|
*
|
2004-06-16 18:33:25 +02:00
|
|
|
* Revision 1.54 2004/06/16 16:33:26 steve
|
|
|
|
|
* Add structural equality compare nodes.
|
|
|
|
|
*
|
2003-09-04 22:26:30 +02:00
|
|
|
* Revision 1.53 2003/09/04 20:26:31 steve
|
|
|
|
|
* Add $push flag for threads.
|
|
|
|
|
*
|
2003-05-29 04:21:45 +02:00
|
|
|
* Revision 1.52 2003/05/29 02:21:45 steve
|
|
|
|
|
* Implement acc_fetch_defname and its infrastructure in vvp.
|
|
|
|
|
*
|
2003-04-11 07:15:38 +02:00
|
|
|
* Revision 1.51 2003/04/11 05:15:39 steve
|
|
|
|
|
* Add signed versions of .cmp/gt/ge
|
|
|
|
|
*
|
2003-03-11 00:37:07 +01:00
|
|
|
* Revision 1.50 2003/03/10 23:37:07 steve
|
|
|
|
|
* Direct support for string parameters.
|
|
|
|
|
*
|
2003-02-10 00:33:26 +01:00
|
|
|
* Revision 1.49 2003/02/09 23:33:26 steve
|
|
|
|
|
* Spelling fixes.
|
|
|
|
|
*
|
2003-01-27 01:14:37 +01:00
|
|
|
* Revision 1.48 2003/01/27 00:14:37 steve
|
|
|
|
|
* Support in various contexts the $realtime
|
|
|
|
|
* system task.
|
|
|
|
|
*
|
2003-01-26 00:48:05 +01:00
|
|
|
* Revision 1.47 2003/01/25 23:48:06 steve
|
|
|
|
|
* Add thread word array, and add the instructions,
|
|
|
|
|
* %add/wr, %cmp/wr, %load/wr, %mul/wr and %set/wr.
|
|
|
|
|
*
|
2002-12-21 01:55:57 +01:00
|
|
|
* Revision 1.46 2002/12/21 00:55:58 steve
|
|
|
|
|
* The $time system task returns the integer time
|
|
|
|
|
* scaled to the local units. Change the internal
|
|
|
|
|
* implementation of vpiSystemTime the $time functions
|
|
|
|
|
* to properly account for this. Also add $simtime
|
|
|
|
|
* to get the simulation time.
|
|
|
|
|
*
|
2002-08-12 03:34:58 +02:00
|
|
|
* Revision 1.45 2002/08/12 01:35:07 steve
|
|
|
|
|
* conditional ident string using autoconfig.
|
|
|
|
|
*
|
2002-07-15 02:21:42 +02:00
|
|
|
* Revision 1.44 2002/07/15 00:21:42 steve
|
|
|
|
|
* Fix initialization of symbol table string heap.
|
2001-03-11 01:29:38 +01:00
|
|
|
*/
|
|
|
|
|
#endif
|