1 /*
2 ** Copyright (C) 2005-2011 Erik de Castro Lopo <erikd@mega-nerd.com>
3 **
4 ** This program is free software; you can redistribute it and/or modify
5 ** it under the terms of the GNU General Public License as published by
6 ** the Free Software Foundation; either version 2 of the License, or
7 ** (at your option) any later version.
8 **
9 ** This program is distributed in the hope that it will be useful,
10 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
11 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 ** GNU General Public License for more details.
13 **
14 ** You should have received a copy of the GNU General Public License
15 ** along with this program; if not, write to the Free Software
16 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17 */
18
19 #include "sfconfig.h"
20
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
24
25 #if HAVE_UNISTD_H
26 #include <unistd.h>
27 #else
28 #include "sf_unistd.h"
29 #endif
30
31 #if HAVE_LOCALE_H
32 #include <locale.h>
33 #endif
34
35 #if OS_IS_WIN32
36 #include <windows.h>
37 #define ENABLE_SNDFILE_WINDOWS_PROTOTYPES 1
38 #endif
39
40 #include "sndfile.h"
41 #include "utils.h"
42
43 static void utf8_test (void) ;
44 static void wchar_test (void) ;
45
46 int
main(void)47 main (void)
48 {
49 utf8_test () ;
50 wchar_test () ;
51
52 return 0 ;
53 } /* main */
54
55 /*==============================================================================
56 */
57
58 static void
wchar_test(void)59 wchar_test (void)
60 {
61 #if OS_IS_WIN32
62 SNDFILE * file ;
63 SF_INFO info ;
64 LPCWSTR filename = L"test.wav" ;
65
66 print_test_name (__func__, "test.wav") ;
67
68 info.format = SF_FORMAT_WAV | SF_FORMAT_PCM_16 ;
69 info.channels = 1 ;
70 info.samplerate = 44100 ;
71
72 file = sf_wchar_open (filename, SFM_WRITE, &info) ;
73 exit_if_true (file == NULL, "\n\nLine %d : sf_wchar_open failed : %s\n\n", __LINE__, sf_strerror (NULL)) ;
74 sf_close (file) ;
75
76 /* This should check that the file did in fact get created with a
77 ** wchar_t * filename.
78 */
79 exit_if_true (
80 GetFileAttributesW (filename) == INVALID_FILE_ATTRIBUTES,
81 "\n\nLine %d : GetFileAttributes failed.\n\n", __LINE__
82 ) ;
83
84 /* Use this because the file was created with CreateFileW. */
85 DeleteFileW (filename) ;
86
87 puts ("ok") ;
88 #endif
89 } /* wchar_test */
90
91 /*==============================================================================
92 */
93
94 typedef struct
95 { const char *locale ;
96 int utf8 ;
97 const char *filename ;
98 int width ;
99 } LOCALE_DATA ;
100
101 static void locale_test (const LOCALE_DATA * locdata) ;
102
103 static void
utf8_test(void)104 utf8_test (void)
105 { LOCALE_DATA ldata [] =
106 { { "de_DE", 1, "F\303\274\303\237e.au", 7 },
107 { "en_AU", 1, "kangaroo.au", 11 },
108 { "POSIX", 0, "posix.au", 8 },
109 { "pt_PT", 1, "concei\303\247\303\243o.au", 12 },
110
111 #if OS_IS_WIN32 == 0
112 { "ja_JP", 1, "\343\201\212\343\201\257\343\202\210\343\201\206\343\201\224\343\201\226\343\201\204\343\201\276\343\201\231.au", 21 },
113 #endif
114
115 { "vi_VN", 1, "qu\341\273\221c ng\341\273\257.au", 11 },
116 { NULL, 0, NULL, 0 }
117 } ;
118 int k ;
119
120 for (k = 0 ; ldata [k].locale != NULL ; k++)
121 locale_test (ldata + k) ;
122 } /* utf8_test */
123
124
125 static void
locale_test(const LOCALE_DATA * ldata)126 locale_test (const LOCALE_DATA * ldata)
127 {
128 #if (HAVE_LOCALE_H == 0 || HAVE_SETLOCALE == 0)
129 locname = filename = NULL ;
130 width = 0 ;
131 return ;
132 #else
133 const short wdata [] = { 1, 2, 3, 4, 5, 6, 7, 8 } ;
134 short rdata [ARRAY_LEN (wdata)] ;
135 const char *old_locale ;
136 char utf8_locname [32] ;
137 SNDFILE *file ;
138 SF_INFO sfinfo ;
139
140 snprintf (utf8_locname, sizeof (utf8_locname), "%s%s", ldata->locale, ldata->utf8 ? ".UTF-8" : "") ;
141
142 /* Change the locale saving the old one. */
143 if ((old_locale = setlocale (LC_CTYPE, utf8_locname)) == NULL)
144 return ;
145
146 printf (" locale_test %-8s : %s %*c ", ldata->locale, ldata->filename, 24 - ldata->width, ' ') ;
147 fflush (stdout) ;
148
149 sfinfo.format = SF_FORMAT_AU | SF_FORMAT_PCM_16 ;
150 sfinfo.channels = 1 ;
151 sfinfo.samplerate = 44100 ;
152
153 file = test_open_file_or_die (ldata->filename, SFM_WRITE, &sfinfo, 0, __LINE__) ;
154 test_write_short_or_die (file, 0, wdata, ARRAY_LEN (wdata), __LINE__) ;
155 sf_close (file) ;
156
157 file = test_open_file_or_die (ldata->filename, SFM_READ, &sfinfo, 0, __LINE__) ;
158 test_read_short_or_die (file, 0, rdata, ARRAY_LEN (rdata), __LINE__) ;
159 sf_close (file) ;
160
161 unlink (ldata->filename) ;
162
163 /* Restore old locale. */
164 setlocale (LC_CTYPE, old_locale) ;
165
166 puts ("ok") ;
167 #endif
168 } /* locale_test */
169
170