1 /*-
2  * Copyright (c) 2011 Michihiro NAKAJIMA
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  */
25 #include "test.h"
26 
27 #include <locale.h>
28 
29 static void
30 test_read_format_lha_filename_CP932_eucJP(const char *refname)
31 {
32 	struct archive *a;
33 	struct archive_entry *ae;
34 
35 	/*
36 	 * Read LHA filename in ja_JP.eucJP.
37 	 */
38 	if (NULL == setlocale(LC_ALL, "ja_JP.eucJP")) {
39 		skipping("ja_JP.eucJP locale not available on this system.");
40 		return;
41 	}
42 
43 	/*
44 	 * Create a read object only for a test that platform support
45 	 * a character-set conversion because we can read a character-set
46 	 * of filenames from the header of an lha archive file and so we
47 	 * want to test that it works well.
48 	 */
49 	assert((a = archive_read_new()) != NULL);
50 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
51 	if (ARCHIVE_OK != archive_read_set_options(a, "hdrcharset=CP932")) {
52 		assertEqualInt(ARCHIVE_OK, archive_read_free(a));
53 		skipping("This system cannot convert character-set"
54 		    " from CP932 to eucJP.");
55 		return;
56 	}
57 	assertEqualInt(ARCHIVE_OK, archive_read_free(a));
58 
59 	assert((a = archive_read_new()) != NULL);
60 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
61 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
62 	assertEqualIntA(a, ARCHIVE_OK,
63 	    archive_read_open_filename(a, refname, 10240));
64 
65 	/* Verify regular file. */
66 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
67 	assertEqualString("\xB4\xC1\xBB\xFA\x2E\x74\x78\x74",
68 	    archive_entry_pathname(ae));
69 	assertEqualInt(8, archive_entry_size(ae));
70 	assertEqualInt(archive_entry_is_encrypted(ae), 0);
71 	assertEqualIntA(a, archive_read_has_encrypted_entries(a), ARCHIVE_READ_FORMAT_ENCRYPTION_UNSUPPORTED);
72 
73 	/* Verify regular file. */
74 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
75 	assertEqualString("\xC9\xBD\x2E\x74\x78\x74", archive_entry_pathname(ae));
76 	assertEqualInt(4, archive_entry_size(ae));
77 	assertEqualInt(archive_entry_is_encrypted(ae), 0);
78 	assertEqualIntA(a, archive_read_has_encrypted_entries(a), ARCHIVE_READ_FORMAT_ENCRYPTION_UNSUPPORTED);
79 
80 	/* End of archive. */
81 	assertEqualIntA(a, ARCHIVE_EOF, archive_read_next_header(a, &ae));
82 
83 	/* Verify archive format. */
84 	assertEqualIntA(a, ARCHIVE_FILTER_NONE, archive_filter_code(a, 0));
85 	assertEqualIntA(a, ARCHIVE_FORMAT_LHA, archive_format(a));
86 
87 	/* Close the archive. */
88 	assertEqualInt(ARCHIVE_OK, archive_read_close(a));
89 	assertEqualInt(ARCHIVE_OK, archive_read_free(a));
90 }
91 
92 static void
93 test_read_format_lha_filename_CP932_UTF8(const char *refname)
94 {
95 	struct archive *a;
96 	struct archive_entry *ae;
97 
98 	/*
99 	 * Read LHA filename in en_US.UTF-8.
100 	 */
101 	if (NULL == setlocale(LC_ALL, "en_US.UTF-8")) {
102 		skipping("en_US.UTF-8 locale not available on this system.");
103 		return;
104 	}
105 	/*
106 	 * Create a read object only for a test that platform support
107 	 * a character-set conversion because we can read a character-set
108 	 * of filenames from the header of an lha archive file and so we
109 	 * want to test that it works well.
110 	 */
111 	assert((a = archive_read_new()) != NULL);
112 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
113 	if (ARCHIVE_OK != archive_read_set_options(a, "hdrcharset=CP932")) {
114 		assertEqualInt(ARCHIVE_OK, archive_read_free(a));
115 		skipping("This system cannot convert character-set"
116 		    " from CP932 to UTF-8.");
117 		return;
118 	}
119 	assertEqualInt(ARCHIVE_OK, archive_read_free(a));
120 
121 	assert((a = archive_read_new()) != NULL);
122 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
123 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
124 	assertEqualIntA(a, ARCHIVE_OK,
125 	    archive_read_open_filename(a, refname, 10240));
126 
127 	/* Verify regular file. */
128 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
129 	assertEqualString("\xE6\xBC\xA2\xE5\xAD\x97\x2E\x74\x78\x74",
130 	    archive_entry_pathname(ae));
131 	assertEqualInt(8, archive_entry_size(ae));
132 
133 	/* Verify regular file. */
134 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
135 	assertEqualString("\xE8\xA1\xA8\x2E\x74\x78\x74",
136 	    archive_entry_pathname(ae));
137 	assertEqualInt(4, archive_entry_size(ae));
138 
139 
140 	/* End of archive. */
141 	assertEqualIntA(a, ARCHIVE_EOF, archive_read_next_header(a, &ae));
142 
143 	/* Verify archive format. */
144 	assertEqualIntA(a, ARCHIVE_FILTER_NONE, archive_filter_code(a, 0));
145 	assertEqualIntA(a, ARCHIVE_FORMAT_LHA, archive_format(a));
146 
147 	/* Close the archive. */
148 	assertEqualInt(ARCHIVE_OK, archive_read_close(a));
149 	assertEqualInt(ARCHIVE_OK, archive_read_free(a));
150 }
151 
152 #if defined(_WIN32) && !defined(__CYGWIN__)
153 static void
154 test_read_format_lha_filename_CP932_Windows(const char *refname)
155 {
156 	struct archive *a;
157 	struct archive_entry *ae;
158 
159 	/*
160 	 * Read LHA filename in jpn on Windows.
161 	 */
162 	if (NULL == setlocale(LC_ALL, "jpn")) {
163 		skipping("jpn locale not available on this system.");
164 		return;
165 	}
166 	/*
167 	 * Create a read object only for a test that platform support
168 	 * a character-set conversion because we can read a character-set
169 	 * of filenames from the header of an lha archive file and so we
170 	 * want to test that it works well.
171 	 */
172 	assert((a = archive_read_new()) != NULL);
173 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
174 	assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
175 	assertEqualIntA(a, ARCHIVE_OK,
176 	    archive_read_open_filename(a, refname, 10240));
177 
178 	/* Verify regular file. */
179 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
180 	assertEqualString("\x8A\xBF\x8E\x9A\x2E\x74\x78\x74",
181 	    archive_entry_pathname(ae));
182 	assertEqualInt(8, archive_entry_size(ae));
183 
184 	/* Verify regular file. */
185 	assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
186 	assertEqualString("\x95\x5C\x2E\x74\x78\x74", archive_entry_pathname(ae));
187 	assertEqualInt(4, archive_entry_size(ae));
188 
189 
190 	/* End of archive. */
191 	assertEqualIntA(a, ARCHIVE_EOF, archive_read_next_header(a, &ae));
192 
193 	/* Verify archive format. */
194 	assertEqualIntA(a, ARCHIVE_FILTER_NONE, archive_filter_code(a, 0));
195 	assertEqualIntA(a, ARCHIVE_FORMAT_LHA, archive_format(a));
196 
197 	/* Close the archive. */
198 	assertEqualInt(ARCHIVE_OK, archive_read_close(a));
199 	assertEqualInt(ARCHIVE_OK, archive_read_free(a));
200 }
201 #else
202 /* Stub */
203 static void
204 test_read_format_lha_filename_CP932_Windows(const char *refname)
205 {
206 	(void)refname; /* UNUSED */
207 }
208 #endif
209 
210 DEFINE_TEST(test_read_format_lha_filename)
211 {
212 	/* A sample file was created with LHA32.EXE through UNLHA.DLL. */
213 	const char *refname = "test_read_format_lha_filename_cp932.lzh";
214 
215 	extract_reference_file(refname);
216 
217 	test_read_format_lha_filename_CP932_eucJP(refname);
218 	test_read_format_lha_filename_CP932_UTF8(refname);
219 	test_read_format_lha_filename_CP932_Windows(refname);
220 }
221