开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 手机WAP编程 > 查看源码
wsasm.h
资源名称：gateway-1.2.1　[点击查看]
上传用户：gzpyjq
上传日期：2013-01-31
资源大小：1852k
文件大小：9k
源码类别：

手机WAP编程

开发平台：

WINDOWS

wsasm.h：源码内容
  1. /*
  2.  *
  3.  * wsasm.h
  4.  *
  5.  * Author: Markku Rossi <mtr@iki.fi>
  6.  *
  7.  * Copyright (c) 1999-2000 WAPIT OY LTD.
  8.  *  All rights reserved.
  9.  *
  10.  * Byte-code assembler definitions.
  11.  *
  12.  */
  14. #ifndef WSASM_H
  15. #define WSASM_H
  17. /********************* Opcodes for the ASM instructions *****************/
  19. /* The instruction classes. */
  21. /* Class 1: 1xxPPPPP */
  23. #define WS_ASM_CLASS1P(op) (((op) & 0x80) == 0x80)
  24. #define WS_ASM_CLASS1_OP(op) ((op) & 0xe0)
  25. #define WS_ASM_CLASS1_ARG(op) ((op) & 0x1f)
  27. /* Class 2: 010xPPPP */
  29. #define WS_ASM_CLASS2P(op) (((op) & 0xe0) == 0x40)
  30. #define WS_ASM_CLASS2_OP(op) ((op) & 0xf0)
  31. #define WS_ASM_CLASS2_ARG(op) ((op) & 0x0f)
  33. /* Class 3: 011xxPPP */
  35. #define WS_ASM_CLASS3P(op) (((op) & 0xe0) == 0x60)
  36. #define WS_ASM_CLASS3_OP(op) ((op) & 0x78)
  37. #define WS_ASM_CLASS3_ARG(op) ((op) & 0x07)
  39. /* Class 4: 00xxxxxx */
  41. #define WS_ASM_CLASS4P(op) (((op) & 0xc0) == 0x00)
  42. #define WS_ASM_CLASS4_OP(op) (op)
  44. /* Get the opcode of the operand `op'.  The operand `op' can belong to
  45.    any of the classes 1-4. */
  46. #define WS_ASM_OP(op)
  47.     (WS_ASM_CLASS1P(op)
  48.      ? WS_ASM_CLASS1_OP(op)
  49.      : (WS_ASM_CLASS2P(op)
  50.        ? WS_ASM_CLASS2_OP(op)
  51.        : (WS_ASM_CLASS3P(op)
  52.          ? WS_ASM_CLASS3_OP(op) 
  53.          : WS_ASM_CLASS4_OP(op))))
  55. /* Get the implicit argument of the operand `op'.  The operand `op'
  56.    can belong to any of the classes 1-4.  For the class 4 operands,
  57.    this returns 0. */
  58. #define WS_ASM_ARG(op)
  59.     (WS_ASM_CLASS1P(op)
  60.      ? WS_ASM_CLASS1_ARG(op)
  61.      : (WS_ASM_CLASS2P(op)
  62.        ? WS_ASM_CLASS2_ARG(op)
  63.        : (WS_ASM_CLASS3P(op)
  64.          ? WS_ASM_CLASS3_ARG(op)
  65.          : 0)))
  67. /* Create an operand with implicit argument from the operand `op' and
  68.    argument `arg'. */
  69. #define WS_ASM_GLUE(op, arg) ((WsByte) (((WsByte) (op)) | ((WsByte) (arg))))
  72. /* The instruction opcodes.             Opcode  Binary  Size */
  74. #define WS_ASM_JUMP_FW_S 0x80 /* 10000000   1 */
  75. #define WS_ASM_JUMP_FW 0x01 /* 00000001   2 */
  76. #define WS_ASM_JUMP_FW_W 0x02 /* 00000010   3 */
  78. #define WS_ASM_JUMP_BW_S 0xa0 /* 10100000   1 */
  79. #define WS_ASM_JUMP_BW 0x03 /* 00000011   2 */
  80. #define WS_ASM_JUMP_BW_W 0x04 /* 00000100   3 */
  82. #define WS_ASM_TJUMP_FW_S 0xc0 /* 11000000   1 */
  83. #define WS_ASM_TJUMP_FW 0x05 /* 00000101   2 */
  84. #define WS_ASM_TJUMP_FW_W 0x06 /* 00000110   3 */
  86. #define WS_ASM_TJUMP_BW 0x07 /* 00000111   2 */
  87. #define WS_ASM_TJUMP_BW_W 0x08 /* 00001000   3 */
  89. #define WS_ASM_CALL_S 0x60 /* 01100000   1 */
  90. #define WS_ASM_CALL 0x09 /* 00001001   2 */
  92. #define WS_ASM_CALL_LIB_S 0x68 /* 01101000   2 */
  93. #define WS_ASM_CALL_LIB 0x0a /* 00001010   3 */
  94. #define WS_ASM_CALL_LIB_W 0x0b /* 00001011   4 */
  96. #define WS_ASM_CALL_URL 0x0c /* 00001100   4 */
  97. #define WS_ASM_CALL_URL_W 0x0d /* 00001101   6 */
  99. #define WS_ASM_LOAD_VAR_S 0xe0 /* 11100000   1 */
  100. #define WS_ASM_LOAD_VAR 0x0e /* 00001110   2 */
  102. #define WS_ASM_STORE_VAR_S 0x40 /* 01000000   1 */
  103. #define WS_ASM_STORE_VAR 0x0f /* 00001111   2 */
  105. #define WS_ASM_INCR_VAR_S 0x70 /* 01110000   1 */
  106. #define WS_ASM_INCR_VAR 0x10 /* 00010000   2 */
  108. #define WS_ASM_DECR_VAR 0x11 /* 00010001   2 */
  110. #define WS_ASM_LOAD_CONST_S 0x50 /* 01010000   1 */
  111. #define WS_ASM_LOAD_CONST 0x12 /* 00010010   2 */
  112. #define WS_ASM_LOAD_CONST_W 0x13 /* 00010011   3 */
  114. #define WS_ASM_CONST_0 0x14 /* 00010100   1 */
  115. #define WS_ASM_CONST_1 0x15 /* 00010101   1 */
  116. #define WS_ASM_CONST_M1 0x16 /* 00010110   1 */
  117. #define WS_ASM_CONST_ES 0x17 /* 00010111   1 */
  118. #define WS_ASM_CONST_INVALID 0x18 /* 00011000   1 */
  119. #define WS_ASM_CONST_TRUE 0x19 /* 00011001   1 */
  120. #define WS_ASM_CONST_FALSE 0x1a /* 00011010   1 */
  122. #define WS_ASM_INCR 0x1b /* 00011011   1 */
  123. #define WS_ASM_DECR 0x1c /* 00011100   1 */
  124. #define WS_ASM_ADD_ASG 0x1d /* 00011101   2 */
  125. #define WS_ASM_SUB_ASG 0x1e /* 00011110   2 */
  126. #define WS_ASM_UMINUS  0x1f /* 00011111   1 */
  127. #define WS_ASM_ADD 0x20 /* 00100000   1 */
  128. #define WS_ASM_SUB 0x21 /* 00100001   1 */
  129. #define WS_ASM_MUL 0x22 /* 00100010   1 */
  130. #define WS_ASM_DIV 0x23 /* 00100011   1 */
  131. #define WS_ASM_IDIV 0x24 /* 00100100   1 */
  132. #define WS_ASM_REM  0x25 /* 00100101   1 */
  134. #define WS_ASM_B_AND 0x26 /* 00100110   1 */
  135. #define WS_ASM_B_OR  0x27 /* 00100111   1 */
  136. #define WS_ASM_B_XOR  0x28 /* 00101000   1 */
  137. #define WS_ASM_B_NOT  0x29 /* 00101001   1 */
  138. #define WS_ASM_B_LSHIFT 0x2a /* 00101010   1 */
  139. #define WS_ASM_B_RSSHIFT 0x2b /* 00101011   1 */
  140. #define WS_ASM_B_RSZSHIFT 0x2c /* 00101100   1 */
  142. #define WS_ASM_EQ 0x2d /* 00101101   1 */
  143. #define WS_ASM_LE 0x2e /* 00101110   1 */
  144. #define WS_ASM_LT 0x2f /* 00101111   1 */
  145. #define WS_ASM_GE 0x30 /* 00110000   1 */
  146. #define WS_ASM_GT 0x31 /* 00110001   1 */
  147. #define WS_ASM_NE 0x32 /* 00110010   1 */
  149. #define WS_ASM_NOT 0x33 /* 00110011   1 */
  150. #define WS_ASM_SCAND 0x34 /* 00110100   1 */
  151. #define WS_ASM_SCOR  0x35 /* 00110101   1 */
  152. #define WS_ASM_TOBOOL 0x36 /* 00110110   1 */
  154. #define WS_ASM_POP 0x37 /* 00110111   1 */
  156. #define WS_ASM_TYPEOF 0x38 /* 00111000   1 */
  157. #define WS_ASM_ISVALID 0x39 /* 00111001   1 */
  159. #define WS_ASM_RETURN  0x3a /* 00111010   1 */
  160. #define WS_ASM_RETURN_ES 0x3b /* 00111011   1 */
  162. #define WS_ASM_DEBUG 0x3c /* 00111100   1 */
  164. /********************* Pseudo opcodes for assembler *********************/
  166. /* These are pseudo opcodes grouping together several real byte-code
  167.    opcodes.  These are used in the symbolic assembler. */
  169. #define WS_ASM_P_LABEL 0x0100
  170. #define WS_ASM_P_JUMP 0x0200
  171. #define WS_ASM_P_TJUMP 0x0300
  172. #define WS_ASM_P_CALL 0x0400
  173. #define WS_ASM_P_CALL_LIB 0x0500
  174. #define WS_ASM_P_CALL_URL 0x0600
  175. #define WS_ASM_P_LOAD_VAR 0x0700
  176. #define WS_ASM_P_STORE_VAR 0x0800
  177. #define WS_ASM_P_INCR_VAR 0x0900
  178. #define WS_ASM_P_LOAD_CONST 0x0a00
  180. /* Check whether the instruction `ins' is a pseudo-branch
  181.    instruction. */
  182. #define WS_ASM_P_BRANCH(ins) 
  183.     ((ins)->type == WS_ASM_P_JUMP || (ins)->type == WS_ASM_P_TJUMP)
  185. /********************* Symbolic assembler instructions ******************/
  187. #define ws_label_idx u.ivalues.i1
  188. #define ws_label_refcount u.ivalues.i2
  189. #define ws_findex u.ivalues.i1
  190. #define ws_lindex u.ivalues.i2
  191. #define ws_args u.ivalues.i3
  192. #define ws_vindex u.ivalues.i1
  193. #define ws_cindex u.ivalues.i1
  194. #define ws_label u.branch.label
  195. #define ws_offset u.branch.offset
  197. struct WsAsmInsRec
  198. {
  199.     struct WsAsmInsRec *next;
  200.     struct WsAsmInsRec *prev;
  201.     WsUInt16 type;
  203.     /* The source stream line number. */
  204.     WsUInt32 line;
  206.     /* The operands offset in the linearized byte-code stream. */
  207.     WsUInt32 offset;
  209.     union
  210.     {
  211.         /* The target label for branch instructions. */
  212.         struct
  213.         {
  214.             struct WsAsmInsRec *label;
  216.             /* The offset argument of the branch operand.  This is the
  217.                adjustment that must be performed for the pc after this
  218.                instruction. */
  219.             WsUInt32 offset;
  220.         }
  221.         branch;
  223.         struct
  224.         {
  225.             WsUInt32 i1;
  226.             WsUInt16 i2;
  227.             WsUInt16 i3;
  228.         }
  229.         ivalues;
  230.     } u;
  231. };
  233. typedef struct WsAsmInsRec WsAsmIns;
  236. /* Link the instruction `ins' to the end of the symbolic assembler
  237.    chain, currently being constructed in `compiler'. */
  238. void ws_asm_link(WsCompilerPtr compiler, WsAsmIns *ins);
  240. /* Print the current assembler instructions of the compiler
  241.    `compiler'. */
  242. void ws_asm_print(WsCompilerPtr compiler);
  244. /* Disassemble the byte-code `code', `len' to the standard output. */
  245. void ws_asm_dasm(WsCompilerPtr compiler, const unsigned char *code,
  246.                  size_t len);
  248. /* Linearize the assembler, currently being constructed in `compiler',
  249.    into `compiler->byte_code'. */
  250. void ws_asm_linearize(WsCompilerPtr compiler);
  252. /* Constructors for assembler instructions. */
  254. /* Create a label instruction. */
  255. WsAsmIns *ws_asm_label(WsCompilerPtr compiler, WsUInt32 line);
  257. /* Create a branch instruction `ins' to label `label'. */
  258. WsAsmIns *ws_asm_branch(WsCompilerPtr compiler, WsUInt32 line, WsUInt16 ins,
  259.                         WsAsmIns *label);
  261. /* Create a local call instruction to function `findex'. */
  262. WsAsmIns *ws_asm_call(WsCompilerPtr compiler, WsUInt32 line, WsUInt8 findex);
  264. /* Create a library call instruction to function `findex' from the
  265.    libary `lindex'. */
  266. WsAsmIns *ws_asm_call_lib(WsCompilerPtr compiler, WsUInt32 line,
  267.                           WsUInt8 findex, WsUInt16 lindex);
  269. /* Create an URL call instruction for function `findex' from the URL
  270.    `urlindex' with `args' arguments.  The arguments `urlindex' and
  271.    `findex' pont to the constant pool. */
  272. WsAsmIns *ws_asm_call_url(WsCompilerPtr compiler, WsUInt32 line,
  273.                           WsUInt16 findex, WsUInt16 urlindex, WsUInt8 args);
  275. /* Create a variable modification instruction `ins' for the variable
  276.    `vindex'. */
  277. WsAsmIns *ws_asm_variable(WsCompilerPtr compiler, WsUInt32 line, WsUInt16 ins,
  278.                           WsUInt8 vindex);
  280. /* Create a constant loading instruction for the constant `cindex'. */
  281. WsAsmIns *ws_asm_load_const(WsCompilerPtr compiler, WsUInt32 line,
  282.                             WsUInt16 cindex);
  284. /* Create an instruction `ins'. */
  285. WsAsmIns *ws_asm_ins(WsCompilerPtr compiler, WsUInt32 line, WsUInt8 opcode);
  287. #endif /* not WSASM_H */