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 3 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, see <http://www.gnu.org/licenses/>.
23 #include "torture/torture.h"
24 #include "libcli/raw/libcliraw.h"
25 #include "libcli/libcli.h"
26 #include "torture/util.h"
27 #include "param/param.h"
29 #define BASEDIR "\\chartest\\"
32 open a file using a set of unicode code points for the name
34 the prefix BASEDIR is added before the name
36 static NTSTATUS
unicode_open(struct torture_context
*tctx
,
37 struct smbcli_tree
*tree
,
39 uint32_t open_disposition
,
40 const uint32_t *u_name
,
44 char *fname
, *fname2
=NULL
, *ucs_name
;
48 ucs_name
= talloc_size(mem_ctx
, (1+u_name_len
)*2);
50 printf("Failed to create UCS2 Name - talloc() failure\n");
51 return NT_STATUS_NO_MEMORY
;
54 for (i
=0;i
<u_name_len
;i
++) {
55 SSVAL(ucs_name
, i
*2, u_name
[i
]);
57 SSVAL(ucs_name
, i
*2, 0);
59 if (!convert_string_talloc_convenience(ucs_name
, lp_iconv_convenience(tctx
->lp_ctx
), CH_UTF16
, CH_UNIX
, ucs_name
, (1+u_name_len
)*2, (void **)&fname
, &i
, false)) {
60 torture_comment(tctx
, "Failed to convert UCS2 Name into unix - convert_string_talloc() failure\n");
61 talloc_free(ucs_name
);
62 return NT_STATUS_NO_MEMORY
;
65 fname2
= talloc_asprintf(ucs_name
, "%s%s", BASEDIR
, fname
);
67 talloc_free(ucs_name
);
68 return NT_STATUS_NO_MEMORY
;
71 io
.generic
.level
= RAW_OPEN_NTCREATEX
;
72 io
.ntcreatex
.in
.flags
= NTCREATEX_FLAGS_EXTENDED
;
73 io
.ntcreatex
.in
.root_fid
= 0;
74 io
.ntcreatex
.in
.access_mask
= SEC_RIGHTS_FILE_ALL
;
75 io
.ntcreatex
.in
.alloc_size
= 0;
76 io
.ntcreatex
.in
.file_attr
= FILE_ATTRIBUTE_NORMAL
;
77 io
.ntcreatex
.in
.share_access
= NTCREATEX_SHARE_ACCESS_NONE
;
78 io
.ntcreatex
.in
.open_disposition
= NTCREATEX_DISP_CREATE
;
79 io
.ntcreatex
.in
.create_options
= 0;
80 io
.ntcreatex
.in
.impersonation
= NTCREATEX_IMPERSONATION_ANONYMOUS
;
81 io
.ntcreatex
.in
.security_flags
= 0;
82 io
.ntcreatex
.in
.fname
= fname2
;
83 io
.ntcreatex
.in
.open_disposition
= open_disposition
;
85 status
= smb_raw_open(tree
, tctx
, &io
);
87 talloc_free(ucs_name
);
94 see if the server recognises composed characters
96 static bool test_composed(struct torture_context
*tctx
,
97 struct smbcli_state
*cli
)
99 const uint32_t name1
[] = {0x61, 0x308};
100 const uint32_t name2
[] = {0xe4};
101 NTSTATUS status1
, status2
;
103 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
104 "setting up basedir");
106 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 2);
107 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create composed name");
109 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
111 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create accented character");
117 see if the server recognises a naked diacritical
119 static bool test_diacritical(struct torture_context
*tctx
,
120 struct smbcli_state
*cli
)
122 const uint32_t name1
[] = {0x308};
123 const uint32_t name2
[] = {0x308, 0x308};
124 NTSTATUS status1
, status2
;
126 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
127 "setting up basedir");
129 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
131 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create naked diacritical");
133 /* try a double diacritical */
134 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 2);
136 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create double naked diacritical");
142 see if the server recognises a partial surrogate pair
144 static bool test_surrogate(struct torture_context
*tctx
,
145 struct smbcli_state
*cli
)
147 const uint32_t name1
[] = {0xd800};
148 const uint32_t name2
[] = {0xdc00};
149 const uint32_t name3
[] = {0xd800, 0xdc00};
152 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
153 "setting up basedir");
155 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
157 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 1");
159 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
161 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 2");
163 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 2);
165 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create full surrogate");
171 see if the server recognises wide-a characters
173 static bool test_widea(struct torture_context
*tctx
,
174 struct smbcli_state
*cli
)
176 const uint32_t name1
[] = {'a'};
177 const uint32_t name2
[] = {0xff41};
178 const uint32_t name3
[] = {0xff21};
181 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
182 "setting up basedir");
184 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
186 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create 'a'");
188 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
190 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create wide-a");
192 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 1);
194 torture_assert_ntstatus_equal(tctx
, status
, NT_STATUS_OBJECT_NAME_COLLISION
,
195 "Failed to create wide-A");
200 struct torture_suite
*torture_charset(TALLOC_CTX
*mem_ctx
)
202 struct torture_suite
*suite
= torture_suite_create(mem_ctx
, "CHARSET");
204 torture_suite_add_1smb_test(suite
, "Testing composite character (a umlaut)", test_composed
);
205 torture_suite_add_1smb_test(suite
, "Testing naked diacritical (umlaut)", test_diacritical
);
206 torture_suite_add_1smb_test(suite
, "Testing partial surrogate", test_surrogate
);
207 torture_suite_add_1smb_test(suite
, "Testing wide-a", test_widea
);