From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 44700 invoked by alias); 27 May 2015 20:17:01 -0000 Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Received: (qmail 38678 invoked by uid 89); 27 May 2015 20:16:22 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-2.6 required=5.0 tests=AWL,BAYES_00,RCVD_IN_DNSWL_LOW,SPF_PASS autolearn=ham version=3.3.2 X-HELO: mail-wi0-f169.google.com Received: from mail-wi0-f169.google.com (HELO mail-wi0-f169.google.com) (209.85.212.169) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES128-GCM-SHA256 encrypted) ESMTPS; Wed, 27 May 2015 20:16:15 +0000 Received: by wifw1 with SMTP id w1so36484453wif.0 for ; Wed, 27 May 2015 13:16:12 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to :references; bh=05skqPCG4BGAJFk9zLgidQrXgStvAZE/9e/+QZIkZq0=; b=j6ZNSwq6eBqs1gaGYOr3zH/yIlcGlga3HRrRDFAT1Y0fm6787sZgRhFTGWJjqpBgcs ezDwe1kzi/mdwpVMBEBTPch8JTPLhJBXMCNmwxwOh5DcAE+rkkdrH58v+FOAQsXIRNZS V/ZYuOnBtkRzywakN3uhjjio2k7R4CMRpYn4vVgcMEhjKOjPKrm8A6u7iDEXfx52+jS4 Lpj6NdGYEhksUcritYaXptk2Z5+O4Z1FucD/mNqy1SoWPtbU47rewq1VSN/8j5hzruEh JobPmckBHpEXOAHQk0Q6DKY6x0FVUU4/4t1nCC6CK3novJnmCk2BXDpvyT3c4aU51hMf zsMw== X-Gm-Message-State: ALoCoQnWT56madyd0tlhEsf9JAIjHj9Z/AmLi7pwvk1Ro8//iTL2IZdVeFuWe5rj+GWoYdbqgBLn X-Received: by 10.194.192.98 with SMTP id hf2mr11492696wjc.23.1432757771912; Wed, 27 May 2015 13:16:11 -0700 (PDT) Received: from babel.clyon.hd.free.fr (vig38-2-82-225-222-175.fbx.proxad.net. [82.225.222.175]) by mx.google.com with ESMTPSA id u7sm76992wif.3.2015.05.27.13.16.10 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-SHA bits=128/128); Wed, 27 May 2015 13:16:11 -0700 (PDT) From: Christophe Lyon To: gcc-patches@gcc.gnu.org Subject: [Patch ARM-AArch64/testsuite Neon intrinsics 19/20] Add vtbX tests. Date: Wed, 27 May 2015 20:17:00 -0000 Message-Id: <1432757747-4891-20-git-send-email-christophe.lyon@linaro.org> In-Reply-To: <1432757747-4891-1-git-send-email-christophe.lyon@linaro.org> References: <1432757747-4891-1-git-send-email-christophe.lyon@linaro.org> X-IsSubscribed: yes X-SW-Source: 2015-05/txt/msg02551.txt.bz2 diff --git a/gcc/testsuite/gcc.target/aarch64/advsimd-intrinsics/vtbX.c b/gcc/testsuite/gcc.target/aarch64/advsimd-intrinsics/vtbX.c new file mode 100644 index 0000000..0557efd --- /dev/null +++ b/gcc/testsuite/gcc.target/aarch64/advsimd-intrinsics/vtbX.c @@ -0,0 +1,289 @@ +#include +#include "arm-neon-ref.h" +#include "compute-ref-data.h" + +/* Expected results for vtbl1. */ +VECT_VAR_DECL(expected_vtbl1,int,8,8) [] = { 0x0, 0xf2, 0xf2, 0xf2, + 0x0, 0x0, 0xf2, 0xf2 }; +VECT_VAR_DECL(expected_vtbl1,uint,8,8) [] = { 0x0, 0xf3, 0xf3, 0xf3, + 0x0, 0x0, 0xf3, 0xf3 }; +VECT_VAR_DECL(expected_vtbl1,poly,8,8) [] = { 0x0, 0xf3, 0xf3, 0xf3, + 0x0, 0x0, 0xf3, 0xf3 }; + +/* Expected results for vtbl2. */ +VECT_VAR_DECL(expected_vtbl2,int,8,8) [] = { 0xf6, 0xf3, 0xf3, 0xf3, + 0x0, 0x0, 0xf3, 0xf3 }; +VECT_VAR_DECL(expected_vtbl2,uint,8,8) [] = { 0xf6, 0xf5, 0xf5, 0xf5, + 0x0, 0x0, 0xf5, 0xf5 }; +VECT_VAR_DECL(expected_vtbl2,poly,8,8) [] = { 0xf6, 0xf5, 0xf5, 0xf5, + 0x0, 0x0, 0xf5, 0xf5 }; + +/* Expected results for vtbl3. */ +VECT_VAR_DECL(expected_vtbl3,int,8,8) [] = { 0xf8, 0xf4, 0xf4, 0xf4, + 0xff, 0x0, 0xf4, 0xf4 }; +VECT_VAR_DECL(expected_vtbl3,uint,8,8) [] = { 0xf8, 0xf7, 0xf7, 0xf7, + 0xff, 0x0, 0xf7, 0xf7 }; +VECT_VAR_DECL(expected_vtbl3,poly,8,8) [] = { 0xf8, 0xf7, 0xf7, 0xf7, + 0xff, 0x0, 0xf7, 0xf7 }; + +/* Expected results for vtbl4. */ +VECT_VAR_DECL(expected_vtbl4,int,8,8) [] = { 0xfa, 0xf5, 0xf5, 0xf5, + 0x3, 0x0, 0xf5, 0xf5 }; +VECT_VAR_DECL(expected_vtbl4,uint,8,8) [] = { 0xfa, 0xf9, 0xf9, 0xf9, + 0x3, 0x0, 0xf9, 0xf9 }; +VECT_VAR_DECL(expected_vtbl4,poly,8,8) [] = { 0xfa, 0xf9, 0xf9, 0xf9, + 0x3, 0x0, 0xf9, 0xf9 }; + +/* Expected results for vtbx1. */ +VECT_VAR_DECL(expected_vtbx1,int,8,8) [] = { 0x33, 0xf2, 0xf2, 0xf2, + 0x33, 0x33, 0xf2, 0xf2 }; +VECT_VAR_DECL(expected_vtbx1,uint,8,8) [] = { 0xcc, 0xf3, 0xf3, 0xf3, + 0xcc, 0xcc, 0xf3, 0xf3 }; +VECT_VAR_DECL(expected_vtbx1,poly,8,8) [] = { 0xcc, 0xf3, 0xf3, 0xf3, + 0xcc, 0xcc, 0xf3, 0xf3 }; + +/* Expected results for vtbx2. */ +VECT_VAR_DECL(expected_vtbx2,int,8,8) [] = { 0xf6, 0xf3, 0xf3, 0xf3, + 0x33, 0x33, 0xf3, 0xf3 }; +VECT_VAR_DECL(expected_vtbx2,uint,8,8) [] = { 0xf6, 0xf5, 0xf5, 0xf5, + 0xcc, 0xcc, 0xf5, 0xf5 }; +VECT_VAR_DECL(expected_vtbx2,poly,8,8) [] = { 0xf6, 0xf5, 0xf5, 0xf5, + 0xcc, 0xcc, 0xf5, 0xf5 }; + +/* Expected results for vtbx3. */ +VECT_VAR_DECL(expected_vtbx3,int,8,8) [] = { 0xf8, 0xf4, 0xf4, 0xf4, + 0xff, 0x33, 0xf4, 0xf4 }; +VECT_VAR_DECL(expected_vtbx3,uint,8,8) [] = { 0xf8, 0xf7, 0xf7, 0xf7, + 0xff, 0xcc, 0xf7, 0xf7 }; +VECT_VAR_DECL(expected_vtbx3,poly,8,8) [] = { 0xf8, 0xf7, 0xf7, 0xf7, + 0xff, 0xcc, 0xf7, 0xf7 }; + +/* Expected results for vtbx4. */ +VECT_VAR_DECL(expected_vtbx4,int,8,8) [] = { 0xfa, 0xf5, 0xf5, 0xf5, + 0x3, 0x33, 0xf5, 0xf5 }; +VECT_VAR_DECL(expected_vtbx4,uint,8,8) [] = { 0xfa, 0xf9, 0xf9, 0xf9, + 0x3, 0xcc, 0xf9, 0xf9 }; +VECT_VAR_DECL(expected_vtbx4,poly,8,8) [] = { 0xfa, 0xf9, 0xf9, 0xf9, + 0x3, 0xcc, 0xf9, 0xf9 }; + +void exec_vtbX (void) +{ + int i; + + /* In this case, input variables are arrays of vectors. */ +#define DECL_VTBX(T1, W, N, X) \ + VECT_ARRAY_TYPE(T1, W, N, X) VECT_ARRAY_VAR(table_vector, T1, W, N, X) + + /* The vtbl1 variant is different from vtbl{2,3,4} because it takes a + vector as 1st param, instead of an array of vectors. */ +#define TEST_VTBL1(T1, T2, T3, W, N) \ + VECT_VAR(table_vector, T1, W, N) = \ + vld1##_##T2##W((T1##W##_t *)lookup_table); \ + \ + VECT_VAR(vector_res, T1, W, N) = \ + vtbl1_##T2##W(VECT_VAR(table_vector, T1, W, N), \ + VECT_VAR(vector, T3, W, N)); \ + vst1_##T2##W(VECT_VAR(result, T1, W, N), \ + VECT_VAR(vector_res, T1, W, N)); + +#define TEST_VTBLX(T1, T2, T3, W, N, X) \ + VECT_ARRAY_VAR(table_vector, T1, W, N, X) = \ + vld##X##_##T2##W((T1##W##_t *)lookup_table); \ + \ + VECT_VAR(vector_res, T1, W, N) = \ + vtbl##X##_##T2##W(VECT_ARRAY_VAR(table_vector, T1, W, N, X), \ + VECT_VAR(vector, T3, W, N)); \ + vst1_##T2##W(VECT_VAR(result, T1, W, N), \ + VECT_VAR(vector_res, T1, W, N)); + + /* We need to define a lookup table. */ + uint8_t lookup_table[32]; + + DECL_VARIABLE(vector, int, 8, 8); + DECL_VARIABLE(vector, uint, 8, 8); + DECL_VARIABLE(vector, poly, 8, 8); + DECL_VARIABLE(vector_res, int, 8, 8); + DECL_VARIABLE(vector_res, uint, 8, 8); + DECL_VARIABLE(vector_res, poly, 8, 8); + + /* For vtbl1. */ + DECL_VARIABLE(table_vector, int, 8, 8); + DECL_VARIABLE(table_vector, uint, 8, 8); + DECL_VARIABLE(table_vector, poly, 8, 8); + + /* For vtbx*. */ + DECL_VARIABLE(default_vector, int, 8, 8); + DECL_VARIABLE(default_vector, uint, 8, 8); + DECL_VARIABLE(default_vector, poly, 8, 8); + + /* We need only 8 bits variants. */ +#define DECL_ALL_VTBLX(X) \ + DECL_VTBX(int, 8, 8, X); \ + DECL_VTBX(uint, 8, 8, X); \ + DECL_VTBX(poly, 8, 8, X) + +#define TEST_ALL_VTBL1() \ + TEST_VTBL1(int, s, int, 8, 8); \ + TEST_VTBL1(uint, u, uint, 8, 8); \ + TEST_VTBL1(poly, p, uint, 8, 8) + +#define TEST_ALL_VTBLX(X) \ + TEST_VTBLX(int, s, int, 8, 8, X); \ + TEST_VTBLX(uint, u, uint, 8, 8, X); \ + TEST_VTBLX(poly, p, uint, 8, 8, X) + + /* Declare the temporary buffers / variables. */ + DECL_ALL_VTBLX(2); + DECL_ALL_VTBLX(3); + DECL_ALL_VTBLX(4); + + /* Fill the lookup table. */ + for (i=0; i<32; i++) { + lookup_table[i] = i-15; + } + + /* Choose init value arbitrarily, will be used as table index. */ + VDUP(vector, , int, s, 8, 8, 1); + VDUP(vector, , uint, u, 8, 8, 2); + VDUP(vector, , poly, p, 8, 8, 2); + + /* To ensure coverage, add some indexes larger than 8,16 and 32 + except: lane 0 (by 6), lane 1 (by 8) and lane 2 (by 9). */ + VSET_LANE(vector, , int, s, 8, 8, 0, 10); + VSET_LANE(vector, , int, s, 8, 8, 4, 20); + VSET_LANE(vector, , int, s, 8, 8, 5, 40); + VSET_LANE(vector, , uint, u, 8, 8, 0, 10); + VSET_LANE(vector, , uint, u, 8, 8, 4, 20); + VSET_LANE(vector, , uint, u, 8, 8, 5, 40); + VSET_LANE(vector, , poly, p, 8, 8, 0, 10); + VSET_LANE(vector, , poly, p, 8, 8, 4, 20); + VSET_LANE(vector, , poly, p, 8, 8, 5, 40); + + + /* Check vtbl1. */ + clean_results (); +#define TEST_MSG "VTBL1" + TEST_ALL_VTBL1(); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbl1, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbl1, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbl1, ""); + + /* Check vtbl2. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBL2" + TEST_ALL_VTBLX(2); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbl2, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbl2, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbl2, ""); + + /* Check vtbl3. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBL3" + TEST_ALL_VTBLX(3); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbl3, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbl3, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbl3, ""); + + /* Check vtbl4. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBL4" + TEST_ALL_VTBLX(4); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbl4, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbl4, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbl4, ""); + + + /* Now test VTBX. */ + + /* The vtbx1 variant is different from vtbx{2,3,4} because it takes a + vector as 1st param, instead of an array of vectors. */ +#define TEST_VTBX1(T1, T2, T3, W, N) \ + VECT_VAR(table_vector, T1, W, N) = \ + vld1##_##T2##W((T1##W##_t *)lookup_table); \ + \ + VECT_VAR(vector_res, T1, W, N) = \ + vtbx1_##T2##W(VECT_VAR(default_vector, T1, W, N), \ + VECT_VAR(table_vector, T1, W, N), \ + VECT_VAR(vector, T3, W, N)); \ + vst1_##T2##W(VECT_VAR(result, T1, W, N), \ + VECT_VAR(vector_res, T1, W, N)); + +#define TEST_VTBXX(T1, T2, T3, W, N, X) \ + VECT_ARRAY_VAR(table_vector, T1, W, N, X) = \ + vld##X##_##T2##W((T1##W##_t *)lookup_table); \ + \ + VECT_VAR(vector_res, T1, W, N) = \ + vtbx##X##_##T2##W(VECT_VAR(default_vector, T1, W, N), \ + VECT_ARRAY_VAR(table_vector, T1, W, N, X), \ + VECT_VAR(vector, T3, W, N)); \ + vst1_##T2##W(VECT_VAR(result, T1, W, N), \ + VECT_VAR(vector_res, T1, W, N)); + +#define TEST_ALL_VTBX1() \ + TEST_VTBX1(int, s, int, 8, 8); \ + TEST_VTBX1(uint, u, uint, 8, 8); \ + TEST_VTBX1(poly, p, uint, 8, 8) + +#define TEST_ALL_VTBXX(X) \ + TEST_VTBXX(int, s, int, 8, 8, X); \ + TEST_VTBXX(uint, u, uint, 8, 8, X); \ + TEST_VTBXX(poly, p, uint, 8, 8, X) + + /* Choose init value arbitrarily, will be used as default value. */ + VDUP(default_vector, , int, s, 8, 8, 0x33); + VDUP(default_vector, , uint, u, 8, 8, 0xCC); + VDUP(default_vector, , poly, p, 8, 8, 0xCC); + + /* Check vtbx1. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBX1" + TEST_ALL_VTBX1(); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbx1, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbx1, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbx1, ""); + + /* Check vtbx2. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBX2" + TEST_ALL_VTBXX(2); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbx2, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbx2, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbx2, ""); + + /* Check vtbx3. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBX3" + TEST_ALL_VTBXX(3); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbx3, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbx3, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbx3, ""); + + /* Check vtbx4. */ + clean_results (); +#undef TEST_MSG +#define TEST_MSG "VTBX4" + TEST_ALL_VTBXX(4); + + CHECK(TEST_MSG, int, 8, 8, PRIx8, expected_vtbx4, ""); + CHECK(TEST_MSG, uint, 8, 8, PRIx8, expected_vtbx4, ""); + CHECK(TEST_MSG, poly, 8, 8, PRIx8, expected_vtbx4, ""); +} + +int main (void) +{ + exec_vtbX (); + return 0; +} -- 2.1.4