From patchwork Wed May 27 20:15:46 2015 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Christophe Lyon X-Patchwork-Id: 49039 Return-Path: X-Original-To: linaro@patches.linaro.org Delivered-To: linaro@patches.linaro.org Received: from mail-wg0-f70.google.com (mail-wg0-f70.google.com [74.125.82.70]) by ip-10-151-82-157.ec2.internal (Postfix) with ESMTPS id C4A31202A3 for ; Wed, 27 May 2015 20:19:27 +0000 (UTC) Received: by wgme6 with SMTP id e6sf5291175wgm.3 for ; Wed, 27 May 2015 13:19:27 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:mime-version:delivered-to:mailing-list :precedence:list-id:list-unsubscribe:list-archive:list-post :list-help:sender:delivered-to:from:to:subject:date:message-id :in-reply-to:references:x-original-sender :x-original-authentication-results; bh=05skqPCG4BGAJFk9zLgidQrXgStvAZE/9e/+QZIkZq0=; b=lFXdgAoC9YObEArOgGiXHpmzU0M7WStjHpNv7ru+U/XxnSWr8Xx+VPhNw10x98WtRj /CE4p4VObH0mimi86nppcnewxAT/aliemWwzpeqRoTcgRALrqmlYM7lLmn4NO+EdB/8y sw5/U1DkplJ48inbkfp9n38Lm4dxYA8unUQXyq9G77jmP2Tp76pSuK32MbV8EaV7gP0v G56D+tdwyNT33/XdglNwZWHMwiutrC6NED2I1YGYm0CCP8LsIYP4hgSGGIJsf/yjSdZY cubiKFvGuPHNyOEaNvXg9X9qLvRwcBF5R6Y+Q0BE2JWhJi5jNdjDvnh6nX2mDcUEIOH6 GF/w== X-Gm-Message-State: ALoCoQnxGepbcaOgtcn9KDaueCOctP2cVYxz8xgC4nm49R7uq9BhYWrI2ufPa8KvqwmBlBdVH5ky X-Received: by 10.194.202.229 with SMTP id kl5mr33435238wjc.3.1432757967138; Wed, 27 May 2015 13:19:27 -0700 (PDT) MIME-Version: 1.0 X-BeenThere: patchwork-forward@linaro.org Received: by 10.152.37.8 with SMTP id u8ls105592laj.39.gmail; Wed, 27 May 2015 13:19:27 -0700 (PDT) X-Received: by 10.152.87.13 with SMTP id t13mr30249010laz.66.1432757966965; Wed, 27 May 2015 13:19:26 -0700 (PDT) Received: from mail-la0-x22d.google.com (mail-la0-x22d.google.com. [2a00:1450:4010:c03::22d]) by mx.google.com with ESMTPS id w5si41464laj.65.2015.05.27.13.19.26 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Wed, 27 May 2015 13:19:26 -0700 (PDT) Received-SPF: pass (google.com: domain of patch+caf_=patchwork-forward=linaro.org@linaro.org designates 2a00:1450:4010:c03::22d as permitted sender) client-ip=2a00:1450:4010:c03::22d; Received: by labpy14 with SMTP id py14so4354714lab.0 for ; Wed, 27 May 2015 13:19:26 -0700 (PDT) X-Received: by 10.153.6.36 with SMTP id cr4mr30282959lad.56.1432757966518; Wed, 27 May 2015 13:19:26 -0700 (PDT) X-Forwarded-To: patchwork-forward@linaro.org X-Forwarded-For: patch@linaro.org patchwork-forward@linaro.org Delivered-To: patch@linaro.org Received: by 10.112.108.230 with SMTP id hn6csp627813lbb; Wed, 27 May 2015 13:19:24 -0700 (PDT) X-Received: by 10.70.43.225 with SMTP id z1mr61187092pdl.45.1432757960136; Wed, 27 May 2015 13:19:20 -0700 (PDT) Received: from sourceware.org (server1.sourceware.org. [209.132.180.131]) by mx.google.com with ESMTPS id yq4si52344pbb.118.2015.05.27.13.19.19 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Wed, 27 May 2015 13:19:20 -0700 (PDT) Received-SPF: pass (google.com: domain of gcc-patches-return-399122-patch=linaro.org@gcc.gnu.org designates 209.132.180.131 as permitted sender) client-ip=209.132.180.131; Received: (qmail 44700 invoked by alias); 27 May 2015 20:17:01 -0000 Mailing-List: list patchwork-forward@linaro.org; contact patchwork-forward+owners@linaro.org Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: , List-Help: , Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org Received: (qmail 38678 invoked by uid 89); 27 May 2015 20:16:22 -0000 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-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 22:15:46 +0200 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-Original-Sender: christophe.lyon@linaro.org X-Original-Authentication-Results: mx.google.com; spf=pass (google.com: domain of patch+caf_=patchwork-forward=linaro.org@linaro.org designates 2a00:1450:4010:c03::22d as permitted sender) smtp.mail=patch+caf_=patchwork-forward=linaro.org@linaro.org; dkim=pass header.i=@gcc.gnu.org X-Google-Group-Id: 836684582541 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; +}