Coverage Report

Created: 2026-06-30 06:38

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/libidn2/lib/lookup.c
Line
Count
Source
1
/* lookup.c - implementation of IDNA2008 lookup functions
2
   Copyright (C) 2011-2026 Simon Josefsson
3
   Copyright (C) 2017-2026 Tim Ruehsen
4
5
   Libidn2 is free software: you can redistribute it and/or modify it
6
   under the terms of either:
7
8
     * the GNU Lesser General Public License as published by the Free
9
       Software Foundation; either version 3 of the License, or (at
10
       your option) any later version.
11
12
   or
13
14
     * the GNU General Public License as published by the Free
15
       Software Foundation; either version 2 of the License, or (at
16
       your option) any later version.
17
18
   or both in parallel, as here.
19
20
   This program is distributed in the hope that it will be useful,
21
   but WITHOUT ANY WARRANTY; without even the implied warranty of
22
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23
   GNU General Public License for more details.
24
25
   You should have received copies of the GNU General Public License and
26
   the GNU Lesser General Public License along with this program.  If
27
   not, see <http://www.gnu.org/licenses/>.
28
*/
29
30
#include <config.h>
31
32
#include "idn2.h"
33
34
#include <errno.h>    /* errno */
35
#include <stdlib.h>   /* malloc, free */
36
37
#include <unitypes.h>
38
#include <uniconv.h>    /* u8_strconv_from_locale */
39
#include <uninorm.h>    /* u32_normalize */
40
#include <unistr.h>   /* u8_to_u32 */
41
42
#include "idna.h"   /* _idn2_label_test */
43
#include "tr46map.h"    /* definition for tr46map.c */
44
45
#ifdef HAVE_LIBUNISTRING
46
/* copied from gnulib */
47
# include <limits.h>
48
# define _C_CTYPE_LOWER_N(N) \
49
   case 'a' + (N): case 'b' + (N): case 'c' + (N): case 'd' + (N): \
50
   case 'e' + (N): case 'f' + (N): \
51
   case 'g' + (N): case 'h' + (N): case 'i' + (N): case 'j' + (N): \
52
   case 'k' + (N): case 'l' + (N): case 'm' + (N): case 'n' + (N): \
53
   case 'o' + (N): case 'p' + (N): case 'q' + (N): case 'r' + (N): \
54
   case 's' + (N): case 't' + (N): case 'u' + (N): case 'v' + (N): \
55
   case 'w' + (N): case 'x' + (N): case 'y' + (N): case 'z' + (N)
56
# define _C_CTYPE_UPPER _C_CTYPE_LOWER_N ('A' - 'a')
57
static inline int
58
c_tolower (int c)
59
{
60
  switch (c)
61
    {
62
    _C_CTYPE_UPPER:
63
      return c - 'A' + 'a';
64
    default:
65
      return c;
66
    }
67
}
68
69
static int
70
c_strncasecmp (const char *s1, const char *s2, size_t n)
71
{
72
  register const unsigned char *p1 = (const unsigned char *) s1;
73
  register const unsigned char *p2 = (const unsigned char *) s2;
74
  unsigned char c1, c2;
75
76
  if (p1 == p2 || n == 0)
77
    return 0;
78
79
  do
80
    {
81
      c1 = c_tolower (*p1);
82
      c2 = c_tolower (*p2);
83
84
      if (--n == 0 || c1 == '\0')
85
  break;
86
87
      ++p1;
88
      ++p2;
89
    }
90
  while (c1 == c2);
91
92
  if (UCHAR_MAX <= INT_MAX)
93
    return c1 - c2;
94
  else
95
    /* On machines where 'char' and 'int' are types of the same size, the
96
       difference of two 'unsigned char' values - including the sign bit -
97
       doesn't fit in an 'int'.  */
98
    return (c1 > c2 ? 1 : c1 < c2 ? -1 : 0);
99
}
100
#else
101
# include <c-strcase.h>
102
#endif
103
104
static int
105
set_default_flags (int *flags)
106
26.7k
{
107
26.7k
  if (((*flags) & IDN2_TRANSITIONAL) && ((*flags) & IDN2_NONTRANSITIONAL))
108
0
    return IDN2_INVALID_FLAGS;
109
110
26.7k
  if (((*flags) & (IDN2_TRANSITIONAL | IDN2_NONTRANSITIONAL))
111
17.6k
      && ((*flags) & IDN2_NO_TR46))
112
0
    return IDN2_INVALID_FLAGS;
113
114
26.7k
  if (((*flags) & IDN2_ALABEL_ROUNDTRIP)
115
0
      && ((*flags) & IDN2_NO_ALABEL_ROUNDTRIP))
116
0
    return IDN2_INVALID_FLAGS;
117
118
26.7k
  if (!((*flags) & (IDN2_NO_TR46 | IDN2_TRANSITIONAL)))
119
17.9k
    *flags |= IDN2_NONTRANSITIONAL;
120
121
26.7k
  return IDN2_OK;
122
26.7k
}
123
124
static int
125
label (const uint8_t *src, size_t srclen, uint8_t *dst, size_t *dstlen,
126
       int flags)
127
26.0k
{
128
26.0k
  size_t plen;
129
26.0k
  uint32_t *p = NULL;
130
26.0k
  const uint8_t *src_org = NULL;
131
26.0k
  uint8_t *src_allocated = NULL;
132
26.0k
  int rc, check_roundtrip = 0;
133
26.0k
  size_t tmpl, srclen_org = 0;
134
26.0k
  uint32_t label_u32[IDN2_LABEL_MAX_LENGTH];
135
26.0k
  size_t label32_len = IDN2_LABEL_MAX_LENGTH;
136
137
26.0k
  if (_idn2_ascii_p (src, srclen))
138
10.9k
    {
139
10.9k
      if (!(flags & IDN2_NO_ALABEL_ROUNDTRIP) && srclen >= 4
140
5.16k
    && memcmp (src, "xn--", 4) == 0)
141
4.04k
  {
142
    /*
143
       If the input to this procedure appears to be an A-label
144
       (i.e., it starts in "xn--", interpreted
145
       case-insensitively), the lookup application MAY attempt to
146
       convert it to a U-label, first ensuring that the A-label is
147
       entirely in lowercase (converting it to lowercase if
148
       necessary), and apply the tests of Section 5.4 and the
149
       conversion of Section 5.5 to that form. */
150
4.04k
    rc = idn2_punycode_decode ((char *) src + 4, srclen - 4,
151
4.04k
             label_u32, &label32_len);
152
4.04k
    if (rc)
153
0
      return rc;
154
155
4.04k
    check_roundtrip = 1;
156
4.04k
    src_org = src;
157
4.04k
    srclen_org = srclen;
158
159
4.04k
    srclen = IDN2_LABEL_MAX_LENGTH;
160
4.04k
    src = src_allocated =
161
4.04k
      u32_to_u8 (label_u32, label32_len, NULL, &srclen);
162
4.04k
    if (!src)
163
0
      {
164
0
        if (errno == ENOMEM)
165
0
    return IDN2_MALLOC;
166
0
        return IDN2_ENCODING_ERROR;
167
0
      }
168
4.04k
  }
169
6.88k
      else
170
6.88k
  {
171
6.88k
    if (srclen > IDN2_LABEL_MAX_LENGTH)
172
65
      return IDN2_TOO_BIG_LABEL;
173
6.81k
    if (srclen > *dstlen)
174
0
      return IDN2_TOO_BIG_DOMAIN;
175
176
6.81k
    memcpy (dst, src, srclen);
177
6.81k
    *dstlen = srclen;
178
6.81k
    return IDN2_OK;
179
6.81k
  }
180
10.9k
    }
181
182
19.1k
  rc = _idn2_u8_to_u32_nfc (src, srclen, &p, &plen, flags & IDN2_NFC_INPUT);
183
19.1k
  if (rc != IDN2_OK)
184
0
    goto out;
185
186
19.1k
  if (!(flags & IDN2_TRANSITIONAL))
187
12.9k
    {
188
12.9k
      rc = _idn2_label_test (TEST_NFC |
189
12.9k
           TEST_2HYPHEN |
190
12.9k
           TEST_LEADING_COMBINING |
191
12.9k
           TEST_DISALLOWED |
192
12.9k
           TEST_CONTEXTJ_RULE |
193
12.9k
           TEST_CONTEXTO_WITH_RULE |
194
12.9k
           TEST_UNASSIGNED | TEST_BIDI |
195
12.9k
           ((flags & IDN2_NONTRANSITIONAL) ?
196
12.9k
            TEST_NONTRANSITIONAL : 0) | ((flags &
197
12.9k
                  IDN2_USE_STD3_ASCII_RULES)
198
12.9k
                 ? 0 :
199
12.9k
                 TEST_ALLOW_STD3_DISALLOWED),
200
12.9k
           p, plen);
201
202
12.9k
      if (rc != IDN2_OK)
203
4.14k
  goto out;
204
12.9k
    }
205
206
15.0k
  dst[0] = 'x';
207
15.0k
  dst[1] = 'n';
208
15.0k
  dst[2] = '-';
209
15.0k
  dst[3] = '-';
210
211
15.0k
  tmpl = *dstlen - 4;
212
15.0k
  rc = idn2_punycode_encode (p, plen, (char *) dst + 4, &tmpl);
213
15.0k
  if (rc != IDN2_OK)
214
322
    goto out;
215
216
217
14.7k
  *dstlen = 4 + tmpl;
218
219
14.7k
  if (check_roundtrip)
220
3.25k
    {
221
3.25k
      if (srclen_org != *dstlen
222
3.25k
    || c_strncasecmp ((char *) src_org, (char *) dst, srclen_org))
223
67
  {
224
67
    rc = IDN2_ALABEL_ROUNDTRIP_FAILED;
225
67
    goto out;
226
67
  }
227
3.25k
    }
228
11.4k
  else if (!(flags & IDN2_NO_ALABEL_ROUNDTRIP))
229
11.4k
    {
230
11.4k
      rc = idn2_punycode_decode ((char *) dst + 4, *dstlen - 4,
231
11.4k
         label_u32, &label32_len);
232
11.4k
      if (rc)
233
1.20k
  {
234
1.20k
    rc = IDN2_ALABEL_ROUNDTRIP_FAILED;
235
1.20k
    goto out;
236
1.20k
  }
237
238
10.2k
      if (plen != label32_len || u32_cmp (p, label_u32, label32_len))
239
0
  {
240
0
    rc = IDN2_ALABEL_ROUNDTRIP_FAILED;
241
0
    goto out;
242
0
  }
243
10.2k
    }
244
245
13.4k
  rc = IDN2_OK;
246
247
19.1k
out:
248
19.1k
  free (p);
249
19.1k
  free (src_allocated);
250
19.1k
  return rc;
251
13.4k
}
252
253
#define TR46_TRANSITIONAL_CHECK \
254
8.05k
  (TEST_NFC | TEST_2HYPHEN | TEST_HYPHEN_STARTEND | TEST_LEADING_COMBINING | TEST_TRANSITIONAL)
255
#define TR46_NONTRANSITIONAL_CHECK \
256
51.8k
  (TEST_NFC | TEST_2HYPHEN | TEST_HYPHEN_STARTEND | TEST_LEADING_COMBINING | TEST_NONTRANSITIONAL)
257
258
static int
259
_tr46 (const uint8_t *domain_u8, uint8_t **out, int flags)
260
26.7k
{
261
26.7k
  size_t len, it;
262
26.7k
  uint32_t *domain_u32;
263
26.7k
  int err = IDN2_OK, rc;
264
26.7k
  int transitional = 0;
265
26.7k
  int test_flags;
266
267
26.7k
  if (flags & IDN2_TRANSITIONAL)
268
8.83k
    transitional = 1;
269
270
  /* convert UTF-8 to UTF-32 */
271
26.7k
  if (!(domain_u32 =
272
26.7k
  u8_to_u32 (domain_u8, u8_strlen (domain_u8) + 1, NULL, &len)))
273
1.84k
    {
274
1.84k
      if (errno == ENOMEM)
275
0
  return IDN2_MALLOC;
276
1.84k
      return IDN2_ENCODING_ERROR;
277
1.84k
    }
278
279
24.9k
  size_t len2 = 0;
280
363k
  for (it = 0; it < len - 1; it++)
281
339k
    {
282
339k
      IDNAMap map;
283
284
339k
      get_idna_map (domain_u32[it], &map);
285
286
339k
      if (map_is (&map, TR46_FLG_DISALLOWED))
287
888
  {
288
888
    if (domain_u32[it])
289
888
      {
290
888
        free (domain_u32);
291
888
        return IDN2_DISALLOWED;
292
888
      }
293
0
    len2++;
294
0
  }
295
338k
      else if (map_is (&map, TR46_FLG_MAPPED))
296
89.9k
  {
297
89.9k
    len2 += map.nmappings;
298
89.9k
  }
299
248k
      else if (map_is (&map, TR46_FLG_VALID))
300
158k
  {
301
158k
    len2++;
302
158k
  }
303
90.0k
      else if (map_is (&map, TR46_FLG_IGNORED))
304
4.07k
  {
305
4.07k
    continue;
306
4.07k
  }
307
85.9k
      else if (map_is (&map, TR46_FLG_DEVIATION))
308
8.88k
  {
309
8.88k
    if (transitional)
310
2.80k
      {
311
2.80k
        len2 += map.nmappings;
312
2.80k
      }
313
6.08k
    else
314
6.08k
      len2++;
315
8.88k
  }
316
77.0k
      else if (!(flags & IDN2_USE_STD3_ASCII_RULES))
317
51.5k
  {
318
51.5k
    if (map_is (&map, TR46_FLG_DISALLOWED_STD3_VALID))
319
42.8k
      {
320
        /* valid because UseSTD3ASCIIRules=false, see #TR46 5 */
321
42.8k
        len2++;
322
42.8k
      }
323
8.73k
    else if (map_is (&map, TR46_FLG_DISALLOWED_STD3_MAPPED))
324
8.73k
      {
325
        /* mapped because UseSTD3ASCIIRules=false, see #TR46 5 */
326
8.73k
        len2 += map.nmappings;
327
8.73k
      }
328
51.5k
  }
329
339k
    }
330
331
  /* Exit early if result is too long.
332
   * This avoids excessive CPU usage in punycode encoding, which is O(N^2). */
333
24.0k
  if (len2 >= IDN2_DOMAIN_MAX_LENGTH)
334
201
    {
335
201
      free (domain_u32);
336
201
      return IDN2_TOO_BIG_DOMAIN;
337
201
    }
338
339
23.8k
  uint32_t *tmp = (uint32_t *) malloc ((len2 + 1) * sizeof (uint32_t));
340
23.8k
  if (!tmp)
341
0
    {
342
0
      free (domain_u32);
343
0
      return IDN2_MALLOC;
344
0
    }
345
346
23.8k
  len2 = 0;
347
295k
  for (it = 0; it < len - 1; it++)
348
271k
    {
349
271k
      uint32_t c = domain_u32[it];
350
271k
      IDNAMap map;
351
352
271k
      get_idna_map (c, &map);
353
354
271k
      if (map_is (&map, TR46_FLG_DISALLOWED))
355
0
  {
356
0
    tmp[len2++] = c;
357
0
  }
358
271k
      else if (map_is (&map, TR46_FLG_MAPPED))
359
84.1k
  {
360
84.1k
    len2 += get_map_data (tmp + len2, &map);
361
84.1k
  }
362
187k
      else if (map_is (&map, TR46_FLG_VALID))
363
129k
  {
364
129k
    tmp[len2++] = c;
365
129k
  }
366
57.7k
      else if (map_is (&map, TR46_FLG_IGNORED))
367
4.06k
  {
368
4.06k
    continue;
369
4.06k
  }
370
53.7k
      else if (map_is (&map, TR46_FLG_DEVIATION))
371
8.80k
  {
372
8.80k
    if (transitional)
373
2.78k
      {
374
2.78k
        len2 += get_map_data (tmp + len2, &map);
375
2.78k
      }
376
6.02k
    else
377
6.02k
      tmp[len2++] = c;
378
8.80k
  }
379
44.9k
      else if (!(flags & IDN2_USE_STD3_ASCII_RULES))
380
22.9k
  {
381
22.9k
    if (map_is (&map, TR46_FLG_DISALLOWED_STD3_VALID))
382
18.8k
      {
383
18.8k
        tmp[len2++] = c;
384
18.8k
      }
385
4.11k
    else if (map_is (&map, TR46_FLG_DISALLOWED_STD3_MAPPED))
386
4.11k
      {
387
4.11k
        len2 += get_map_data (tmp + len2, &map);
388
4.11k
      }
389
22.9k
  }
390
271k
    }
391
23.8k
  free (domain_u32);
392
393
  /* Normalize to NFC */
394
23.8k
  tmp[len2] = 0;
395
23.8k
  domain_u32 = u32_normalize (UNINORM_NFC, tmp, len2 + 1, NULL, &len);
396
23.8k
  free (tmp);
397
23.8k
  tmp = NULL;
398
399
23.8k
  if (!domain_u32)
400
0
    {
401
0
      if (errno == ENOMEM)
402
0
  return IDN2_MALLOC;
403
0
      return IDN2_ENCODING_ERROR;
404
0
    }
405
406
  /* split into labels and check */
407
23.8k
  uint32_t *e, *s;
408
58.6k
  for (e = s = domain_u32; *e; s = e)
409
36.8k
    {
410
367k
      while (*e && *e != '.')
411
330k
  e++;
412
413
36.8k
      if (e - s >= 4 && s[0] == 'x' && s[1] == 'n' && s[2] == '-'
414
12.1k
    && s[3] == '-')
415
11.7k
  {
416
    /* decode punycode and check result non-transitional */
417
11.7k
    size_t ace_len;
418
11.7k
    uint32_t name_u32[IDN2_LABEL_MAX_LENGTH];
419
11.7k
    size_t name_len = IDN2_LABEL_MAX_LENGTH;
420
11.7k
    uint8_t *ace;
421
422
11.7k
    ace = u32_to_u8 (s + 4, e - s - 4, NULL, &ace_len);
423
11.7k
    if (!ace)
424
0
      {
425
0
        free (domain_u32);
426
0
        if (errno == ENOMEM)
427
0
    return IDN2_MALLOC;
428
0
        return IDN2_ENCODING_ERROR;
429
0
      }
430
431
11.7k
    rc = idn2_punycode_decode ((char *) ace, ace_len,
432
11.7k
             name_u32, &name_len);
433
434
11.7k
    free (ace);
435
436
11.7k
    if (rc)
437
2.03k
      {
438
2.03k
        free (domain_u32);
439
2.03k
        return rc;
440
2.03k
      }
441
442
9.67k
    test_flags = TR46_NONTRANSITIONAL_CHECK;
443
444
9.67k
    if (!(flags & IDN2_USE_STD3_ASCII_RULES))
445
6.32k
      test_flags |= TEST_ALLOW_STD3_DISALLOWED;
446
447
9.67k
    if ((rc = _idn2_label_test (test_flags, name_u32, name_len)))
448
5.19k
      err = rc;
449
9.67k
  }
450
25.1k
      else
451
25.1k
  {
452
25.1k
    test_flags =
453
25.1k
      transitional ? TR46_TRANSITIONAL_CHECK :
454
25.1k
      TR46_NONTRANSITIONAL_CHECK;
455
456
25.1k
    if (!(flags & IDN2_USE_STD3_ASCII_RULES))
457
17.3k
      test_flags |= TEST_ALLOW_STD3_DISALLOWED;
458
459
25.1k
    if ((rc = _idn2_label_test (test_flags, s, e - s)))
460
2.69k
      err = rc;
461
25.1k
  }
462
463
34.7k
      if (*e)
464
14.2k
  e++;
465
34.7k
    }
466
467
21.8k
  if (err == IDN2_OK && out)
468
16.5k
    {
469
16.5k
      uint8_t *_out = u32_to_u8 (domain_u32, len, NULL, &len);
470
16.5k
      free (domain_u32);
471
472
16.5k
      if (!_out)
473
0
  {
474
0
    if (errno == ENOMEM)
475
0
      return IDN2_MALLOC;
476
0
    return IDN2_ENCODING_ERROR;
477
0
  }
478
479
16.5k
      *out = _out;
480
16.5k
    }
481
5.27k
  else
482
21.8k
    free (domain_u32);
483
484
21.8k
  return err;
485
21.8k
}
486
487
/**
488
 * idn2_lookup_u8:
489
 * @src: input zero-terminated UTF-8 string in Unicode NFC normalized form.
490
 * @lookupname: newly allocated output variable with name to lookup in DNS.
491
 * @flags: optional #idn2_flags to modify behaviour.
492
 *
493
 * Perform IDNA2008 lookup string conversion on domain name @src, as
494
 * described in section 5 of RFC 5891.  Note that the input string
495
 * must be encoded in UTF-8 and be in Unicode NFC form.
496
 *
497
 * Pass %IDN2_NFC_INPUT in @flags to convert input to NFC form before
498
 * further processing.  %IDN2_TRANSITIONAL and %IDN2_NONTRANSITIONAL
499
 * do already imply %IDN2_NFC_INPUT.
500
 *
501
 * Pass %IDN2_ALABEL_ROUNDTRIP in @flags to
502
 * convert any input A-labels to U-labels and perform additional
503
 * testing. This is default since version 2.2.
504
 * To switch this behavior off, pass IDN2_NO_ALABEL_ROUNDTRIP
505
 *
506
 * Pass %IDN2_TRANSITIONAL to enable Unicode TR46
507
 * transitional processing, and %IDN2_NONTRANSITIONAL to enable
508
 * Unicode TR46 non-transitional processing.
509
 *
510
 * Multiple flags may be specified by binary or:ing them together.
511
 *
512
 * After version 2.0.3: %IDN2_USE_STD3_ASCII_RULES disabled by default.
513
 * Previously we were eliminating non-STD3 characters from domain strings
514
 * such as _443._tcp.example.com, or IPs 1.2.3.4/24 provided to libidn2
515
 * functions. That was an unexpected regression for applications switching
516
 * from libidn and thus it is no longer applied by default.
517
 * Use %IDN2_USE_STD3_ASCII_RULES to enable that behavior again.
518
 *
519
 * After version 0.11: @lookupname may be NULL to test lookup of @src
520
 * without allocating memory.
521
 *
522
 * Returns: On successful conversion %IDN2_OK is returned, if the
523
 *   output domain or any label would have been too long
524
 *   %IDN2_TOO_BIG_DOMAIN or %IDN2_TOO_BIG_LABEL is returned, or
525
 *   another error code is returned.
526
 *
527
 * Since: 0.1
528
 **/
529
int
530
idn2_lookup_u8 (const uint8_t *src, uint8_t **lookupname, int flags)
531
26.7k
{
532
26.7k
  size_t lookupnamelen = 0;
533
26.7k
  uint8_t _lookupname[IDN2_DOMAIN_MAX_LENGTH + 1];
534
26.7k
  uint8_t *src_allocated = NULL;
535
26.7k
  int rc;
536
537
26.7k
  if (src == NULL)
538
0
    {
539
0
      if (lookupname)
540
0
  *lookupname = NULL;
541
0
      return IDN2_OK;
542
0
    }
543
544
26.7k
  rc = set_default_flags (&flags);
545
26.7k
  if (rc != IDN2_OK)
546
0
    return rc;
547
548
26.7k
  if (!(flags & IDN2_NO_TR46))
549
26.7k
    {
550
26.7k
      uint8_t *out = NULL;
551
552
26.7k
      rc = _tr46 (src, &out, flags);
553
26.7k
      if (rc != IDN2_OK)
554
10.2k
  return rc;
555
556
16.5k
      src = src_allocated = out;
557
16.5k
    }
558
559
16.5k
  do
560
26.0k
    {
561
26.0k
      const uint8_t *end = (uint8_t *) strchrnul ((const char *) src, '.');
562
      /* XXX Do we care about non-U+002E dots such as U+3002, U+FF0E
563
         and U+FF61 here?  Perhaps when IDN2_NFC_INPUT? */
564
26.0k
      size_t labellen = end - src;
565
26.0k
      uint8_t tmp[IDN2_LABEL_MAX_LENGTH];
566
26.0k
      size_t tmplen = IDN2_LABEL_MAX_LENGTH;
567
568
26.0k
      rc = label (src, labellen, tmp, &tmplen, flags);
569
26.0k
      if (rc != IDN2_OK)
570
5.80k
  {
571
5.80k
    free (src_allocated);
572
5.80k
    return rc;
573
5.80k
  }
574
575
20.2k
      if (lookupnamelen + tmplen
576
20.2k
    > IDN2_DOMAIN_MAX_LENGTH - (tmplen == 0 && *end == '\0' ? 1 : 2))
577
47
  {
578
47
    free (src_allocated);
579
47
    return IDN2_TOO_BIG_DOMAIN;
580
47
  }
581
582
20.2k
      memcpy (_lookupname + lookupnamelen, tmp, tmplen);
583
20.2k
      lookupnamelen += tmplen;
584
585
20.2k
      if (*end == '.')
586
9.50k
  {
587
9.50k
    if (lookupnamelen + 1 > IDN2_DOMAIN_MAX_LENGTH)
588
0
      {
589
0
        free (src_allocated);
590
0
        return IDN2_TOO_BIG_DOMAIN;
591
0
      }
592
593
9.50k
    _lookupname[lookupnamelen] = '.';
594
9.50k
    lookupnamelen++;
595
9.50k
  }
596
20.2k
      _lookupname[lookupnamelen] = '\0';
597
598
20.2k
      src = end;
599
20.2k
    }
600
20.2k
  while (*src++);
601
602
16.5k
  free (src_allocated);
603
604
10.7k
  if (lookupname)
605
10.7k
    {
606
10.7k
      uint8_t *tmp = (uint8_t *) malloc (lookupnamelen + 1);
607
608
10.7k
      if (tmp == NULL)
609
0
  return IDN2_MALLOC;
610
611
10.7k
      memcpy (tmp, _lookupname, lookupnamelen + 1);
612
10.7k
      *lookupname = tmp;
613
10.7k
    }
614
615
10.7k
  return IDN2_OK;
616
10.7k
}
617
618
/**
619
 * idn2_lookup_ul:
620
 * @src: input zero-terminated locale encoded string.
621
 * @lookupname: newly allocated output variable with name to lookup in DNS.
622
 * @flags: optional #idn2_flags to modify behaviour.
623
 *
624
 * Perform IDNA2008 lookup string conversion on domain name @src, as
625
 * described in section 5 of RFC 5891.  Note that the input is assumed
626
 * to be encoded in the locale's default coding system, and will be
627
 * transcoded to UTF-8 and NFC normalized by this function.
628
 *
629
 * Pass %IDN2_ALABEL_ROUNDTRIP in @flags to
630
 * convert any input A-labels to U-labels and perform additional
631
 * testing. This is default since version 2.2.
632
 * To switch this behavior off, pass IDN2_NO_ALABEL_ROUNDTRIP
633
 *
634
 * Pass %IDN2_TRANSITIONAL to enable Unicode TR46 transitional processing,
635
 * and %IDN2_NONTRANSITIONAL to enable Unicode TR46 non-transitional
636
 * processing.
637
 *
638
 * Multiple flags may be specified by binary or:ing them together, for
639
 * example %IDN2_ALABEL_ROUNDTRIP | %IDN2_NONTRANSITIONAL.
640
 *
641
 * The %IDN2_NFC_INPUT in @flags is always enabled in this function.
642
 *
643
 * After version 0.11: @lookupname may be NULL to test lookup of @src
644
 * without allocating memory.
645
 *
646
 * Returns: On successful conversion %IDN2_OK is returned, if
647
 *   conversion from locale to UTF-8 fails then %IDN2_ICONV_FAIL is
648
 *   returned, if the output domain or any label would have been too
649
 *   long %IDN2_TOO_BIG_DOMAIN or %IDN2_TOO_BIG_LABEL is returned, or
650
 *   another error code is returned.
651
 *
652
 * Since: 0.1
653
 **/
654
int
655
idn2_lookup_ul (const char *src, char **lookupname, int flags)
656
17.4k
{
657
17.4k
  uint8_t *utf8src = NULL;
658
17.4k
  int rc;
659
660
17.4k
  if (src)
661
17.4k
    {
662
17.4k
      const char *encoding = locale_charset ();
663
664
17.4k
      utf8src = u8_strconv_from_encoding (src, encoding, iconveh_error);
665
666
17.4k
      if (!utf8src)
667
12.1k
  {
668
12.1k
    if (errno == ENOMEM)
669
0
      return IDN2_MALLOC;
670
12.1k
    return IDN2_ICONV_FAIL;
671
12.1k
  }
672
17.4k
    }
673
674
5.35k
  rc = idn2_lookup_u8 (utf8src, (uint8_t **) lookupname,
675
5.35k
           flags | IDN2_NFC_INPUT);
676
677
5.35k
  free (utf8src);
678
679
5.35k
  return rc;
680
17.4k
}
681
682
/**
683
 * idn2_to_ascii_4i:
684
 * @input: zero terminated input Unicode (UCS-4) string.
685
 * @inlen: number of elements in @input.
686
 * @output: output zero terminated string that must have room for at
687
 *       least 63 characters plus the terminating zero.
688
 * @flags: optional #idn2_flags to modify behaviour.
689
 *
690
 * The ToASCII operation takes a sequence of Unicode code points that make
691
 * up one domain label and transforms it into a sequence of code points in
692
 * the ASCII range (0..7F). If ToASCII succeeds, the original sequence and
693
 * the resulting sequence are equivalent labels.
694
 *
695
 * It is important to note that the ToASCII operation can fail.
696
 * ToASCII fails if any step of it fails. If any step of the
697
 * ToASCII operation fails on any label in a domain name, that domain
698
 * name MUST NOT be used as an internationalized domain name.
699
 * The method for dealing with this failure is application-specific.
700
 *
701
 * The inputs to ToASCII are a sequence of code points.
702
 *
703
 * ToASCII never alters a sequence of code points that are all in the ASCII
704
 * range to begin with (although it could fail). Applying the ToASCII operation multiple
705
 * effect as applying it just once.
706
 *
707
 * The default behavior of this function (when flags are zero) is to apply
708
 * the IDNA2008 rules without the TR46 amendments. As the TR46
709
 * non-transitional processing is nowadays ubiquitous, when unsure, it is
710
 * recommended to call this function with the %IDN2_NONTRANSITIONAL
711
 * and the %IDN2_NFC_INPUT flags for compatibility with other software.
712
 *
713
 * Warning: With version 2.1.1 until before version 2.3.5 this
714
 * function was deprecated in favor idn2_to_ascii_4i2().  We still
715
 * encourage you to use idn2_to_ascii_4i2() when appropriate.
716
 *
717
 * Returns: On successful conversion %IDN2_OK is returned; if the
718
 *   output label would have been too long %IDN2_TOO_BIG_LABEL is
719
 *   returned, or another error code is returned.
720
 *
721
 * Since: 2.0.0
722
 **/
723
int
724
idn2_to_ascii_4i (const uint32_t *input, size_t inlen, char *output,
725
      int flags)
726
1.01k
{
727
1.01k
  char *out;
728
1.01k
  int rc;
729
730
1.01k
  if (!input)
731
0
    {
732
0
      if (output)
733
0
  *output = 0;
734
0
      return IDN2_OK;
735
0
    }
736
737
1.01k
  rc = idn2_to_ascii_4i2 (input, inlen, &out, flags);
738
1.01k
  if (rc == IDN2_OK)
739
125
    {
740
125
      size_t len = strlen (out);
741
742
125
      if (len > IDN2_LABEL_MAX_LENGTH)
743
12
  rc = IDN2_TOO_BIG_LABEL;
744
113
      else if (output)
745
113
  strcpy (output, out);
746
747
125
      free (out);
748
125
    }
749
750
1.01k
  return rc;
751
1.01k
}
752
753
/**
754
 * idn2_to_ascii_4i2:
755
 * @input: zero terminated input Unicode (UCS-4) string.
756
 * @inlen: number of elements in @input.
757
 * @output: pointer to newly allocated zero-terminated output string.
758
 * @flags: optional #idn2_flags to modify behaviour.
759
 *
760
 * The ToASCII operation takes a sequence of Unicode code points that make
761
 * up one domain label and transforms it into a sequence of code points in
762
 * the ASCII range (0..7F). If ToASCII succeeds, the original sequence and
763
 * the resulting sequence are equivalent labels.
764
 *
765
 * It is important to note that the ToASCII operation can fail.
766
 * ToASCII fails if any step of it fails. If any step of the
767
 * ToASCII operation fails on any label in a domain name, that domain
768
 * name MUST NOT be used as an internationalized domain name.
769
 * The method for dealing with this failure is application-specific.
770
 *
771
 * The inputs to ToASCII are a sequence of code points.
772
 *
773
 * ToASCII never alters a sequence of code points that are all in the ASCII
774
 * range to begin with (although it could fail). Applying the ToASCII operation multiple
775
 * effect as applying it just once.
776
 *
777
 * The default behavior of this function (when flags are zero) is to apply
778
 * the IDNA2008 rules without the TR46 amendments. As the TR46
779
 * non-transitional processing is nowadays ubiquitous, when unsure, it is
780
 * recommended to call this function with the %IDN2_NONTRANSITIONAL
781
 * and the %IDN2_NFC_INPUT flags for compatibility with other software.
782
 *
783
 * Returns: On successful conversion %IDN2_OK is returned; if the
784
 *   output label would have been too long %IDN2_TOO_BIG_LABEL is
785
 *   returned, or another error code is returned.
786
 *
787
 * Since: 2.1.1
788
 **/
789
int
790
idn2_to_ascii_4i2 (const uint32_t *input, size_t inlen, char **output,
791
       int flags)
792
7.07k
{
793
7.07k
  uint32_t *input_u32;
794
7.07k
  uint8_t *input_u8, *output_u8;
795
7.07k
  size_t length;
796
7.07k
  int rc;
797
798
7.07k
  if (!input)
799
0
    {
800
0
      if (output)
801
0
  *output = NULL;
802
0
      return IDN2_OK;
803
0
    }
804
805
7.07k
  input_u32 = (uint32_t *) malloc ((inlen + 1) * sizeof (uint32_t));
806
7.07k
  if (!input_u32)
807
0
    return IDN2_MALLOC;
808
809
7.07k
  u32_cpy (input_u32, input, inlen);
810
7.07k
  input_u32[inlen] = 0;
811
812
7.07k
  input_u8 = u32_to_u8 (input_u32, inlen + 1, NULL, &length);
813
7.07k
  free (input_u32);
814
7.07k
  if (!input_u8)
815
4.96k
    {
816
4.96k
      if (errno == ENOMEM)
817
0
  return IDN2_MALLOC;
818
4.96k
      return IDN2_ENCODING_ERROR;
819
4.96k
    }
820
821
2.11k
  rc = idn2_lookup_u8 (input_u8, &output_u8, flags);
822
2.11k
  free (input_u8);
823
824
2.11k
  if (rc == IDN2_OK)
825
1.07k
    {
826
1.07k
      if (output)
827
1.07k
  *output = (char *) output_u8;
828
0
      else
829
1.07k
  free (output_u8);
830
1.07k
    }
831
832
2.11k
  return rc;
833
7.07k
}
834
835
/**
836
 * idn2_to_ascii_4z:
837
 * @input: zero terminated input Unicode (UCS-4) string.
838
 * @output: pointer to newly allocated zero-terminated output string.
839
 * @flags: optional #idn2_flags to modify behaviour.
840
 *
841
 * Convert UCS-4 domain name to ASCII string using the IDNA2008
842
 * rules.  The domain name may contain several labels, separated by dots.
843
 * The output buffer must be deallocated by the caller.
844
 *
845
 * The default behavior of this function (when flags are zero) is to apply
846
 * the IDNA2008 rules without the TR46 amendments. As the TR46
847
 * non-transitional processing is nowadays ubiquitous, when unsure, it is
848
 * recommended to call this function with the %IDN2_NONTRANSITIONAL
849
 * and the %IDN2_NFC_INPUT flags for compatibility with other software.
850
 *
851
 * Return value: Returns %IDN2_OK on success, or error code.
852
 *
853
 * Since: 2.0.0
854
 **/
855
int
856
idn2_to_ascii_4z (const uint32_t *input, char **output, int flags)
857
6.06k
{
858
6.06k
  uint8_t *input_u8;
859
6.06k
  size_t length;
860
6.06k
  int rc;
861
862
6.06k
  if (!input)
863
0
    {
864
0
      if (output)
865
0
  *output = NULL;
866
0
      return IDN2_OK;
867
0
    }
868
869
6.06k
  input_u8 = u32_to_u8 (input, u32_strlen (input) + 1, NULL, &length);
870
6.06k
  if (!input_u8)
871
4.23k
    {
872
4.23k
      if (errno == ENOMEM)
873
0
  return IDN2_MALLOC;
874
4.23k
      return IDN2_ENCODING_ERROR;
875
4.23k
    }
876
877
1.83k
  rc = idn2_lookup_u8 (input_u8, (uint8_t **) output, flags);
878
1.83k
  free (input_u8);
879
880
1.83k
  return rc;
881
6.06k
}
882
883
/**
884
 * idn2_to_ascii_8z:
885
 * @input: zero terminated input UTF-8 string.
886
 * @output: pointer to newly allocated output string.
887
 * @flags: optional #idn2_flags to modify behaviour.
888
 *
889
 * Convert UTF-8 domain name to ASCII string using the IDNA2008
890
 * rules.  The domain name may contain several labels, separated by dots.
891
 * The output buffer must be deallocated by the caller.
892
 *
893
 * The default behavior of this function (when flags are zero) is to apply
894
 * the IDNA2008 rules without the TR46 amendments. As the TR46
895
 * non-transitional processing is nowadays ubiquitous, when unsure, it is
896
 * recommended to call this function with the %IDN2_NONTRANSITIONAL
897
 * and the %IDN2_NFC_INPUT flags for compatibility with other software.
898
 *
899
 * Return value: Returns %IDN2_OK on success, or error code.
900
 *
901
 * Since: 2.0.0
902
 **/
903
int
904
idn2_to_ascii_8z (const char *input, char **output, int flags)
905
17.4k
{
906
17.4k
  return idn2_lookup_u8 ((const uint8_t *) input, (uint8_t **) output, flags);
907
17.4k
}
908
909
/**
910
 * idn2_to_ascii_lz:
911
 * @input: zero terminated input UTF-8 string.
912
 * @output: pointer to newly allocated output string.
913
 * @flags: optional #idn2_flags to modify behaviour.
914
 *
915
 * Convert a domain name in locale's encoding to ASCII string using the IDNA2008
916
 * rules.  The domain name may contain several labels, separated by dots.
917
 * The output buffer must be deallocated by the caller.
918
 *
919
 * The default behavior of this function (when flags are zero) is to apply
920
 * the IDNA2008 rules without the TR46 amendments. As the TR46
921
 * non-transitional processing is nowadays ubiquitous, when unsure, it is
922
 * recommended to call this function with the %IDN2_NONTRANSITIONAL
923
 * and the %IDN2_NFC_INPUT flags for compatibility with other software.
924
 *
925
 * Returns: %IDN2_OK on success, or error code.
926
 * Same as described in idn2_lookup_ul() documentation.
927
 *
928
 * Since: 2.0.0
929
 **/
930
int
931
idn2_to_ascii_lz (const char *input, char **output, int flags)
932
17.4k
{
933
17.4k
  return idn2_lookup_ul (input, output, flags);
934
17.4k
}