2 Unix SMB/CIFS implementation.
4 SMB torture tester - charset test routines
6 Copyright (C) Andrew Tridgell 2001
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include "librpc/gen_ndr/ndr_security.h"
26 #define BASEDIR "\\chartest\\"
29 open a file using a set of unicode code points for the name
31 the prefix BASEDIR is added before the name
33 static NTSTATUS
unicode_open(struct smbcli_tree
*tree
,
35 uint32_t open_disposition
,
36 const uint32_t *u_name
,
40 char *fname
, *fname2
=NULL
, *ucs_name
;
44 ucs_name
= talloc_size(mem_ctx
, (1+u_name_len
)*2);
46 printf("Failed to create UCS2 Name - talloc() failure\n");
47 return NT_STATUS_NO_MEMORY
;
50 for (i
=0;i
<u_name_len
;i
++) {
51 SSVAL(ucs_name
, i
*2, u_name
[i
]);
53 SSVAL(ucs_name
, i
*2, 0);
55 i
= convert_string_talloc(ucs_name
, CH_UTF16
, CH_UNIX
, ucs_name
, (1+u_name_len
)*2, (void **)&fname
);
57 printf("Failed to convert UCS2 Name into unix - convert_string_talloc() failure\n");
58 talloc_free(ucs_name
);
59 return NT_STATUS_NO_MEMORY
;
62 fname2
= talloc_asprintf(ucs_name
, "%s%s", BASEDIR
, fname
);
64 talloc_free(ucs_name
);
65 return NT_STATUS_NO_MEMORY
;
68 io
.generic
.level
= RAW_OPEN_NTCREATEX
;
69 io
.ntcreatex
.in
.flags
= NTCREATEX_FLAGS_EXTENDED
;
70 io
.ntcreatex
.in
.root_fid
= 0;
71 io
.ntcreatex
.in
.access_mask
= SEC_RIGHTS_FILE_ALL
;
72 io
.ntcreatex
.in
.alloc_size
= 0;
73 io
.ntcreatex
.in
.file_attr
= FILE_ATTRIBUTE_NORMAL
;
74 io
.ntcreatex
.in
.share_access
= NTCREATEX_SHARE_ACCESS_NONE
;
75 io
.ntcreatex
.in
.open_disposition
= NTCREATEX_DISP_CREATE
;
76 io
.ntcreatex
.in
.create_options
= 0;
77 io
.ntcreatex
.in
.impersonation
= NTCREATEX_IMPERSONATION_ANONYMOUS
;
78 io
.ntcreatex
.in
.security_flags
= 0;
79 io
.ntcreatex
.in
.fname
= fname2
;
80 io
.ntcreatex
.in
.open_disposition
= open_disposition
;
82 status
= smb_raw_open(tree
, mem_ctx
, &io
);
84 talloc_free(ucs_name
);
91 see if the server recognises composed characters
93 static BOOL
test_composed(struct smbcli_state
*cli
, TALLOC_CTX
*mem_ctx
)
95 const uint32_t name1
[] = {0x61, 0x308};
96 const uint32_t name2
[] = {0xe4};
97 NTSTATUS status1
, status2
;
99 printf("Testing composite character (a umlaut)\n");
101 status1
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name1
, 2);
102 if (!NT_STATUS_IS_OK(status1
)) {
103 printf("Failed to create composed name - %s\n",
108 status2
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
110 if (!NT_STATUS_IS_OK(status2
)) {
111 printf("Failed to create accented character - %s\n",
120 see if the server recognises a naked diacritical
122 static BOOL
test_diacritical(struct smbcli_state
*cli
, TALLOC_CTX
*mem_ctx
)
124 const uint32_t name1
[] = {0x308};
125 const uint32_t name2
[] = {0x308, 0x308};
126 NTSTATUS status1
, status2
;
128 printf("Testing naked diacritical (umlaut)\n");
130 status1
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
132 if (!NT_STATUS_IS_OK(status1
)) {
133 printf("Failed to create naked diacritical - %s\n",
138 /* try a double diacritical */
139 status2
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name2
, 2);
141 if (!NT_STATUS_IS_OK(status2
)) {
142 printf("Failed to create double naked diacritical - %s\n",
151 see if the server recognises a partial surrogate pair
153 static BOOL
test_surrogate(struct smbcli_state
*cli
, TALLOC_CTX
*mem_ctx
)
155 const uint32_t name1
[] = {0xd800};
156 const uint32_t name2
[] = {0xdc00};
157 const uint32_t name3
[] = {0xd800, 0xdc00};
160 printf("Testing partial surrogate\n");
162 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
164 if (!NT_STATUS_IS_OK(status
)) {
165 printf("Failed to create partial surrogate 1 - %s\n",
170 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
172 if (!NT_STATUS_IS_OK(status
)) {
173 printf("Failed to create partial surrogate 2 - %s\n",
178 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name3
, 2);
180 if (!NT_STATUS_IS_OK(status
)) {
181 printf("Failed to create full surrogate - %s\n",
190 see if the server recognises wide-a characters
192 static BOOL
test_widea(struct smbcli_state
*cli
, TALLOC_CTX
*mem_ctx
)
194 const uint32_t name1
[] = {'a'};
195 const uint32_t name2
[] = {0xff41};
196 const uint32_t name3
[] = {0xff21};
199 printf("Testing wide-a\n");
201 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
203 if (!NT_STATUS_IS_OK(status
)) {
204 printf("Failed to create 'a' - %s\n",
209 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
211 if (!NT_STATUS_IS_OK(status
)) {
212 printf("Failed to create wide-a - %s\n",
217 status
= unicode_open(cli
->tree
, mem_ctx
, NTCREATEX_DISP_CREATE
, name3
, 1);
219 if (!NT_STATUS_EQUAL(status
, NT_STATUS_OBJECT_NAME_COLLISION
)) {
220 printf("Expected %s creating wide-A - %s\n",
221 nt_errstr(NT_STATUS_OBJECT_NAME_COLLISION
),
229 BOOL
torture_charset(void)
231 static struct smbcli_state
*cli
;
235 mem_ctx
= talloc_init("torture_charset");
237 if (!torture_open_connection(&cli
)) {
241 printf("Starting charset tests\n");
243 if (!torture_setup_dir(cli
, BASEDIR
)) {
247 if (!test_composed(cli
, mem_ctx
)) {
251 if (!test_diacritical(cli
, mem_ctx
)) {
255 if (!test_surrogate(cli
, mem_ctx
)) {
259 if (!test_widea(cli
, mem_ctx
)) {