Remove duplicate code and provide a function for generating internally consistent...

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 6e7dc19375e0ce09f957b6a064e4a9c580148473..0433a7ce35d2d34e099749d20d436374759e1bf8 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,21 @@
+2004-05-06  Nick Clifton  <nickc@redhat.com>
+
+       * messages (as_internal_value_out_of_range): Print a message about
+       a value being out of range.  Be consistent about whether the
+       values are printed in decimal or hexadecimal.
+       (as_warn_value_out_of_range): Generate a warning message about an
+       out of range value.
+       (as_bad_value_out_of_range): Generate an error message about an
+       out of range value.
+       * as.h: Prototype the new functions.
+       * config/tc-alpha.c (insert_operand): Use new function.
+       * config/tc-arc.c (arc_insert_operand): Likewise.
+       * config/tc-mn10200.c (mn10200_insert_operand): Likewise.
+       * config/tc-mn10300.c (mn10300_insert_operand): Likewise.
+       * config/tc-ppc.c (ppc_insert_operand): Likewise.
+       * config/tc-s390.c (s390_insert_operand): Likewise.
+       * config/tc-v850.c (v850_insert_operand): Likewise.
+
 2004-05-05  Alexandre Oliva  <aoliva@redhat.com>
 
        * configure.in: Set em=linux for frv-*-*linux*.

diff --git a/gas/as.h b/gas/as.h
index 890ecd8f1056f78fa66c71e338416069a31a8fd9..1f9fd60a3933973f9e11f1c619ac5b1a636cbfc7 100644 (file)
--- a/gas/as.h
+++ b/gas/as.h
@@ -562,6 +562,9 @@ void sprint_value (char *buf, addressT value);
 int had_errors (void);
 int had_warnings (void);
 
+void as_warn_value_out_of_range (char *, offsetT, offsetT, offsetT, char *, unsigned);
+void as_bad_value_out_of_range (char *, offsetT, offsetT, offsetT, char *, unsigned);
+
 void print_version_id (void);
 char *app_push (void);
 char *atof_ieee (char *str, int what_kind, LITTLENUM_TYPE * words);

diff --git a/gas/config/tc-alpha.c b/gas/config/tc-alpha.c
index 93600473ffcf8d352cf6169680db8fb93ff09020..7e553fbca23b055a108a9f955df4f46288243f99 100644 (file)
--- a/gas/config/tc-alpha.c
+++ b/gas/config/tc-alpha.c
@@ -2373,17 +2373,7 @@ insert_operand (insn, operand, val, file, line)
        }
 
       if (val < min || val > max)
-       {
-         const char *err =
-           _("operand out of range (%s not between %d and %d)");
-         char buf[sizeof (val) * 3 + 2];
-
-         sprint_value (buf, val);
-         if (file)
-           as_warn_where (file, line, err, buf, min, max);
-         else
-           as_warn (err, buf, min, max);
-       }
+       as_warn_value_out_of_range (_("operand"), val, min, max, file, line);
     }
 
   if (operand->insert)

diff --git a/gas/config/tc-arc.c b/gas/config/tc-arc.c
index 60cfa34652ade38d23d451dcb94cad786b22bb27..be1e93ccf267d72573f63b1c5d6c81165c5ee7ff 100644 (file)
--- a/gas/config/tc-arc.c
+++ b/gas/config/tc-arc.c
@@ -328,17 +328,7 @@ arc_insert_operand (insn, operand, mods, reg, val, file, line)
        test = val;
 
       if (test < (offsetT) min || test > (offsetT) max)
-       {
-         const char *err =
-           "operand out of range (%s not between %ld and %ld)";
-         char buf[100];
-
-         sprint_value (buf, test);
-         if (file == (char *) NULL)
-           as_warn (err, buf, min, max);
-         else
-           as_warn_where (file, line, err, buf, min, max);
-       }
+       as_warn_value_out_of_range (_("operand"), test, (offsetT) min, (offsetT) max, file, line);
     }
 
   if (operand->insert)

diff --git a/gas/config/tc-mn10200.c b/gas/config/tc-mn10200.c
index 642069493b4afd974f61b4c8c4220ddd89c1d88d..64dd0992142081be82a950a3fe4c7599f6732e51 100644 (file)
--- a/gas/config/tc-mn10200.c
+++ b/gas/config/tc-mn10200.c
@@ -1342,17 +1342,7 @@ mn10200_insert_operand (insnp, extensionp, operand, val, file, line, shift)
       test = val;
 
       if (test < (offsetT) min || test > (offsetT) max)
-        {
-          const char *err =
-            _("operand out of range (%s not between %ld and %ld)");
-          char buf[100];
-
-          sprint_value (buf, test);
-          if (file == (char *) NULL)
-            as_warn (err, buf, min, max);
-          else
-            as_warn_where (file, line, err, buf, min, max);
-        }
+       as_warn_value_out_of_range (_("operand"), test, (offsetT) min, (offsetT) max, file, line);
     }
 
   if ((operand->flags & MN10200_OPERAND_EXTENDED) == 0)

diff --git a/gas/config/tc-mn10300.c b/gas/config/tc-mn10300.c
index 832464617d2bb1adea6a97d03823ecef1a9b0e01..36e6a058ace2f21bc2944e44d65db7b578f88538 100644 (file)
--- a/gas/config/tc-mn10300.c
+++ b/gas/config/tc-mn10300.c
@@ -2584,17 +2584,7 @@ mn10300_insert_operand (insnp, extensionp, operand, val, file, line, shift)
       test = val;
 
       if (test < (offsetT) min || test > (offsetT) max)
-       {
-         const char *err =
-           _("operand out of range (%s not between %ld and %ld)");
-         char buf[100];
-
-         sprint_value (buf, test);
-         if (file == (char *) NULL)
-           as_warn (err, buf, min, max);
-         else
-           as_warn_where (file, line, err, buf, min, max);
-       }
+       as_warn_value_out_of_range (_("operand"), test, (offsetT) min, (offsetT) max, file, line);
     }
 
   if ((operand->flags & MN10300_OPERAND_SPLIT) != 0)

diff --git a/gas/config/tc-ppc.c b/gas/config/tc-ppc.c
index 66366a57d23cea25fcd4d3688095bc8e971ab71e..fe66d2ba2dcec46a59f9ef30b124d4aad795e45f 100644 (file)
--- a/gas/config/tc-ppc.c
+++ b/gas/config/tc-ppc.c
@@ -1457,14 +1457,7 @@ ppc_insert_operand (insn, operand, val, file, line)
        test = val;
 
       if (test < (offsetT) min || test > (offsetT) max)
-       {
-         const char *err =
-           _("operand out of range (%s not between %ld and %ld)");
-         char buf[100];
-
-         sprint_value (buf, test);
-         as_bad_where (file, line, err, buf, min, max);
-       }
+       as_bad_value_out_of_range (_("operand"), test, (offsetT) min, (offsetT) max, file, line);
     }
 
   if (operand->insert)

diff --git a/gas/config/tc-s390.c b/gas/config/tc-s390.c
index 4fafbec35fe494e408d078c1e6467cf01585227c..2cb8cf1aadab4f024ae6ac7ad7531f3816897d9b 100644 (file)
--- a/gas/config/tc-s390.c
+++ b/gas/config/tc-s390.c
@@ -601,21 +601,15 @@ s390_insert_operand (insn, operand, val, file, line)
       /* Check for underflow / overflow.  */
       if (uval < min || uval > max)
        {
-         const char *err =
-           "operand out of range (%s not between %ld and %ld)";
-         char buf[100];
-
          if (operand->flags & S390_OPERAND_LENGTH)
            {
              uval++;
              min++;
              max++;
            }
-         sprint_value (buf, uval);
-         if (file == (char *) NULL)
-           as_bad (err, buf, (int) min, (int) max);
-         else
-           as_bad_where (file, line, err, buf, (int) min, (int) max);
+
+         as_bad_value_out_of_range (_("operand"), uval, (offsetT) min, (offsetT) max, file, line);
+
          return;
        }
     }

diff --git a/gas/config/tc-v850.c b/gas/config/tc-v850.c
index d53a97313d750ed489f1f81c31b3114514e36f33..b1085acae5f2ac892f96dc60255991b22f376212 100644 (file)
--- a/gas/config/tc-v850.c
+++ b/gas/config/tc-v850.c
@@ -1618,10 +1618,7 @@ v850_insert_operand (insn, operand, val, file, line, str)
 
          if (val < (offsetT) min || val > (offsetT) max)
            {
-             /* xgettext:c-format  */
-             const char *err =
-               _("operand out of range (%s not between %ld and %ld)");
-             char buf[100];
+             char buf [128];
 
              /* Restore min and mix to expected values for decimal ranges.  */
              if ((operand->flags & V850_OPERAND_SIGNED)
@@ -1633,18 +1630,12 @@ v850_insert_operand (insn, operand, val, file, line, str)
                min = 0;
 
              if (str)
-               {
-                 sprintf (buf, "%s: ", str);
-
-                 sprint_value (buf + strlen (buf), val);
-               }
+               sprintf (buf, "%s: ", str);
              else
-               sprint_value (buf, val);
+               buf[0] = 0;
+             strcat (buf, _("operand"));
 
-             if (file == (char *) NULL)
-               as_warn (err, buf, min, max);
-             else
-               as_warn_where (file, line, err, buf, min, max);
+             as_bad_value_out_of_range (buf, val, (offsetT) min, (offsetT) max, file, line);
            }
        }
 

diff --git a/gas/messages.c b/gas/messages.c
index 005cd22d417ba7594ac11bf85b162d664657d59a..99e20a1a8140281790a2f270d49c3babd3948f12 100644 (file)
--- a/gas/messages.c
+++ b/gas/messages.c
@@ -503,3 +503,84 @@ sprint_value (char *buf, valueT val)
 #endif
   abort ();
 }
+
+#define HEX_MAX_THRESHOLD      1024
+#define HEX_MIN_THRESHOLD      -(HEX_MAX_THRESHOLD)
+
+static void
+as_internal_value_out_of_range (char *    prefix,
+                               offsetT   val,
+                               offsetT   min,
+                               offsetT   max,
+                               char *    file,
+                               unsigned  line,
+                               int       bad)
+{
+  const char * err;
+
+  if (prefix == NULL)
+    prefix = "";
+
+#ifdef BFD_ASSEMBLER
+  if (   val < HEX_MAX_THRESHOLD
+      && min < HEX_MAX_THRESHOLD
+      && max < HEX_MAX_THRESHOLD
+      && val > HEX_MIN_THRESHOLD
+      && min > HEX_MIN_THRESHOLD
+      && max > HEX_MIN_THRESHOLD)
+#endif
+    {
+      /* xgettext:c-format  */
+      err = _("%s out of range (%d is not between %d and %d)");
+
+      if (bad)
+       as_bad_where (file, line, err, prefix, val, min, max);
+      else
+       as_warn_where (file, line, err, prefix, val, min, max);
+    }
+#ifdef BFD_ASSEMBLER
+  else
+    {
+      char val_buf [sizeof (val) * 3 + 2];
+      char min_buf [sizeof (val) * 3 + 2];
+      char max_buf [sizeof (val) * 3 + 2];
+
+      if (sizeof (val) > sizeof (bfd_vma))
+       abort ();
+
+      sprintf_vma (val_buf, val);
+      sprintf_vma (min_buf, min);
+      sprintf_vma (max_buf, max);
+
+      /* xgettext:c-format.  */
+      err = _("%s out of range (0x%s is not between 0x%s and 0x%s)");
+
+      if (bad)
+       as_bad_where (file, line, err, prefix, val_buf, min_buf, max_buf);
+      else
+       as_warn_where (file, line, err, prefix, val_buf, min_buf, max_buf);
+    }
+#endif
+}
+
+void
+as_warn_value_out_of_range (char *   prefix,
+                          offsetT  value,
+                          offsetT  min,
+                          offsetT  max,
+                          char *   file,
+                          unsigned line)
+{
+  as_internal_value_out_of_range (prefix, value, min, max, file, line, 0);
+}
+
+void
+as_bad_value_out_of_range (char *   prefix,
+                          offsetT  value,
+                          offsetT  min,
+                          offsetT  max,
+                          char *   file,
+                          unsigned line)
+{
+  as_internal_value_out_of_range (prefix, value, min, max, file, line, 1);
+}