* v850-opc.c (v850_opcodes): Add "jCC" instructions (aliases for
[deliverable/binutils-gdb.git] / opcodes / v850-opc.c
index bf3baaa88dcbc8bc29c831d91d458014c20ca16d..4bc1ac45ff7c7dc121f5d0e668a01115f0892558 100644 (file)
+/* Assemble V850 instructions.
+   Copyright (C) 1996 Free Software Foundation, Inc.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+
 #include "ansidecl.h"
 #include "opcode/v850.h"
 
+/* Local insertion and extraction functions.  */
+static unsigned long insert_d9 PARAMS ((unsigned long, long, const char **));
+static long extract_d9 PARAMS ((unsigned long, int *));
+static unsigned long insert_d22 PARAMS ((unsigned long, long, const char **));
+static long extract_d22 PARAMS ((unsigned long, int *));
+static unsigned long insert_d16_15 PARAMS ((unsigned long, long,
+                                           const char **));
+static long extract_d16_15 PARAMS ((unsigned long, int *));
+static unsigned long insert_d8_7 PARAMS ((unsigned long, long, const char **));
+static long extract_d8_7 PARAMS ((unsigned long, int *));
+static unsigned long insert_d8_6 PARAMS ((unsigned long, long, const char **));
+static long extract_d8_6 PARAMS ((unsigned long, int *));
+
 /* regular opcode */
 #define OP(x)          ((x & 0x3f) << 5)
 #define OP_MASK                OP(0x3f)
 
 /* conditional branch opcode */
 #define BOP(x)         ((0x0b << 7) | (x & 0x0f))
-#define BOP_MASK       ((0x0b << 7) | 0x0f)
+#define BOP_MASK       ((0x0f << 7) | 0x0f)
 
 /* one-word opcodes */
 #define one(x)         ((unsigned int) (x))
 
 /* two-word opcodes */
-#define two(x,y)       ((unsigned int) (y) | ((unsigned int) (x) << 16))
+#define two(x,y)       ((unsigned int) (x) | ((unsigned int) (y) << 16))
 
 
 \f
 const struct v850_operand v850_operands[] = {
 #define UNUSED 0
-  { 0, 0, 0 }, 
+  { 0, 0, 0, 0, 0 }, 
 
 /* The R1 field in a format 1, 6, 7, or 9 insn. */
 #define R1     (UNUSED+1)
-  { 5, 0, OPERAND_REG }, 
+  { 5, 0, 0, 0, V850_OPERAND_REG }, 
 
 /* The R2 field in a format 1, 2, 4, 5, 6, 7, 9 insn. */
 #define R2     (R1+1)
-  { 5, 11, OPERAND_REG },
+  { 5, 11, 0, 0, V850_OPERAND_REG },
 
 /* The IMM5 field in a format 2 insn. */
 #define I5     (R2+1)
-  { 5, 0, OPERAND_NUM }, 
+  { 5, 0, 0, 0, V850_OPERAND_SIGNED }, 
+
+#define I5U    (I5+1)
+  { 5, 0, 0, 0, 0 },
 
-#define IMM16 field in a format 6 insn. */
-#define I16    (I5+1)
-  { 16, 0, OPERAND_NUM }, 
+/* The IMM16 field in a format 6 insn. */
+#define I16    (I5U+1)
+  { 16, 16, 0, 0, V850_OPERAND_SIGNED }, 
 
-/* The DISP6 field in a format 4 insn. */
-#define D6     (I16+1)
-  { 6, 1, OPERAND_NUM },
+/* The signed DISP7 field in a format 4 insn. */
+#define D7     (I16+1)
+  { 7, 0, 0, 0, 0},
 
-/* The DISP8 field in a format 3 insn. */
-#define D8     (D6+1)
-  { 9, 0, OPERAND_NUM },
+/* The DISP9 field in a format 3 insn. */
+#define D9     (D7+1)
+  { 9, 0, insert_d9, extract_d9, V850_OPERAND_SIGNED | V850_OPERAND_DISP },
 
 /* The DISP16 field in a format 6 insn. */
-#define D16    (D8+1)
-  { 16, 0, OPERAND_NUM }, 
+#define D16_15 (D9+1)
+  { 16, 16, insert_d16_15, extract_d16_15, V850_OPERAND_SIGNED }, 
 
 /* The DISP22 field in a format 4 insn. */
-#define D22    (D16+1)
-  { 16, 0, OPERAND_NUM },
+#define D22    (D16_15+1)
+  { 22, 0, insert_d22, extract_d22, V850_OPERAND_SIGNED | V850_OPERAND_DISP },
 
 #define B3     (D22+1)
 /* The 3 bit immediate field in format 8 insn.  */
-  { 3, 3, OPERAND_NUM }
+  { 3, 11, 0, 0, 0 },
+
+#define CCCC   (B3+1)
+/* The 4 bit condition code in a setf instruction */
+  { 4, 0, 0, 0, V850_OPERAND_CC },
+
+/* The unsigned DISP8_7 field in a format 4 insn. */
+#define D8_7   (CCCC+1)
+  { 8, 0, insert_d8_7, extract_d8_7, 0 },
+
+/* The unsigned DISP8_6 field in a format 4 insn. */
+#define D8_6   (D8_7+1)
+  { 8, 0, insert_d8_6, extract_d8_6, 0 },
+
+/* System register operands.  */
+#define SR1    (D8_6+1)
+  { 5, 0, 0, 0, V850_OPERAND_SRG },
+
+/* EP Register.  */
+#define EP     (SR1+1)
+  { 0, 0, 0, 0, V850_OPERAND_EP },
+
+/* The IMM16 field (unsigned0 in a format 6 insn. */
+#define I16U   (EP+1)
+  { 16, 16, 0, 0, 0}, 
+
+/* The R2 field as a system register.  */
+#define SR2    (I16U+1)
+  { 5, 11, 0, 0, V850_OPERAND_SRG },
+
+/* The DISP16 field in a format 8 insn. */
+#define D16    (SR2+1)
+  { 16, 16, 0, 0, V850_OPERAND_SIGNED }, 
+
 } ; 
 
 \f
@@ -66,19 +132,32 @@ const struct v850_operand v850_operands[] = {
 #define IF2    {I5, R2}
 
 /* conditional branch instruction format (Format III) */
-#define IF3    {D8}
+#define IF3    {D9}
 
 /* 16-bit load/store instruction (Format IV) */
-#define IF4    {D6}
+#define IF4A   {D7, EP, R2}
+#define IF4B   {R2, D7, EP}
+#define IF4C   {D8_7, EP, R2}
+#define IF4D   {R2, D8_7, EP}
+#define IF4E   {D8_6, EP, R2}
+#define IF4F   {R2, D8_6, EP}
 
 /* Jump instruction (Format V) */
 #define IF5    {D22}
 
 /* 3 operand instruction (Format VI) */
-#define IF6    {R1, R2, I16}
+#define IF6    {I16, R1, R2}
+
+/* 3 operand instruction (Format VI) */
+#define IF6U   {I16U, R1, R2}
+
+/* 32-bit load/store half/word instruction (Format VII) */
+#define IF7A   {D16_15, R1, R2}
+#define IF7B   {R2, D16_15, R1}
 
-/* 32-bit load/store instruction (Format VII) */
-#define IF7    {R1, R2, D16}
+/* 32-bit load/store byte instruction (Format VII) */
+#define IF7C   {D16, R1, R2}
+#define IF7D   {R2, D16, R1}
 
 /* Bit manipulation function.  */
 
@@ -102,100 +181,271 @@ const struct v850_operand v850_operands[] = {
    sorted by major opcode.  */
 
 const struct v850_opcode v850_opcodes[] = {
+{ "breakpoint",        0xffff,                 0xffff,         0,    0 },
 /* load/store instructions */
-/* XXX */
+{ "sld.b",     one(0x0300),            one(0x0780),    IF4A, 1 },
+{ "sld.h",     one(0x0400),            one(0x0780),    IF4C, 1 },
+{ "sld.w",     one(0x0500),            one(0x0781),    IF4E, 1 },
+{ "sst.b",     one(0x0380),            one(0x0780),    IF4B, 2 },
+{ "sst.h",     one(0x0480),            one(0x0780),    IF4D, 2 },
+{ "sst.w",     one(0x0501),            one(0x0781),    IF4F, 2 },
+
+{ "ld.b",      two(0x0700,0x0000),     two (0x07e0,0x0000),    IF7C, 1 },
+{ "ld.h",      two(0x0720,0x0000),     two (0x07e0,0x0001),    IF7A, 1 },
+{ "ld.w",      two(0x0720,0x0001),     two (0x07e0,0x0001),    IF7A, 1 },
+{ "st.b",      two(0x0740,0x0000),     two (0x07e0,0x0000),    IF7D, 2 },
+{ "st.h",      two(0x0760,0x0000),     two (0x07e0,0x0001),    IF7B, 2 },
+{ "st.w",      two(0x0760,0x0001),     two (0x07e0,0x0001),    IF7B, 2 },
 
 /* arithmetic operation instructions */
-{ "mov",        OP(0x00),              OP_MASK,        IF1 },
-{ "mov",       OP(0x08),               OP_MASK,        IF2 },
-{ "movea",     OP(0x31),               OP_MASK,        IF6 },
-{ "movhi",     OP(0x31),               OP_MASK,        IF6 },
-{ "add",       OP(0x0e),               OP_MASK,        IF1 },
-{ "add",       OP(0x12),               OP_MASK,        IF2 },
-{ "addi",      OP(0x30),               OP_MASK,        IF6 },
-{ "sub",       OP(0x0d),               OP_MASK,        IF1 },
-{ "subr",      OP(0x0c),               OP_MASK,        IF1 },
-{ "mulh",      OP(0x07),               OP_MASK,        IF1 },
-{ "mulh",      OP(0x17),               OP_MASK,        IF2 },
-{ "mulhi",     OP(0x37),               OP_MASK,        IF6 },
-{ "divh",      OP(0x02),               OP_MASK,        IF1 },
-{ "cmp",       OP(0x0f),               OP_MASK,        IF1 },
-{ "cmp",       OP(0x13),               OP_MASK,        IF2 },
-/* XXX missing setf */
+{ "nop",       one(0x00),              one(0xffff),            {0}, 0 },
+{ "mov",        OP(0x00),              OP_MASK,        IF1, 0 },
+{ "mov",       OP(0x10),               OP_MASK,        IF2, 0 },
+{ "movea",     OP(0x31),               OP_MASK,        IF6, 0 },
+{ "movhi",     OP(0x32),               OP_MASK,        IF6, 0 },
+{ "add",       OP(0x0e),               OP_MASK,        IF1, 0 },
+{ "add",       OP(0x12),               OP_MASK,        IF2, 0 },
+{ "addi",      OP(0x30),               OP_MASK,        IF6, 0 },
+{ "sub",       OP(0x0d),               OP_MASK,        IF1, 0 },
+{ "subr",      OP(0x0c),               OP_MASK,        IF1, 0 },
+{ "mulh",      OP(0x07),               OP_MASK,        IF1, 0 },
+{ "mulh",      OP(0x17),               OP_MASK,        IF2, 0 },
+{ "mulhi",     OP(0x37),               OP_MASK,        IF6, 0 },
+{ "divh",      OP(0x02),               OP_MASK,        IF1, 0 },
+{ "cmp",       OP(0x0f),               OP_MASK,        IF1, 0 },
+{ "cmp",       OP(0x13),               OP_MASK,        IF2, 0 },
+{ "setf",      two(0x07e0,0x0000),     two(0x07f0,0xffff), {CCCC,R2}, 0 },
 
 /* saturated operation instructions */
-{ "satadd",    OP(0x06),               OP_MASK,        IF1 },
-{ "satadd",    OP(0x11),               OP_MASK,        IF2 },
-{ "satsub",    OP(0x05),               OP_MASK,        IF1 },
-{ "satsubi",   OP(0x33),               OP_MASK,        IF6 },
-{ "satsubr",   OP(0x04),               OP_MASK,        IF1 },
+{ "satadd",    OP(0x06),               OP_MASK,        IF1, 0 },
+{ "satadd",    OP(0x11),               OP_MASK,        IF2, 0 },
+{ "satsub",    OP(0x05),               OP_MASK,        IF1, 0 },
+{ "satsubi",   OP(0x33),               OP_MASK,        IF6, 0 },
+{ "satsubr",   OP(0x04),               OP_MASK,        IF1, 0 },
 
 /* logical operation instructions */
-{ "tst",       OP(0x0b),               OP_MASK,        IF1 },
-{ "or",                OP(0x08),               OP_MASK,        IF1 },
-{ "ori",       OP(0x34),               OP_MASK,        IF6 },
-{ "and",       OP(0x0a),               OP_MASK,        IF1 },
-{ "andi",      OP(0x36),               OP_MASK,        IF6 },
-{ "xor",       OP(0x09),               OP_MASK,        IF1 },
-{ "xori",      OP(0x35),               OP_MASK,        IF6 },
-{ "not",       OP(0x01),               OP_MASK,        IF1 },
-{ "sar",       OP(0x15),               OP_MASK,        IF2 },
-{ "sar",       two(0x07e0,0x00a0),     two(0x07e0,0xffff),     {R1,R2} },
-{ "shl",       OP(0x16),               OP_MASK,                IF2 },
-{ "shl",       two(0x07e0,0x00c0),     two(0x07e0,0xffff),     {R1,R2} },
-{ "shr",       OP(0x14),               OP_MASK,                IF2 },
-{ "shr",       two(0x07e0,0x0080),     two(0x07e0,0xffff),     {R1,R2} },
+{ "tst",       OP(0x0b),               OP_MASK,        IF1, 0 },
+{ "or",                OP(0x08),               OP_MASK,        IF1, 0 },
+{ "ori",       OP(0x34),               OP_MASK,        IF6U, 0 },
+{ "and",       OP(0x0a),               OP_MASK,        IF1, 0 },
+{ "andi",      OP(0x36),               OP_MASK,        IF6U, 0 },
+{ "xor",       OP(0x09),               OP_MASK,        IF1, 0 },
+{ "xori",      OP(0x35),               OP_MASK,        IF6U, 0 },
+{ "not",       OP(0x01),               OP_MASK,        IF1, 0 },
+{ "sar",       OP(0x15),               OP_MASK,        {I5U, R2}, 0 },
+{ "sar",       two(0x07e0,0x00a0),     two(0x07e0,0xffff),     {R1,R2}, 0 },
+{ "shl",       OP(0x16),               OP_MASK,                {I5U, R2}, 0 },
+{ "shl",       two(0x07e0,0x00c0),     two(0x07e0,0xffff),     {R1,R2}, 0 },
+{ "shr",       OP(0x14),               OP_MASK,                {I5U, R2}, 0 },
+{ "shr",       two(0x07e0,0x0080),     two(0x07e0,0xffff),     {R1,R2}, 0 },
 
 /* branch instructions */
        /* signed integer */
-{ "bgt",       BOP(0xf),               BOP_MASK,       IF3 },
-{ "bge",       BOP(0xe),               BOP_MASK,       IF3 },
-{ "blt",       BOP(0x6),               BOP_MASK,       IF3 },
-{ "ble",       BOP(0x7),               BOP_MASK,       IF3 },
+{ "bgt",       BOP(0xf),               BOP_MASK,       IF3, 0 },
+{ "bge",       BOP(0xe),               BOP_MASK,       IF3, 0 },
+{ "blt",       BOP(0x6),               BOP_MASK,       IF3, 0 },
+{ "ble",       BOP(0x7),               BOP_MASK,       IF3, 0 },
        /* unsigned integer */
-{ "bh",                BOP(0xb),               BOP_MASK,       IF3 },
-{ "bnh",       BOP(0x3),               BOP_MASK,       IF3 },
-{ "bl",                BOP(0x1),               BOP_MASK,       IF3 },
-{ "bnl",       BOP(0x9),               BOP_MASK,       IF3 },
+{ "bh",                BOP(0xb),               BOP_MASK,       IF3, 0 },
+{ "bnh",       BOP(0x3),               BOP_MASK,       IF3, 0 },
+{ "bl",                BOP(0x1),               BOP_MASK,       IF3, 0 },
+{ "bnl",       BOP(0x9),               BOP_MASK,       IF3, 0 },
        /* common */
-{ "be",                BOP(0x2),               BOP_MASK,       IF3 },
-{ "bne",       BOP(0xa),               BOP_MASK,       IF3 },
+{ "be",                BOP(0x2),               BOP_MASK,       IF3, 0 },
+{ "bne",       BOP(0xa),               BOP_MASK,       IF3, 0 },
        /* others */
-{ "bv",                BOP(0x0),               BOP_MASK,       IF3 },
-{ "bnv",       BOP(0x8),               BOP_MASK,       IF3 },
-{ "bn",                BOP(0x4),               BOP_MASK,       IF3 },
-{ "bp",                BOP(0xc),               BOP_MASK,       IF3 },
-{ "bc",                BOP(0x1),               BOP_MASK,       IF3 },
-{ "bnc",       BOP(0x9),               BOP_MASK,       IF3 },
-{ "bz",                BOP(0x2),               BOP_MASK,       IF3 },
-{ "bnz",       BOP(0xa),               BOP_MASK,       IF3 },
-{ "br",                BOP(0x5),               BOP_MASK,       IF3 },
-{ "bsa",       BOP(0xd),               BOP_MASK,       IF3 },
-
-{ "jmp",       one(0x0060),            one(0xffe0),    R1 },
-{ "jarl",      one(0x0780),            one(0xf83f),    { R2,D22 } }, 
-{ "jr",                one(0x0780),            one(0xffe0),    { D22 } },
+{ "bv",                BOP(0x0),               BOP_MASK,       IF3, 0 },
+{ "bnv",       BOP(0x8),               BOP_MASK,       IF3, 0 },
+{ "bn",                BOP(0x4),               BOP_MASK,       IF3, 0 },
+{ "bp",                BOP(0xc),               BOP_MASK,       IF3, 0 },
+{ "bc",                BOP(0x1),               BOP_MASK,       IF3, 0 },
+{ "bnc",       BOP(0x9),               BOP_MASK,       IF3, 0 },
+{ "bz",                BOP(0x2),               BOP_MASK,       IF3, 0 },
+{ "bnz",       BOP(0xa),               BOP_MASK,       IF3, 0 },
+{ "br",                BOP(0x5),               BOP_MASK,       IF3, 0 },
+{ "bsa",       BOP(0xd),               BOP_MASK,       IF3, 0 },
+
+/* Branch aliases */
+       /* signed integer */
+{ "jgt",       BOP(0xf),               BOP_MASK,       IF3, 0 },
+{ "jge",       BOP(0xe),               BOP_MASK,       IF3, 0 },
+{ "jlt",       BOP(0x6),               BOP_MASK,       IF3, 0 },
+{ "jle",       BOP(0x7),               BOP_MASK,       IF3, 0 },
+       /* unsigned integer */
+{ "jh",                BOP(0xb),               BOP_MASK,       IF3, 0 },
+{ "jnh",       BOP(0x3),               BOP_MASK,       IF3, 0 },
+{ "jl",                BOP(0x1),               BOP_MASK,       IF3, 0 },
+{ "jnl",       BOP(0x9),               BOP_MASK,       IF3, 0 },
+       /* common */
+{ "je",                BOP(0x2),               BOP_MASK,       IF3, 0 },
+{ "jne",       BOP(0xa),               BOP_MASK,       IF3, 0 },
+       /* others */
+{ "jv",                BOP(0x0),               BOP_MASK,       IF3, 0 },
+{ "jnv",       BOP(0x8),               BOP_MASK,       IF3, 0 },
+{ "jn",                BOP(0x4),               BOP_MASK,       IF3, 0 },
+{ "jp",                BOP(0xc),               BOP_MASK,       IF3, 0 },
+{ "jc",                BOP(0x1),               BOP_MASK,       IF3, 0 },
+{ "jnc",       BOP(0x9),               BOP_MASK,       IF3, 0 },
+{ "jz",                BOP(0x2),               BOP_MASK,       IF3, 0 },
+{ "jnz",       BOP(0xa),               BOP_MASK,       IF3, 0 },
+{ "jsa",       BOP(0xd),               BOP_MASK,       IF3, 0 },
+
+{ "jmp",       one(0x0060),            one(0xffe0),    { R1}, 1 },
+{ "jr",                one(0x0780),            two(0xffc0,0x0001),{ D22 }, 0 },
+{ "jarl",      one(0x0780),            two(0x07c0,0x0001),{ D22, R2 }, 0 }, 
 
 /* bit manipulation instructions */
-{ "set1",      two(0x07c0,0x0000),     two(0xc7e0,0x0000),     {B3, R1, D16} },
-{ "not1",      two(0x47c0,0x0000),     two(0xc7e0,0x0000),     {B3, R1, D16} },
-{ "clr1",      two(0x87c0,0x0000),     two(0xc7e0,0x0000),     {B3, R1, D16} },
-{ "tst1",      two(0xc7c0,0x0000),     two(0xc7e0,0x0000),     {B3, R1, D16} },
+{ "set1",      two(0x07c0,0x0000),     two(0xc7e0,0x0000),     {B3, D16, R1}, 2 },
+{ "not1",      two(0x47c0,0x0000),     two(0xc7e0,0x0000),     {B3, D16, R1}, 2 },
+{ "clr1",      two(0x87c0,0x0000),     two(0xc7e0,0x0000),     {B3, D16, R1}, 2 },
+{ "tst1",      two(0xc7c0,0x0000),     two(0xc7e0,0x0000),     {B3, D16, R1}, 2 },
 
 /* special instructions */
-{ "di",                two(0x07e0,0x0160),     two(0xffff,0xffff),     {0} },
-{ "ei",                two(0x87e0,0x0160),     two(0xffff,0xffff),     {0} },
-{ "halt",      two(0x07e0,0x0120),     two(0xffff,0xffff),     {0} },
-{ "reti",      two(0x07e0,0x0140),     two(0xffff,0xffff),     {0} },
-#if 0
-{ "trap",      two(0x07e0,0x0100),     two(0xffe0,0xffff),     {I5} },
-#endif
-{ "ldsr",      two(0x07e0,0x0020),     two(0x07e0,0xffff),     {0} },
-{ "stsr",      two(0x07e0,0x0040),     two(0x07e0,0xffff),     {0} },
-{ "nop",       one(0x00),              one(0xff),              {0} },
+{ "di",                two(0x07e0,0x0160),     two(0xffff,0xffff),     {0}, 0 },
+{ "ei",                two(0x87e0,0x0160),     two(0xffff,0xffff),     {0}, 0 },
+{ "halt",      two(0x07e0,0x0120),     two(0xffff,0xffff),     {0}, 0 },
+{ "reti",      two(0x07e0,0x0140),     two(0xffff,0xffff),     {0}, 0 },
+{ "trap",      two(0x07e0,0x0100),     two(0xffe0,0xffff),     {I5U}, 0 },
+{ "ldsr",      two(0x07e0,0x0020),     two(0x07e0,0xffff),     {R1,SR2}, 0 },
+{ "stsr",      two(0x07e0,0x0040),     two(0x07e0,0xffff),     {SR1,R2}, 0 },
+{ 0, 0, 0, {0}, 0 },
 
 } ;
 
 const int v850_num_opcodes =
   sizeof (v850_opcodes) / sizeof (v850_opcodes[0]);
 
+\f
+/* The functions used to insert and extract complicated operands.  */
+
+static unsigned long
+insert_d9 (insn, value, errmsg)
+     unsigned long insn;
+     long value;
+     const char **errmsg;
+{
+  if (value > 0xff || value < -0x100)
+    *errmsg = "branch value out of range";
+
+  if ((value % 2) != 0)
+    *errmsg = "branch to odd offset";
+
+  return (insn | ((value & 0x1f0) << 7) | ((value & 0x0e) << 3));
+}
+
+static long
+extract_d9 (insn, invalid)
+     unsigned long insn;
+     int *invalid;
+{
+  long ret = ((insn & 0xf800) >> 7) | ((insn & 0x0070) >> 3);
+
+  if ((insn & 0x8000) != 0)
+    ret -= 0x0200;
+
+  return ret;
+}
+
+static unsigned long
+insert_d22 (insn, value, errmsg)
+     unsigned long insn;
+     long value;
+     const char **errmsg;
+{
+  if (value > 0x1fffff || value < -0x200000)
+    *errmsg = "branch value out of range";
+
+  if ((value % 2) != 0)
+    *errmsg = "branch to odd offset";
+
+  return (insn | ((value & 0xfffe) << 16) | ((value & 0x3f0000) >> 16));
+}
+
+static long
+extract_d22 (insn, invalid)
+     unsigned long insn;
+     int *invalid;
+{
+  int ret = ((insn & 0xfffe0000) >> 16) | ((insn & 0x3f) << 16);
+
+  return ((ret << 10) >> 10);
+}
+
+static unsigned long
+insert_d16_15 (insn, value, errmsg)
+     unsigned long insn;
+     long value;
+     const char **errmsg;
+{
+  if (value > 0x7fff || value < -0x8000)
+    *errmsg = "value out of range";
+
+  if ((value % 2) != 0)
+    *errmsg = "load/store half/word at odd offset";
+
+  return (insn | ((value & 0xfffe) << 16));
+}
+
+static long
+extract_d16_15 (insn, invalid)
+     unsigned long insn;
+     int *invalid;
+{
+  int ret = ((insn & 0xfffe0000) >> 16);
+
+  return ((ret << 16) >> 16);
+}
+
+static unsigned long
+insert_d8_7 (insn, value, errmsg)
+     unsigned long insn;
+     long value;
+     const char **errmsg;
+{
+  if (value > 0xff || value < 0)
+    *errmsg = "short load/store half value out of range";
+
+  if ((value % 2) != 0)
+    *errmsg = "short load/store half at odd offset";
+
+  value >>= 1;
+
+  return (insn | (value & 0x7f));
+}
+
+static long
+extract_d8_7 (insn, invalid)
+     unsigned long insn;
+     int *invalid;
+{
+  int ret = (insn & 0x7f);
+
+  return ret << 1;
+}
+
+static unsigned long
+insert_d8_6 (insn, value, errmsg)
+     unsigned long insn;
+     long value;
+     const char **errmsg;
+{
+  if (value > 0xff || value < 0)
+    *errmsg = "short load/store word value out of range";
+
+  if ((value % 4) != 0)
+    *errmsg = "short load/store word at odd offset";
+
+  value >>= 2;
+
+  return (insn | (value & 0x7e));
+}
+
+static long
+extract_d8_6 (insn, invalid)
+     unsigned long insn;
+     int *invalid;
+{
+  int ret = (insn & 0x7e);
+
+  return ret << 1;
+}
This page took 0.030865 seconds and 4 git commands to generate.