| 1 | /* -*- buffer-read-only: t -*-
|
|---|
| 2 | *
|
|---|
| 3 | * Copyright (c) 1996-1999 Malcolm Beattie
|
|---|
| 4 | *
|
|---|
| 5 | * You may distribute under the terms of either the GNU General Public
|
|---|
| 6 | * License or the Artistic License, as specified in the README file.
|
|---|
| 7 | *
|
|---|
| 8 | */
|
|---|
| 9 | /*
|
|---|
| 10 | * This file is autogenerated from bytecode.pl. Changes made here will be lost.
|
|---|
| 11 | */
|
|---|
| 12 | struct byteloader_fdata {
|
|---|
| 13 | SV *datasv;
|
|---|
| 14 | int next_out;
|
|---|
| 15 | int idx;
|
|---|
| 16 | };
|
|---|
| 17 |
|
|---|
| 18 | struct byteloader_state {
|
|---|
| 19 | struct byteloader_fdata *bs_fdata;
|
|---|
| 20 | SV *bs_sv;
|
|---|
| 21 | void **bs_obj_list;
|
|---|
| 22 | int bs_obj_list_fill;
|
|---|
| 23 | int bs_ix;
|
|---|
| 24 | XPV bs_pv;
|
|---|
| 25 | int bs_iv_overflows;
|
|---|
| 26 | };
|
|---|
| 27 |
|
|---|
| 28 | int bl_getc(struct byteloader_fdata *);
|
|---|
| 29 | int bl_read(struct byteloader_fdata *, char *, size_t, size_t);
|
|---|
| 30 | extern int byterun(pTHX_ struct byteloader_state *);
|
|---|
| 31 |
|
|---|
| 32 | enum {
|
|---|
| 33 | INSN_RET, /* 0 */
|
|---|
| 34 | INSN_LDSV, /* 1 */
|
|---|
| 35 | INSN_LDOP, /* 2 */
|
|---|
| 36 | INSN_STSV, /* 3 */
|
|---|
| 37 | INSN_STOP, /* 4 */
|
|---|
| 38 | INSN_STPV, /* 5 */
|
|---|
| 39 | INSN_LDSPECSV, /* 6 */
|
|---|
| 40 | INSN_LDSPECSVX, /* 7 */
|
|---|
| 41 | INSN_NEWSV, /* 8 */
|
|---|
| 42 | INSN_NEWSVX, /* 9 */
|
|---|
| 43 | INSN_NOP, /* 10 */
|
|---|
| 44 | INSN_NEWOP, /* 11 */
|
|---|
| 45 | INSN_NEWOPX, /* 12 */
|
|---|
| 46 | INSN_NEWOPN, /* 13 */
|
|---|
| 47 | INSN_NEWPV, /* 14 */
|
|---|
| 48 | INSN_PV_CUR, /* 15 */
|
|---|
| 49 | INSN_PV_FREE, /* 16 */
|
|---|
| 50 | INSN_SV_UPGRADE, /* 17 */
|
|---|
| 51 | INSN_SV_REFCNT, /* 18 */
|
|---|
| 52 | INSN_SV_REFCNT_ADD, /* 19 */
|
|---|
| 53 | INSN_SV_FLAGS, /* 20 */
|
|---|
| 54 | INSN_XRV, /* 21 */
|
|---|
| 55 | INSN_XPV, /* 22 */
|
|---|
| 56 | INSN_XPV_CUR, /* 23 */
|
|---|
| 57 | INSN_XPV_LEN, /* 24 */
|
|---|
| 58 | INSN_XIV, /* 25 */
|
|---|
| 59 | INSN_XNV, /* 26 */
|
|---|
| 60 | INSN_XLV_TARGOFF, /* 27 */
|
|---|
| 61 | INSN_XLV_TARGLEN, /* 28 */
|
|---|
| 62 | INSN_XLV_TARG, /* 29 */
|
|---|
| 63 | INSN_XLV_TYPE, /* 30 */
|
|---|
| 64 | INSN_XBM_USEFUL, /* 31 */
|
|---|
| 65 | INSN_XBM_PREVIOUS, /* 32 */
|
|---|
| 66 | INSN_XBM_RARE, /* 33 */
|
|---|
| 67 | INSN_XFM_LINES, /* 34 */
|
|---|
| 68 | INSN_COMMENT, /* 35 */
|
|---|
| 69 | INSN_XIO_LINES, /* 36 */
|
|---|
| 70 | INSN_XIO_PAGE, /* 37 */
|
|---|
| 71 | INSN_XIO_PAGE_LEN, /* 38 */
|
|---|
| 72 | INSN_XIO_LINES_LEFT, /* 39 */
|
|---|
| 73 | INSN_XIO_TOP_NAME, /* 40 */
|
|---|
| 74 | INSN_XIO_TOP_GV, /* 41 */
|
|---|
| 75 | INSN_XIO_FMT_NAME, /* 42 */
|
|---|
| 76 | INSN_XIO_FMT_GV, /* 43 */
|
|---|
| 77 | INSN_XIO_BOTTOM_NAME, /* 44 */
|
|---|
| 78 | INSN_XIO_BOTTOM_GV, /* 45 */
|
|---|
| 79 | INSN_XIO_SUBPROCESS, /* 46 */
|
|---|
| 80 | INSN_XIO_TYPE, /* 47 */
|
|---|
| 81 | INSN_XIO_FLAGS, /* 48 */
|
|---|
| 82 | INSN_XCV_XSUBANY, /* 49 */
|
|---|
| 83 | INSN_XCV_STASH, /* 50 */
|
|---|
| 84 | INSN_XCV_START, /* 51 */
|
|---|
| 85 | INSN_XCV_ROOT, /* 52 */
|
|---|
| 86 | INSN_XCV_GV, /* 53 */
|
|---|
| 87 | INSN_XCV_FILE, /* 54 */
|
|---|
| 88 | INSN_XCV_DEPTH, /* 55 */
|
|---|
| 89 | INSN_XCV_PADLIST, /* 56 */
|
|---|
| 90 | INSN_XCV_OUTSIDE, /* 57 */
|
|---|
| 91 | INSN_XCV_OUTSIDE_SEQ, /* 58 */
|
|---|
| 92 | INSN_XCV_FLAGS, /* 59 */
|
|---|
| 93 | INSN_AV_EXTEND, /* 60 */
|
|---|
| 94 | INSN_AV_PUSHX, /* 61 */
|
|---|
| 95 | INSN_AV_PUSH, /* 62 */
|
|---|
| 96 | INSN_XAV_FILL, /* 63 */
|
|---|
| 97 | INSN_XAV_MAX, /* 64 */
|
|---|
| 98 | INSN_XAV_FLAGS, /* 65 */
|
|---|
| 99 | INSN_XHV_RITER, /* 66 */
|
|---|
| 100 | INSN_XHV_NAME, /* 67 */
|
|---|
| 101 | INSN_XHV_PMROOT, /* 68 */
|
|---|
| 102 | INSN_HV_STORE, /* 69 */
|
|---|
| 103 | INSN_SV_MAGIC, /* 70 */
|
|---|
| 104 | INSN_MG_OBJ, /* 71 */
|
|---|
| 105 | INSN_MG_PRIVATE, /* 72 */
|
|---|
| 106 | INSN_MG_FLAGS, /* 73 */
|
|---|
| 107 | INSN_MG_NAME, /* 74 */
|
|---|
| 108 | INSN_MG_NAMEX, /* 75 */
|
|---|
| 109 | INSN_XMG_STASH, /* 76 */
|
|---|
| 110 | INSN_GV_FETCHPV, /* 77 */
|
|---|
| 111 | INSN_GV_FETCHPVX, /* 78 */
|
|---|
| 112 | INSN_GV_STASHPV, /* 79 */
|
|---|
| 113 | INSN_GV_STASHPVX, /* 80 */
|
|---|
| 114 | INSN_GP_SV, /* 81 */
|
|---|
| 115 | INSN_GP_REFCNT, /* 82 */
|
|---|
| 116 | INSN_GP_REFCNT_ADD, /* 83 */
|
|---|
| 117 | INSN_GP_AV, /* 84 */
|
|---|
| 118 | INSN_GP_HV, /* 85 */
|
|---|
| 119 | INSN_GP_CV, /* 86 */
|
|---|
| 120 | INSN_GP_FILE, /* 87 */
|
|---|
| 121 | INSN_GP_IO, /* 88 */
|
|---|
| 122 | INSN_GP_FORM, /* 89 */
|
|---|
| 123 | INSN_GP_CVGEN, /* 90 */
|
|---|
| 124 | INSN_GP_LINE, /* 91 */
|
|---|
| 125 | INSN_GP_SHARE, /* 92 */
|
|---|
| 126 | INSN_XGV_FLAGS, /* 93 */
|
|---|
| 127 | INSN_OP_NEXT, /* 94 */
|
|---|
| 128 | INSN_OP_SIBLING, /* 95 */
|
|---|
| 129 | INSN_OP_PPADDR, /* 96 */
|
|---|
| 130 | INSN_OP_TARG, /* 97 */
|
|---|
| 131 | INSN_OP_TYPE, /* 98 */
|
|---|
| 132 | INSN_OP_SEQ, /* 99 */
|
|---|
| 133 | INSN_OP_FLAGS, /* 100 */
|
|---|
| 134 | INSN_OP_PRIVATE, /* 101 */
|
|---|
| 135 | INSN_OP_FIRST, /* 102 */
|
|---|
| 136 | INSN_OP_LAST, /* 103 */
|
|---|
| 137 | INSN_OP_OTHER, /* 104 */
|
|---|
| 138 | INSN_OP_PMREPLROOT, /* 105 */
|
|---|
| 139 | INSN_OP_PMREPLSTART, /* 106 */
|
|---|
| 140 | INSN_OP_PMNEXT, /* 107 */
|
|---|
| 141 | INSN_OP_PMSTASHPV, /* 108 */
|
|---|
| 142 | INSN_OP_PMREPLROOTPO, /* 109 */
|
|---|
| 143 | INSN_OP_PMSTASH, /* 110 */
|
|---|
| 144 | INSN_OP_PMREPLROOTGV, /* 111 */
|
|---|
| 145 | INSN_PREGCOMP, /* 112 */
|
|---|
| 146 | INSN_OP_PMFLAGS, /* 113 */
|
|---|
| 147 | INSN_OP_PMPERMFLAGS, /* 114 */
|
|---|
| 148 | INSN_OP_PMDYNFLAGS, /* 115 */
|
|---|
| 149 | INSN_OP_SV, /* 116 */
|
|---|
| 150 | INSN_OP_PADIX, /* 117 */
|
|---|
| 151 | INSN_OP_PV, /* 118 */
|
|---|
| 152 | INSN_OP_PV_TR, /* 119 */
|
|---|
| 153 | INSN_OP_REDOOP, /* 120 */
|
|---|
| 154 | INSN_OP_NEXTOP, /* 121 */
|
|---|
| 155 | INSN_OP_LASTOP, /* 122 */
|
|---|
| 156 | INSN_COP_LABEL, /* 123 */
|
|---|
| 157 | INSN_COP_STASHPV, /* 124 */
|
|---|
| 158 | INSN_COP_FILE, /* 125 */
|
|---|
| 159 | INSN_COP_STASH, /* 126 */
|
|---|
| 160 | INSN_COP_FILEGV, /* 127 */
|
|---|
| 161 | INSN_COP_SEQ, /* 128 */
|
|---|
| 162 | INSN_COP_ARYBASE, /* 129 */
|
|---|
| 163 | INSN_COP_LINE, /* 130 */
|
|---|
| 164 | INSN_COP_IO, /* 131 */
|
|---|
| 165 | INSN_COP_WARNINGS, /* 132 */
|
|---|
| 166 | INSN_MAIN_START, /* 133 */
|
|---|
| 167 | INSN_MAIN_ROOT, /* 134 */
|
|---|
| 168 | INSN_MAIN_CV, /* 135 */
|
|---|
| 169 | INSN_CURPAD, /* 136 */
|
|---|
| 170 | INSN_PUSH_BEGIN, /* 137 */
|
|---|
| 171 | INSN_PUSH_INIT, /* 138 */
|
|---|
| 172 | INSN_PUSH_END, /* 139 */
|
|---|
| 173 | INSN_CURSTASH, /* 140 */
|
|---|
| 174 | INSN_DEFSTASH, /* 141 */
|
|---|
| 175 | INSN_DATA, /* 142 */
|
|---|
| 176 | INSN_INCAV, /* 143 */
|
|---|
| 177 | INSN_LOAD_GLOB, /* 144 */
|
|---|
| 178 | INSN_REGEX_PADAV, /* 145 */
|
|---|
| 179 | INSN_DOWARN, /* 146 */
|
|---|
| 180 | INSN_COMPPAD_NAME, /* 147 */
|
|---|
| 181 | INSN_XGV_STASH, /* 148 */
|
|---|
| 182 | INSN_SIGNAL, /* 149 */
|
|---|
| 183 | INSN_FORMFEED, /* 150 */
|
|---|
| 184 | MAX_INSN = 150
|
|---|
| 185 | };
|
|---|
| 186 |
|
|---|
| 187 | enum {
|
|---|
| 188 | OPt_OP, /* 0 */
|
|---|
| 189 | OPt_UNOP, /* 1 */
|
|---|
| 190 | OPt_BINOP, /* 2 */
|
|---|
| 191 | OPt_LOGOP, /* 3 */
|
|---|
| 192 | OPt_LISTOP, /* 4 */
|
|---|
| 193 | OPt_PMOP, /* 5 */
|
|---|
| 194 | OPt_SVOP, /* 6 */
|
|---|
| 195 | OPt_PADOP, /* 7 */
|
|---|
| 196 | OPt_PVOP, /* 8 */
|
|---|
| 197 | OPt_LOOP, /* 9 */
|
|---|
| 198 | OPt_COP /* 10 */
|
|---|
| 199 | };
|
|---|
| 200 |
|
|---|
| 201 | /* ex: set ro: */
|
|---|