diff options
author | Richard Sandiford <richard.sandiford@arm.com> | 2023-03-30 11:09:03 +0100 |
---|---|---|
committer | Richard Sandiford <richard.sandiford@arm.com> | 2023-03-30 11:09:03 +0100 |
commit | 363c5c8b973d72b4c2cba2c79ed0dcd98bc97934 (patch) | |
tree | 4e1fed03f5a5bb9f6e342d089c586d464b4218a2 | |
parent | 83dbd40dea2a00be854e4ffe204b9d456fcca17e (diff) | |
download | binutils-363c5c8b973d72b4c2cba2c79ed0dcd98bc97934.zip binutils-363c5c8b973d72b4c2cba2c79ed0dcd98bc97934.tar.gz binutils-363c5c8b973d72b4c2cba2c79ed0dcd98bc97934.tar.bz2 |
aarch64: Move vectype_to_qualifier further up
This patch just moves vectype_to_qualifier further up, so that
a later patch can call it at an earlier point in the file.
No behavioural change intended.
-rw-r--r-- | gas/config/tc-aarch64.c | 150 |
1 files changed, 75 insertions, 75 deletions
diff --git a/gas/config/tc-aarch64.c b/gas/config/tc-aarch64.c index 98091f5..7de0f5c 100644 --- a/gas/config/tc-aarch64.c +++ b/gas/config/tc-aarch64.c @@ -694,6 +694,81 @@ first_error_fmt (const char *format, ...) } } +/* Internal helper routine converting a vector_type_el structure *VECTYPE + to a corresponding operand qualifier. */ + +static inline aarch64_opnd_qualifier_t +vectype_to_qualifier (const struct vector_type_el *vectype) +{ + /* Element size in bytes indexed by vector_el_type. */ + const unsigned char ele_size[5] + = {1, 2, 4, 8, 16}; + const unsigned int ele_base [5] = + { + AARCH64_OPND_QLF_V_4B, + AARCH64_OPND_QLF_V_2H, + AARCH64_OPND_QLF_V_2S, + AARCH64_OPND_QLF_V_1D, + AARCH64_OPND_QLF_V_1Q + }; + + if (!vectype->defined || vectype->type == NT_invtype) + goto vectype_conversion_fail; + + if (vectype->type == NT_zero) + return AARCH64_OPND_QLF_P_Z; + if (vectype->type == NT_merge) + return AARCH64_OPND_QLF_P_M; + + gas_assert (vectype->type >= NT_b && vectype->type <= NT_q); + + if (vectype->defined & (NTA_HASINDEX | NTA_HASVARWIDTH)) + { + /* Special case S_4B. */ + if (vectype->type == NT_b && vectype->width == 4) + return AARCH64_OPND_QLF_S_4B; + + /* Special case S_2H. */ + if (vectype->type == NT_h && vectype->width == 2) + return AARCH64_OPND_QLF_S_2H; + + /* Vector element register. */ + return AARCH64_OPND_QLF_S_B + vectype->type; + } + else + { + /* Vector register. */ + int reg_size = ele_size[vectype->type] * vectype->width; + unsigned offset; + unsigned shift; + if (reg_size != 16 && reg_size != 8 && reg_size != 4) + goto vectype_conversion_fail; + + /* The conversion is by calculating the offset from the base operand + qualifier for the vector type. The operand qualifiers are regular + enough that the offset can established by shifting the vector width by + a vector-type dependent amount. */ + shift = 0; + if (vectype->type == NT_b) + shift = 3; + else if (vectype->type == NT_h || vectype->type == NT_s) + shift = 2; + else if (vectype->type >= NT_d) + shift = 1; + else + gas_assert (0); + + offset = ele_base [vectype->type] + (vectype->width >> shift); + gas_assert (AARCH64_OPND_QLF_V_4B <= offset + && offset <= AARCH64_OPND_QLF_V_1Q); + return offset; + } + + vectype_conversion_fail: + first_error (_("bad vector arrangement type")); + return AARCH64_OPND_QLF_NIL; +} + /* Register parsing. */ /* Generic register parser which is called by other specialized @@ -5905,81 +5980,6 @@ opcode_lookup (char *base, char *dot, char *end) return NULL; } -/* Internal helper routine converting a vector_type_el structure *VECTYPE - to a corresponding operand qualifier. */ - -static inline aarch64_opnd_qualifier_t -vectype_to_qualifier (const struct vector_type_el *vectype) -{ - /* Element size in bytes indexed by vector_el_type. */ - const unsigned char ele_size[5] - = {1, 2, 4, 8, 16}; - const unsigned int ele_base [5] = - { - AARCH64_OPND_QLF_V_4B, - AARCH64_OPND_QLF_V_2H, - AARCH64_OPND_QLF_V_2S, - AARCH64_OPND_QLF_V_1D, - AARCH64_OPND_QLF_V_1Q - }; - - if (!vectype->defined || vectype->type == NT_invtype) - goto vectype_conversion_fail; - - if (vectype->type == NT_zero) - return AARCH64_OPND_QLF_P_Z; - if (vectype->type == NT_merge) - return AARCH64_OPND_QLF_P_M; - - gas_assert (vectype->type >= NT_b && vectype->type <= NT_q); - - if (vectype->defined & (NTA_HASINDEX | NTA_HASVARWIDTH)) - { - /* Special case S_4B. */ - if (vectype->type == NT_b && vectype->width == 4) - return AARCH64_OPND_QLF_S_4B; - - /* Special case S_2H. */ - if (vectype->type == NT_h && vectype->width == 2) - return AARCH64_OPND_QLF_S_2H; - - /* Vector element register. */ - return AARCH64_OPND_QLF_S_B + vectype->type; - } - else - { - /* Vector register. */ - int reg_size = ele_size[vectype->type] * vectype->width; - unsigned offset; - unsigned shift; - if (reg_size != 16 && reg_size != 8 && reg_size != 4) - goto vectype_conversion_fail; - - /* The conversion is by calculating the offset from the base operand - qualifier for the vector type. The operand qualifiers are regular - enough that the offset can established by shifting the vector width by - a vector-type dependent amount. */ - shift = 0; - if (vectype->type == NT_b) - shift = 3; - else if (vectype->type == NT_h || vectype->type == NT_s) - shift = 2; - else if (vectype->type >= NT_d) - shift = 1; - else - gas_assert (0); - - offset = ele_base [vectype->type] + (vectype->width >> shift); - gas_assert (AARCH64_OPND_QLF_V_4B <= offset - && offset <= AARCH64_OPND_QLF_V_1Q); - return offset; - } - - vectype_conversion_fail: - first_error (_("bad vector arrangement type")); - return AARCH64_OPND_QLF_NIL; -} - /* Process an optional operand that is found omitted from the assembly line. Fill *OPERAND for such an operand of type TYPE. OPCODE points to the instruction's opcode entry while IDX is the index of this omitted operand. |