ndtypes 0.2.0dev4

data/ext/ruby_ndtypes/ndtypes/libndtypes/tests/test.h

@@ -0,0 +1,85 @@
+/*
+ * BSD 3-Clause License
+ *
+ * Copyright (c) 2017-2018, plures
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ *    this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ *    this list of conditions and the following disclaimer in the documentation
+ *    and/or other materials provided with the distribution.
+ *
+ * 3. Neither the name of the copyright holder nor the names of its
+ *    contributors may be used to endorse or promote products derived from
+ *    this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+ * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+ * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+
+#ifndef TEST_H
+#define TEST_H
+
+
+#include "ndtypes.h"
+
+
+typedef struct {
+    const char *input;
+    const char *indented;
+} indent_testcase_t;
+
+typedef struct {
+    const char *pattern;
+    const char *candidate;
+    int expected;
+} match_testcase_t;
+
+typedef struct {
+    const char *signature;
+    const char *in[128];
+    const char *out[128];
+    const char *broadcast[128];
+    int outer_dims;
+    bool success;
+} typecheck_testcase_t;
+
+typedef struct {
+    const char *signature;
+    const char *sig;
+    const char *core;
+} numba_testcase_t;
+
+extern const char *parse_tests[];
+extern const char *parse_tests[];
+extern const char *parse_roundtrip_tests[];
+extern const char *parse_error_tests[];
+extern const indent_testcase_t indent_tests[];
+extern const char *typedef_tests[];
+extern const char *typedef_error_tests[];
+extern const match_testcase_t match_tests[];
+extern const typecheck_testcase_t typecheck_tests[];
+extern const numba_testcase_t numba_tests[];
+extern const char *buffer_tests[];
+extern const char *buffer_roundtrip_tests[];
+extern const char *buffer_error_tests[];
+
+int test_struct_align_pack(void);
+int test_array(void);
+
+
+#endif /* TEST_H */

data/ext/ruby_ndtypes/ndtypes/libndtypes/tests/test_array.c

@@ -0,0 +1,115 @@
+/*
+ * BSD 3-Clause License
+ *
+ * Copyright (c) 2017-2018, plures
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ *    this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ *    this list of conditions and the following disclaimer in the documentation
+ *    and/or other materials provided with the distribution.
+ *
+ * 3. Neither the name of the copyright holder nor the names of its
+ *    contributors may be used to endorse or promote products derived from
+ *    this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+ * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+ * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdint.h>
+#include <inttypes.h>
+#include <stdalign.h>
+#include <stddef.h>
+#include <string.h>
+#include <assert.h>
+#include "ndtypes.h"
+#include "test.h"
+
+
+#ifdef __clang__
+  #pragma clang diagnostic ignored "-Wgnu-alignof-expression"
+#endif
+
+
+/*********************************************************************/
+/*                           nested arrays                           */
+/*********************************************************************/
+
+#ifdef __GNUC__
+typedef struct {
+    uint8_t data[2][3][10];
+} nested_1;
+
+typedef struct {
+    ndt_complex64_t data[3][7];
+} nested_2;
+
+typedef struct {
+    nested_1 a;
+    nested_2 b;
+} struct_1;
+
+static struct_1 array_1[10][3];
+
+static const char *type_array_1 =
+    "10 * 3 * { a: 2 * 3 * 10 * ?uint8, b: 3 * 7 * ?complex64 }";
+
+int
+test_array(void)
+{
+    ndt_context_t *ctx;
+    ndt_t *t;
+
+    ctx = ndt_context_new();
+    if (ctx == NULL) {
+        fprintf(stderr, "error: out of memory");
+        return -1;
+    }
+
+    t = ndt_from_string(type_array_1, ctx);
+    if (t == NULL) {
+        fprintf(stderr, "test_struct_align_pack: parse: FAIL: %s\n",
+                ndt_context_msg(ctx));
+        ndt_context_del(ctx);
+        return -1;
+    }
+    if (ndt_is_abstract(t)) {
+        fprintf(stderr,
+            "test_struct_align_pack: parse: FAIL: unexpected abstract type\n");
+        ndt_context_del(ctx);
+        return -1;
+    }
+
+    (void)array_1;
+    if (t->datasize != sizeof(array_1)) {
+        fprintf(stderr, "test_array: array_1: FAIL: %" PRIi64 " %zu", t->datasize, sizeof(array_1));
+    }
+    else {
+        fprintf(stderr, "test_array (1 test case)\n");
+    }
+
+    ndt_del(t);
+    ndt_context_del(ctx);
+
+    return 0;
+}
+#endif
+
+

data/ext/ruby_ndtypes/ndtypes/libndtypes/tests/test_buffer.c

@@ -0,0 +1,137 @@
+/*
+ * BSD 3-Clause License
+ *
+ * Copyright (c) 2017-2018, plures
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ *    this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ *    this list of conditions and the following disclaimer in the documentation
+ *    and/or other materials provided with the distribution.
+ *
+ * 3. Neither the name of the copyright holder nor the names of its
+ *    contributors may be used to endorse or promote products derived from
+ *    this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+ * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+ * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+
+#include <stdio.h>
+#include "test.h"
+
+
+const char *buffer_tests[] = {
+  "?",
+  "c", "b", "B",
+  "h", "i", "l", "q",
+  "H", "I", "L", "Q",
+  "n", "N",
+  "e", "f", "d",
+  "E", "F", "D",
+  "s", "100s",
+  "T{b:a:100s:b:}",
+
+
+  "(10,2)?",
+  "(10)c",
+  "(2,3)b",
+  "(0,2,0)B",
+  "(1,2,3,4)h",
+  "(2,3,10)F",
+  "(20,2,100)D",
+  "(10,2)s",
+  "(10,2)100s",
+  "(10,2)T{b:a:100s:b:}",
+  "(10,2)T{b:a:100s:b:}",
+
+  "T{T{F:foo:(2,3)L:bar:}:a:100s:b:}",
+
+  "f -> f",
+  "ff -> f",
+  "fc -> f",
+  "F -> Q",
+
+  "T{b:a:100s:b:} -> T{T{F:foo:(2,3)L:bar:}:a:100s:b:}",
+
+   NULL
+};
+
+const char *buffer_roundtrip_tests[] = {
+  "=b", "<b", ">b",
+  "=B", "<B", ">B",
+  "=h", "<H", ">B",
+  "=i", "<I", ">I",
+  "=q", "<q", ">q",
+  "=H", "<H", ">H",
+  "=I", "<I", ">I",
+  "=Q", "<Q", ">Q",
+  "=e", "<e", ">e",
+  "=f", "<f", ">f",
+  "=d", "<d", ">d",
+  "=E", "<E", ">E",
+  "=F", "<F", ">F",
+  "=D", "<D", ">D",
+
+  "(2)=Q",
+  "(2)<Q",
+  "(2)>Q",
+  "(2,3)=Q",
+  "(2,3)<Q",
+  "(2,3)>Q",
+  "(2,3,4)=Q",
+  "(2,3,4)<Q",
+  "(2,3,4)>Q",
+
+  "T{=b:a:100s:b:}",
+  "T{T{=F:foo:(2,3)=I:bar:}:a:100s:b:}",
+
+   NULL
+};
+
+const char *buffer_error_tests[] = {
+  "&",
+  "Ze",
+  "Zf",
+  "Zd",
+  "O", "O",
+  "T{O:a:100O:b:}",
+
+  "(2,3)T{f:a:=0s:b:}",
+
+  "{10,2)f",
+  "({,2)f",
+  "(10{2)f",
+  "(10,{)f",
+  "(10,2}f",
+  "(10,2}}",
+
+  "(10,2)T{{:a:100s:b:}",
+  "(10,2)T{b{a:100s:b:}",
+  "(10,2)T{b:{:100s:b:}",
+  "(10,2)T{b:a:{:b:}",
+  "(10,2)T{b:a:100{:b:}",
+  "(10,2)T{b:a:100s{b:}",
+  "(10,2)T{b:a:100s:{:}",
+  "(10,2)T{b:a:100s:b{}",
+  "(10,2)T{b:a:100s:b:{",
+  "(10,2)T{b:a:100s:b:}}",
+
+  "T{T{F:foo:(2,3)%:bar:}:a:100s:b:}",
+
+   NULL
+};

data/ext/ruby_ndtypes/ndtypes/libndtypes/tests/test_indent.c

@@ -0,0 +1,201 @@
+/*
+ * BSD 3-Clause License
+ *
+ * Copyright (c) 2017-2018, plures
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ *    this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ *    this list of conditions and the following disclaimer in the documentation
+ *    and/or other materials provided with the distribution.
+ *
+ * 3. Neither the name of the copyright holder nor the names of its
+ *    contributors may be used to endorse or promote products derived from
+ *    this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+ * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+ * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+
+#include <stdio.h>
+#include "test.h"
+
+
+const indent_testcase_t indent_tests[] = {
+  {
+"\
+{battingpost: 100 * {yearID: ?int32, round: ?string, playerID: ?string, teamID: ?string, lgID: (?string, int64, 5 * 10 * {a: complex128, b: ?int32}), G: ?int32, AB: ?int32, R: ?int32, H: (int32, 10 * int32), HR: {a: 10 * float64, b: 10 * int32}, RBI: ?int32, SB: ?int32, CS: ?int32, BB: ?int32, SO: ?int32, IBB: ?int32, HBP: ?int32, SH: ?int32, SF: ?int32, GIDP: ?int32, AString: fixed_string(100,'utf32'), BString: fixed_string(100), CBytes: bytes(align=16), DBytes: fixed_bytes(size=1600, align=16)}, awardsmanagers: 10 * {managerID: ?string, awardID: ?string, yearID: ?int32, lgID: ?string, tie: ?string, notes: ?string}, hofold: 10 * {hofID: ?string, yearid: ?int32, votedBy: ?string, ballots: ?int32, votes: ?int32, inducted: ?string, category: ?string}, salaries: 10 * {yearID: ?int32, teamID: ?string, lgID: ?string, playerID: ?string, salary: ?float64}, pitchingpost: 10 * {playerID: ?string, yearID: ?int32, round: ?string, teamID: ?string, lgID: ?string, W: ?int32, L: ?int32, G: ?int32, GS: ?int32, CG: ?int32, SHO: ?int32, SV: ?int32, IPouts: ?int32, H: ?int32, ER: ?int32, HR: ?int32, BB: ?int32, SO: ?int32, BAOpp: ?float64, ERA: ?float64, IBB: ?int32, WP: ?int32, HBP: ?int32, BK: ?int32, BFP: ?int32, GF: ?int32, R: ?int32, SH: ?int32, SF: ?int32, GIDP: ?int32}, managers: 10 * {managerID: ?string, yearID: ?int32, teamID: ?string, lgID: ?string, inseason: ?int32, G: ?int32, W: ?int32, L: ?int32, rank: ?int32, plyrMgr: ?string}, teams: 10 * {yearID: ?int32, lgID: ?string, teamID: ?string, franchID: ?string, divID: ?string, Rank: ?int32, G: ?int32, Ghome: ?int32, W: ?int32, L: ?int32, DivWin: ?string, WCWin: ?string, LgWin: ?string, WSWin: ?string, R: ?int32, AB: ?int32, H: ?int32, B: ?int32, B: ?int32, HR: ?int32, BB: ?int32, SO: ?int32, SB: ?int32, CS: ?int32, HBP: ?int32, SF: ?int32, RA: ?int32, ER: ?int32, ERA: ?float64, CG: ?int32, SHO: ?int32, SV: ?int32, IPouts: ?int32, HA: ?int32, HRA: ?int32, BBA: ?int32, SOA: ?int32, E: ?int32, DP: ?int32, FP: ?float64, name: ?string, park: ?string, attendance: ?int32, BPF: ?int32, PPF: ?int32, teamIDBR: ?string, teamIDlahman45: ?string, teamIDretro: ?string}}\
+",
+
+"\
+{\n\
+  battingpost : 100 * {\n\
+    yearID : ?int32,\n\
+    round : ?string,\n\
+    playerID : ?string,\n\
+    teamID : ?string,\n\
+    lgID : (?string, int64, 5 * 10 * {\n\
+      a : complex128,\n\
+      b : ?int32\n\
+    }),\n\
+    G : ?int32,\n\
+    AB : ?int32,\n\
+    R : ?int32,\n\
+    H : (int32, 10 * int32),\n\
+    HR : {\n\
+      a : 10 * float64,\n\
+      b : 10 * int32\n\
+    },\n\
+    RBI : ?int32,\n\
+    SB : ?int32,\n\
+    CS : ?int32,\n\
+    BB : ?int32,\n\
+    SO : ?int32,\n\
+    IBB : ?int32,\n\
+    HBP : ?int32,\n\
+    SH : ?int32,\n\
+    SF : ?int32,\n\
+    GIDP : ?int32,\n\
+    AString : fixed_string(100, 'utf32'),\n\
+    BString : fixed_string(100),\n\
+    CBytes : bytes(align=16),\n\
+    DBytes : fixed_bytes(size=1600, align=16)\n\
+  },\n\
+  awardsmanagers : 10 * {\n\
+    managerID : ?string,\n\
+    awardID : ?string,\n\
+    yearID : ?int32,\n\
+    lgID : ?string,\n\
+    tie : ?string,\n\
+    notes : ?string\n\
+  },\n\
+  hofold : 10 * {\n\
+    hofID : ?string,\n\
+    yearid : ?int32,\n\
+    votedBy : ?string,\n\
+    ballots : ?int32,\n\
+    votes : ?int32,\n\
+    inducted : ?string,\n\
+    category : ?string\n\
+  },\n\
+  salaries : 10 * {\n\
+    yearID : ?int32,\n\
+    teamID : ?string,\n\
+    lgID : ?string,\n\
+    playerID : ?string,\n\
+    salary : ?float64\n\
+  },\n\
+  pitchingpost : 10 * {\n\
+    playerID : ?string,\n\
+    yearID : ?int32,\n\
+    round : ?string,\n\
+    teamID : ?string,\n\
+    lgID : ?string,\n\
+    W : ?int32,\n\
+    L : ?int32,\n\
+    G : ?int32,\n\
+    GS : ?int32,\n\
+    CG : ?int32,\n\
+    SHO : ?int32,\n\
+    SV : ?int32,\n\
+    IPouts : ?int32,\n\
+    H : ?int32,\n\
+    ER : ?int32,\n\
+    HR : ?int32,\n\
+    BB : ?int32,\n\
+    SO : ?int32,\n\
+    BAOpp : ?float64,\n\
+    ERA : ?float64,\n\
+    IBB : ?int32,\n\
+    WP : ?int32,\n\
+    HBP : ?int32,\n\
+    BK : ?int32,\n\
+    BFP : ?int32,\n\
+    GF : ?int32,\n\
+    R : ?int32,\n\
+    SH : ?int32,\n\
+    SF : ?int32,\n\
+    GIDP : ?int32\n\
+  },\n\
+  managers : 10 * {\n\
+    managerID : ?string,\n\
+    yearID : ?int32,\n\
+    teamID : ?string,\n\
+    lgID : ?string,\n\
+    inseason : ?int32,\n\
+    G : ?int32,\n\
+    W : ?int32,\n\
+    L : ?int32,\n\
+    rank : ?int32,\n\
+    plyrMgr : ?string\n\
+  },\n\
+  teams : 10 * {\n\
+    yearID : ?int32,\n\
+    lgID : ?string,\n\
+    teamID : ?string,\n\
+    franchID : ?string,\n\
+    divID : ?string,\n\
+    Rank : ?int32,\n\
+    G : ?int32,\n\
+    Ghome : ?int32,\n\
+    W : ?int32,\n\
+    L : ?int32,\n\
+    DivWin : ?string,\n\
+    WCWin : ?string,\n\
+    LgWin : ?string,\n\
+    WSWin : ?string,\n\
+    R : ?int32,\n\
+    AB : ?int32,\n\
+    H : ?int32,\n\
+    B : ?int32,\n\
+    B : ?int32,\n\
+    HR : ?int32,\n\
+    BB : ?int32,\n\
+    SO : ?int32,\n\
+    SB : ?int32,\n\
+    CS : ?int32,\n\
+    HBP : ?int32,\n\
+    SF : ?int32,\n\
+    RA : ?int32,\n\
+    ER : ?int32,\n\
+    ERA : ?float64,\n\
+    CG : ?int32,\n\
+    SHO : ?int32,\n\
+    SV : ?int32,\n\
+    IPouts : ?int32,\n\
+    HA : ?int32,\n\
+    HRA : ?int32,\n\
+    BBA : ?int32,\n\
+    SOA : ?int32,\n\
+    E : ?int32,\n\
+    DP : ?int32,\n\
+    FP : ?float64,\n\
+    name : ?string,\n\
+    park : ?string,\n\
+    attendance : ?int32,\n\
+    BPF : ?int32,\n\
+    PPF : ?int32,\n\
+    teamIDBR : ?string,\n\
+    teamIDlahman45 : ?string,\n\
+    teamIDretro : ?string\n\
+  }\n\
+}\
+" },
+
+  { NULL, NULL }
+};
+