1/***************************************************************************
2 *                                  _   _ ____  _
3 *  Project                     ___| | | |  _ \| |
4 *                             / __| | | | |_) | |
5 *                            | (__| |_| |  _ <| |___
6 *                             \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) 1998 - 2011, Daniel Stenberg, <daniel@haxx.se>, et al.
9 *
10 * This software is licensed as described in the file COPYING, which
11 * you should have received as part of this distribution. The terms
12 * are also available at http://curl.haxx.se/docs/copyright.html.
13 *
14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell
15 * copies of the Software, and permit persons to whom the Software is
16 * furnished to do so, under the terms of the COPYING file.
17 *
18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19 * KIND, either express or implied.
20 *
21 ***************************************************************************/
22/***************************************************************************
23 * IDN Implementation using windows native APIs
24 * Pierre Joye <pierre@php.net>
25 ***************************************************************************/
26#if defined(WIN32) && defined(USE_WIN32_IDN)
27#include <windows.h>
28#include <stdio.h>
29#include <tchar.h>
30
31#ifdef WANT_IDN_PROTOTYPES
32WINBASEAPI int WINAPI IdnToAscii(DWORD, LPCWSTR, int, LPWSTR, int);
33WINBASEAPI int WINAPI IdnToUnicode(DWORD, LPCWSTR, int, LPWSTR, int);
34#endif
35
36#define IDN_MAX_LENGTH 255
37
38static wchar_t *_curl_win32_UTF8_to_wchar(const char *str_utf8)
39{
40  wchar_t *str_w = NULL;
41
42  if(str_utf8) {
43    int str_w_len = MultiByteToWideChar(CP_UTF8, MB_ERR_INVALID_CHARS,
44                                        str_utf8, -1, NULL, 0);
45    if(str_w_len) {
46      str_w = malloc(str_w_len * sizeof(wchar_t));
47      if(str_w) {
48        if(MultiByteToWideChar(CP_UTF8, 0, str_utf8, -1, str_w,
49                                str_w_len) == 0) {
50          free(str_w);
51          str_w = NULL;
52        }
53      }
54    }
55  }
56
57  return str_w;
58}
59
60static const char *_curl_win32_wchar_to_UTF8(const wchar_t *str_w)
61{
62  char *str_utf8 = NULL;
63
64  if(str_w) {
65    size_t str_utf8_len = WideCharToMultiByte(CP_UTF8, 0, str_w, -1, NULL,
66                                              0, NULL, NULL);
67    if(str_utf8_len) {
68      str_utf8 = malloc(str_utf8_len * sizeof(wchar_t));
69      if(str_utf8) {
70        if(WideCharToMultiByte(CP_UTF8, 0, str_w, -1, str_utf8, str_utf8_len,
71                                NULL, FALSE) == 0) {
72          (void) GetLastError();
73          free((void *)str_utf8);
74          str_utf8 = NULL;
75        }
76      }
77    }
78    else {
79      (void) GetLastError();
80    }
81  }
82
83  return str_utf8;
84}
85
86int curl_win32_idn_to_ascii(const char *in, char **out)
87{
88  wchar_t *in_w = _curl_win32_UTF8_to_wchar(in);
89  if(in_w) {
90    wchar_t punycode[IDN_MAX_LENGTH];
91    if(IdnToAscii(0, in_w, -1, punycode, IDN_MAX_LENGTH) == 0) {
92      wprintf(L"ERROR %d converting to Punycode\n", GetLastError());
93      free(in_w);
94      return 0;
95    }
96    free(in_w);
97
98    *out = (char *)_curl_win32_wchar_to_UTF8(punycode);
99    if(!(*out)) {
100      return 0;
101    }
102  }
103  return 1;
104}
105
106int curl_win32_ascii_to_idn(const char *in, size_t in_len, char **out_utf8)
107{
108  if(in) {
109    WCHAR unicode[IDN_MAX_LENGTH];
110
111    if(IdnToUnicode(0, (wchar_t *)in, -1, unicode, IDN_MAX_LENGTH) == 0) {
112      wprintf(L"ERROR %d converting to Punycode\n", GetLastError());
113      return 0;
114    }
115    else {
116      const char *out_utf8 = _curl_win32_wchar_to_UTF8(unicode);
117      if(!out_utf8) {
118        return 0;
119      }
120    }
121  }
122  return 1;
123}
124#else
125typedef int dummy; /* because ISO C forbids an empty translation unit! */
126#endif
127 /* WIN32 */
128