espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-26 22:07:58 +08:00
Code Issues Packages Projects Releases Wiki Activity

* config/tc-hppa.c (pa_ip): Add new codes 'cc', 'cd', 'cC', 'co',

Browse Source 
'@'.  Change autoincrement completers to fall through to cache control
        completers.

        * config/tc-hppa.c (pa_ip):  Remove unused args.  Add code to '?W'
        arg.
        (pa_parse_addb_64_cmpltr):  New function.

        * config/tc-hppa.c (pa_ip):  Change error message.
        (pa_ip,pa_parse_cmpb_64_cmpltr,pa_parse_cmpib_64_cmpltr)  Fix '?N' and
        '?Q' args to allow falling through.

        * config/tc-hppa.c (pa_ip):  Implement conditional codes "?N", "?Q".
        Remove unused conditional codes.
        (pa_parse_cmpb_64_cmpltr,pa_parse_cmpib_64_cmpltr):  New.
This commit is contained in:
Jeff Law
1999-10-10 07:57:30 +00:00
parent eca04c6a4a
commit d53d27516f
2 changed files with 429 additions and 70 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
gas/ChangeLog
View File

@ -1,3 +1,21 @@
Sun Oct 10 01:47:23 1999 Jerry Quinn <jerry.quinn.adv91@alum.dartmouth.org>
* config/tc-hppa.c (pa_ip): Add new codes 'cc', 'cd', 'cC', 'co',
'@'. Change autoincrement completers to fall through to cache control
completers.
* config/tc-hppa.c (pa_ip): Remove unused args. Add code to '?W'
arg.
(pa_parse_addb_64_cmpltr): New function.
* config/tc-hppa.c (pa_ip): Change error message.
(pa_ip,pa_parse_cmpb_64_cmpltr,pa_parse_cmpib_64_cmpltr) Fix '?N' and
'?Q' args to allow falling through.
* configtc-hppa.c (pa_ip): Implement conditional codes "?N", "?Q".
Remove unused conditional codes.
(pa_parse_cmpb_64_cmpltr,pa_parse_cmpib_64_cmpltr): New.
Thu Oct 7 00:23:53 MDT 1999 Diego Novillo <dnovillo@cygnus.com> Thu Oct 7 00:23:53 MDT 1999 Diego Novillo <dnovillo@cygnus.com>
* config/tc-d30v.c (CHAR_BIT): Define. * config/tc-d30v.c (CHAR_BIT): Define.

427
gas/config/tc-hppa.c
View File

@ -495,6 +495,9 @@ static int pa_parse_nonneg_cmpsub_cmpltr PARAMS ((char **, int));
static int pa_parse_neg_cmpsub_cmpltr PARAMS ((char **, int)); static int pa_parse_neg_cmpsub_cmpltr PARAMS ((char **, int));
static int pa_parse_neg_add_cmpltr PARAMS ((char **, int)); static int pa_parse_neg_add_cmpltr PARAMS ((char **, int));
static int pa_parse_nonneg_add_cmpltr PARAMS ((char **, int)); static int pa_parse_nonneg_add_cmpltr PARAMS ((char **, int));
static int pa_parse_cmpb_64_cmpltr PARAMS ((char **));
static int pa_parse_cmpib_64_cmpltr PARAMS ((char **));
static int pa_parse_addb_64_cmpltr PARAMS ((char **));
static void pa_block PARAMS ((int)); static void pa_block PARAMS ((int));
static void pa_brtab PARAMS ((int)); static void pa_brtab PARAMS ((int));
static void pa_try PARAMS ((int)); static void pa_try PARAMS ((int));
@ -1767,11 +1770,15 @@ pa_ip (str)
} }
else if (strncasecmp (s, "m", 1) == 0) else if (strncasecmp (s, "m", 1) == 0)
m = 1; m = 1;
else if (strncasecmp (s, "s", 1) == 0) else if ((strncasecmp (s, "s ", 2) == 0)
|| (strncasecmp (s, "s,", 2) == 0))
uu = 1; uu = 1;
/* When in strict mode this is a match failure. */ /* When in strict mode this is a match failure. */
else if (strict) else if (strict)
break; {
s--;
break;
}
else else
as_bad (_("Invalid Indexed Load Completer.")); as_bad (_("Invalid Indexed Load Completer."));
s++; s++;
@ -1787,33 +1794,40 @@ pa_ip (str)
case 'm': case 'm':
case 'q': case 'q':
case 'J': case 'J':
case 'c': case 'e':
{ {
int a = 0; int a = 0;
int m = 0; int m = 0;
if (*s == ',') if (*s == ',')
{ {
int found = 0;
s++; s++;
if (strncasecmp (s, "ma", 2) == 0) if (strncasecmp (s, "ma", 2) == 0)
{ {
a = 0; a = 0;
m = 1; m = 1;
found = 1;
} }
else if (strncasecmp (s, "mb", 2) == 0) else if (strncasecmp (s, "mb", 2) == 0)
{ {
a = 1; a = 1;
m = 1; m = 1;
found = 1;
} }
/* When in strict mode this is a match failure. */
else if (strict) /* When in strict mode, pass through for cache op. */
break; if (!found && strict)
s--;
else else
as_bad (_("Invalid Short Load/Store Completer.")); {
s += 2; if (!found)
as_bad (_("Invalid Short Load/Store Completer."));
s += 2;
}
} }
/* If we did not get a ma/mb completer, then we do not /* If we did not get a ma/mb completer, then we do not
consider this a positive match for 'cc'. */ consider this a positive match for 'ce'. */
else if (*args == 'c') else if (*args == 'e')
break; break;
/* 'J', 'm' and 'q' are the same, except for where they /* 'J', 'm' and 'q' are the same, except for where they
@ -1833,7 +1847,7 @@ pa_ip (str)
/* M bit is explicit in the major opcode. */ /* M bit is explicit in the major opcode. */
INSERT_FIELD_AND_CONTINUE (opcode, a, 2); INSERT_FIELD_AND_CONTINUE (opcode, a, 2);
} }
else if (*args == 'c') else if (*args == 'e')
{ {
/* Gross! Hide these values in the immediate field /* Gross! Hide these values in the immediate field
of the instruction, then pull them out later. */ of the instruction, then pull them out later. */
@ -1854,13 +1868,17 @@ pa_ip (str)
s++; s++;
if (strncasecmp (s, "m", 1) == 0) if (strncasecmp (s, "m", 1) == 0)
m = 1; m = 1;
else if (strncasecmp (s, "b", 1) == 0) else if ((strncasecmp (s, "b ", 2) == 0)
|| (strncasecmp (s, "b,", 2) == 0))
a = 0; a = 0;
else if (strncasecmp (s, "e", 1) == 0) else if (strncasecmp (s, "e", 1) == 0)
a = 1; a = 1;
/* When in strict mode this is a match failure. */ /* When in strict mode this is a match failure. */
else if (strict) else if (strict)
break; {
s--;
break;
}
else else
as_bad (_("Invalid Store Bytes Short Completer")); as_bad (_("Invalid Store Bytes Short Completer"));
s++; s++;
@ -1872,6 +1890,48 @@ pa_ip (str)
INSERT_FIELD_AND_CONTINUE (opcode, a, 13); INSERT_FIELD_AND_CONTINUE (opcode, a, 13);
} }
/* Handle load cache hint completer. */
case 'c':
cmpltr = 0;
if (!strncmp(s, ",sl", 3))
{
s += 3;
cmpltr = 2;
}
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 10);
/* Handle store cache hint completer. */
case 'C':
cmpltr = 0;
if (!strncmp(s, ",sl", 3))
{
s += 3;
cmpltr = 2;
}
else if (!strncmp(s, ",bc", 3))
{
s += 3;
cmpltr = 1;
}
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 10);
/* Handle load and clear cache hint completer. */
case 'd':
cmpltr = 0;
if (!strncmp(s, ",co", 3))
{
s += 3;
cmpltr = 1;
}
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 10);
/* Handle load ordering completer. */
case 'o':
if (strncmp(s, ",o", 2) != 0)
break;
s += 2;
continue;
/* Handle a branch gate completer. */ /* Handle a branch gate completer. */
case 'g': case 'g':
if (strncasecmp (s, ",gate", 5) != 0) if (strncasecmp (s, ",gate", 5) != 0)
@ -2310,22 +2370,25 @@ pa_ip (str)
cmpltr = pa_parse_nonneg_add_cmpltr (&s, 1); cmpltr = pa_parse_nonneg_add_cmpltr (&s, 1);
if (cmpltr < 0) if (cmpltr < 0)
{ {
as_bad (_("Invalid Compare/Subtract Condition: %c"), *s); as_bad (_("Invalid Add and Branch Condition: %c"), *s);
cmpltr = 0; cmpltr = 0;
} }
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13); INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13);
/* Handle negated add and branch condition. */ /* Handle 64 bit wide-mode add and branch condition. */
case 'D':
abort ();
/* Handle wide-mode non-negated add and branch condition. */
case 'w':
abort ();
/* Handle wide-mode negated add and branch condition. */
case 'W': case 'W':
abort(); cmpltr = pa_parse_addb_64_cmpltr (&s);
if (cmpltr < 0)
{
as_bad (_("Invalid Add and Branch Condition: %c"), *s);
cmpltr = 0;
}
else
{
/* Negated condition requires an opcode change. */
opcode |= (cmpltr & 8) << 24;
}
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr & 7, 13);
/* Handle a negated or non-negated add and branch /* Handle a negated or non-negated add and branch
condition. */ condition. */
@ -2481,24 +2544,7 @@ pa_ip (str)
} }
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13); INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13);
/* Handle a negated compare condition. */ /* Handle a 32 bit compare and branch condition. */
case 'T':
abort ();
/* Handle a 64 bit non-negated compare condition. */
case 'r':
abort ();
/* Handle a 64 bit negated compare condition. */
case 'R':
abort ();
/* Handle a 64 bit cmpib condition. */
case 'Q':
abort ();
/* Handle a negated or non-negated compare/subtract
condition. */
case 'n': case 'n':
save_s = s; save_s = s;
cmpltr = pa_parse_nonneg_cmpsub_cmpltr (&s, 1); cmpltr = pa_parse_nonneg_cmpsub_cmpltr (&s, 1);
@ -2508,7 +2554,7 @@ pa_ip (str)
cmpltr = pa_parse_neg_cmpsub_cmpltr (&s, 1); cmpltr = pa_parse_neg_cmpsub_cmpltr (&s, 1);
if (cmpltr < 0) if (cmpltr < 0)
{ {
as_bad (_("Invalid Compare/Subtract Condition.")); as_bad (_("Invalid Compare and Branch Condition."));
cmpltr = 0; cmpltr = 0;
} }
else else
@ -2520,6 +2566,29 @@ pa_ip (str)
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13); INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13);
/* Handle a 64 bit compare and branch condition. */
case 'N':
cmpltr = pa_parse_cmpb_64_cmpltr (&s);
if (cmpltr >= 0)
{
/* Negated condition requires an opcode change. */
opcode |= (cmpltr & 8) << 26;
}
else
/* Not a 64 bit cond. Give 32 bit a chance. */
break;
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr & 7, 13);
/* Handle a 64 bit cmpib condition. */
case 'Q':
cmpltr = pa_parse_cmpib_64_cmpltr (&s);
if (cmpltr < 0)
/* Not a 64 bit cond. Give 32 bit a chance. */
break;
INSERT_FIELD_AND_CONTINUE (opcode, cmpltr, 13);
/* Handle a logical instruction condition. */ /* Handle a logical instruction condition. */
case 'L': case 'L':
case 'l': case 'l':
@ -3149,6 +3218,13 @@ pa_ip (str)
s += 9; s += 9;
continue; continue;
/* Handle immediate value of 0 for ordered load/store instructions. */
case '@':
if (*s != '0')
break;
s++;
continue;
/* Handle a 2 bit shift count at 25. */ /* Handle a 2 bit shift count at 25. */
case '.': case '.':
num = pa_get_absolute_expression (&the_insn, &s); num = pa_get_absolute_expression (&the_insn, &s);
@ -5259,6 +5335,169 @@ pa_parse_neg_cmpsub_cmpltr (s, isbranch)
} }
/* Parse a 64 bit compare and branch completer returning the number (for
encoding in instrutions) of the given completer.
Nonnegated comparisons are returned as 0-7, negated comparisons are
returned as 8-15. */
static int
pa_parse_cmpb_64_cmpltr (s)
char **s;
{
int cmpltr;
char *name = *s + 1;
char c;
char *save_s = *s;
cmpltr = -1;
if (**s == ',')
{
*s += 1;
while (**s != ',' && **s != ' ' && **s != '\t')
*s += 1;
c = **s;
**s = 0x00;
if (strcmp (name, "*") == 0)
{
cmpltr = 0;
}
else if (strcmp (name, "*=") == 0)
{
cmpltr = 1;
}
else if (strcmp (name, "*<") == 0)
{
cmpltr = 2;
}
else if (strcmp (name, "*<=") == 0)
{
cmpltr = 3;
}
else if (strcmp (name, "*<<") == 0)
{
cmpltr = 4;
}
else if (strcmp (name, "*<<=") == 0)
{
cmpltr = 5;
}
else if (strcasecmp (name, "*sv") == 0)
{
cmpltr = 6;
}
else if (strcasecmp (name, "*od") == 0)
{
cmpltr = 7;
}
else if (strcasecmp (name, "*tr") == 0)
{
cmpltr = 8;
}
else if (strcmp (name, "*<>") == 0)
{
cmpltr = 9;
}
else if (strcmp (name, "*>=") == 0)
{
cmpltr = 10;
}
else if (strcmp (name, "*>") == 0)
{
cmpltr = 11;
}
else if (strcmp (name, "*>>=") == 0)
{
cmpltr = 12;
}
else if (strcmp (name, "*>>") == 0)
{
cmpltr = 13;
}
else if (strcasecmp (name, "*nsv") == 0)
{
cmpltr = 14;
}
else if (strcasecmp (name, "*ev") == 0)
{
cmpltr = 15;
}
else
{
cmpltr = -1;
}
**s = c;
}
return cmpltr;
}
/* Parse a 64 bit compare immediate and branch completer returning the number
(for encoding in instrutions) of the given completer. */
static int
pa_parse_cmpib_64_cmpltr (s)
char **s;
{
int cmpltr;
char *name = *s + 1;
char c;
char *save_s = *s;
cmpltr = -1;
if (**s == ',')
{
*s += 1;
while (**s != ',' && **s != ' ' && **s != '\t')
*s += 1;
c = **s;
**s = 0x00;
if (strcmp (name, "*<<") == 0)
{
cmpltr = 0;
}
else if (strcmp (name, "*=") == 0)
{
cmpltr = 1;
}
else if (strcmp (name, "*<") == 0)
{
cmpltr = 2;
}
else if (strcmp (name, "*<=") == 0)
{
cmpltr = 3;
}
else if (strcmp (name, "*>>=") == 0)
{
cmpltr = 4;
}
else if (strcmp (name, "*<>") == 0)
{
cmpltr = 5;
}
else if (strcasecmp (name, "*>=") == 0)
{
cmpltr = 6;
}
else if (strcasecmp (name, "*>") == 0)
{
cmpltr = 7;
}
else
{
cmpltr = -1;
}
**s = c;
}
return cmpltr;
}
/* Parse a non-negated addition completer returning the number /* Parse a non-negated addition completer returning the number
(for encoding in instrutions) of the given completer. (for encoding in instrutions) of the given completer.
@ -5409,6 +5648,108 @@ pa_parse_neg_add_cmpltr (s, isbranch)
return cmpltr; return cmpltr;
} }
/* Parse a 64 bit wide mode add and branch completer returning the number (for
encoding in instrutions) of the given completer. */
static int
pa_parse_addb_64_cmpltr (s)
char **s;
{
int cmpltr;
char *name = *s + 1;
char c;
char *save_s = *s;
int nullify = 0;
cmpltr = 0;
if (**s == ',')
{
*s += 1;
while (**s != ',' && **s != ' ' && **s != '\t')
*s += 1;
c = **s;
**s = 0x00;
if (strcmp (name, "=") == 0)
{
cmpltr = 1;
}
else if (strcmp (name, "<") == 0)
{
cmpltr = 2;
}
else if (strcmp (name, "<=") == 0)
{
cmpltr = 3;
}
else if (strcasecmp (name, "nuv") == 0)
{
cmpltr = 4;
}
else if (strcasecmp (name, "*=") == 0)
{
cmpltr = 5;
}
else if (strcasecmp (name, "*<") == 0)
{
cmpltr = 6;
}
else if (strcasecmp (name, "*<=") == 0)
{
cmpltr = 7;
}
else if (strcmp (name, "tr") == 0)
{
cmpltr = 8;
}
else if (strcmp (name, "<>") == 0)
{
cmpltr = 9;
}
else if (strcmp (name, ">=") == 0)
{
cmpltr = 10;
}
else if (strcmp (name, ">") == 0)
{
cmpltr = 11;
}
else if (strcasecmp (name, "uv") == 0)
{
cmpltr = 12;
}
else if (strcasecmp (name, "*<>") == 0)
{
cmpltr = 13;
}
else if (strcasecmp (name, "*>=") == 0)
{
cmpltr = 14;
}
else if (strcasecmp (name, "*>") == 0)
{
cmpltr = 15;
}
/* If we have something like addb,n then there is no condition
completer. */
else if (strcasecmp (name, "n") == 0)
{
cmpltr = 0;
nullify = 1;
}
else
{
cmpltr = -1;
}
**s = c;
}
/* Reset pointers if this was really a ,n for a branch instruction. */
if (nullify)
*s = save_s;
return cmpltr;
}
#ifdef OBJ_SOM #ifdef OBJ_SOM
/* Handle an alignment directive. Special so that we can update the /* Handle an alignment directive. Special so that we can update the
alignment of the subspace if necessary. */ alignment of the subspace if necessary. */