text: /* Copyright The libuv project and contributors. All rights reserved.
   *
   * Permission is hereby granted, free of charge, to any person obtaining a copy
   * of this software and associated documentation files (the "Software"), to
   * deal in the Software without restriction, including without limitation the
   * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
   * sell copies of the Software, and to permit persons to whom the Software is
   * furnished to do so, subject to the following conditions:
   *
   * The above copyright notice and this permission notice shall be included in
   * all copies or substantial portions of the Software.
   *
   * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
   * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
   * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
   * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
   * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
   * IN THE SOFTWARE.
   */
  
  #include "task.h"
  #include "../src/idna.c"
  #include <string.h>
  
  TEST_IMPL(utf8_decode1) {
    const char* p;
    char b[32];
    int i;
  
    /* ASCII. */
    p = b;
    snprintf(b, sizeof(b), "%c\x7F", 0x00);
    ASSERT(0 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 1);
    ASSERT(127 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 2);
  
    /* Two-byte sequences. */
    p = b;
    snprintf(b, sizeof(b), "\xC2\x80\xDF\xBF");
    ASSERT(128 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 2);
    ASSERT(0x7FF == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 4);
  
    /* Three-byte sequences. */
    p = b;
    snprintf(b, sizeof(b), "\xE0\xA0\x80\xEF\xBF\xBF");
    ASSERT(0x800 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 3);
    ASSERT(0xFFFF == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 6);
  
    /* Four-byte sequences. */
    p = b;
    snprintf(b, sizeof(b), "\xF0\x90\x80\x80\xF4\x8F\xBF\xBF");
    ASSERT(0x10000 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 4);
    ASSERT(0x10FFFF == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 8);
  
    /* Four-byte sequences > U+10FFFF; disallowed. */
    p = b;
    snprintf(b, sizeof(b), "\xF4\x90\xC0\xC0\xF7\xBF\xBF\xBF");
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 4);
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 8);
  
    /* Overlong; disallowed. */
    p = b;
    snprintf(b, sizeof(b), "\xC0\x80\xC1\x80");
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 2);
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 4);
  
    /* Surrogate pairs; disallowed. */
    p = b;
    snprintf(b, sizeof(b), "\xED\xA0\x80\xED\xA3\xBF");
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 3);
    ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
    ASSERT(p == b + 6);
  
    /* Simply illegal. */
    p = b;
    snprintf(b, sizeof(b), "\xF8\xF9\xFA\xFB\xFC\xFD\xFE\xFF");
  
    for (i = 1; i <= 8; i++) {
      ASSERT((unsigned) -1 == uv__utf8_decode1(&p, b + sizeof(b)));
      ASSERT(p == b + i);
    }
  
    return 0;
  }
  
  /* Doesn't work on z/OS because that platform uses EBCDIC, not ASCII. */
  #ifndef __MVS__
  
  #define F(input, err)                                                         \
    do {                                                                        \
      char d[256] = {0};                                                        \
      static const char s[] = "" input "";                                      \
      ASSERT(err == uv__idna_toascii(s, s + sizeof(s) - 1, d, d + sizeof(d)));  \
    } while (0)
  
  #define T(input, expected)                                                    \
    do {                                                                        \
      long n;                                                                   \
      char d1[256] = {0};                                                       \
      char d2[256] = {0};                                                       \
      static const char s[] = "" input "";                                      \
      n = uv__idna_toascii(s, s + sizeof(s) - 1, d1, d1 + sizeof(d1));          \
      ASSERT(n == sizeof(expected));                                            \
      ASSERT(0 == memcmp(d1, expected, n));                                     \
      /* Sanity check: encoding twice should not change the output. */          \
      n = uv__idna_toascii(d1, d1 + strlen(d1), d2, d2 + sizeof(d2));           \
      ASSERT(n == sizeof(expected));                                            \
      ASSERT(0 == memcmp(d2, expected, n));                                     \
      ASSERT(0 == memcmp(d1, d2, sizeof(d2)));                                  \
    } while (0)
  
  TEST_IMPL(idna_toascii) {
    /* Illegal inputs. */
    F("\xC0\x80\xC1\x80", UV_EINVAL);  /* Overlong UTF-8 sequence. */
    F("\xC0\x80\xC1\x80.com", UV_EINVAL);  /* Overlong UTF-8 sequence. */
    /* No conversion. */
    T("", "");
    T(".", ".");
    T(".com", ".com");
    T("example", "example");
    T("example-", "example-");
    T("straße.de", "xn--strae-oqa.de");
    /* Test cases adapted from punycode.js. Most are from RFC 3492. */
    T("foo.bar", "foo.bar");
    T("mañana.com", "xn--maana-pta.com");
    T("example.com.", "example.com.");
    T("bücher.com", "xn--bcher-kva.com");
    T("café.com", "xn--caf-dma.com");
    T("café.café.com", "xn--caf-dma.xn--caf-dma.com");
    T("☃-⌘.com", "xn----dqo34k.com");
    T("퐀☃-⌘.com", "xn----dqo34kn65z.com");
    T("💩.la", "xn--ls8h.la");
    T("mañana.com", "xn--maana-pta.com");
    T("mañana。com", "xn--maana-pta.com");
    T("mañana．com", "xn--maana-pta.com");
    T("mañana｡com", "xn--maana-pta.com");
    T("ü", "xn--tda");
    T(".ü", ".xn--tda");
    T("ü.ü", "xn--tda.xn--tda");
    T("ü.ü.", "xn--tda.xn--tda.");
    T("üëäö♥", "xn--4can8av2009b");
    T("Willst du die Blüthe des frühen, die Früchte des späteren Jahres",
      "xn--Willst du die Blthe des frhen, "
      "die Frchte des spteren Jahres-x9e96lkal");
    T("ليهمابتكلموشعربي؟", "xn--egbpdaj6bu4bxfgehfvwxn");
    T("他们为什么不说中文", "xn--ihqwcrb4cv8a8dqg056pqjye");
    T("他們爲什麽不說中文", "xn--ihqwctvzc91f659drss3x8bo0yb");
    T("Pročprostěnemluvíčesky", "xn--Proprostnemluvesky-uyb24dma41a");
    T("למההםפשוטלאמדבריםעברית", "xn--4dbcagdahymbxekheh6e0a7fei0b");
    T("यहलोगहिन्दीक्योंनहींबोलसकतेहैं",
      "xn--i1baa7eci9glrd9b2ae1bj0hfcgg6iyaf8o0a1dig0cd");
    T("なぜみんな日本語を話してくれないのか",
      "xn--n8jok5ay5dzabd5bym9f0cm5685rrjetr6pdxa");
    T("세계의모든사람들이한국어를이해한다면얼마나좋을까",
      "xn--989aomsvi5e83db1d2a355cv1e0vak1d"
      "wrv93d5xbh15a0dt30a5jpsd879ccm6fea98c");
    T("почемужеонинеговорятпорусски", "xn--b1abfaaepdrnnbgefbadotcwatmq2g4l");
    T("PorquénopuedensimplementehablarenEspañol",
      "xn--PorqunopuedensimplementehablarenEspaol-fmd56a");
    T("TạisaohọkhôngthểchỉnóitiếngViệt",
      "xn--TisaohkhngthchnitingVit-kjcr8268qyxafd2f1b9g");
    T("3年B組金八先生", "xn--3B-ww4c5e180e575a65lsy2b");
    T("安室奈美恵-with-SUPER-MONKEYS",
      "xn---with-SUPER-MONKEYS-pc58ag80a8qai00g7n9n");
    T("Hello-Another-Way-それぞれの場所",
      "xn--Hello-Another-Way--fc4qua05auwb3674vfr0b");
    T("ひとつ屋根の下2", "xn--2-u9tlzr9756bt3uc0v");
    T("MajiでKoiする5秒前", "xn--MajiKoi5-783gue6qz075azm5e");
    T("パフィーdeルンバ", "xn--de-jg4avhby1noc0d");
    T("そのスピードで", "xn--d9juau41awczczp");
    T("-> $1.00 <-", "-> $1.00 <-");
    /* Test cases from https://unicode.org/reports/tr46/ */
    T("faß.de", "xn--fa-hia.de");
    T("βόλος.com", "xn--nxasmm1c.com");
    T("ශ්‍රී.com", "xn--10cl1a0b660p.com");
    T("نامه‌ای.com", "xn--mgba3gch31f060k.com");
    return 0;
  }
  
  #undef T
  
  #endif  /* __MVS__ */
  