From: Bill Schmidt <wschmidt@linux.ibm.com>
To: gcc-patches@gcc.gnu.org
Cc: segher@kernel.crashing.org
Subject: [PATCH 06/55] rs6000: Add functions for matching types, part 1 of 3
Date: Thu, 17 Jun 2021 10:18:50 -0500 [thread overview]
Message-ID: <c4d5d38e2992320479dce33aff187bdd05280eb1.1623941441.git.wschmidt@linux.ibm.com> (raw)
In-Reply-To: <cover.1623941441.git.wschmidt@linux.ibm.com>
In-Reply-To: <cover.1623941441.git.wschmidt@linux.ibm.com>
2021-06-07 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (void_status): New enum.
(basetype): Likewise.
(typeinfo): Likewise.
(handle_pointer): New function.
(match_basetype): New stub function.
(match_const_restriction): Likewise.
(match_type): New function.
---
gcc/config/rs6000/rs6000-gen-builtins.c | 367 ++++++++++++++++++++++++
1 file changed, 367 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index c5d5590e865..38363f034d3 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -186,6 +186,52 @@ static char linebuf[LINELEN];
static int line;
static int pos;
+/* Used to determine whether a type can be void (only return types). */
+enum void_status
+{
+ VOID_NOTOK,
+ VOID_OK
+};
+
+/* Legal base types for an argument or return type. */
+enum basetype
+{
+ BT_CHAR,
+ BT_SHORT,
+ BT_INT,
+ BT_LONG,
+ BT_LONGLONG,
+ BT_FLOAT,
+ BT_DOUBLE,
+ BT_LONGDOUBLE,
+ BT_INT128,
+ BT_FLOAT128,
+ BT_BOOL,
+ BT_STRING,
+ BT_DECIMAL32,
+ BT_DECIMAL64,
+ BT_DECIMAL128,
+ BT_IBM128,
+ BT_VPAIR,
+ BT_VQUAD
+};
+
+/* Type modifiers for an argument or return type. */
+struct typeinfo
+{
+ char isvoid;
+ char isconst;
+ char isvector;
+ char issigned;
+ char isunsigned;
+ char isbool;
+ char ispixel;
+ char ispointer;
+ basetype base;
+ char *val1;
+ char *val2;
+};
+
/* Pointer to a diagnostic function. */
static void (*diag) (const char *, ...)
__attribute__ ((format (printf, 1, 2)));
@@ -321,3 +367,324 @@ match_to_right_bracket (void)
pos = lastpos + 1;
return buf;
}
+
+static inline void
+handle_pointer (typeinfo *typedata)
+{
+ consume_whitespace ();
+ if (linebuf[pos] == '*')
+ {
+ typedata->ispointer = 1;
+ safe_inc_pos ();
+ }
+}
+
+/* Match one of the allowable base types. Consumes one token unless the
+ token is "long", which must be paired with a second "long". Optionally
+ consumes a following '*' token for pointers. Return 1 for success,
+ 0 for failure. */
+static int
+match_basetype (typeinfo *typedata)
+{
+ return 1;
+}
+
+/* A const int argument may be restricted to certain values. This is
+ indicated by one of the following occurring after the "int' token:
+
+ <x> restricts the constant to x bits, interpreted as unsigned
+ <x,y> restricts the constant to the inclusive range [x,y]
+ [x,y] restricts the constant to the inclusive range [x,y],
+ but only applies if the argument is constant.
+ {x,y} restricts the constant to one of two values, x or y.
+
+ Here x and y are integer tokens. Note that the "const" token is a
+ lie when the restriction is [x,y], but this simplifies the parsing
+ significantly and is hopefully forgivable.
+
+ Return 1 for success, else 0. */
+static int
+match_const_restriction (typeinfo *typedata)
+{
+ return 1;
+}
+
+/* Look for a type, which can be terminated by a token that is not part of
+ a type, a comma, or a closing parenthesis. Place information about the
+ type in TYPEDATA. Return 1 for success, 0 for failure. */
+static int
+match_type (typeinfo *typedata, int voidok)
+{
+ /* A legal type is of the form:
+
+ [const] [[signed|unsigned] <basetype> | <vectype>] [*]
+
+ Legal values of <basetype> are (for now):
+
+ char
+ short
+ int
+ long
+ long double
+ long long
+ float
+ double
+ __int128
+ _Float128
+ bool
+ string
+ _Decimal32
+ _Decimal64
+ _Decimal128
+ __ibm128
+
+ Legal values of <vectype> are as follows, and are shorthand for
+ the associated meaning:
+
+ vsc vector signed char
+ vuc vector unsigned char
+ vbc vector bool char
+ vss vector signed short
+ vus vector unsigned short
+ vbs vector bool short
+ vsi vector signed int
+ vui vector unsigned int
+ vbi vector bool int
+ vsll vector signed long long
+ vull vector unsigned long long
+ vbll vector bool long long
+ vsq vector signed __int128
+ vuq vector unsigned __int128
+ vbq vector bool __int128
+ vp vector pixel
+ vf vector float
+ vd vector double
+ v256 __vector_pair
+ v512 __vector_quad
+
+ For simplicity, We don't support "short int" and "long long int".
+ We don't currently support a <basetype> of "_Float16". "signed"
+ and "unsigned" only apply to integral base types. The optional *
+ indicates a pointer type. */
+
+ consume_whitespace ();
+ memset (typedata, 0, sizeof *typedata);
+ int oldpos = pos;
+
+ char *token = match_identifier ();
+ if (!token)
+ return 0;
+
+ if (!strcmp (token, "const"))
+ {
+ typedata->isconst = 1;
+ consume_whitespace ();
+ oldpos = pos;
+ token = match_identifier ();
+ }
+
+ if (!strcmp (token, "void"))
+ typedata->isvoid = 1;
+
+ if (!strcmp (token, "vsc"))
+ {
+ typedata->isvector = 1;
+ typedata->issigned = 1;
+ typedata->base = BT_CHAR;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vuc"))
+ {
+ typedata->isvector = 1;
+ typedata->isunsigned = 1;
+ typedata->base = BT_CHAR;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vbc"))
+ {
+ typedata->isvector = 1;
+ typedata->isbool = 1;
+ typedata->base = BT_CHAR;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vss"))
+ {
+ typedata->isvector = 1;
+ typedata->issigned = 1;
+ typedata->base = BT_SHORT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vus"))
+ {
+ typedata->isvector = 1;
+ typedata->isunsigned = 1;
+ typedata->base = BT_SHORT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vbs"))
+ {
+ typedata->isvector = 1;
+ typedata->isbool = 1;
+ typedata->base = BT_SHORT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vsi"))
+ {
+ typedata->isvector = 1;
+ typedata->issigned = 1;
+ typedata->base = BT_INT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vui"))
+ {
+ typedata->isvector = 1;
+ typedata->isunsigned = 1;
+ typedata->base = BT_INT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vbi"))
+ {
+ typedata->isvector = 1;
+ typedata->isbool = 1;
+ typedata->base = BT_INT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vsll"))
+ {
+ typedata->isvector = 1;
+ typedata->issigned = 1;
+ typedata->base = BT_LONGLONG;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vull"))
+ {
+ typedata->isvector = 1;
+ typedata->isunsigned = 1;
+ typedata->base = BT_LONGLONG;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vbll"))
+ {
+ typedata->isvector = 1;
+ typedata->isbool = 1;
+ typedata->base = BT_LONGLONG;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vsq"))
+ {
+ typedata->isvector = 1;
+ typedata->issigned = 1;
+ typedata->base = BT_INT128;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vuq"))
+ {
+ typedata->isvector = 1;
+ typedata->isunsigned = 1;
+ typedata->base = BT_INT128;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vbq"))
+ {
+ typedata->isvector = 1;
+ typedata->isbool = 1;
+ typedata->base = BT_INT128;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vp"))
+ {
+ typedata->isvector = 1;
+ typedata->ispixel = 1;
+ typedata->base = BT_SHORT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vf"))
+ {
+ typedata->isvector = 1;
+ typedata->base = BT_FLOAT;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "vd"))
+ {
+ typedata->isvector = 1;
+ typedata->base = BT_DOUBLE;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "v256"))
+ {
+ typedata->isvector = 1;
+ typedata->base = BT_VPAIR;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "v512"))
+ {
+ typedata->isvector = 1;
+ typedata->base = BT_VQUAD;
+ handle_pointer (typedata);
+ return 1;
+ }
+ else if (!strcmp (token, "signed"))
+ typedata->issigned = 1;
+ else if (!strcmp (token, "unsigned"))
+ typedata->isunsigned = 1;
+ else if (!typedata->isvoid && !typedata->isconst)
+ {
+ /* Push back token. */
+ pos = oldpos;
+ return match_basetype (typedata);
+ }
+
+ if (typedata->isvoid)
+ {
+ consume_whitespace ();
+ if (linebuf[pos] == '*')
+ {
+ typedata->ispointer = 1;
+ safe_inc_pos ();
+ }
+ else if (!voidok)
+ return 0;
+ return 1;
+ }
+
+ if (!typedata->issigned && !typedata->isunsigned)
+ pos = oldpos;
+ if (!match_basetype (typedata))
+ return 0;
+
+ if (typedata->isconst)
+ {
+ if (typedata->ispointer)
+ return 1;
+ if (typedata->base != BT_INT)
+ {
+ (*diag)("'const' at %d requires pointer or integer type",
+ oldpos + 1);
+ return 0;
+ }
+ consume_whitespace ();
+ if (linebuf[pos] == '<' || linebuf[pos] == '{' || linebuf[pos] == '[')
+ return match_const_restriction (typedata);
+ }
+
+ return 1;
+}
--
2.27.0
next prev parent reply other threads:[~2021-06-17 15:20 UTC|newest]
Thread overview: 110+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-06-17 15:18 [PATCHv3 00/55] Replace the Power target-specific builtin machinery Bill Schmidt
2021-06-17 15:18 ` [PATCH 01/55] Support scanning of build-time GC roots in gengtype Bill Schmidt
2021-06-17 15:18 ` [PATCH 02/55] rs6000: Initial create of rs6000-gen-builtins.c Bill Schmidt
2021-06-17 15:18 ` [PATCH 03/55] rs6000: Add initial input files Bill Schmidt
2021-06-17 15:18 ` [PATCH 04/55] rs6000: Add file support and functions for diagnostic support Bill Schmidt
2021-06-17 15:18 ` [PATCH 05/55] rs6000: Add helper functions for parsing Bill Schmidt
2021-07-09 19:32 ` will schmidt
2021-07-14 22:58 ` Segher Boessenkool
2021-07-14 23:32 ` Segher Boessenkool
2021-06-17 15:18 ` Bill Schmidt [this message]
2021-06-17 15:18 ` [PATCH 07/55] rs6000: Add functions for matching types, part 2 of 3 Bill Schmidt
2021-06-17 15:18 ` [PATCH 08/55] rs6000: Add functions for matching types, part 3 " Bill Schmidt
2021-06-17 15:18 ` [PATCH 09/55] rs6000: Red-black tree implementation for balanced tree search Bill Schmidt
2021-06-17 15:18 ` [PATCH 10/55] rs6000: Main function with stubs for parsing and output Bill Schmidt
2021-07-19 19:15 ` Segher Boessenkool
2021-07-20 22:19 ` Bill Schmidt
2021-07-20 23:22 ` Segher Boessenkool
2021-07-21 1:51 ` Bill Schmidt
2021-07-21 15:43 ` Segher Boessenkool
2021-07-21 16:08 ` Bill Schmidt
2021-07-21 16:16 ` Bill Schmidt
2021-06-17 15:18 ` [PATCH 11/55] rs6000: Parsing built-in input file, part 1 of 3 Bill Schmidt
2021-07-19 20:39 ` Segher Boessenkool
2021-06-17 15:18 ` [PATCH 12/55] rs6000: Parsing built-in input file, part 2 " Bill Schmidt
2021-07-19 22:07 ` Segher Boessenkool
2021-06-17 15:18 ` [PATCH 13/55] rs6000: Parsing built-in input file, part 3 " Bill Schmidt
2021-07-19 22:13 ` Segher Boessenkool
2021-06-17 15:18 ` [PATCH 14/55] rs6000: Parsing of overload input file Bill Schmidt
2021-07-19 23:09 ` Segher Boessenkool
2021-06-17 15:18 ` [PATCH 15/55] rs6000: Build and store function type identifiers Bill Schmidt
2021-07-20 0:04 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 16/55] rs6000: Write output to the builtin definition include file Bill Schmidt
2021-07-20 23:27 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 17/55] rs6000: Write output to the builtins header file Bill Schmidt
2021-07-20 23:40 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 18/55] rs6000: Write output to the builtins init file, part 1 of 3 Bill Schmidt
2021-07-20 23:51 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 19/55] rs6000: Write output to the builtins init file, part 2 " Bill Schmidt
2021-07-20 23:53 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 20/55] rs6000: Write output to the builtins init file, part 3 " Bill Schmidt
2021-07-21 17:08 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 21/55] rs6000: Write static initializations for built-in table Bill Schmidt
2021-07-21 17:14 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 22/55] rs6000: Write static initializations for overload tables Bill Schmidt
2021-07-21 17:40 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 23/55] rs6000: Incorporate new builtins code into the build machinery Bill Schmidt
2021-07-21 18:58 ` Segher Boessenkool
2021-07-27 3:26 ` Bill Schmidt
2021-07-27 14:23 ` Segher Boessenkool
2021-07-27 17:38 ` Bill Schmidt
2021-06-17 15:19 ` [PATCH 24/55] rs6000: Add gengtype handling to " Bill Schmidt
2021-06-17 15:19 ` [PATCH 25/55] rs6000: Add the rest of the [altivec] stanza to the builtins file Bill Schmidt
2021-06-17 15:19 ` [PATCH 26/55] rs6000: Add VSX builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 27/55] rs6000: Add available-everywhere and ancient builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 28/55] rs6000: Add power7 and power7-64 builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 29/55] rs6000: Add power8-vector builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 30/55] rs6000: Add Power9 builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 31/55] rs6000: Add more type nodes to support builtin processing Bill Schmidt
2021-06-17 15:19 ` [PATCH 32/55] rs6000: Add Power10 builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 33/55] rs6000: Add MMA builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 34/55] rs6000: Add miscellaneous builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 35/55] rs6000: Add Cell builtins Bill Schmidt
2021-06-17 15:19 ` [PATCH 36/55] rs6000: Add remaining overloads Bill Schmidt
2021-06-17 15:19 ` [PATCH 37/55] rs6000: Execute the automatic built-in initialization code Bill Schmidt
2021-06-17 15:19 ` [PATCH 38/55] rs6000: Darwin builtin support Bill Schmidt
2021-06-17 15:19 ` [PATCH 39/55] rs6000: Add sanity to V2DI_type_node definitions Bill Schmidt
2021-06-17 15:19 ` [PATCH 40/55] rs6000: Always initialize vector_pair and vector_quad nodes Bill Schmidt
2021-06-17 15:19 ` [PATCH 41/55] rs6000: Handle overloads during program parsing Bill Schmidt
2021-06-17 15:19 ` [PATCH 42/55] rs6000: Handle gimple folding of target built-ins Bill Schmidt
2021-07-28 21:21 ` will schmidt
2021-07-29 12:42 ` Bill Schmidt
2021-08-02 13:31 ` Bill Schmidt
2021-08-02 23:43 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 43/55] rs6000: Support for vectorizing built-in functions Bill Schmidt
2021-06-17 15:19 ` [PATCH 44/55] rs6000: Builtin expansion, part 1 Bill Schmidt
2021-07-27 21:06 ` will schmidt
2021-07-28 3:30 ` Bill Schmidt
2021-06-17 15:19 ` [PATCH 45/55] rs6000: Builtin expansion, part 2 Bill Schmidt
2021-07-27 21:06 ` will schmidt
2021-06-17 15:19 ` [PATCH 46/55] rs6000: Builtin expansion, part 3 Bill Schmidt
2021-07-27 21:06 ` will schmidt
2021-08-03 23:40 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 47/55] rs6000: Builtin expansion, part 4 Bill Schmidt
2021-07-27 21:06 ` will schmidt
2021-08-03 23:46 ` Segher Boessenkool
2021-08-04 0:34 ` Segher Boessenkool
2021-08-12 16:17 ` Bill Schmidt
2021-06-17 15:19 ` [PATCH 48/55] rs6000: Builtin expansion, part 5 Bill Schmidt
2021-07-27 21:07 ` will schmidt
2021-06-17 15:19 ` [PATCH 49/55] rs6000: Builtin expansion, part 6 Bill Schmidt
2021-07-27 21:07 ` will schmidt
2021-07-28 20:38 ` Bill Schmidt
2021-06-17 15:19 ` [PATCH 50/55] rs6000: Update rs6000_builtin_decl Bill Schmidt
2021-07-27 21:08 ` will schmidt
2021-08-04 0:38 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 51/55] rs6000: Miscellaneous uses of rs6000_builtin_decls_x Bill Schmidt
2021-07-27 21:08 ` will schmidt
2021-06-17 15:19 ` [PATCH 52/55] rs6000: Debug support Bill Schmidt
2021-07-27 21:07 ` will schmidt
2021-08-04 0:49 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 53/55] rs6000: Update altivec.h for automated interfaces Bill Schmidt
2021-07-27 21:07 ` will schmidt
2021-07-28 20:58 ` Bill Schmidt
2021-08-04 0:58 ` Segher Boessenkool
2021-06-17 15:19 ` [PATCH 54/55] rs6000: Test case adjustments Bill Schmidt
2021-06-17 15:19 ` [PATCH 55/55] rs6000: Enable the new builtin support Bill Schmidt
2021-07-27 21:07 ` will schmidt
2021-06-25 15:25 ` [PATCHv3 00/55] Replace the Power target-specific builtin machinery Bill Schmidt
2021-07-13 13:52 ` Bill Schmidt
-- strict thread matches above, loose matches on Subject: below --
2021-06-08 18:26 [PATCHv2 " Bill Schmidt
2021-06-08 18:26 ` [PATCH 06/55] rs6000: Add functions for matching types, part 1 of 3 Bill Schmidt
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=c4d5d38e2992320479dce33aff187bdd05280eb1.1623941441.git.wschmidt@linux.ibm.com \
--to=wschmidt@linux.ibm.com \
--cc=gcc-patches@gcc.gnu.org \
--cc=segher@kernel.crashing.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).