Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 1 | // Copyright 2009 The Go Authors. All rights reserved. |
| 2 | // Use of this source code is governed by a BSD-style |
| 3 | // license that can be found in the LICENSE file. |
| 4 | |
| 5 | |
| 6 | #include <u.h> |
| 7 | #include <libc.h> |
| 8 | |
| 9 | #include "../gc/go.h" |
| 10 | #include "../6l/6.out.h" |
| 11 | |
| 12 | #ifndef EXTERN |
| 13 | #define EXTERN extern |
| 14 | #endif |
| 15 | |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 16 | typedef struct Addr Addr; |
| 17 | |
| 18 | struct Addr |
| 19 | { |
| 20 | vlong offset; |
| 21 | double dval; |
| 22 | Prog* branch; |
| 23 | char sval[NSNAME]; |
| 24 | |
| 25 | Sym* sym; |
Ken Thompson | 4238b18 | 2009-05-23 15:34:29 -0700 | [diff] [blame] | 26 | int width; |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 27 | uchar type; |
| 28 | uchar index; |
| 29 | uchar etype; |
| 30 | uchar scale; /* doubles as width in DATA op */ |
| 31 | }; |
| 32 | #define A ((Addr*)0) |
| 33 | |
| 34 | struct Prog |
| 35 | { |
| 36 | short as; // opcode |
Russ Cox | 9aad9fe | 2008-08-03 17:25:15 -0700 | [diff] [blame] | 37 | uint32 loc; // pc offset in this func |
| 38 | uint32 lineno; // source line that generated this |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 39 | Addr from; // src address |
| 40 | Addr to; // dst address |
| 41 | Prog* link; // next instruction in this func |
Ken Thompson | 2dd16a3 | 2008-11-18 19:24:37 -0800 | [diff] [blame] | 42 | void* reg; // pointer to containing Reg struct |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 43 | }; |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 44 | |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 45 | EXTERN Biobuf* bout; |
Russ Cox | 9aad9fe | 2008-08-03 17:25:15 -0700 | [diff] [blame] | 46 | EXTERN int32 dynloc; |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 47 | EXTERN uchar reg[D_NONE]; |
Russ Cox | 9aad9fe | 2008-08-03 17:25:15 -0700 | [diff] [blame] | 48 | EXTERN int32 pcloc; // instruction counter |
Ken Thompson | 3657061 | 2009-04-09 18:16:21 -0700 | [diff] [blame] | 49 | EXTERN Strlit emptystring; |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 50 | extern char* anames[]; |
Ken Thompson | efec14b | 2008-06-13 18:16:23 -0700 | [diff] [blame] | 51 | EXTERN Hist* hist; |
| 52 | EXTERN Prog zprog; |
Ken Thompson | 904d404 | 2008-09-12 16:48:35 -0700 | [diff] [blame] | 53 | EXTERN Node* curfn; |
| 54 | EXTERN Node* newproc; |
Ken Thompson | 1e1cc4e | 2009-01-27 12:03:53 -0800 | [diff] [blame] | 55 | EXTERN Node* deferproc; |
| 56 | EXTERN Node* deferreturn; |
Ken Thompson | 904d404 | 2008-09-12 16:48:35 -0700 | [diff] [blame] | 57 | EXTERN Node* throwindex; |
| 58 | EXTERN Node* throwreturn; |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 59 | |
| 60 | /* |
| 61 | * gen.c |
| 62 | */ |
| 63 | void compile(Node*); |
| 64 | void proglist(void); |
Ken Thompson | 48f6b51 | 2009-03-11 16:25:45 -0700 | [diff] [blame] | 65 | void gen(Node*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 66 | Node* lookdot(Node*, Node*, int); |
Russ Cox | 2d259c8 | 2009-01-05 17:32:23 -0800 | [diff] [blame] | 67 | void cgen_as(Node*, Node*); |
Ken Thompson | 1d31a25 | 2008-07-07 17:59:32 -0700 | [diff] [blame] | 68 | void cgen_callmeth(Node*, int); |
| 69 | void cgen_callinter(Node*, Node*, int); |
Ken Thompson | 1e1cc4e | 2009-01-27 12:03:53 -0800 | [diff] [blame] | 70 | void cgen_proc(Node*, int); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 71 | void cgen_callret(Node*, Node*); |
Ken Thompson | d83b994 | 2008-06-06 20:43:29 -0700 | [diff] [blame] | 72 | void cgen_div(int, Node*, Node*, Node*); |
Ken Thompson | dc78c64 | 2008-11-07 14:20:32 -0800 | [diff] [blame] | 73 | void cgen_bmul(int, Node*, Node*, Node*); |
Ken Thompson | f7753f1 | 2008-06-07 15:21:02 -0700 | [diff] [blame] | 74 | void cgen_shift(int, Node*, Node*, Node*); |
Russ Cox | 391425a | 2009-01-29 17:38:58 -0800 | [diff] [blame] | 75 | void cgen_dcl(Node*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 76 | int needconvert(Type*, Type*); |
| 77 | void genconv(Type*, Type*); |
| 78 | void allocparams(void); |
Ken Thompson | 33ee527 | 2008-08-29 20:30:19 -0700 | [diff] [blame] | 79 | void checklabels(); |
Russ Cox | 4a43198 | 2009-01-30 14:39:42 -0800 | [diff] [blame] | 80 | void ginscall(Node*, int); |
Ken Thompson | 52b0f77 | 2009-05-16 13:29:08 -0700 | [diff] [blame] | 81 | int gen_as_init(Node*, Node*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 82 | |
| 83 | /* |
| 84 | * cgen |
| 85 | */ |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 86 | void agen(Node*, Node*); |
| 87 | void igen(Node*, Node*, Node*); |
| 88 | vlong fieldoffset(Type*, Node*); |
| 89 | void bgen(Node*, int, Prog*); |
Ken Thompson | adaec0c | 2008-09-22 16:58:30 -0700 | [diff] [blame] | 90 | void sgen(Node*, Node*, int32); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 91 | void gmove(Node*, Node*); |
| 92 | Prog* gins(int, Node*, Node*); |
| 93 | int samaddr(Node*, Node*); |
| 94 | void naddr(Node*, Addr*); |
Russ Cox | 45f4e38 | 2008-10-03 16:23:02 -0700 | [diff] [blame] | 95 | void cgen_aret(Node*, Node*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 96 | |
| 97 | /* |
| 98 | * gsubr.c |
| 99 | */ |
| 100 | void clearp(Prog*); |
| 101 | void proglist(void); |
| 102 | Prog* gbranch(int, Type*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 103 | Prog* prog(int); |
| 104 | void gaddoffset(Node*); |
| 105 | void gconv(int, int); |
| 106 | int conv2pt(Type*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 107 | vlong convvtox(vlong, int); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 108 | void fnparam(Type*, int, int); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 109 | Prog* gop(int, Node*, Node*, Node*); |
| 110 | void setconst(Addr*, vlong); |
| 111 | void setaddr(Addr*, Node*); |
| 112 | int optoas(int, Type*); |
| 113 | void ginit(void); |
| 114 | void gclean(void); |
| 115 | void regalloc(Node*, Type*, Node*); |
| 116 | void regfree(Node*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 117 | Node* nodarg(Type*, int); |
| 118 | void nodreg(Node*, Type*, int); |
| 119 | void nodindreg(Node*, Type*, int); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 120 | void gconreg(int, vlong, int); |
| 121 | void buildtxt(void); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 122 | Plist* newplist(void); |
| 123 | int isfat(Type*); |
Ken Thompson | 23fc0ac | 2008-12-14 17:06:06 -0800 | [diff] [blame] | 124 | void sudoclean(void); |
Ken Thompson | a5a8789 | 2009-05-03 15:17:03 -0700 | [diff] [blame] | 125 | int sudoaddable(int, Node*, Addr*); |
Russ Cox | 4a43198 | 2009-01-30 14:39:42 -0800 | [diff] [blame] | 126 | void afunclit(Addr*); |
Russ Cox | 83cd4ee | 2009-05-06 13:47:40 -0700 | [diff] [blame] | 127 | void datagostring(Strlit*, Addr*); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 128 | |
| 129 | /* |
Ken Thompson | da49bfe | 2009-05-19 13:37:36 -0700 | [diff] [blame] | 130 | * obj.c |
| 131 | */ |
| 132 | void datastring(char*, int, Addr*); |
| 133 | |
| 134 | /* |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 135 | * list.c |
| 136 | */ |
| 137 | int Aconv(Fmt*); |
| 138 | int Dconv(Fmt*); |
| 139 | int Pconv(Fmt*); |
| 140 | int Rconv(Fmt*); |
| 141 | int Yconv(Fmt*); |
| 142 | void listinit(void); |
| 143 | |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 144 | void zaddr(Biobuf*, Addr*, int); |
Rob Pike | 0cafb9e | 2008-06-04 14:37:38 -0700 | [diff] [blame] | 145 | |