Subversion Repositories Kolibri OS

Rev

Rev 340 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.  
  2. ; flat assembler core
  3. ; Copyright (c) 1999-2007, Tomasz Grysztar.
  4. ; All rights reserved.
  5.  
  6. simple_instruction_except64:
  7.         cmp     [code_type],64
  8.         je      illegal_instruction
  9. simple_instruction:
  10.         stos    byte [edi]
  11.         jmp     instruction_assembled
  12. simple_instruction_only64:
  13.         cmp     [code_type],64
  14.         jne     illegal_instruction
  15.         jmp     simple_instruction
  16. simple_instruction_16bit_except64:
  17.         cmp     [code_type],64
  18.         je      illegal_instruction
  19. simple_instruction_16bit:
  20.         cmp     [code_type],16
  21.         jne     size_prefix
  22.         stos    byte [edi]
  23.         jmp     instruction_assembled
  24.       size_prefix:
  25.         mov     ah,al
  26.         mov     al,66h
  27.         stos    word [edi]
  28.         jmp     instruction_assembled
  29. simple_instruction_32bit_except64:
  30.         cmp     [code_type],64
  31.         je      illegal_instruction
  32. simple_instruction_32bit:
  33.         cmp     [code_type],16
  34.         je      size_prefix
  35.         stos    byte [edi]
  36.         jmp     instruction_assembled
  37. simple_instruction_64bit:
  38.         cmp     [code_type],64
  39.         jne     illegal_instruction
  40.         mov     ah,al
  41.         mov     al,48h
  42.         stos    word [edi]
  43.         jmp     instruction_assembled
  44. simple_extended_instruction_64bit:
  45.         cmp     [code_type],64
  46.         jne     illegal_instruction
  47.         mov     al,48h
  48.         stos    byte [edi]
  49. simple_extended_instruction:
  50.         mov     ah,al
  51.         mov     al,0Fh
  52.         stos    word [edi]
  53.         jmp     instruction_assembled
  54. prefix_instruction:
  55.         stos    byte [edi]
  56.         or      [prefixed_instruction],-1
  57.         jmp     continue_line
  58. segment_prefix:
  59.         mov     ah,al
  60.         shr     ah,4
  61.         cmp     ah,6
  62.         jne     illegal_instruction
  63.         and     al,1111b
  64.         mov     [segment_register],al
  65.         call    store_segment_prefix
  66.         or      [prefixed_instruction],-1
  67.         jmp     continue_line
  68. int_instruction:
  69.         lods    byte [esi]
  70.         call    get_size_operator
  71.         cmp     ah,1
  72.         ja      invalid_operand_size
  73.         cmp     al,'('
  74.         jne     invalid_operand
  75.         call    get_byte_value
  76.         mov     ah,al
  77.         mov     al,0CDh
  78.         stos    word [edi]
  79.         jmp     instruction_assembled
  80. iret_instruction:
  81.         cmp     [code_type],64
  82.         jne     simple_instruction
  83.         call    operand_64bit
  84.         jmp     simple_instruction
  85. aa_instruction:
  86.         cmp     [code_type],64
  87.         je      illegal_instruction
  88.         push    eax
  89.         mov     bl,10
  90.         cmp     byte [esi],'('
  91.         jne     aa_store
  92.         inc     esi
  93.         xor     al,al
  94.         xchg    al,[operand_size]
  95.         cmp     al,1
  96.         ja      invalid_operand_size
  97.         call    get_byte_value
  98.         mov     bl,al
  99.       aa_store:
  100.         cmp     [operand_size],0
  101.         jne     invalid_operand
  102.         pop     eax
  103.         mov     ah,bl
  104.         stos    word [edi]
  105.         jmp     instruction_assembled
  106.  
  107. basic_instruction:
  108.         mov     [base_code],al
  109.         lods    byte [esi]
  110.         call    get_size_operator
  111.         cmp     al,10h
  112.         je      basic_reg
  113.         cmp     al,'['
  114.         jne     invalid_operand
  115.       basic_mem:
  116.         call    get_address
  117.         push    edx ebx ecx
  118.         lods    byte [esi]
  119.         cmp     al,','
  120.         jne     invalid_operand
  121.         lods    byte [esi]
  122.         call    get_size_operator
  123.         cmp     al,'('
  124.         je      basic_mem_imm
  125.         cmp     al,10h
  126.         jne     invalid_operand
  127.       basic_mem_reg:
  128.         lods    byte [esi]
  129.         call    convert_register
  130.         mov     [postbyte_register],al
  131.         pop     ecx ebx edx
  132.         mov     al,ah
  133.         cmp     al,1
  134.         je      basic_mem_reg_8bit
  135.         call    operand_autodetect
  136.         inc     [base_code]
  137.       basic_mem_reg_8bit:
  138.         call    store_instruction
  139.         jmp     instruction_assembled
  140.       basic_mem_imm:
  141.         mov     al,[operand_size]
  142.         cmp     al,1
  143.         je      basic_mem_imm_8bit
  144.         cmp     al,2
  145.         je      basic_mem_imm_16bit
  146.         cmp     al,4
  147.         je      basic_mem_imm_32bit
  148.         cmp     al,8
  149.         je      basic_mem_imm_64bit
  150.         or      al,al
  151.         jnz     invalid_operand_size
  152.         cmp     [error_line],0
  153.         jne     basic_mem_imm_8bit
  154.         mov     eax,[current_line]
  155.         mov     [error_line],eax
  156.         mov     [error],operand_size_not_specified
  157.       basic_mem_imm_8bit:
  158.         call    get_byte_value
  159.         mov     byte [value],al
  160.         mov     al,[base_code]
  161.         shr     al,3
  162.         mov     [postbyte_register],al
  163.         pop     ecx ebx edx
  164.         mov     [base_code],80h
  165.         call    store_instruction_with_imm8
  166.         jmp     instruction_assembled
  167.       basic_mem_imm_16bit:
  168.         call    operand_16bit
  169.         call    get_word_value
  170.         mov     word [value],ax
  171.         mov     al,[base_code]
  172.         shr     al,3
  173.         mov     [postbyte_register],al
  174.         pop     ecx ebx edx
  175.         cmp     [value_type],0
  176.         jne     basic_mem_imm_16bit_store
  177.         cmp     [size_declared],0
  178.         jne     basic_mem_imm_16bit_store
  179.         cmp     word [value],80h
  180.         jb      basic_mem_simm_8bit
  181.         cmp     word [value],-80h
  182.         jae     basic_mem_simm_8bit
  183.       basic_mem_imm_16bit_store:
  184.         mov     [base_code],81h
  185.         call    store_instruction_with_imm16
  186.         jmp     instruction_assembled
  187.       basic_mem_simm_8bit:
  188.         mov     [base_code],83h
  189.         call    store_instruction_with_imm8
  190.         jmp     instruction_assembled
  191.       basic_mem_imm_32bit:
  192.         call    operand_32bit
  193.         call    get_dword_value
  194.       basic_mem_imm_32bit_ok:
  195.         mov     dword [value],eax
  196.         mov     al,[base_code]
  197.         shr     al,3
  198.         mov     [postbyte_register],al
  199.         pop     ecx ebx edx
  200.         cmp     [value_type],0
  201.         jne     basic_mem_imm_32bit_store
  202.         cmp     [size_declared],0
  203.         jne     basic_mem_imm_32bit_store
  204.         cmp     dword [value],80h
  205.         jb      basic_mem_simm_8bit
  206.         cmp     dword [value],-80h
  207.         jae     basic_mem_simm_8bit
  208.       basic_mem_imm_32bit_store:
  209.         mov     [base_code],81h
  210.         call    store_instruction_with_imm32
  211.         jmp     instruction_assembled
  212.       basic_mem_imm_64bit:
  213.         cmp     [size_declared],0
  214.         jne     long_immediate_not_encodable
  215.         call    operand_64bit
  216.         call    get_simm32
  217.         cmp     [value_type],4
  218.         jae     long_immediate_not_encodable
  219.         jmp     basic_mem_imm_32bit_ok
  220.       get_simm32:
  221.         call    get_qword_value
  222.         mov     ecx,edx
  223.         cdq
  224.         cmp     ecx,edx
  225.         jne     value_out_of_range
  226.         cmp     [value_type],4
  227.         jne     get_simm32_ok
  228.         mov     [value_type],2
  229.       get_simm32_ok:
  230.         ret
  231.       basic_reg:
  232.         lods    byte [esi]
  233.         call    convert_register
  234.         mov     [postbyte_register],al
  235.         lods    byte [esi]
  236.         cmp     al,','
  237.         jne     invalid_operand
  238.         lods    byte [esi]
  239.         call    get_size_operator
  240.         cmp     al,10h
  241.         je      basic_reg_reg
  242.         cmp     al,'('
  243.         je      basic_reg_imm
  244.         cmp     al,'['
  245.         jne     invalid_operand
  246.       basic_reg_mem:
  247.         call    get_address
  248.         mov     al,[operand_size]
  249.         cmp     al,1
  250.         je      basic_reg_mem_8bit
  251.         call    operand_autodetect
  252.         add     [base_code],3
  253.         call    store_instruction
  254.         jmp     instruction_assembled
  255.       basic_reg_mem_8bit:
  256.         add     [base_code],2
  257.         call    store_instruction
  258.         jmp     instruction_assembled
  259.       basic_reg_reg:
  260.         lods    byte [esi]
  261.         call    convert_register
  262.         mov     bl,[postbyte_register]
  263.         mov     [postbyte_register],al
  264.         mov     al,ah
  265.         cmp     al,1
  266.         je      basic_reg_reg_8bit
  267.         call    operand_autodetect
  268.         inc     [base_code]
  269.       basic_reg_reg_8bit:
  270.         call    store_nomem_instruction
  271.         jmp     instruction_assembled
  272.       basic_reg_imm:
  273.         mov     al,[operand_size]
  274.         cmp     al,1
  275.         je      basic_reg_imm_8bit
  276.         cmp     al,2
  277.         je      basic_reg_imm_16bit
  278.         cmp     al,4
  279.         je      basic_reg_imm_32bit
  280.         cmp     al,8
  281.         je      basic_reg_imm_64bit
  282.         or      al,al
  283.         jnz     invalid_operand_size
  284.         cmp     [error_line],0
  285.         jne     basic_reg_imm_32bit
  286.         mov     eax,[current_line]
  287.         mov     [error_line],eax
  288.         mov     [error],operand_size_not_specified
  289.         jmp     basic_reg_imm_32bit
  290.       basic_reg_imm_8bit:
  291.         call    get_byte_value
  292.         mov     dl,al
  293.         mov     bl,[base_code]
  294.         shr     bl,3
  295.         xchg    bl,[postbyte_register]
  296.         or      bl,bl
  297.         jz      basic_al_imm
  298.         mov     [base_code],80h
  299.         call    store_nomem_instruction
  300.         mov     al,dl
  301.         stos    byte [edi]
  302.         jmp     instruction_assembled
  303.       basic_al_imm:
  304.         mov     al,[base_code]
  305.         add     al,4
  306.         stos    byte [edi]
  307.         mov     al,dl
  308.         stos    byte [edi]
  309.         jmp     instruction_assembled
  310.       basic_reg_imm_16bit:
  311.         call    operand_16bit
  312.         call    get_word_value
  313.         mov     dx,ax
  314.         mov     bl,[base_code]
  315.         shr     bl,3
  316.         xchg    bl,[postbyte_register]
  317.         cmp     [value_type],0
  318.         jne     basic_reg_imm_16bit_store
  319.         cmp     [size_declared],0
  320.         jne     basic_reg_imm_16bit_store
  321.         cmp     dx,80h
  322.         jb      basic_reg_simm_8bit
  323.         cmp     dx,-80h
  324.         jae     basic_reg_simm_8bit
  325.       basic_reg_imm_16bit_store:
  326.         or      bl,bl
  327.         jz      basic_ax_imm
  328.         mov     [base_code],81h
  329.         call    store_nomem_instruction
  330.         mov     ax,dx
  331.         call    mark_relocation
  332.         stos    word [edi]
  333.         jmp     instruction_assembled
  334.       basic_reg_simm_8bit:
  335.         mov     [base_code],83h
  336.         call    store_nomem_instruction
  337.         mov     al,dl
  338.         stos    byte [edi]
  339.         jmp     instruction_assembled
  340.       basic_ax_imm:
  341.         add     [base_code],5
  342.         call    store_instruction_code
  343.         mov     ax,dx
  344.         call    mark_relocation
  345.         stos    word [edi]
  346.         jmp     instruction_assembled
  347.       basic_reg_imm_32bit:
  348.         call    operand_32bit
  349.         call    get_dword_value
  350.       basic_reg_imm_32bit_ok:
  351.         mov     edx,eax
  352.         mov     bl,[base_code]
  353.         shr     bl,3
  354.         xchg    bl,[postbyte_register]
  355.         cmp     [value_type],0
  356.         jne     basic_reg_imm_32bit_store
  357.         cmp     [size_declared],0
  358.         jne     basic_reg_imm_32bit_store
  359.         cmp     edx,80h
  360.         jb      basic_reg_simm_8bit
  361.         cmp     edx,-80h
  362.         jae     basic_reg_simm_8bit
  363.       basic_reg_imm_32bit_store:
  364.         or      bl,bl
  365.         jz      basic_eax_imm
  366.         mov     [base_code],81h
  367.         call    store_nomem_instruction
  368.         mov     eax,edx
  369.         call    mark_relocation
  370.         stos    dword [edi]
  371.         jmp     instruction_assembled
  372.       basic_eax_imm:
  373.         add     [base_code],5
  374.         call    store_instruction_code
  375.         mov     eax,edx
  376.         call    mark_relocation
  377.         stos    dword [edi]
  378.         jmp     instruction_assembled
  379.       basic_reg_imm_64bit:
  380.         cmp     [size_declared],0
  381.         jne     long_immediate_not_encodable
  382.         call    operand_64bit
  383.         call    get_simm32
  384.         cmp     [value_type],4
  385.         jae     long_immediate_not_encodable
  386.         jmp     basic_reg_imm_32bit_ok
  387. single_operand_instruction:
  388.         mov     [base_code],0F6h
  389.         mov     [postbyte_register],al
  390.         lods    byte [esi]
  391.         call    get_size_operator
  392.         cmp     al,10h
  393.         je      single_reg
  394.         cmp     al,'['
  395.         jne     invalid_operand
  396.       single_mem:
  397.         call    get_address
  398.         mov     al,[operand_size]
  399.         cmp     al,1
  400.         je      single_mem_8bit
  401.         jb      single_mem_nosize
  402.         call    operand_autodetect
  403.         inc     [base_code]
  404.         call    store_instruction
  405.         jmp     instruction_assembled
  406.       single_mem_nosize:
  407.         cmp     [error_line],0
  408.         jne     single_mem_8bit
  409.         mov     eax,[current_line]
  410.         mov     [error_line],eax
  411.         mov     [error],operand_size_not_specified
  412.       single_mem_8bit:
  413.         call    store_instruction
  414.         jmp     instruction_assembled
  415.       single_reg:
  416.         lods    byte [esi]
  417.         call    convert_register
  418.         mov     bl,al
  419.         mov     al,ah
  420.         cmp     al,1
  421.         je      single_reg_8bit
  422.         call    operand_autodetect
  423.         inc     [base_code]
  424.       single_reg_8bit:
  425.         call    store_nomem_instruction
  426.         jmp     instruction_assembled
  427. mov_instruction:
  428.         mov     [base_code],88h
  429.         lods    byte [esi]
  430.         call    get_size_operator
  431.         cmp     al,10h
  432.         je      mov_reg
  433.         cmp     al,'['
  434.         jne     invalid_operand
  435.       mov_mem:
  436.         call    get_address
  437.         push    edx ebx ecx
  438.         lods    byte [esi]
  439.         cmp     al,','
  440.         jne     invalid_operand
  441.         lods    byte [esi]
  442.         call    get_size_operator
  443.         cmp     al,'('
  444.         je      mov_mem_imm
  445.         cmp     al,10h
  446.         jne     invalid_operand
  447.       mov_mem_reg:
  448.         lods    byte [esi]
  449.         cmp     al,60h
  450.         jb      mov_mem_general_reg
  451.         cmp     al,70h
  452.         jb      mov_mem_sreg
  453.       mov_mem_general_reg:
  454.         call    convert_register
  455.         mov     [postbyte_register],al
  456.         pop     ecx ebx edx
  457.         cmp     ah,1
  458.         je      mov_mem_reg_8bit
  459.         mov     al,ah
  460.         call    operand_autodetect
  461.         mov     al,[postbyte_register]
  462.         or      al,bl
  463.         or      al,bh
  464.         jz      mov_mem_ax
  465.         inc     [base_code]
  466.         call    store_instruction
  467.         jmp     instruction_assembled
  468.       mov_mem_reg_8bit:
  469.         or      al,bl
  470.         or      al,bh
  471.         jz      mov_mem_al
  472.         call    store_instruction
  473.         jmp     instruction_assembled
  474.       mov_mem_al:
  475.         test    ch,22h
  476.         jnz     mov_mem_address16_al
  477.         test    ch,44h
  478.         jnz     mov_mem_address32_al
  479.         test    ch,88h
  480.         jnz     mov_mem_address64_al
  481.         or      ch,ch
  482.         jnz     invalid_address_size
  483.         cmp     [code_type],64
  484.         je      mov_mem_address64_al
  485.         cmp     [code_type],32
  486.         je      mov_mem_address32_al
  487.         cmp     edx,10000h
  488.         jb      mov_mem_address16_al
  489.       mov_mem_address32_al:
  490.         call    store_segment_prefix_if_necessary
  491.         call    address_32bit_prefix
  492.         mov     [base_code],0A2h
  493.       store_mov_address32:
  494.         call    store_instruction_code
  495.         push    instruction_assembled
  496.         jmp     store_address_32bit_value
  497.       mov_mem_address16_al:
  498.         call    store_segment_prefix_if_necessary
  499.         call    address_16bit_prefix
  500.         mov     [base_code],0A2h
  501.       store_mov_address16:
  502.         cmp     [code_type],64
  503.         je      invalid_address
  504.         call    store_instruction_code
  505.         mov     eax,edx
  506.         stos    word [edi]
  507.         cmp     edx,10000h
  508.         jge     value_out_of_range
  509.         jmp     instruction_assembled
  510.       mov_mem_address64_al:
  511.         call    store_segment_prefix_if_necessary
  512.         mov     [base_code],0A2h
  513.       store_mov_address64:
  514.         call    store_instruction_code
  515.         push    instruction_assembled
  516.         jmp     store_address_64bit_value
  517.       mov_mem_ax:
  518.         test    ch,22h
  519.         jnz     mov_mem_address16_ax
  520.         test    ch,44h
  521.         jnz     mov_mem_address32_ax
  522.         test    ch,88h
  523.         jnz     mov_mem_address64_ax
  524.         or      ch,ch
  525.         jnz     invalid_address_size
  526.         cmp     [code_type],64
  527.         je      mov_mem_address64_ax
  528.         cmp     [code_type],32
  529.         je      mov_mem_address32_ax
  530.         cmp     edx,10000h
  531.         jb      mov_mem_address16_ax
  532.       mov_mem_address32_ax:
  533.         call    store_segment_prefix_if_necessary
  534.         call    address_32bit_prefix
  535.         mov     [base_code],0A3h
  536.         jmp     store_mov_address32
  537.       mov_mem_address16_ax:
  538.         call    store_segment_prefix_if_necessary
  539.         call    address_16bit_prefix
  540.         mov     [base_code],0A3h
  541.         jmp     store_mov_address16
  542.       mov_mem_address64_ax:
  543.         call    store_segment_prefix_if_necessary
  544.         mov     [base_code],0A3h
  545.         jmp     store_mov_address64
  546.       mov_mem_sreg:
  547.         sub     al,61h
  548.         mov     [postbyte_register],al
  549.         pop     ecx ebx edx
  550.         mov     ah,[operand_size]
  551.         or      ah,ah
  552.         jz      mov_mem_sreg_store
  553.         cmp     ah,2
  554.         jne     invalid_operand_size
  555.       mov_mem_sreg_store:
  556.         mov     [base_code],8Ch
  557.         call    store_instruction
  558.         jmp     instruction_assembled
  559.       mov_mem_imm:
  560.         mov     al,[operand_size]
  561.         cmp     al,1
  562.         je      mov_mem_imm_8bit
  563.         cmp     al,2
  564.         je      mov_mem_imm_16bit
  565.         cmp     al,4
  566.         je      mov_mem_imm_32bit
  567.         cmp     al,8
  568.         je      mov_mem_imm_64bit
  569.         or      al,al
  570.         jnz     invalid_operand_size
  571.         cmp     [error_line],0
  572.         jne     mov_mem_imm_32bit
  573.         mov     eax,[current_line]
  574.         mov     [error_line],eax
  575.         mov     [error],operand_size_not_specified
  576.         jmp     mov_mem_imm_32bit
  577.       mov_mem_imm_8bit:
  578.         call    get_byte_value
  579.         mov     byte [value],al
  580.         mov     [postbyte_register],0
  581.         mov     [base_code],0C6h
  582.         pop     ecx ebx edx
  583.         call    store_instruction_with_imm8
  584.         jmp     instruction_assembled
  585.       mov_mem_imm_16bit:
  586.         call    operand_16bit
  587.         call    get_word_value
  588.         mov     word [value],ax
  589.         mov     [postbyte_register],0
  590.         mov     [base_code],0C7h
  591.         pop     ecx ebx edx
  592.         call    store_instruction_with_imm16
  593.         jmp     instruction_assembled
  594.       mov_mem_imm_32bit:
  595.         call    operand_32bit
  596.         call    get_dword_value
  597.       mov_mem_imm_32bit_store:
  598.         mov     dword [value],eax
  599.         mov     [postbyte_register],0
  600.         mov     [base_code],0C7h
  601.         pop     ecx ebx edx
  602.         call    store_instruction_with_imm32
  603.         jmp     instruction_assembled
  604.       mov_mem_imm_64bit:
  605.         cmp     [size_declared],0
  606.         jne     long_immediate_not_encodable
  607.         call    operand_64bit
  608.         call    get_simm32
  609.         cmp     [value_type],4
  610.         jae     long_immediate_not_encodable
  611.         jmp     mov_mem_imm_32bit_store
  612.       mov_reg:
  613.         lods    byte [esi]
  614.         mov     ah,al
  615.         sub     ah,10h
  616.         and     ah,al
  617.         test    ah,0F0h
  618.         jnz     mov_sreg
  619.         call    convert_register
  620.         mov     [postbyte_register],al
  621.         lods    byte [esi]
  622.         cmp     al,','
  623.         jne     invalid_operand
  624.         lods    byte [esi]
  625.         call    get_size_operator
  626.         cmp     al,'['
  627.         je      mov_reg_mem
  628.         cmp     al,'('
  629.         je      mov_reg_imm
  630.         cmp     al,10h
  631.         jne     invalid_operand
  632.       mov_reg_reg:
  633.         lods    byte [esi]
  634.         mov     ah,al
  635.         sub     ah,10h
  636.         and     ah,al
  637.         test    ah,0F0h
  638.         jnz     mov_reg_sreg
  639.         call    convert_register
  640.         mov     bl,[postbyte_register]
  641.         mov     [postbyte_register],al
  642.         mov     al,ah
  643.         cmp     al,1
  644.         je      mov_reg_reg_8bit
  645.         call    operand_autodetect
  646.         inc     [base_code]
  647.       mov_reg_reg_8bit:
  648.         call    store_nomem_instruction
  649.         jmp     instruction_assembled
  650.       mov_reg_sreg:
  651.         mov     bl,[postbyte_register]
  652.         mov     ah,al
  653.         and     al,1111b
  654.         mov     [postbyte_register],al
  655.         shr     ah,4
  656.         cmp     ah,5
  657.         je      mov_reg_creg
  658.         cmp     ah,7
  659.         je      mov_reg_dreg
  660.         ja      mov_reg_treg
  661.         dec     [postbyte_register]
  662.         cmp     [operand_size],8
  663.         je      mov_reg_sreg64
  664.         cmp     [operand_size],4
  665.         je      mov_reg_sreg32
  666.         cmp     [operand_size],2
  667.         jne     invalid_operand_size
  668.         call    operand_16bit
  669.         jmp     mov_reg_sreg_store
  670.       mov_reg_sreg64:
  671.         call    operand_64bit
  672.         jmp     mov_reg_sreg_store
  673.       mov_reg_sreg32:
  674.         call    operand_32bit
  675.       mov_reg_sreg_store:
  676.         mov     [base_code],8Ch
  677.         call    store_nomem_instruction
  678.         jmp     instruction_assembled
  679.       mov_reg_treg:
  680.         cmp     ah,9
  681.         jne     invalid_operand
  682.         mov     [extended_code],24h
  683.         jmp     mov_reg_xrx
  684.       mov_reg_dreg:
  685.         mov     [extended_code],21h
  686.         jmp     mov_reg_xrx
  687.       mov_reg_creg:
  688.         mov     [extended_code],20h
  689.       mov_reg_xrx:
  690.         mov     [base_code],0Fh
  691.         cmp     [code_type],64
  692.         je      mov_reg_xrx_64bit
  693.         cmp     [operand_size],4
  694.         jne     invalid_operand_size
  695.         cmp     [postbyte_register],8
  696.         jne     mov_reg_xrx_store
  697.         cmp     [extended_code],20h
  698.         jne     mov_reg_xrx_store
  699.         mov     al,0F0h
  700.         stos    byte [edi]
  701.         mov     [postbyte_register],0
  702.       mov_reg_xrx_store:
  703.         call    store_nomem_instruction
  704.         jmp     instruction_assembled
  705.       mov_reg_xrx_64bit:
  706.         cmp     [operand_size],8
  707.         jne     invalid_operand_size
  708.         call    store_nomem_instruction
  709.         jmp     instruction_assembled
  710.       mov_reg_mem:
  711.         call    get_address
  712.         mov     al,[operand_size]
  713.         cmp     al,1
  714.         je      mov_reg_mem_8bit
  715.         call    operand_autodetect
  716.         mov     al,[postbyte_register]
  717.         or      al,bl
  718.         or      al,bh
  719.         jz      mov_ax_mem
  720.         add     [base_code],3
  721.         call    store_instruction
  722.         jmp     instruction_assembled
  723.       mov_reg_mem_8bit:
  724.         mov     al,[postbyte_register]
  725.         or      al,bl
  726.         or      al,bh
  727.         jz      mov_al_mem
  728.         add     [base_code],2
  729.         call    store_instruction
  730.         jmp     instruction_assembled
  731.       mov_al_mem:
  732.         test    ch,22h
  733.         jnz     mov_al_mem_address16
  734.         test    ch,44h
  735.         jnz     mov_al_mem_address32
  736.         test    ch,88h
  737.         jnz     mov_al_mem_address64
  738.         or      ch,ch
  739.         jnz     invalid_address_size
  740.         cmp     [code_type],64
  741.         je      mov_al_mem_address64
  742.         cmp     [code_type],32
  743.         je      mov_al_mem_address32
  744.         cmp     edx,10000h
  745.         jb      mov_al_mem_address16
  746.       mov_al_mem_address32:
  747.         call    store_segment_prefix_if_necessary
  748.         call    address_32bit_prefix
  749.         mov     [base_code],0A0h
  750.         jmp     store_mov_address32
  751.       mov_al_mem_address16:
  752.         call    store_segment_prefix_if_necessary
  753.         call    address_16bit_prefix
  754.         mov     [base_code],0A0h
  755.         jmp     store_mov_address16
  756.       mov_al_mem_address64:
  757.         call    store_segment_prefix_if_necessary
  758.         mov     [base_code],0A0h
  759.         jmp     store_mov_address64
  760.       mov_ax_mem:
  761.         test    ch,22h
  762.         jnz     mov_ax_mem_address16
  763.         test    ch,44h
  764.         jnz     mov_ax_mem_address32
  765.         test    ch,88h
  766.         jnz     mov_ax_mem_address64
  767.         or      ch,ch
  768.         jnz     invalid_address_size
  769.         cmp     [code_type],64
  770.         je      mov_ax_mem_address64
  771.         cmp     [code_type],32
  772.         je      mov_ax_mem_address32
  773.         cmp     edx,10000h
  774.         jb      mov_ax_mem_address16
  775.       mov_ax_mem_address32:
  776.         call    store_segment_prefix_if_necessary
  777.         call    address_32bit_prefix
  778.         mov     [base_code],0A1h
  779.         jmp     store_mov_address32
  780.       mov_ax_mem_address16:
  781.         call    store_segment_prefix_if_necessary
  782.         call    address_16bit_prefix
  783.         mov     [base_code],0A1h
  784.         jmp     store_mov_address16
  785.       mov_ax_mem_address64:
  786.         call    store_segment_prefix_if_necessary
  787.         mov     [base_code],0A1h
  788.         jmp     store_mov_address64
  789.       mov_reg_imm:
  790.         mov     al,[operand_size]
  791.         cmp     al,1
  792.         je      mov_reg_imm_8bit
  793.         cmp     al,2
  794.         je      mov_reg_imm_16bit
  795.         cmp     al,4
  796.         je      mov_reg_imm_32bit
  797.         cmp     al,8
  798.         je      mov_reg_imm_64bit
  799.         or      al,al
  800.         jnz     invalid_operand_size
  801.         cmp     [error_line],0
  802.         jne     mov_reg_imm_32bit
  803.         mov     eax,[current_line]
  804.         mov     [error_line],eax
  805.         mov     [error],operand_size_not_specified
  806.         jmp     mov_reg_imm_32bit
  807.       mov_reg_imm_8bit:
  808.         call    get_byte_value
  809.         mov     dl,al
  810.         mov     al,0B0h
  811.         call    store_mov_reg_imm_code
  812.         mov     al,dl
  813.         stos    byte [edi]
  814.         jmp     instruction_assembled
  815.       mov_reg_imm_16bit:
  816.         call    get_word_value
  817.         mov     dx,ax
  818.         call    operand_16bit
  819.         mov     al,0B8h
  820.         call    store_mov_reg_imm_code
  821.         mov     ax,dx
  822.         call    mark_relocation
  823.         stos    word [edi]
  824.         jmp     instruction_assembled
  825.       mov_reg_imm_32bit:
  826.         call    operand_32bit
  827.         call    get_dword_value
  828.         mov     edx,eax
  829.         mov     al,0B8h
  830.         call    store_mov_reg_imm_code
  831.         mov     eax,edx
  832.         call    mark_relocation
  833.         stos    dword [edi]
  834.         jmp     instruction_assembled
  835.       mov_reg_imm_64bit:
  836.         call    operand_64bit
  837.         call    get_qword_value
  838.         mov     ecx,edx
  839.         cmp     [size_declared],0
  840.         jne     mov_reg_imm_64bit_store
  841.         cmp     [value_type],4
  842.         jae     mov_reg_imm_64bit_store
  843.         cdq
  844.         cmp     ecx,edx
  845.         je      mov_reg_64bit_imm_32bit
  846.       mov_reg_imm_64bit_store:
  847.         push    eax ecx
  848.         mov     al,0B8h
  849.         call    store_mov_reg_imm_code
  850.         pop     edx eax
  851.         call    mark_relocation
  852.         stos    dword [edi]
  853.         mov     eax,edx
  854.         stos    dword [edi]
  855.         jmp     instruction_assembled
  856.       store_mov_reg_imm_code:
  857.         mov     ah,[postbyte_register]
  858.         test    ah,1000b
  859.         jz      mov_reg_imm_prefix_ok
  860.         or      [rex_prefix],41h
  861.       mov_reg_imm_prefix_ok:
  862.         and     ah,111b
  863.         add     al,ah
  864.         mov     [base_code],al
  865.         call    store_instruction_code
  866.         ret
  867.       mov_reg_64bit_imm_32bit:
  868.         mov     edx,eax
  869.         mov     bl,[postbyte_register]
  870.         mov     [postbyte_register],0
  871.         mov     [base_code],0C7h
  872.         call    store_nomem_instruction
  873.         mov     eax,edx
  874.         call    mark_relocation
  875.         stos    dword [edi]
  876.         jmp     instruction_assembled
  877.       mov_sreg:
  878.         mov     ah,al
  879.         and     al,1111b
  880.         mov     [postbyte_register],al
  881.         shr     ah,4
  882.         cmp     ah,5
  883.         je      mov_creg
  884.         cmp     ah,7
  885.         je      mov_dreg
  886.         ja      mov_treg
  887.         cmp     al,2
  888.         je      illegal_instruction
  889.         dec     [postbyte_register]
  890.         lods    byte [esi]
  891.         cmp     al,','
  892.         jne     invalid_operand
  893.         lods    byte [esi]
  894.         call    get_size_operator
  895.         cmp     al,'['
  896.         je      mov_sreg_mem
  897.         cmp     al,10h
  898.         jne     invalid_operand
  899.       mov_sreg_reg:
  900.         lods    byte [esi]
  901.         call    convert_register
  902.         or      ah,ah
  903.         jz      mov_sreg_reg_size_ok
  904.         cmp     ah,2
  905.         jne     invalid_operand_size
  906.         mov     bl,al
  907.       mov_sreg_reg_size_ok:
  908.         mov     [base_code],8Eh
  909.         call    store_nomem_instruction
  910.         jmp     instruction_assembled
  911.       mov_sreg_mem:
  912.         call    get_address
  913.         mov     al,[operand_size]
  914.         or      al,al
  915.         jz      mov_sreg_mem_size_ok
  916.         cmp     al,2
  917.         jne     invalid_operand_size
  918.       mov_sreg_mem_size_ok:
  919.         mov     [base_code],8Eh
  920.         call    store_instruction
  921.         jmp     instruction_assembled
  922.       mov_treg:
  923.         cmp     ah,9
  924.         jne     invalid_operand
  925.         mov     [extended_code],26h
  926.         jmp     mov_xrx
  927.       mov_dreg:
  928.         mov     [extended_code],23h
  929.         jmp     mov_xrx
  930.       mov_creg:
  931.         mov     [extended_code],22h
  932.       mov_xrx:
  933.         mov     [base_code],0Fh
  934.         lods    byte [esi]
  935.         cmp     al,','
  936.         jne     invalid_operand
  937.         lods    byte [esi]
  938.         cmp     al,10h
  939.         jne     invalid_operand
  940.         lods    byte [esi]
  941.         call    convert_register
  942.         mov     bl,al
  943.         cmp     [code_type],64
  944.         je      mov_xrx_64bit
  945.         cmp     ah,4
  946.         jne     invalid_operand_size
  947.         cmp     [postbyte_register],8
  948.         jne     mov_xrx_store
  949.         cmp     [extended_code],22h
  950.         jne     mov_xrx_store
  951.         mov     al,0F0h
  952.         stos    byte [edi]
  953.         mov     [postbyte_register],0
  954.       mov_xrx_store:
  955.         call    store_nomem_instruction
  956.         jmp     instruction_assembled
  957.       mov_xrx_64bit:
  958.         cmp     ah,8
  959.         jne     invalid_operand_size
  960.         call    store_nomem_instruction
  961.         jmp     instruction_assembled
  962. cmov_instruction:
  963.         mov     [base_code],0Fh
  964.         mov     [extended_code],al
  965.         lods    byte [esi]
  966.         call    get_size_operator
  967.         cmp     al,10h
  968.         jne     invalid_operand
  969.         lods    byte [esi]
  970.         call    convert_register
  971.         mov     [postbyte_register],al
  972.         lods    byte [esi]
  973.         cmp     al,','
  974.         jne     invalid_operand
  975.         lods    byte [esi]
  976.         call    get_size_operator
  977.         cmp     al,'['
  978.         je      cmov_reg_mem
  979.         cmp     al,10h
  980.         jne     invalid_operand
  981.       cmov_reg_reg:
  982.         lods    byte [esi]
  983.         call    convert_register
  984.         mov     bl,al
  985.         mov     al,ah
  986.         call    operand_autodetect
  987.         call    store_nomem_instruction
  988.         jmp     instruction_assembled
  989.       cmov_reg_mem:
  990.         call    get_address
  991.         mov     al,[operand_size]
  992.         call    operand_autodetect
  993.         call    store_instruction
  994.         jmp     instruction_assembled
  995. test_instruction:
  996.         mov     [base_code],84h
  997.         lods    byte [esi]
  998.         call    get_size_operator
  999.         cmp     al,10h
  1000.         je      test_reg
  1001.         cmp     al,'['
  1002.         jne     invalid_operand
  1003.       test_mem:
  1004.         call    get_address
  1005.         push    edx ebx ecx
  1006.         lods    byte [esi]
  1007.         cmp     al,','
  1008.         jne     invalid_operand
  1009.         lods    byte [esi]
  1010.         call    get_size_operator
  1011.         cmp     al,'('
  1012.         je      test_mem_imm
  1013.         cmp     al,10h
  1014.         jne     invalid_operand
  1015.       test_mem_reg:
  1016.         lods    byte [esi]
  1017.         call    convert_register
  1018.         mov     [postbyte_register],al
  1019.         pop     ecx ebx edx
  1020.         mov     al,ah
  1021.         cmp     al,1
  1022.         je      test_mem_reg_8bit
  1023.         call    operand_autodetect
  1024.         inc     [base_code]
  1025.       test_mem_reg_8bit:
  1026.         call    store_instruction
  1027.         jmp     instruction_assembled
  1028.       test_mem_imm:
  1029.         mov     al,[operand_size]
  1030.         cmp     al,1
  1031.         je      test_mem_imm_8bit
  1032.         cmp     al,2
  1033.         je      test_mem_imm_16bit
  1034.         cmp     al,4
  1035.         je      test_mem_imm_32bit
  1036.         cmp     al,8
  1037.         je      test_mem_imm_64bit
  1038.         or      al,al
  1039.         jnz     invalid_operand_size
  1040.         cmp     [error_line],0
  1041.         jne     test_mem_imm_32bit
  1042.         mov     eax,[current_line]
  1043.         mov     [error_line],eax
  1044.         mov     [error],operand_size_not_specified
  1045.         jmp     test_mem_imm_32bit
  1046.       test_mem_imm_8bit:
  1047.         call    get_byte_value
  1048.         mov     byte [value],al
  1049.         mov     [postbyte_register],0
  1050.         mov     [base_code],0F6h
  1051.         pop     ecx ebx edx
  1052.         call    store_instruction_with_imm8
  1053.         jmp     instruction_assembled
  1054.       test_mem_imm_16bit:
  1055.         call    operand_16bit
  1056.         call    get_word_value
  1057.         mov     word [value],ax
  1058.         mov     [postbyte_register],0
  1059.         mov     [base_code],0F7h
  1060.         pop     ecx ebx edx
  1061.         call    store_instruction_with_imm16
  1062.         jmp     instruction_assembled
  1063.       test_mem_imm_32bit:
  1064.         call    operand_32bit
  1065.         call    get_dword_value
  1066.       test_mem_imm_32bit_store:
  1067.         mov     dword [value],eax
  1068.         mov     [postbyte_register],0
  1069.         mov     [base_code],0F7h
  1070.         pop     ecx ebx edx
  1071.         call    store_instruction_with_imm32
  1072.         jmp     instruction_assembled
  1073.       test_mem_imm_64bit:
  1074.         cmp     [size_declared],0
  1075.         jne     long_immediate_not_encodable
  1076.         call    operand_64bit
  1077.         call    get_simm32
  1078.         cmp     [value_type],4
  1079.         jae     long_immediate_not_encodable
  1080.         jmp     test_mem_imm_32bit_store
  1081.       test_reg:
  1082.         lods    byte [esi]
  1083.         call    convert_register
  1084.         mov     [postbyte_register],al
  1085.         lods    byte [esi]
  1086.         cmp     al,','
  1087.         jne     invalid_operand
  1088.         lods    byte [esi]
  1089.         call    get_size_operator
  1090.         cmp     al,'['
  1091.         je      test_reg_mem
  1092.         cmp     al,'('
  1093.         je      test_reg_imm
  1094.         cmp     al,10h
  1095.         jne     invalid_operand
  1096.       test_reg_reg:
  1097.         lods    byte [esi]
  1098.         call    convert_register
  1099.         mov     bl,[postbyte_register]
  1100.         mov     [postbyte_register],al
  1101.         mov     al,ah
  1102.         cmp     al,1
  1103.         je      test_reg_reg_8bit
  1104.         call    operand_autodetect
  1105.         inc     [base_code]
  1106.       test_reg_reg_8bit:
  1107.         call    store_nomem_instruction
  1108.         jmp     instruction_assembled
  1109.       test_reg_imm:
  1110.         mov     al,[operand_size]
  1111.         cmp     al,1
  1112.         je      test_reg_imm_8bit
  1113.         cmp     al,2
  1114.         je      test_reg_imm_16bit
  1115.         cmp     al,4
  1116.         je      test_reg_imm_32bit
  1117.         cmp     al,8
  1118.         je      test_reg_imm_64bit
  1119.         jmp     invalid_operand_size
  1120.       test_reg_imm_8bit:
  1121.         call    get_byte_value
  1122.         mov     dl,al
  1123.         mov     bl,[postbyte_register]
  1124.         mov     [postbyte_register],0
  1125.         mov     [base_code],0F6h
  1126.         or      bl,bl
  1127.         jz      test_al_imm
  1128.         call    store_nomem_instruction
  1129.         mov     al,dl
  1130.         stos    byte [edi]
  1131.         jmp     instruction_assembled
  1132.       test_al_imm:
  1133.         mov     [base_code],0A8h
  1134.         call    store_instruction_code
  1135.         mov     al,dl
  1136.         stos    byte [edi]
  1137.         jmp     instruction_assembled
  1138.       test_reg_imm_16bit:
  1139.         call    operand_16bit
  1140.         call    get_word_value
  1141.         mov     dx,ax
  1142.         mov     bl,[postbyte_register]
  1143.         mov     [postbyte_register],0
  1144.         mov     [base_code],0F7h
  1145.         or      bl,bl
  1146.         jz      test_ax_imm
  1147.         call    store_nomem_instruction
  1148.         mov     ax,dx
  1149.         call    mark_relocation
  1150.         stos    word [edi]
  1151.         jmp     instruction_assembled
  1152.       test_ax_imm:
  1153.         mov     [base_code],0A9h
  1154.         call    store_instruction_code
  1155.         mov     ax,dx
  1156.         stos    word [edi]
  1157.         jmp     instruction_assembled
  1158.       test_reg_imm_32bit:
  1159.         call    operand_32bit
  1160.         call    get_dword_value
  1161.       test_reg_imm_32bit_store:
  1162.         mov     edx,eax
  1163.         mov     bl,[postbyte_register]
  1164.         mov     [postbyte_register],0
  1165.         mov     [base_code],0F7h
  1166.         or      bl,bl
  1167.         jz      test_eax_imm
  1168.         call    store_nomem_instruction
  1169.         mov     eax,edx
  1170.         call    mark_relocation
  1171.         stos    dword [edi]
  1172.         jmp     instruction_assembled
  1173.       test_eax_imm:
  1174.         mov     [base_code],0A9h
  1175.         call    store_instruction_code
  1176.         mov     eax,edx
  1177.         stos    dword [edi]
  1178.         jmp     instruction_assembled
  1179.       test_reg_imm_64bit:
  1180.         cmp     [size_declared],0
  1181.         jne     long_immediate_not_encodable
  1182.         call    operand_64bit
  1183.         call    get_simm32
  1184.         cmp     [value_type],4
  1185.         jae     long_immediate_not_encodable
  1186.         jmp     test_reg_imm_32bit_store
  1187.       test_reg_mem:
  1188.         call    get_address
  1189.         mov     al,[operand_size]
  1190.         cmp     al,1
  1191.         je      test_reg_mem_8bit
  1192.         call    operand_autodetect
  1193.         inc     [base_code]
  1194.       test_reg_mem_8bit:
  1195.         call    store_instruction
  1196.         jmp     instruction_assembled
  1197. xchg_instruction:
  1198.         mov     [base_code],86h
  1199.         lods    byte [esi]
  1200.         call    get_size_operator
  1201.         cmp     al,10h
  1202.         je      xchg_reg
  1203.         cmp     al,'['
  1204.         jne     invalid_operand
  1205.       xchg_mem:
  1206.         call    get_address
  1207.         push    edx ebx ecx
  1208.         lods    byte [esi]
  1209.         cmp     al,','
  1210.         jne     invalid_operand
  1211.         lods    byte [esi]
  1212.         call    get_size_operator
  1213.         cmp     al,10h
  1214.         je      test_mem_reg
  1215.         jmp     invalid_operand
  1216.       xchg_reg:
  1217.         lods    byte [esi]
  1218.         call    convert_register
  1219.         mov     [postbyte_register],al
  1220.         lods    byte [esi]
  1221.         cmp     al,','
  1222.         jne     invalid_operand
  1223.         lods    byte [esi]
  1224.         call    get_size_operator
  1225.         cmp     al,'['
  1226.         je      test_reg_mem
  1227.         cmp     al,10h
  1228.         jne     invalid_operand
  1229.       xchg_reg_reg:
  1230.         lods    byte [esi]
  1231.         call    convert_register
  1232.         mov     bl,al
  1233.         mov     al,ah
  1234.         cmp     al,1
  1235.         je      xchg_reg_reg_8bit
  1236.         call    operand_autodetect
  1237.         cmp     [postbyte_register],0
  1238.         je      xchg_ax_reg
  1239.         or      bl,bl
  1240.         jnz     xchg_reg_reg_store
  1241.         mov     bl,[postbyte_register]
  1242.       xchg_ax_reg:
  1243.         cmp     [code_type],64
  1244.         jne     xchg_ax_reg_ok
  1245.         cmp     ah,4
  1246.         jne     xchg_ax_reg_ok
  1247.         or      bl,bl
  1248.         jz      xchg_reg_reg_store
  1249.       xchg_ax_reg_ok:
  1250.         test    bl,1000b
  1251.         jz      xchg_ax_reg_store
  1252.         or      [rex_prefix],41h
  1253.         and     bl,111b
  1254.       xchg_ax_reg_store:
  1255.         add     bl,90h
  1256.         mov     [base_code],bl
  1257.         call    store_instruction_code
  1258.         jmp     instruction_assembled
  1259.       xchg_reg_reg_store:
  1260.         inc     [base_code]
  1261.       xchg_reg_reg_8bit:
  1262.         call    store_nomem_instruction
  1263.         jmp     instruction_assembled
  1264. push_instruction:
  1265.         mov     [push_size],al
  1266.       push_next:
  1267.         lods    byte [esi]
  1268.         call    get_size_operator
  1269.         cmp     al,10h
  1270.         je      push_reg
  1271.         cmp     al,'('
  1272.         je      push_imm
  1273.         cmp     al,'['
  1274.         jne     invalid_operand
  1275.       push_mem:
  1276.         call    get_address
  1277.         mov     al,[operand_size]
  1278.         mov     ah,[push_size]
  1279.         cmp     al,2
  1280.         je      push_mem_16bit
  1281.         cmp     al,4
  1282.         je      push_mem_32bit
  1283.         cmp     al,8
  1284.         je      push_mem_64bit
  1285.         or      al,al
  1286.         jnz     invalid_operand_size
  1287.         cmp     ah,2
  1288.         je      push_mem_16bit
  1289.         cmp     ah,4
  1290.         je      push_mem_32bit
  1291.         cmp     ah,8
  1292.         je      push_mem_64bit
  1293.         cmp     [error_line],0
  1294.         jne     push_mem_store
  1295.         mov     eax,[current_line]
  1296.         mov     [error_line],eax
  1297.         mov     [error],operand_size_not_specified
  1298.         jmp     push_mem_store
  1299.       push_mem_16bit:
  1300.         test    ah,not 2
  1301.         jnz     invalid_operand_size
  1302.         call    operand_16bit
  1303.         jmp     push_mem_store
  1304.       push_mem_32bit:
  1305.         test    ah,not 4
  1306.         jnz     invalid_operand_size
  1307.         cmp     [code_type],64
  1308.         je      illegal_instruction
  1309.         call    operand_32bit
  1310.         jmp     push_mem_store
  1311.       push_mem_64bit:
  1312.         test    ah,not 8
  1313.         jnz     invalid_operand_size
  1314.         cmp     [code_type],64
  1315.         jne     illegal_instruction
  1316.       push_mem_store:
  1317.         mov     [base_code],0FFh
  1318.         mov     [postbyte_register],110b
  1319.         call    store_instruction
  1320.         jmp     push_done
  1321.       push_reg:
  1322.         lods    byte [esi]
  1323.         mov     ah,al
  1324.         sub     ah,10h
  1325.         and     ah,al
  1326.         test    ah,0F0h
  1327.         jnz     push_sreg
  1328.         call    convert_register
  1329.         test    al,1000b
  1330.         jz      push_reg_ok
  1331.         or      [rex_prefix],41h
  1332.         and     al,111b
  1333.       push_reg_ok:
  1334.         add     al,50h
  1335.         mov     [base_code],al
  1336.         mov     al,ah
  1337.         mov     ah,[push_size]
  1338.         cmp     al,2
  1339.         je      push_reg_16bit
  1340.         cmp     al,4
  1341.         je      push_reg_32bit
  1342.         cmp     al,8
  1343.         jne     invalid_operand_size
  1344.       push_reg_64bit:
  1345.         test    ah,not 8
  1346.         jnz     invalid_operand_size
  1347.         cmp     [code_type],64
  1348.         jne     illegal_instruction
  1349.         jmp     push_reg_store
  1350.       push_reg_32bit:
  1351.         test    ah,not 4
  1352.         jnz     invalid_operand_size
  1353.         cmp     [code_type],64
  1354.         je      illegal_instruction
  1355.         call    operand_32bit
  1356.         jmp     push_reg_store
  1357.       push_reg_16bit:
  1358.         test    ah,not 2
  1359.         jnz     invalid_operand_size
  1360.         call    operand_16bit
  1361.       push_reg_store:
  1362.         call    store_instruction_code
  1363.         jmp     push_done
  1364.       push_sreg:
  1365.         mov     bl,al
  1366.         mov     dl,[operand_size]
  1367.         mov     dh,[push_size]
  1368.         cmp     dl,2
  1369.         je      push_sreg16
  1370.         cmp     dl,4
  1371.         je      push_sreg32
  1372.         cmp     dl,8
  1373.         je      push_sreg64
  1374.         or      dl,dl
  1375.         jnz     invalid_operand_size
  1376.         cmp     dh,2
  1377.         je      push_sreg16
  1378.         cmp     dh,4
  1379.         je      push_sreg32
  1380.         cmp     dh,8
  1381.         je      push_sreg64
  1382.         jmp     push_sreg_store
  1383.       push_sreg16:
  1384.         test    dh,not 2
  1385.         jnz     invalid_operand_size
  1386.         call    operand_16bit
  1387.         jmp     push_sreg_store
  1388.       push_sreg32:
  1389.         test    dh,not 4
  1390.         jnz     invalid_operand_size
  1391.         cmp     [code_type],64
  1392.         je      illegal_instruction
  1393.         call    operand_32bit
  1394.         jmp     push_sreg_store
  1395.       push_sreg64:
  1396.         test    dh,not 8
  1397.         jnz     invalid_operand_size
  1398.         cmp     [code_type],64
  1399.         jne     illegal_instruction
  1400.       push_sreg_store:
  1401.         mov     al,bl
  1402.         cmp     al,70h
  1403.         jae     invalid_operand
  1404.         sub     al,61h
  1405.         jc      invalid_operand
  1406.         cmp     al,4
  1407.         jae     push_sreg_386
  1408.         shl     al,3
  1409.         add     al,6
  1410.         mov     [base_code],al
  1411.         cmp     [code_type],64
  1412.         je      illegal_instruction
  1413.         jmp     push_reg_store
  1414.       push_sreg_386:
  1415.         sub     al,4
  1416.         shl     al,3
  1417.         add     al,0A0h
  1418.         mov     [extended_code],al
  1419.         mov     [base_code],0Fh
  1420.         jmp     push_reg_store
  1421.       push_imm:
  1422.         mov     al,[operand_size]
  1423.         mov     ah,[push_size]
  1424.         or      al,al
  1425.         je      push_imm_size_ok
  1426.         or      ah,ah
  1427.         je      push_imm_size_ok
  1428.         cmp     al,ah
  1429.         jne     invalid_operand_size
  1430.       push_imm_size_ok:
  1431.         cmp     al,2
  1432.         je      push_imm_16bit
  1433.         cmp     al,4
  1434.         je      push_imm_32bit
  1435.         cmp     al,8
  1436.         je      push_imm_64bit
  1437.         cmp     ah,2
  1438.         je      push_imm_optimized_16bit
  1439.         cmp     ah,4
  1440.         je      push_imm_optimized_32bit
  1441.         cmp     ah,8
  1442.         je      push_imm_optimized_64bit
  1443.         or      al,al
  1444.         jnz     invalid_operand_size
  1445.         cmp     [code_type],16
  1446.         je      push_imm_optimized_16bit
  1447.         cmp     [code_type],32
  1448.         je      push_imm_optimized_32bit
  1449.       push_imm_optimized_64bit:
  1450.         cmp     [code_type],64
  1451.         jne     illegal_instruction
  1452.         call    get_simm32
  1453.         mov     edx,eax
  1454.         cmp     [value_type],0
  1455.         jne     push_imm_32bit_store
  1456.         cmp     eax,-80h
  1457.         jl      push_imm_32bit_store
  1458.         cmp     eax,80h
  1459.         jge     push_imm_32bit_store
  1460.         jmp     push_imm_8bit
  1461.       push_imm_optimized_32bit:
  1462.         cmp     [code_type],64
  1463.         je      illegal_instruction
  1464.         call    get_dword_value
  1465.         mov     edx,eax
  1466.         call    operand_32bit
  1467.         cmp     [value_type],0
  1468.         jne     push_imm_32bit_store
  1469.         cmp     eax,-80h
  1470.         jl      push_imm_32bit_store
  1471.         cmp     eax,80h
  1472.         jge     push_imm_32bit_store
  1473.         jmp     push_imm_8bit
  1474.       push_imm_optimized_16bit:
  1475.         call    get_word_value
  1476.         mov     dx,ax
  1477.         call    operand_16bit
  1478.         cmp     [value_type],0
  1479.         jne     push_imm_16bit_store
  1480.         cmp     ax,-80h
  1481.         jl      push_imm_16bit_store
  1482.         cmp     ax,80h
  1483.         jge     push_imm_16bit_store
  1484.       push_imm_8bit:
  1485.         mov     ah,al
  1486.         mov     [base_code],6Ah
  1487.         call    store_instruction_code
  1488.         mov     al,ah
  1489.         stos    byte [edi]
  1490.         jmp     push_done
  1491.       push_imm_16bit:
  1492.         call    get_word_value
  1493.         mov     dx,ax
  1494.         call    operand_16bit
  1495.       push_imm_16bit_store:
  1496.         mov     [base_code],68h
  1497.         call    store_instruction_code
  1498.         mov     ax,dx
  1499.         call    mark_relocation
  1500.         stos    word [edi]
  1501.         jmp     push_done
  1502.       push_imm_64bit:
  1503.         cmp     [code_type],64
  1504.         jne     illegal_instruction
  1505.         call    get_simm32
  1506.         mov     edx,eax
  1507.         jmp     push_imm_32bit_store
  1508.       push_imm_32bit:
  1509.         cmp     [code_type],64
  1510.         je      illegal_instruction
  1511.         call    get_dword_value
  1512.         mov     edx,eax
  1513.         call    operand_32bit
  1514.       push_imm_32bit_store:
  1515.         mov     [base_code],68h
  1516.         call    store_instruction_code
  1517.         mov     eax,edx
  1518.         call    mark_relocation
  1519.         stos    dword [edi]
  1520.       push_done:
  1521.         lods    byte [esi]
  1522.         dec     esi
  1523.         cmp     al,0Fh
  1524.         je      instruction_assembled
  1525.         or      al,al
  1526.         jz      instruction_assembled
  1527.         mov     [operand_size],0
  1528.         mov     [size_override],0
  1529.         mov     [operand_prefix],0
  1530.         mov     [rex_prefix],0
  1531.         jmp     push_next
  1532. pop_instruction:
  1533.         mov     [push_size],al
  1534.       pop_next:
  1535.         lods    byte [esi]
  1536.         call    get_size_operator
  1537.         cmp     al,10h
  1538.         je      pop_reg
  1539.         cmp     al,'['
  1540.         jne     invalid_operand
  1541.       pop_mem:
  1542.         call    get_address
  1543.         mov     al,[operand_size]
  1544.         mov     ah,[push_size]
  1545.         cmp     al,2
  1546.         je      pop_mem_16bit
  1547.         cmp     al,4
  1548.         je      pop_mem_32bit
  1549.         cmp     al,8
  1550.         je      pop_mem_64bit
  1551.         or      al,al
  1552.         jnz     invalid_operand_size
  1553.         cmp     ah,2
  1554.         je      pop_mem_16bit
  1555.         cmp     ah,4
  1556.         je      pop_mem_32bit
  1557.         cmp     ah,8
  1558.         je      pop_mem_64bit
  1559.         cmp     [error_line],0
  1560.         jne     pop_mem_store
  1561.         mov     eax,[current_line]
  1562.         mov     [error_line],eax
  1563.         mov     [error],operand_size_not_specified
  1564.         jmp     pop_mem_store
  1565.       pop_mem_16bit:
  1566.         test    ah,not 2
  1567.         jnz     invalid_operand_size
  1568.         call    operand_16bit
  1569.         jmp     pop_mem_store
  1570.       pop_mem_32bit:
  1571.         test    ah,not 4
  1572.         jnz     invalid_operand_size
  1573.         cmp     [code_type],64
  1574.         je      illegal_instruction
  1575.         call    operand_32bit
  1576.         jmp     pop_mem_store
  1577.       pop_mem_64bit:
  1578.         test    ah,not 8
  1579.         jnz     invalid_operand_size
  1580.         cmp     [code_type],64
  1581.         jne     illegal_instruction
  1582.       pop_mem_store:
  1583.         mov     [base_code],08Fh
  1584.         mov     [postbyte_register],0
  1585.         call    store_instruction
  1586.         jmp     pop_done
  1587.       pop_reg:
  1588.         lods    byte [esi]
  1589.         mov     ah,al
  1590.         sub     ah,10h
  1591.         and     ah,al
  1592.         test    ah,0F0h
  1593.         jnz     pop_sreg
  1594.         call    convert_register
  1595.         test    al,1000b
  1596.         jz      pop_reg_ok
  1597.         or      [rex_prefix],41h
  1598.         and     al,111b
  1599.       pop_reg_ok:
  1600.         add     al,58h
  1601.         mov     [base_code],al
  1602.         mov     al,ah
  1603.         mov     ah,[push_size]
  1604.         cmp     al,2
  1605.         je      pop_reg_16bit
  1606.         cmp     al,4
  1607.         je      pop_reg_32bit
  1608.         cmp     al,8
  1609.         je      pop_reg_64bit
  1610.         jmp     invalid_operand_size
  1611.       pop_reg_64bit:
  1612.         test    ah,not 8
  1613.         jnz     invalid_operand_size
  1614.         cmp     [code_type],64
  1615.         jne     illegal_instruction
  1616.         jmp     pop_reg_store
  1617.       pop_reg_32bit:
  1618.         test    ah,not 4
  1619.         jnz     invalid_operand_size
  1620.         cmp     [code_type],64
  1621.         je      illegal_instruction
  1622.         call    operand_32bit
  1623.         jmp     pop_reg_store
  1624.       pop_reg_16bit:
  1625.         test    ah,not 2
  1626.         jnz     invalid_operand_size
  1627.         call    operand_16bit
  1628.       pop_reg_store:
  1629.         call    store_instruction_code
  1630.       pop_done:
  1631.         lods    byte [esi]
  1632.         dec     esi
  1633.         cmp     al,0Fh
  1634.         je      instruction_assembled
  1635.         or      al,al
  1636.         jz      instruction_assembled
  1637.         mov     [operand_size],0
  1638.         mov     [size_override],0
  1639.         mov     [operand_prefix],0
  1640.         mov     [rex_prefix],0
  1641.         jmp     pop_next
  1642.       pop_sreg:
  1643.         mov     dl,[operand_size]
  1644.         mov     dh,[push_size]
  1645.         cmp     al,62h
  1646.         je      pop_cs
  1647.         mov     bl,al
  1648.         cmp     dl,2
  1649.         je      pop_sreg16
  1650.         cmp     dl,4
  1651.         je      pop_sreg32
  1652.         cmp     dl,8
  1653.         je      pop_sreg64
  1654.         or      dl,dl
  1655.         jnz     invalid_operand_size
  1656.         cmp     dh,2
  1657.         je      pop_sreg16
  1658.         cmp     dh,4
  1659.         je      pop_sreg32
  1660.         cmp     dh,8
  1661.         je      pop_sreg64
  1662.         jmp     pop_sreg_store
  1663.       pop_sreg16:
  1664.         test    dh,not 2
  1665.         jnz     invalid_operand_size
  1666.         call    operand_16bit
  1667.         jmp     pop_sreg_store
  1668.       pop_sreg32:
  1669.         test    dh,not 4
  1670.         jnz     invalid_operand_size
  1671.         cmp     [code_type],64
  1672.         je      illegal_instruction
  1673.         call    operand_32bit
  1674.         jmp     pop_sreg_store
  1675.       pop_sreg64:
  1676.         test    dh,not 8
  1677.         jnz     invalid_operand_size
  1678.         cmp     [code_type],64
  1679.         jne     illegal_instruction
  1680.       pop_sreg_store:
  1681.         mov     al,bl
  1682.         cmp     al,70h
  1683.         jae     invalid_operand
  1684.         sub     al,61h
  1685.         jc      invalid_operand
  1686.         cmp     al,4
  1687.         jae     pop_sreg_386
  1688.         shl     al,3
  1689.         add     al,7
  1690.         mov     [base_code],al
  1691.         cmp     [code_type],64
  1692.         je      illegal_instruction
  1693.         jmp     pop_reg_store
  1694.       pop_cs:
  1695.         cmp     [code_type],16
  1696.         jne     illegal_instruction
  1697.         cmp     dl,2
  1698.         je      pop_cs_store
  1699.         or      dl,dl
  1700.         jnz     invalid_operand_size
  1701.         cmp     dh,2
  1702.         je      pop_cs_store
  1703.         or      dh,dh
  1704.         jnz     illegal_instruction
  1705.       pop_cs_store:
  1706.         test    dh,not 2
  1707.         jnz     invalid_operand_size
  1708.         mov     al,0Fh
  1709.         stos    byte [edi]
  1710.         jmp     pop_done
  1711.       pop_sreg_386:
  1712.         sub     al,4
  1713.         shl     al,3
  1714.         add     al,0A1h
  1715.         mov     [extended_code],al
  1716.         mov     [base_code],0Fh
  1717.         jmp     pop_reg_store
  1718. inc_instruction:
  1719.         mov     [base_code],al
  1720.         lods    byte [esi]
  1721.         call    get_size_operator
  1722.         cmp     al,10h
  1723.         je      inc_reg
  1724.         cmp     al,'['
  1725.         je      inc_mem
  1726.         jne     invalid_operand
  1727.       inc_mem:
  1728.         call    get_address
  1729.         mov     al,[operand_size]
  1730.         cmp     al,1
  1731.         je      inc_mem_8bit
  1732.         jb      inc_mem_nosize
  1733.         call    operand_autodetect
  1734.         mov     al,0FFh
  1735.         xchg    al,[base_code]
  1736.         mov     [postbyte_register],al
  1737.         call    store_instruction
  1738.         jmp     instruction_assembled
  1739.       inc_mem_nosize:
  1740.         cmp     [error_line],0
  1741.         jne     inc_mem_8bit
  1742.         mov     eax,[current_line]
  1743.         mov     [error_line],eax
  1744.         mov     [error],operand_size_not_specified
  1745.       inc_mem_8bit:
  1746.         mov     al,0FEh
  1747.         xchg    al,[base_code]
  1748.         mov     [postbyte_register],al
  1749.         call    store_instruction
  1750.         jmp     instruction_assembled
  1751.       inc_reg:
  1752.         lods    byte [esi]
  1753.         call    convert_register
  1754.         mov     bl,al
  1755.         mov     al,0FEh
  1756.         xchg    al,[base_code]
  1757.         mov     [postbyte_register],al
  1758.         mov     al,ah
  1759.         cmp     al,1
  1760.         je      inc_reg_8bit
  1761.         call    operand_autodetect
  1762.         cmp     [code_type],64
  1763.         je      inc_reg_long_form
  1764.         mov     al,[postbyte_register]
  1765.         shl     al,3
  1766.         add     al,bl
  1767.         add     al,40h
  1768.         mov     [base_code],al
  1769.         call    store_instruction_code
  1770.         jmp     instruction_assembled
  1771.       inc_reg_long_form:
  1772.         inc     [base_code]
  1773.       inc_reg_8bit:
  1774.         call    store_nomem_instruction
  1775.         jmp     instruction_assembled
  1776. set_instruction:
  1777.         mov     [base_code],0Fh
  1778.         mov     [extended_code],al
  1779.         lods    byte [esi]
  1780.         call    get_size_operator
  1781.         cmp     al,10h
  1782.         je      set_reg
  1783.         cmp     al,'['
  1784.         jne     invalid_operand
  1785.       set_mem:
  1786.         call    get_address
  1787.         cmp     [operand_size],1
  1788.         ja      invalid_operand_size
  1789.         mov     [postbyte_register],0
  1790.         call    store_instruction
  1791.         jmp     instruction_assembled
  1792.       set_reg:
  1793.         lods    byte [esi]
  1794.         call    convert_register
  1795.         cmp     ah,1
  1796.         jne     invalid_operand_size
  1797.         mov     bl,al
  1798.         mov     [postbyte_register],0
  1799.         call    store_nomem_instruction
  1800.         jmp     instruction_assembled
  1801. arpl_instruction:
  1802.         cmp     [code_type],64
  1803.         je      illegal_instruction
  1804.         mov     [base_code],63h
  1805.         lods    byte [esi]
  1806.         call    get_size_operator
  1807.         cmp     al,10h
  1808.         je      arpl_reg
  1809.         cmp     al,'['
  1810.         jne     invalid_operand
  1811.         call    get_address
  1812.         lods    byte [esi]
  1813.         cmp     al,','
  1814.         jne     invalid_operand
  1815.         lods    byte [esi]
  1816.         cmp     al,10h
  1817.         jne     invalid_operand
  1818.         lods    byte [esi]
  1819.         call    convert_register
  1820.         mov     [postbyte_register],al
  1821.         cmp     ah,2
  1822.         jne     invalid_operand_size
  1823.         call    store_instruction
  1824.         jmp     instruction_assembled
  1825.       arpl_reg:
  1826.         lods    byte [esi]
  1827.         call    convert_register
  1828.         cmp     ah,2
  1829.         jne     invalid_operand_size
  1830.         mov     bl,al
  1831.         lods    byte [esi]
  1832.         cmp     al,','
  1833.         jne     invalid_operand
  1834.         lods    byte [esi]
  1835.         cmp     al,10h
  1836.         jne     invalid_operand
  1837.         lods    byte [esi]
  1838.         call    convert_register
  1839.         cmp     ah,2
  1840.         jne     invalid_operand_size
  1841.         mov     [postbyte_register],al
  1842.         call    store_nomem_instruction
  1843.         jmp     instruction_assembled
  1844. bound_instruction:
  1845.         cmp     [code_type],64
  1846.         je      illegal_instruction
  1847.         lods    byte [esi]
  1848.         call    get_size_operator
  1849.         cmp     al,10h
  1850.         jne     invalid_operand
  1851.         lods    byte [esi]
  1852.         call    convert_register
  1853.         mov     [postbyte_register],al
  1854.         lods    byte [esi]
  1855.         cmp     al,','
  1856.         jne     invalid_operand
  1857.         lods    byte [esi]
  1858.         call    get_size_operator
  1859.         cmp     al,'['
  1860.         jne     invalid_operand
  1861.         call    get_address
  1862.         mov     al,[operand_size]
  1863.         cmp     al,2
  1864.         je      bound_16bit
  1865.         cmp     al,4
  1866.         je      bound_32bit
  1867.         jmp     invalid_operand_size
  1868.       bound_32bit:
  1869.         call    operand_32bit
  1870.         mov     [base_code],62h
  1871.         call    store_instruction
  1872.         jmp     instruction_assembled
  1873.       bound_16bit:
  1874.         call    operand_16bit
  1875.         mov     [base_code],62h
  1876.         call    store_instruction
  1877.         jmp     instruction_assembled
  1878. enter_instruction:
  1879.         lods    byte [esi]
  1880.         call    get_size_operator
  1881.         cmp     ah,2
  1882.         je      enter_imm16_size_ok
  1883.         or      ah,ah
  1884.         jnz     invalid_operand_size
  1885.       enter_imm16_size_ok:
  1886.         cmp     al,'('
  1887.         jne     invalid_operand
  1888.         call    get_word_value
  1889.         cmp     [next_pass_needed],0
  1890.         jne     enter_imm16_ok
  1891.         cmp     [value_type],0
  1892.         jne     invalid_use_of_symbol
  1893.       enter_imm16_ok:
  1894.         push    eax
  1895.         mov     [operand_size],0
  1896.         lods    byte [esi]
  1897.         cmp     al,','
  1898.         jne     invalid_operand
  1899.         lods    byte [esi]
  1900.         call    get_size_operator
  1901.         cmp     ah,1
  1902.         je      enter_imm8_size_ok
  1903.         or      ah,ah
  1904.         jnz     invalid_operand_size
  1905.       enter_imm8_size_ok:
  1906.         cmp     al,'('
  1907.         jne     invalid_operand
  1908.         call    get_byte_value
  1909.         mov     dl,al
  1910.         pop     ebx
  1911.         mov     al,0C8h
  1912.         stos    byte [edi]
  1913.         mov     ax,bx
  1914.         stos    word [edi]
  1915.         mov     al,dl
  1916.         stos    byte [edi]
  1917.         jmp     instruction_assembled
  1918. ret_instruction_only64:
  1919.         cmp     [code_type],64
  1920.         jne     illegal_instruction
  1921.         jmp     ret_instruction
  1922. ret_instruction_32bit_except64:
  1923.         cmp     [code_type],64
  1924.         je      illegal_instruction
  1925. ret_instruction_32bit:
  1926.         call    operand_32bit
  1927.         jmp     ret_instruction
  1928. ret_instruction_16bit:
  1929.         call    operand_16bit
  1930.         jmp     ret_instruction
  1931. retf_instruction:
  1932.         cmp     [code_type],64
  1933.         jne     ret_instruction
  1934. ret_instruction_64bit:
  1935.         call    operand_64bit
  1936. ret_instruction:
  1937.         mov     [base_code],al
  1938.         lods    byte [esi]
  1939.         dec     esi
  1940.         or      al,al
  1941.         jz      simple_ret
  1942.         cmp     al,0Fh
  1943.         je      simple_ret
  1944.         lods    byte [esi]
  1945.         call    get_size_operator
  1946.         or      ah,ah
  1947.         jz      ret_imm
  1948.         cmp     ah,2
  1949.         je      ret_imm
  1950.         jmp     invalid_operand_size
  1951.       ret_imm:
  1952.         cmp     al,'('
  1953.         jne     invalid_operand
  1954.         call    get_word_value
  1955.         cmp     [next_pass_needed],0
  1956.         jne     ret_imm_ok
  1957.         cmp     [value_type],0
  1958.         jne     invalid_use_of_symbol
  1959.       ret_imm_ok:
  1960.         cmp     [size_declared],0
  1961.         jne     ret_imm_store
  1962.         or      ax,ax
  1963.         jz      simple_ret
  1964.       ret_imm_store:
  1965.         mov     dx,ax
  1966.         call    store_instruction_code
  1967.         mov     ax,dx
  1968.         stos    word [edi]
  1969.         jmp     instruction_assembled
  1970.       simple_ret:
  1971.         inc     [base_code]
  1972.         call    store_instruction_code
  1973.         jmp     instruction_assembled
  1974. lea_instruction:
  1975.         mov     [base_code],8Dh
  1976.         lods    byte [esi]
  1977.         call    get_size_operator
  1978.         cmp     al,10h
  1979.         jne     invalid_operand
  1980.         lods    byte [esi]
  1981.         call    convert_register
  1982.         mov     [postbyte_register],al
  1983.         lods    byte [esi]
  1984.         cmp     al,','
  1985.         jne     invalid_operand
  1986.         xor     al,al
  1987.         xchg    al,[operand_size]
  1988.         push    eax
  1989.         lods    byte [esi]
  1990.         call    get_size_operator
  1991.         cmp     al,'['
  1992.         jne     invalid_operand
  1993.         mov     [size_override],-1
  1994.         call    get_address
  1995.         pop     eax
  1996.         mov     [operand_size],al
  1997.         call    operand_autodetect
  1998.         call    store_instruction
  1999.         jmp     instruction_assembled
  2000. ls_instruction:
  2001.         or      al,al
  2002.         jz      les_instruction
  2003.         cmp     al,3
  2004.         jz      lds_instruction
  2005.         add     al,0B0h
  2006.         mov     [extended_code],al
  2007.         mov     [base_code],0Fh
  2008.         jmp     ls_code_ok
  2009.       les_instruction:
  2010.         mov     [base_code],0C4h
  2011.         jmp     ls_short_code
  2012.       lds_instruction:
  2013.         mov     [base_code],0C5h
  2014.       ls_short_code:
  2015.         cmp     [code_type],64
  2016.         je      illegal_instruction
  2017.       ls_code_ok:
  2018.         lods    byte [esi]
  2019.         call    get_size_operator
  2020.         cmp     al,10h
  2021.         jne     invalid_operand
  2022.         lods    byte [esi]
  2023.         call    convert_register
  2024.         mov     [postbyte_register],al
  2025.         lods    byte [esi]
  2026.         cmp     al,','
  2027.         jne     invalid_operand
  2028.         add     [operand_size],2
  2029.         lods    byte [esi]
  2030.         call    get_size_operator
  2031.         cmp     al,'['
  2032.         jne     invalid_operand
  2033.         call    get_address
  2034.         mov     al,[operand_size]
  2035.         cmp     al,4
  2036.         je      ls_16bit
  2037.         cmp     al,6
  2038.         je      ls_32bit
  2039.         cmp     al,10
  2040.         je      ls_64bit
  2041.         jmp     invalid_operand_size
  2042.       ls_16bit:
  2043.         call    operand_16bit
  2044.         call    store_instruction
  2045.         jmp     instruction_assembled
  2046.       ls_32bit:
  2047.         call    operand_32bit
  2048.         call    store_instruction
  2049.         jmp     instruction_assembled
  2050.       ls_64bit:
  2051.         call    operand_64bit
  2052.         call    store_instruction
  2053.         jmp     instruction_assembled
  2054. sh_instruction:
  2055.         mov     [postbyte_register],al
  2056.         lods    byte [esi]
  2057.         call    get_size_operator
  2058.         cmp     al,10h
  2059.         je      sh_reg
  2060.         cmp     al,'['
  2061.         jne     invalid_operand
  2062.       sh_mem:
  2063.         call    get_address
  2064.         push    edx ebx ecx
  2065.         mov     al,[operand_size]
  2066.         push    eax
  2067.         mov     [operand_size],0
  2068.         lods    byte [esi]
  2069.         cmp     al,','
  2070.         jne     invalid_operand
  2071.         lods    byte [esi]
  2072.         call    get_size_operator
  2073.         cmp     al,'('
  2074.         je      sh_mem_imm
  2075.         cmp     al,10h
  2076.         jne     invalid_operand
  2077.       sh_mem_reg:
  2078.         lods    byte [esi]
  2079.         cmp     al,11h
  2080.         jne     invalid_operand
  2081.         pop     eax ecx ebx edx
  2082.         cmp     al,1
  2083.         je      sh_mem_cl_8bit
  2084.         jb      sh_mem_cl_nosize
  2085.         call    operand_autodetect
  2086.         mov     [base_code],0D3h
  2087.         call    store_instruction
  2088.         jmp     instruction_assembled
  2089.       sh_mem_cl_nosize:
  2090.         cmp     [error_line],0
  2091.         jne     sh_mem_cl_8bit
  2092.         mov     eax,[current_line]
  2093.         mov     [error_line],eax
  2094.         mov     [error],operand_size_not_specified
  2095.       sh_mem_cl_8bit:
  2096.         mov     [base_code],0D2h
  2097.         call    store_instruction
  2098.         jmp     instruction_assembled
  2099.       sh_mem_imm:
  2100.         mov     al,[operand_size]
  2101.         or      al,al
  2102.         jz      sh_mem_imm_size_ok
  2103.         cmp     al,1
  2104.         jne     invalid_operand_size
  2105.       sh_mem_imm_size_ok:
  2106.         call    get_byte_value
  2107.         mov     byte [value],al
  2108.         pop     eax ecx ebx edx
  2109.         cmp     al,1
  2110.         je      sh_mem_imm_8bit
  2111.         jb      sh_mem_imm_nosize
  2112.         call    operand_autodetect
  2113.         cmp     byte [value],1
  2114.         je      sh_mem_1
  2115.         mov     [base_code],0C1h
  2116.         call    store_instruction_with_imm8
  2117.         jmp     instruction_assembled
  2118.       sh_mem_1:
  2119.         mov     [base_code],0D1h
  2120.         call    store_instruction
  2121.         jmp     instruction_assembled
  2122.       sh_mem_imm_nosize:
  2123.         cmp     [error_line],0
  2124.         jne     sh_mem_imm_8bit
  2125.         mov     eax,[current_line]
  2126.         mov     [error_line],eax
  2127.         mov     [error],operand_size_not_specified
  2128.       sh_mem_imm_8bit:
  2129.         cmp     byte [value],1
  2130.         je      sh_mem_1_8bit
  2131.         mov     [base_code],0C0h
  2132.         call    store_instruction_with_imm8
  2133.         jmp     instruction_assembled
  2134.       sh_mem_1_8bit:
  2135.         mov     [base_code],0D0h
  2136.         call    store_instruction
  2137.         jmp     instruction_assembled
  2138.       sh_reg:
  2139.         lods    byte [esi]
  2140.         call    convert_register
  2141.         mov     bx,ax
  2142.         mov     [operand_size],0
  2143.         lods    byte [esi]
  2144.         cmp     al,','
  2145.         jne     invalid_operand
  2146.         lods    byte [esi]
  2147.         call    get_size_operator
  2148.         cmp     al,'('
  2149.         je      sh_reg_imm
  2150.         cmp     al,10h
  2151.         jne     invalid_operand
  2152.       sh_reg_reg:
  2153.         lods    byte [esi]
  2154.         cmp     al,11h
  2155.         jne     invalid_operand
  2156.         mov     al,bh
  2157.         cmp     al,1
  2158.         je      sh_reg_cl_8bit
  2159.         call    operand_autodetect
  2160.         mov     [base_code],0D3h
  2161.         call    store_nomem_instruction
  2162.         jmp     instruction_assembled
  2163.       sh_reg_cl_8bit:
  2164.         mov     [base_code],0D2h
  2165.         call    store_nomem_instruction
  2166.         jmp     instruction_assembled
  2167.       sh_reg_imm:
  2168.         mov     al,[operand_size]
  2169.         or      al,al
  2170.         jz      sh_reg_imm_size_ok
  2171.         cmp     al,1
  2172.         jne     invalid_operand_size
  2173.       sh_reg_imm_size_ok:
  2174.         push    ebx
  2175.         call    get_byte_value
  2176.         mov     dl,al
  2177.         pop     ebx
  2178.         mov     al,bh
  2179.         cmp     al,1
  2180.         je      sh_reg_imm_8bit
  2181.         call    operand_autodetect
  2182.         cmp     dl,1
  2183.         je      sh_reg_1
  2184.         mov     [base_code],0C1h
  2185.         call    store_nomem_instruction
  2186.         mov     al,dl
  2187.         stos    byte [edi]
  2188.         jmp     instruction_assembled
  2189.       sh_reg_1:
  2190.         mov     [base_code],0D1h
  2191.         call    store_nomem_instruction
  2192.         jmp     instruction_assembled
  2193.       sh_reg_imm_8bit:
  2194.         cmp     dl,1
  2195.         je      sh_reg_1_8bit
  2196.         mov     [base_code],0C0h
  2197.         call    store_nomem_instruction
  2198.         mov     al,dl
  2199.         stos    byte [edi]
  2200.         jmp     instruction_assembled
  2201.       sh_reg_1_8bit:
  2202.         mov     [base_code],0D0h
  2203.         call    store_nomem_instruction
  2204.         jmp     instruction_assembled
  2205. shd_instruction:
  2206.         mov     [base_code],0Fh
  2207.         mov     [extended_code],al
  2208.         lods    byte [esi]
  2209.         call    get_size_operator
  2210.         cmp     al,10h
  2211.         je      shd_reg
  2212.         cmp     al,'['
  2213.         jne     invalid_operand
  2214.       shd_mem:
  2215.         call    get_address
  2216.         push    edx ebx ecx
  2217.         lods    byte [esi]
  2218.         cmp     al,','
  2219.         jne     invalid_operand
  2220.         lods    byte [esi]
  2221.         call    get_size_operator
  2222.         cmp     al,10h
  2223.         jne     invalid_operand
  2224.         lods    byte [esi]
  2225.         call    convert_register
  2226.         mov     [postbyte_register],al
  2227.         lods    byte [esi]
  2228.         cmp     al,','
  2229.         jne     invalid_operand
  2230.         mov     al,ah
  2231.         mov     [operand_size],0
  2232.         push    eax
  2233.         lods    byte [esi]
  2234.         call    get_size_operator
  2235.         cmp     al,'('
  2236.         je      shd_mem_reg_imm
  2237.         cmp     al,10h
  2238.         jne     invalid_operand
  2239.         lods    byte [esi]
  2240.         cmp     al,11h
  2241.         jne     invalid_operand
  2242.         pop     eax ecx ebx edx
  2243.         call    operand_autodetect
  2244.         inc     [extended_code]
  2245.         call    store_instruction
  2246.         jmp     instruction_assembled
  2247.       shd_mem_reg_imm:
  2248.         mov     al,[operand_size]
  2249.         or      al,al
  2250.         jz      shd_mem_reg_imm_size_ok
  2251.         cmp     al,1
  2252.         jne     invalid_operand_size
  2253.       shd_mem_reg_imm_size_ok:
  2254.         call    get_byte_value
  2255.         mov     byte [value],al
  2256.         pop     eax ecx ebx edx
  2257.         call    operand_autodetect
  2258.         call    store_instruction_with_imm8
  2259.         jmp     instruction_assembled
  2260.       shd_reg:
  2261.         lods    byte [esi]
  2262.         call    convert_register
  2263.         mov     [postbyte_register],al
  2264.         lods    byte [esi]
  2265.         cmp     al,','
  2266.         jne     invalid_operand
  2267.         lods    byte [esi]
  2268.         call    get_size_operator
  2269.         cmp     al,10h
  2270.         jne     invalid_operand
  2271.         lods    byte [esi]
  2272.         call    convert_register
  2273.         mov     bl,[postbyte_register]
  2274.         mov     [postbyte_register],al
  2275.         mov     al,ah
  2276.         push    eax ebx
  2277.         lods    byte [esi]
  2278.         cmp     al,','
  2279.         jne     invalid_operand
  2280.         mov     [operand_size],0
  2281.         lods    byte [esi]
  2282.         call    get_size_operator
  2283.         cmp     al,'('
  2284.         je      shd_reg_reg_imm
  2285.         cmp     al,10h
  2286.         jne     invalid_operand
  2287.         lods    byte [esi]
  2288.         cmp     al,11h
  2289.         jne     invalid_operand
  2290.         pop     ebx eax
  2291.         call    operand_autodetect
  2292.         inc     [extended_code]
  2293.         call    store_nomem_instruction
  2294.         jmp     instruction_assembled
  2295.       shd_reg_reg_imm:
  2296.         mov     al,[operand_size]
  2297.         or      al,al
  2298.         jz      shd_reg_reg_imm_size_ok
  2299.         cmp     al,1
  2300.         jne     invalid_operand_size
  2301.       shd_reg_reg_imm_size_ok:
  2302.         call    get_byte_value
  2303.         mov     dl,al
  2304.         pop     ebx eax
  2305.         call    operand_autodetect
  2306.         call    store_nomem_instruction
  2307.         mov     al,dl
  2308.         stos    byte [edi]
  2309.         jmp     instruction_assembled
  2310. movx_instruction:
  2311.         mov     [base_code],0Fh
  2312.         mov     [extended_code],al
  2313.         lods    byte [esi]
  2314.         call    get_size_operator
  2315.         cmp     al,10h
  2316.         jne     invalid_operand
  2317.         lods    byte [esi]
  2318.         call    convert_register
  2319.         mov     [postbyte_register],al
  2320.         mov     al,ah
  2321.         push    eax
  2322.         lods    byte [esi]
  2323.         cmp     al,','
  2324.         jne     invalid_operand
  2325.         mov     [operand_size],0
  2326.         lods    byte [esi]
  2327.         call    get_size_operator
  2328.         cmp     al,10h
  2329.         je      movx_reg
  2330.         cmp     al,'['
  2331.         jne     invalid_operand
  2332.         call    get_address
  2333.         pop     eax
  2334.         mov     ah,[operand_size]
  2335.         or      ah,ah
  2336.         jz      movx_unknown_size
  2337.         cmp     ah,al
  2338.         jae     invalid_operand_size
  2339.         cmp     ah,1
  2340.         je      movx_mem_8bit
  2341.         cmp     ah,2
  2342.         jne     invalid_operand_size
  2343.       movx_mem_16bit:
  2344.         inc     [extended_code]
  2345.         call    operand_autodetect
  2346.         call    store_instruction
  2347.         jmp     instruction_assembled
  2348.       movx_unknown_size:
  2349.         cmp     [error_line],0
  2350.         jne     movx_mem_8bit
  2351.         mov     eax,[current_line]
  2352.         mov     [error_line],eax
  2353.         mov     [error],operand_size_not_specified
  2354.       movx_mem_8bit:
  2355.         call    operand_autodetect
  2356.         call    store_instruction
  2357.         jmp     instruction_assembled
  2358.       movx_reg:
  2359.         lods    byte [esi]
  2360.         call    convert_register
  2361.         pop     ebx
  2362.         xchg    bl,al
  2363.         cmp     ah,al
  2364.         jae     invalid_operand_size
  2365.         cmp     ah,1
  2366.         je      movx_reg_8bit
  2367.         cmp     ah,2
  2368.         je      movx_reg_16bit
  2369.         jmp     invalid_operand_size
  2370.       movx_reg_8bit:
  2371.         call    operand_autodetect
  2372.         call    store_nomem_instruction
  2373.         jmp     instruction_assembled
  2374.       movx_reg_16bit:
  2375.         call    operand_autodetect
  2376.         inc     [extended_code]
  2377.         call    store_nomem_instruction
  2378.         jmp     instruction_assembled
  2379. movsxd_instruction:
  2380.         mov     [base_code],al
  2381.         lods    byte [esi]
  2382.         call    get_size_operator
  2383.         cmp     al,10h
  2384.         jne     invalid_operand
  2385.         lods    byte [esi]
  2386.         call    convert_register
  2387.         mov     [postbyte_register],al
  2388.         cmp     ah,8
  2389.         jne     invalid_operand_size
  2390.         lods    byte [esi]
  2391.         cmp     al,','
  2392.         jne     invalid_operand
  2393.         mov     [operand_size],0
  2394.         lods    byte [esi]
  2395.         call    get_size_operator
  2396.         cmp     al,10h
  2397.         je      movsxd_reg
  2398.         cmp     al,'['
  2399.         jne     invalid_operand
  2400.         call    get_address
  2401.         cmp     [operand_size],4
  2402.         je      movsxd_mem_store
  2403.         cmp     [operand_size],0
  2404.         jne     invalid_operand_size
  2405.       movsxd_mem_store:
  2406.         call    operand_64bit
  2407.         call    store_instruction
  2408.         jmp     instruction_assembled
  2409.       movsxd_reg:
  2410.         lods    byte [esi]
  2411.         call    convert_register
  2412.         cmp     ah,4
  2413.         jne     invalid_operand_size
  2414.         mov     bl,al
  2415.         call    operand_64bit
  2416.         call    store_nomem_instruction
  2417.         jmp     instruction_assembled
  2418. bt_instruction:
  2419.         mov     [postbyte_register],al
  2420.         shl     al,3
  2421.         add     al,83h
  2422.         mov     [extended_code],al
  2423.         mov     [base_code],0Fh
  2424.         lods    byte [esi]
  2425.         call    get_size_operator
  2426.         cmp     al,10h
  2427.         je      bt_reg
  2428.         cmp     al,'['
  2429.         jne     invalid_operand
  2430.         call    get_address
  2431.         push    eax ebx ecx
  2432.         lods    byte [esi]
  2433.         cmp     al,','
  2434.         jne     invalid_operand
  2435.         cmp     byte [esi],'('
  2436.         je      bt_mem_imm
  2437.         cmp     byte [esi],11h
  2438.         jne     bt_mem_reg
  2439.         cmp     byte [esi+2],'('
  2440.         je      bt_mem_imm
  2441.       bt_mem_reg:
  2442.         lods    byte [esi]
  2443.         call    get_size_operator
  2444.         cmp     al,10h
  2445.         jne     invalid_operand
  2446.         lods    byte [esi]
  2447.         call    convert_register
  2448.         mov     [postbyte_register],al
  2449.         pop     ecx ebx edx
  2450.         mov     al,ah
  2451.         call    operand_autodetect
  2452.         call    store_instruction
  2453.         jmp     instruction_assembled
  2454.       bt_mem_imm:
  2455.         xor     al,al
  2456.         xchg    al,[operand_size]
  2457.         push    eax
  2458.         lods    byte [esi]
  2459.         call    get_size_operator
  2460.         cmp     al,'('
  2461.         jne     invalid_operand
  2462.         mov     al,[operand_size]
  2463.         or      al,al
  2464.         jz      bt_mem_imm_size_ok
  2465.         cmp     al,1
  2466.         jne     invalid_operand_size
  2467.       bt_mem_imm_size_ok:
  2468.         call    get_byte_value
  2469.         mov     byte [value],al
  2470.         pop     eax
  2471.         or      al,al
  2472.         jz      bt_mem_imm_nosize
  2473.         call    operand_autodetect
  2474.       bt_mem_imm_store:
  2475.         pop     ecx ebx edx
  2476.         mov     [extended_code],0BAh
  2477.         call    store_instruction_with_imm8
  2478.         jmp     instruction_assembled
  2479.       bt_mem_imm_nosize:
  2480.         cmp     [error_line],0
  2481.         jne     bt_mem_imm_store
  2482.         mov     eax,[current_line]
  2483.         mov     [error_line],eax
  2484.         mov     [error],operand_size_not_specified
  2485.         jmp     bt_mem_imm_store
  2486.       bt_reg:
  2487.         lods    byte [esi]
  2488.         call    convert_register
  2489.         mov     bl,al
  2490.         lods    byte [esi]
  2491.         cmp     al,','
  2492.         jne     invalid_operand
  2493.         cmp     byte [esi],'('
  2494.         je      bt_reg_imm
  2495.         cmp     byte [esi],11h
  2496.         jne     bt_reg_reg
  2497.         cmp     byte [esi+2],'('
  2498.         je      bt_reg_imm
  2499.       bt_reg_reg:
  2500.         lods    byte [esi]
  2501.         call    get_size_operator
  2502.         cmp     al,10h
  2503.         jne     invalid_operand
  2504.         lods    byte [esi]
  2505.         call    convert_register
  2506.         mov     [postbyte_register],al
  2507.         mov     al,ah
  2508.         call    operand_autodetect
  2509.         call    store_nomem_instruction
  2510.         jmp     instruction_assembled
  2511.       bt_reg_imm:
  2512.         xor     al,al
  2513.         xchg    al,[operand_size]
  2514.         push    eax ebx
  2515.         lods    byte [esi]
  2516.         call    get_size_operator
  2517.         cmp     al,'('
  2518.         jne     invalid_operand
  2519.         mov     al,[operand_size]
  2520.         or      al,al
  2521.         jz      bt_reg_imm_size_ok
  2522.         cmp     al,1
  2523.         jne     invalid_operand_size
  2524.       bt_reg_imm_size_ok:
  2525.         call    get_byte_value
  2526.         mov     byte [value],al
  2527.         pop     ebx eax
  2528.         call    operand_autodetect
  2529.       bt_reg_imm_store:
  2530.         mov     [extended_code],0BAh
  2531.         call    store_nomem_instruction
  2532.         mov     al,byte [value]
  2533.         stos    byte [edi]
  2534.         jmp     instruction_assembled
  2535. bs_instruction:
  2536.         mov     [extended_code],al
  2537.         mov     [base_code],0Fh
  2538.         lods    byte [esi]
  2539.         call    get_size_operator
  2540.         cmp     al,10h
  2541.         jne     invalid_operand
  2542.         lods    byte [esi]
  2543.         call    convert_register
  2544.         mov     [postbyte_register],al
  2545.         lods    byte [esi]
  2546.         cmp     al,','
  2547.         jne     invalid_operand
  2548.         lods    byte [esi]
  2549.         call    get_size_operator
  2550.         cmp     al,10h
  2551.         je      bs_reg_reg
  2552.         cmp     al,'['
  2553.         jne     invalid_argument
  2554.         call    get_address
  2555.         mov     al,[operand_size]
  2556.         call    operand_autodetect
  2557.         call    store_instruction
  2558.         jmp     instruction_assembled
  2559.       bs_reg_reg:
  2560.         lods    byte [esi]
  2561.         call    convert_register
  2562.         mov     bl,al
  2563.         mov     al,ah
  2564.         call    operand_autodetect
  2565.         call    store_nomem_instruction
  2566.         jmp     instruction_assembled
  2567. imul_instruction:
  2568.         mov     [base_code],0F6h
  2569.         mov     [postbyte_register],5
  2570.         lods    byte [esi]
  2571.         call    get_size_operator
  2572.         cmp     al,10h
  2573.         je      imul_reg
  2574.         cmp     al,'['
  2575.         jne     invalid_operand
  2576.       imul_mem:
  2577.         call    get_address
  2578.         mov     al,[operand_size]
  2579.         cmp     al,1
  2580.         je      imul_mem_8bit
  2581.         jb      imul_mem_nosize
  2582.         call    operand_autodetect
  2583.         inc     [base_code]
  2584.         call    store_instruction
  2585.         jmp     instruction_assembled
  2586.       imul_mem_nosize:
  2587.         cmp     [error_line],0
  2588.         jne     imul_mem_8bit
  2589.         mov     eax,[current_line]
  2590.         mov     [error_line],eax
  2591.         mov     [error],operand_size_not_specified
  2592.       imul_mem_8bit:
  2593.         call    store_instruction
  2594.         jmp     instruction_assembled
  2595.       imul_reg:
  2596.         lods    byte [esi]
  2597.         call    convert_register
  2598.         cmp     byte [esi],','
  2599.         je      imul_reg_
  2600.         mov     bl,al
  2601.         mov     al,ah
  2602.         cmp     al,1
  2603.         je      imul_reg_8bit
  2604.         call    operand_autodetect
  2605.         inc     [base_code]
  2606.         call    store_nomem_instruction
  2607.         jmp     instruction_assembled
  2608.       imul_reg_8bit:
  2609.         call    store_nomem_instruction
  2610.         jmp     instruction_assembled
  2611.       imul_reg_:
  2612.         mov     [postbyte_register],al
  2613.         inc     esi
  2614.         cmp     byte [esi],'('
  2615.         je      imul_reg_imm
  2616.         cmp     byte [esi],11h
  2617.         jne     imul_reg_noimm
  2618.         cmp     byte [esi+2],'('
  2619.         je      imul_reg_imm
  2620.       imul_reg_noimm:
  2621.         lods    byte [esi]
  2622.         call    get_size_operator
  2623.         cmp     al,10h
  2624.         je      imul_reg_reg
  2625.         cmp     al,'['
  2626.         jne     invalid_operand
  2627.       imul_reg_mem:
  2628.         call    get_address
  2629.         push    edx ebx ecx
  2630.         cmp     byte [esi],','
  2631.         je      imul_reg_mem_imm
  2632.         mov     al,[operand_size]
  2633.         call    operand_autodetect
  2634.         pop     ecx ebx edx
  2635.         mov     [base_code],0Fh
  2636.         mov     [extended_code],0AFh
  2637.         call    store_instruction
  2638.         jmp     instruction_assembled
  2639.       imul_reg_mem_imm:
  2640.         inc     esi
  2641.         lods    byte [esi]
  2642.         call    get_size_operator
  2643.         cmp     al,'('
  2644.         jne     invalid_operand
  2645.         mov     al,[operand_size]
  2646.         cmp     al,2
  2647.         je      imul_reg_mem_imm_16bit
  2648.         cmp     al,4
  2649.         je      imul_reg_mem_imm_32bit
  2650.         cmp     al,8
  2651.         je      imul_reg_mem_imm_64bit
  2652.         jmp     invalid_operand_size
  2653.       imul_reg_mem_imm_16bit:
  2654.         call    operand_16bit
  2655.         call    get_word_value
  2656.         mov     word [value],ax
  2657.         cmp     [value_type],0
  2658.         jne     imul_reg_mem_imm_16bit_store
  2659.         cmp     [size_declared],0
  2660.         jne     imul_reg_mem_imm_16bit_store
  2661.         cmp     ax,-80h
  2662.         jl      imul_reg_mem_imm_16bit_store
  2663.         cmp     ax,80h
  2664.         jl      imul_reg_mem_imm_8bit_store
  2665.       imul_reg_mem_imm_16bit_store:
  2666.         pop     ecx ebx edx
  2667.         mov     [base_code],69h
  2668.         call    store_instruction_with_imm16
  2669.         jmp     instruction_assembled
  2670.       imul_reg_mem_imm_32bit:
  2671.         call    operand_32bit
  2672.         call    get_dword_value
  2673.       imul_reg_mem_imm_32bit_ok:
  2674.         mov     dword [value],eax
  2675.         cmp     [value_type],0
  2676.         jne     imul_reg_mem_imm_32bit_store
  2677.         cmp     [size_declared],0
  2678.         jne     imul_reg_mem_imm_32bit_store
  2679.         cmp     eax,-80h
  2680.         jl      imul_reg_mem_imm_32bit_store
  2681.         cmp     eax,80h
  2682.         jl      imul_reg_mem_imm_8bit_store
  2683.       imul_reg_mem_imm_32bit_store:
  2684.         pop     ecx ebx edx
  2685.         mov     [base_code],69h
  2686.         call    store_instruction_with_imm32
  2687.         jmp     instruction_assembled
  2688.       imul_reg_mem_imm_64bit:
  2689.         cmp     [size_declared],0
  2690.         jne     long_immediate_not_encodable
  2691.         call    operand_64bit
  2692.         call    get_simm32
  2693.         cmp     [value_type],4
  2694.         jae     long_immediate_not_encodable
  2695.         jmp     imul_reg_mem_imm_32bit_ok
  2696.       imul_reg_mem_imm_8bit_store:
  2697.         pop     ecx ebx edx
  2698.         mov     [base_code],6Bh
  2699.         call    store_instruction_with_imm8
  2700.         jmp     instruction_assembled
  2701.       imul_reg_imm:
  2702.         mov     bl,[postbyte_register]
  2703.         dec     esi
  2704.         jmp     imul_reg_reg_imm
  2705.       imul_reg_reg:
  2706.         lods    byte [esi]
  2707.         call    convert_register
  2708.         mov     bl,al
  2709.         cmp     byte [esi],','
  2710.         je      imul_reg_reg_imm
  2711.         mov     al,ah
  2712.         call    operand_autodetect
  2713.         mov     [base_code],0Fh
  2714.         mov     [extended_code],0AFh
  2715.         call    store_nomem_instruction
  2716.         jmp     instruction_assembled
  2717.       imul_reg_reg_imm:
  2718.         inc     esi
  2719.         lods    byte [esi]
  2720.         call    get_size_operator
  2721.         cmp     al,'('
  2722.         jne     invalid_operand
  2723.         mov     al,[operand_size]
  2724.         cmp     al,2
  2725.         je      imul_reg_reg_imm_16bit
  2726.         cmp     al,4
  2727.         je      imul_reg_reg_imm_32bit
  2728.         cmp     al,8
  2729.         je      imul_reg_reg_imm_64bit
  2730.         jmp     invalid_operand_size
  2731.       imul_reg_reg_imm_16bit:
  2732.         call    operand_16bit
  2733.         push    ebx
  2734.         call    get_word_value
  2735.         pop     ebx
  2736.         mov     dx,ax
  2737.         cmp     [value_type],0
  2738.         jne     imul_reg_reg_imm_16bit_store
  2739.         cmp     [size_declared],0
  2740.         jne     imul_reg_reg_imm_16bit_store
  2741.         cmp     ax,-80h
  2742.         jl      imul_reg_reg_imm_16bit_store
  2743.         cmp     ax,80h
  2744.         jl      imul_reg_reg_imm_8bit_store
  2745.       imul_reg_reg_imm_16bit_store:
  2746.         mov     [base_code],69h
  2747.         call    store_nomem_instruction
  2748.         mov     ax,dx
  2749.         call    mark_relocation
  2750.         stos    word [edi]
  2751.         jmp     instruction_assembled
  2752.       imul_reg_reg_imm_32bit:
  2753.         call    operand_32bit
  2754.         push    ebx
  2755.         call    get_dword_value
  2756.       imul_reg_reg_imm_32bit_ok:
  2757.         pop     ebx
  2758.         mov     edx,eax
  2759.         cmp     [value_type],0
  2760.         jne     imul_reg_reg_imm_32bit_store
  2761.         cmp     [size_declared],0
  2762.         jne     imul_reg_reg_imm_32bit_store
  2763.         cmp     eax,-80h
  2764.         jl      imul_reg_reg_imm_32bit_store
  2765.         cmp     eax,80h
  2766.         jl      imul_reg_reg_imm_8bit_store
  2767.       imul_reg_reg_imm_32bit_store:
  2768.         mov     [base_code],69h
  2769.         call    store_nomem_instruction
  2770.         mov     eax,edx
  2771.         call    mark_relocation
  2772.         stos    dword [edi]
  2773.         jmp     instruction_assembled