123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392 |
- #include <u.h>
- #include <libc.h>
- #include <bio.h>
- #include "../5c/5.out.h"
- #ifndef EXTERN
- #define EXTERN extern
- #endif
- typedef struct Adr Adr;
- typedef struct Sym Sym;
- typedef struct Autom Auto;
- typedef struct Prog Prog;
- typedef struct Optab Optab;
- typedef struct Oprang Oprang;
- typedef uchar Opcross[32][2][32];
- typedef struct Count Count;
- #define P ((Prog*)0)
- #define S ((Sym*)0)
- #define TNAME (curtext&&curtext->from.sym?curtext->from.sym->name:noname)
- struct Adr
- {
- union
- {
- long u0offset;
- char* u0sval;
- Ieee* u0ieee;
- } u0;
- union
- {
- Auto* u1autom;
- Sym* u1sym;
- } u1;
- char type;
- char reg;
- char name;
- char class;
- };
- #define offset u0.u0offset
- #define sval u0.u0sval
- #define ieee u0.u0ieee
- #define autom u1.u1autom
- #define sym u1.u1sym
- struct Prog
- {
- Adr from;
- Adr to;
- union
- {
- long u0regused;
- Prog* u0forwd;
- } u0;
- Prog* cond;
- Prog* link;
- long pc;
- long line;
- uchar mark;
- uchar optab;
- uchar as;
- uchar scond;
- uchar reg;
- };
- #define regused u0.u0regused
- #define forwd u0.u0forwd
- struct Sym
- {
- char *name;
- short type;
- short version;
- short become;
- short frame;
- uchar subtype;
- ushort file;
- long value;
- long sig;
- Sym* link;
- };
- #define SIGNINTERN (1729*325*1729)
- struct Autom
- {
- Sym* asym;
- Auto* link;
- long aoffset;
- short type;
- };
- struct Optab
- {
- char as;
- char a1;
- char a2;
- char a3;
- char type;
- char size;
- char param;
- char flag;
- };
- struct Oprang
- {
- Optab* start;
- Optab* stop;
- };
- struct Count
- {
- long count;
- long outof;
- };
- enum
- {
- STEXT = 1,
- SDATA,
- SBSS,
- SDATA1,
- SXREF,
- SLEAF,
- SFILE,
- SCONST,
- SSTRING,
- SUNDEF,
- SIMPORT,
- SEXPORT,
- LFROM = 1<<0,
- LTO = 1<<1,
- LPOOL = 1<<2,
- V4 = 1<<3, /* arm v4 arch */
- C_NONE = 0,
- C_REG,
- C_REGREG,
- C_SHIFT,
- C_FREG,
- C_PSR,
- C_FCR,
- C_RCON, /* 0xff rotated */
- C_NCON, /* ~RCON */
- C_SCON, /* 0xffff */
- C_LCON,
- C_FCON,
- C_RACON,
- C_LACON,
- C_RECON,
- C_LECON,
- C_SBRA,
- C_LBRA,
- C_HAUTO, /* halfword insn offset (-0xff to 0xff) */
- C_FAUTO, /* float insn offset (0 to 0x3fc, word aligned) */
- C_HFAUTO, /* both H and F */
- C_SAUTO, /* -0xfff to 0xfff */
- C_LAUTO,
- C_HEXT,
- C_FEXT,
- C_HFEXT,
- C_SEXT,
- C_LEXT,
- C_HOREG,
- C_FOREG,
- C_HFOREG,
- C_SOREG,
- C_ROREG,
- C_SROREG, /* both S and R */
- C_LOREG,
- C_ADDR, /* relocatable address */
- C_GOK,
- /* mark flags */
- FOLL = 1<<0,
- LABEL = 1<<1,
- LEAF = 1<<2,
- BIG = (1<<12)-4,
- STRINGSZ = 200,
- NHASH = 10007,
- NHUNK = 100000,
- MINSIZ = 64,
- NENT = 100,
- MAXIO = 8192,
- MAXHIST = 20, /* limit of path elements for history symbols */
- Roffset = 22, /* no. bits for offset in relocation address */
- Rindex = 10, /* no. bits for index in relocation address */
- };
- EXTERN union
- {
- struct
- {
- uchar obuf[MAXIO]; /* output buffer */
- uchar ibuf[MAXIO]; /* input buffer */
- } u;
- char dbuf[1];
- } buf;
- #define cbuf u.obuf
- #define xbuf u.ibuf
- EXTERN long HEADR; /* length of header */
- EXTERN int HEADTYPE; /* type of header */
- EXTERN long INITDAT; /* data location */
- EXTERN long INITRND; /* data round above text location */
- EXTERN long INITTEXT; /* text location */
- EXTERN char* INITENTRY; /* entry point */
- EXTERN long autosize;
- EXTERN Biobuf bso;
- EXTERN long bsssize;
- EXTERN int cbc;
- EXTERN uchar* cbp;
- EXTERN int cout;
- EXTERN Auto* curauto;
- EXTERN Auto* curhist;
- EXTERN Prog* curp;
- EXTERN Prog* curtext;
- EXTERN Prog* datap;
- EXTERN long datsize;
- EXTERN char debug[128];
- EXTERN Prog* etextp;
- EXTERN Prog* firstp;
- EXTERN char fnuxi4[4];
- EXTERN char fnuxi8[8];
- EXTERN char* noname;
- EXTERN Sym* hash[NHASH];
- EXTERN Sym* histfrog[MAXHIST];
- EXTERN int histfrogp;
- EXTERN int histgen;
- EXTERN char* library[50];
- EXTERN char* libraryobj[50];
- EXTERN int libraryp;
- EXTERN int xrefresolv;
- EXTERN char* hunk;
- EXTERN char inuxi1[1];
- EXTERN char inuxi2[2];
- EXTERN char inuxi4[4];
- EXTERN Prog* lastp;
- EXTERN long lcsize;
- EXTERN char literal[32];
- EXTERN int nerrors;
- EXTERN long nhunk;
- EXTERN long instoffset;
- EXTERN Opcross opcross[8];
- EXTERN Oprang oprange[ALAST];
- EXTERN char* outfile;
- EXTERN long pc;
- EXTERN uchar repop[ALAST];
- EXTERN long symsize;
- EXTERN Prog* textp;
- EXTERN long textsize;
- EXTERN long thunk;
- EXTERN int version;
- EXTERN char xcmp[C_GOK+1][C_GOK+1];
- EXTERN Prog zprg;
- EXTERN int dtype;
- EXTERN int armv4;
- EXTERN int doexp, dlm;
- EXTERN int imports, nimports;
- EXTERN int exports, nexports;
- EXTERN char* EXPTAB;
- EXTERN Prog undefp;
- #define UP (&undefp)
- extern char* anames[];
- extern Optab optab[];
- void addpool(Prog*, Adr*);
- EXTERN Prog* blitrl;
- EXTERN Prog* elitrl;
- void initdiv(void);
- EXTERN Prog* prog_div;
- EXTERN Prog* prog_divu;
- EXTERN Prog* prog_mod;
- EXTERN Prog* prog_modu;
- #pragma varargck type "A" int
- #pragma varargck type "C" int
- #pragma varargck type "D" Adr*
- #pragma varargck type "N" Adr*
- #pragma varargck type "P" Prog*
- #pragma varargck type "S" char*
- int Aconv(Fmt*);
- int Cconv(Fmt*);
- int Dconv(Fmt*);
- int Nconv(Fmt*);
- int Pconv(Fmt*);
- int Sconv(Fmt*);
- int aclass(Adr*);
- void addhist(long, int);
- void append(Prog*, Prog*);
- void asmb(void);
- void asmdyn(void);
- void asmlc(void);
- void asmout(Prog*, Optab*);
- void asmsym(void);
- long atolwhex(char*);
- Prog* brloop(Prog*);
- void buildop(void);
- void buildrep(int, int);
- void cflush(void);
- void ckoff(Sym*, long);
- int chipfloat(Ieee*);
- int cmp(int, int);
- int compound(Prog*);
- double cputime(void);
- void datblk(long, long, int);
- void diag(char*, ...);
- void divsig(void);
- void dodata(void);
- void doprof1(void);
- void doprof2(void);
- void dynreloc(Sym*, long, int);
- long entryvalue(void);
- void errorexit(void);
- void exchange(Prog*);
- void export(void);
- int find1(long, int);
- void follow(void);
- void gethunk(void);
- void histtoauto(void);
- double ieeedtod(Ieee*);
- long ieeedtof(Ieee*);
- void import(void);
- int isnop(Prog*);
- void ldobj(int, long, char*);
- void loadlib(void);
- void listinit(void);
- Sym* lookup(char*, int);
- void cput(int);
- void lput(long);
- void lputl(long);
- void mkfwd(void);
- void* mysbrk(ulong);
- void names(void);
- void nocache(Prog*);
- void nuxiinit(void);
- void objfile(char*);
- int ocmp(const void*, const void*);
- long opirr(int);
- Optab* oplook(Prog*);
- long oprrr(int, int);
- long olr(long, int, int, int);
- long olhr(long, int, int, int);
- long olrr(int, int, int, int);
- long olhrr(int, int, int, int);
- long osr(int, int, long, int, int);
- long oshr(int, long, int, int);
- long ofsr(int, int, long, int, int, Prog*);
- long osrr(int, int, int, int);
- long oshrr(int, int, int, int);
- long omvl(Prog*, Adr*, int);
- void patch(void);
- void prasm(Prog*);
- void prepend(Prog*, Prog*);
- Prog* prg(void);
- int pseudo(Prog*);
- void putsymb(char*, int, long, int);
- void readundefs(char*, int);
- long regoff(Adr*);
- int relinv(int);
- long rnd(long, long);
- void span(void);
- void strnput(char*, int);
- void undef(void);
- void undefsym(Sym*);
- void wput(long);
- void xdefine(char*, int, long);
- void xfol(Prog*);
- void zerosig(char*);
- void noops(void);
- long immrot(ulong);
- long immaddr(long);
- long opbra(int, int);
|