diff options
Diffstat (limited to 'test.cc')
-rw-r--r-- | test.cc | 160 |
1 files changed, 160 insertions, 0 deletions
@@ -0,0 +1,160 @@ +/* c++ -Izap/include -L. -otest test.cc -lzap */ + +#include <cassert> +#include <cinttypes> +#include <cstddef> +#include <cstdint> +#include <cstdio> +#include <zap/base.h> + +int main(void) { + ::std::fprintf(stderr,"zap test\n"); + ::std::fprintf(stderr,"arch: %s\n",sus_archstr); + ::std::fprintf(stderr,"fast: %s\n",::zap_fastimpl ? "yes" : "no"); + ::std::fprintf(stderr,"\n"); + { + constexpr auto arrsz {zap_typlit_usz(0x8)}; + ::std::uint_least64_t arr0[arrsz] {zap_typlit_u40(0x0)}; + ::zap_memfill(arr0,arrsz * sizeof (::std::uint_least64_t),zap_typlit_u8(0x0)); + ::std::fprintf(stderr,"arr0[0]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x0)]); + ::std::fprintf(stderr,"arr0[1]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x1)]); + ::std::fprintf(stderr,"arr0[2]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x2)]); + ::std::fprintf(stderr,"arr0[3]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x3)]); + ::std::fprintf(stderr,"arr0[4]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x4)]); + ::std::fprintf(stderr,"arr0[5]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x5)]); + ::std::fprintf(stderr,"arr0[6]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x6)]); + assert(arr0[zap_typlit_usz(0x0)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x1)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x2)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x3)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x4)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x5)] == zap_typlit_u40(0x0)); + assert(arr0[zap_typlit_usz(0x6)] == zap_typlit_u40(0x0)); + ::zap_memfill(arr0,arrsz * sizeof (::std::uint_least64_t),zap_typlit_u8(0x7F)); + ::std::fprintf(stderr,"arr0[0]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x0)]); + ::std::fprintf(stderr,"arr0[1]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x1)]); + ::std::fprintf(stderr,"arr0[2]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x2)]); + ::std::fprintf(stderr,"arr0[3]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x3)]); + ::std::fprintf(stderr,"arr0[4]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x4)]); + ::std::fprintf(stderr,"arr0[5]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x5)]); + ::std::fprintf(stderr,"arr0[6]: %" PRIX64 "\n",arr0[zap_typlit_usz(0x6)]); + assert(arr0[zap_typlit_usz(0x0)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x1)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x2)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x3)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x4)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x5)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + assert(arr0[zap_typlit_usz(0x6)] == zap_typlit_u40(0x7F7F7F7F7F7F7F7F)); + ::std::uint_least64_t arr1[arrsz] {zap_typlit_u40(0x0)}; + ::zap_memcpy(arr0,arrsz * sizeof (::std::uint_least64_t),arr1); + ::std::fprintf(stderr,"arr1[0]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x0)]); + ::std::fprintf(stderr,"arr1[1]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x1)]); + ::std::fprintf(stderr,"arr1[2]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x2)]); + ::std::fprintf(stderr,"arr1[3]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x3)]); + ::std::fprintf(stderr,"arr1[4]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x4)]); + ::std::fprintf(stderr,"arr1[5]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x5)]); + ::std::fprintf(stderr,"arr1[6]: %" PRIX64 "\n",arr1[zap_typlit_usz(0x6)]); + assert(arr1[zap_typlit_usz(0x0)] == arr0[zap_typlit_usz(0x0)]); + assert(arr1[zap_typlit_usz(0x1)] == arr0[zap_typlit_usz(0x1)]); + assert(arr1[zap_typlit_usz(0x2)] == arr0[zap_typlit_usz(0x2)]); + assert(arr1[zap_typlit_usz(0x3)] == arr0[zap_typlit_usz(0x3)]); + assert(arr1[zap_typlit_usz(0x4)] == arr0[zap_typlit_usz(0x4)]); + assert(arr1[zap_typlit_usz(0x5)] == arr0[zap_typlit_usz(0x5)]); + assert(arr1[zap_typlit_usz(0x6)] == arr0[zap_typlit_usz(0x6)]); + auto const eq {::zap_memeq(arr1,arrsz,arr0)}; + ::std::fprintf(stderr,"eq: %u\n",eq); + assert(eq); + } + ::std::fprintf(stderr,"\n"); + { + auto const str {"Hello there! General Kenobi?"}; + ::std::fprintf(stderr,"str: \"%s\"\n",str); + auto const strsz {::zap_strlen(str)}; + ::std::fprintf(stderr,"strsz: %zX\n",strsz); + assert(strsz == zap_typlit_usz(0x1C)); + } + ::std::fprintf(stderr,"\n"); + { + auto str {"Oh my science!"}; + ::std::fprintf(stderr,"str: \"%s\"\n",str); + auto len {::zap_strlen(str)}; + ::std::fprintf(stderr,"len: %zX\n",len); + ::std::size_t pos0 = ::zap_fndchr(str,' '); + ::std::size_t pos1 = ::zap_fndbyte(str,len,(::std::uint_least8_t)' '); + ::std::fprintf(stderr,"pos0: %zX\n",pos0); + ::std::fprintf(stderr,"pos1: %zX\n",pos1); + assert(pos0 == zap_typlit_usz(0x2)); + assert(pos1 == pos0); + str += pos0 + zap_typlit_usz(0x1); + len = ::zap_strlen(str); + pos0 = ::zap_fndchr(str,' '); + pos1 = ::zap_fndbyte(str,len,(::std::uint_least8_t)' '); + ::std::fprintf(stderr,"pos0: %zX\n",pos0); + ::std::fprintf(stderr,"pos1: %zX\n",pos1); + assert(pos0 == zap_typlit_usz(0x2)); + assert(pos1 == pos0); + str += pos0 + zap_typlit_usz(0x1); + len = ::zap_strlen(str); + pos0 = ::zap_fndchr(str,' '); + pos1 = ::zap_fndbyte(str,len,(::std::uint_least8_t)' '); + ::std::fprintf(stderr,"pos0: %zX\n",pos0); + ::std::fprintf(stderr,"pos1: %zX\n",pos1); + assert(pos0 == (::std::size_t)-0x1); + assert(pos1 == pos0); + } + ::std::fprintf(stderr,"\n"); + { + char const str0[] = "What's up, my guy?"; + ::std::fprintf(stderr,"str0: \"%s\"\n",str0); + char const str1[] = "What's up, my guy?"; + ::std::fprintf(stderr,"str1: \"%s\"\n",str1); + char const str2[] = "I don't know you!"; + ::std::fprintf(stderr,"str2: \"%s\"\n",str2); + bool const cmp0 = ::zap_streq(str0,str1); + bool const cmp1 = ::zap_streq(str0,str2); + bool const cmp2 = ::zap_streq(str1,str2); + ::std::fprintf(stderr,"cmp0: %u\n",cmp0); + ::std::fprintf(stderr,"cmp1: %u\n",cmp1); + ::std::fprintf(stderr,"cmp2: %u\n",cmp2); + assert(cmp0); + assert(!cmp1); + assert(!cmp2); + } + ::std::fprintf(stderr,"\n"); + { + char const str0[] = "What in the world are you doing?"; + ::std::fprintf(stderr,"str0: \"%s\"\n",str0); + char str1[sizeof (str0)]; + assert(::zap_strcpy(str0,str1) == zap_typlit_usz(0x20)); + ::std::fprintf(stderr,"str1: \"%s\"\n",str1); + assert(::zap_streq(str0,str1)); + } + ::std::fprintf(stderr,"\n"); + { + char const str0[] {"Oej Moej Goejd"}; + char const str1[] {"Er jeg egentlig okay med AWP?"}; + ::std::fprintf(stderr,"str0: \"%s\"\n",str0); + ::std::fprintf(stderr,"str1: \"%s\"\n",str1); + auto const cmp0 {::zap_strcmp(str0,str1)}; + auto const cmp1 {::zap_strcmp(str0,str0)}; + auto const cmp2 {::zap_strcmp(str1,str0)}; + auto const leastsz {sizeof (str0) < sizeof (str1) ? sizeof (str0) : sizeof (str1)}; + auto const cmp3 {::zap_memcmp(str0,leastsz,str1)}; + auto const cmp4 {::zap_memcmp(str0,leastsz,str0)}; + auto const cmp5 {::zap_memcmp(str1,leastsz,str0)}; + ::std::fprintf(stderr,"cmp0: %i\n",cmp0); + ::std::fprintf(stderr,"cmp1: %i\n",cmp1); + ::std::fprintf(stderr,"cmp2: %i\n",cmp2); + ::std::fprintf(stderr,"cmp3: %i\n",cmp3); + ::std::fprintf(stderr,"cmp4: %i\n",cmp4); + ::std::fprintf(stderr,"cmp5: %i\n",cmp5); + assert(cmp0 > zap_typlit_s8(0x0)); + assert(cmp1 == zap_typlit_s8(0x0)); + assert(cmp2 < zap_typlit_s8(0x0)); + assert(cmp3 > zap_typlit_s8(0x0)); + assert(cmp4 == zap_typlit_s8(0x0)); + assert(cmp5 < zap_typlit_s8(0x0)); + } + ::std::fprintf(stderr,"\n"); + ::std::fprintf(stderr,"All tests have passed!\n"); +} |