/*      $NetBSD: gsp_ass.h,v 1.14 2025/11/24 08:04:28 nia Exp $ */
/*
 * GSP assembler - definitions
 *
 * Copyright (c) 1993 Paul Mackerras.
 * All rights reserved.
 *
 * 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.
 * 3. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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 <stddef.h>
#include <sys/types.h>
#include <err.h>

#define MAXLINE         133

typedef char    bool;
#define TRUE    1
#define FALSE   0

#define YYDEBUG 1

/* Structure for symbol in symbol table */
typedef struct symbol {
        int16_t flags;
        int16_t ndefn;
        unsigned        value;
        unsigned        lineno;
        struct symbol   *next;
        struct numlab   *nlab;
        char            name[1];
} *symbol;

/* Values for flags */
#define DEFINED         1
#define SET_LABEL       2
#define NUMERIC_LABEL   4

#define NOT_YET         65535U          /* line no. for `not defined yet' */

/* Info about successive numeric labels */
struct numlab {
        unsigned        value;
        unsigned        lineno;
        struct numlab   *next;
};

/* Structure for expressions */
typedef struct expr {
        int     e_op;
        union {
                struct {
                        struct expr *left;
                        struct expr *right;
                } e_s;
                symbol  sym;
                int32_t val;
        } e_u;
} *expr;
#define e_left  e_u.e_s.left
#define e_right e_u.e_s.right
#define e_sym   e_u.sym
#define e_val   e_u.val

/* Operators other than '+', '-', etc. */
#define SYM     1
#define CONST   2
#define NEG     3

/* Structure for an operand */
typedef struct operand {
        char    type;
        char    mode;                   /* EA mode */
        int16_t reg_no;
        union {
                expr    value;
                char    *string;
        } op_u;
        struct operand  *next;
} *operand;

/* Values for operand type */
#define REG     1               /* register operand */
#define EXPR    2               /* expression operand */
#define EA      4               /* effective address */
#define STR_OPN 8               /* string operand */

/* Addressing modes */
/* NB codes for modes with an expression must be > other modes */
#define M_REG           0       /* R */
#define M_IND           1       /* *R */
#define M_POSTINC       2       /* *R+ */
#define M_PREDEC        3       /* *-R */
#define M_INDXY         4       /* *R.XY (pixt only) */
#define M_INDEX         5       /* *R(n) */
#define M_ABSOLUTE      6       /* @adr */

/* Register names */
#define GSPA_A0 0x20
#define GSPA_B0 0x50
#define GSPA_SP 0x6F            /* (r1 & r2 & REGFILE) != 0 iff */
#define GSPA_REGFILE    0x60    /* r1 and r2 are in the same file */

/* Prototypes */
operand abs_adr(expr);
operand add_operand(operand, operand);
expr bexpr(int, expr, expr);
void do_asg(char *, expr, int flags);
void do_list_pc(void);
void do_show_val(int32_t);
int eval_expr(expr, int32_t *, unsigned *);
operand expr_op(expr);
expr fold(expr);
void free_expr(expr);
void free_operands(operand);
int get_line(char *lp, int maxlen);
expr here_expr(void);
expr id_expr(char *);
void lex_init(char *line);
void list_error(char *);
void listing(void);
symbol lookup(char *id, bool makeit);
expr num_expr(int);
void p1err(const char *fmt, ...) __printflike(1, 2);
void perr(const char *fmt, ...) __printflike(1, 2);
void pseudo(int code, operand operands);
void push_input(char *fn);
void putcode(u_int16_t *, int);
operand reg_ind(int, int);
operand reg_index(int, expr);
operand reg_indxy(int, char *);
operand reg_op(int reg);
void reset_numeric_labels(void);
void set_label(char *);
void set_numeric_label(int);
void start_at(u_int32_t);
void statement(char *opcode, operand operands);
operand string_op(char *);
void ucasify(char *);
__dead void yyerror(const char *err);
int yylex(void);


extern unsigned pc;
extern short pass2;

extern unsigned lineno;
extern int err_count;
extern char line[], *lineptr;

#if defined(sparc) && !defined(__NetBSD__)
#include <alloca.h>
#else
#ifdef __GNUC__
#define alloca __builtin_alloca
#endif
#endif

#define new(x)  ((x) = emalloc(sizeof(*(x))))