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 "libcli/libcli.h"
24 #include "torture/util.h"
25 #include "param/param.h"
26 #include "torture/basic/proto.h"
28 #define BASEDIR "\\chartest\\"
31 open a file using a set of unicode code points for the name
33 the prefix BASEDIR is added before the name
35 static NTSTATUS
unicode_open(struct torture_context
*tctx
,
36 struct smbcli_tree
*tree
,
38 uint32_t open_disposition
,
39 const uint32_t *u_name
,
43 char *fname
, *fname2
=NULL
, *ucs_name
;
47 ucs_name
= talloc_size(mem_ctx
, (1+u_name_len
)*2);
49 printf("Failed to create UCS2 Name - talloc() failure\n");
50 return NT_STATUS_NO_MEMORY
;
53 for (i
=0;i
<u_name_len
;i
++) {
54 SSVAL(ucs_name
, i
*2, u_name
[i
]);
56 SSVAL(ucs_name
, i
*2, 0);
58 if (!convert_string_talloc_handle(ucs_name
, lpcfg_iconv_handle(tctx
->lp_ctx
), CH_UTF16
, CH_UNIX
, ucs_name
, (1+u_name_len
)*2, (void **)&fname
, &i
)) {
59 torture_comment(tctx
, "Failed to convert UCS2 Name into unix - convert_string_talloc() failure\n");
60 talloc_free(ucs_name
);
61 return NT_STATUS_NO_MEMORY
;
64 fname2
= talloc_asprintf(ucs_name
, "%s%s", BASEDIR
, fname
);
66 talloc_free(ucs_name
);
67 return NT_STATUS_NO_MEMORY
;
70 io
.generic
.level
= RAW_OPEN_NTCREATEX
;
71 io
.ntcreatex
.in
.flags
= NTCREATEX_FLAGS_EXTENDED
;
72 io
.ntcreatex
.in
.root_fid
.fnum
= 0;
73 io
.ntcreatex
.in
.access_mask
= SEC_RIGHTS_FILE_ALL
;
74 io
.ntcreatex
.in
.alloc_size
= 0;
75 io
.ntcreatex
.in
.file_attr
= FILE_ATTRIBUTE_NORMAL
;
76 io
.ntcreatex
.in
.share_access
= NTCREATEX_SHARE_ACCESS_NONE
;
77 io
.ntcreatex
.in
.open_disposition
= NTCREATEX_DISP_CREATE
;
78 io
.ntcreatex
.in
.create_options
= 0;
79 io
.ntcreatex
.in
.impersonation
= NTCREATEX_IMPERSONATION_ANONYMOUS
;
80 io
.ntcreatex
.in
.security_flags
= 0;
81 io
.ntcreatex
.in
.fname
= fname2
;
82 io
.ntcreatex
.in
.open_disposition
= open_disposition
;
84 status
= smb_raw_open(tree
, tctx
, &io
);
86 talloc_free(ucs_name
);
93 see if the server recognises composed characters
95 static bool test_composed(struct torture_context
*tctx
,
96 struct smbcli_state
*cli
)
98 const uint32_t name1
[] = {0x61, 0x308};
99 const uint32_t name2
[] = {0xe4};
100 NTSTATUS status1
, status2
;
102 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
103 "setting up basedir");
105 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 2);
106 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create composed name");
108 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
110 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create accented character");
116 see if the server recognises a naked diacritical
118 static bool test_diacritical(struct torture_context
*tctx
,
119 struct smbcli_state
*cli
)
121 const uint32_t name1
[] = {0x308};
122 const uint32_t name2
[] = {0x308, 0x308};
123 NTSTATUS status1
, status2
;
125 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
126 "setting up basedir");
128 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
130 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create naked diacritical");
132 /* try a double diacritical */
133 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 2);
135 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create double naked diacritical");
141 see if the server recognises a partial surrogate pair
143 static bool test_surrogate(struct torture_context
*tctx
,
144 struct smbcli_state
*cli
)
146 const uint32_t name1
[] = {0xd800};
147 const uint32_t name2
[] = {0xdc00};
148 const uint32_t name3
[] = {0xd800, 0xdc00};
151 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
152 "setting up basedir");
154 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
156 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 1");
158 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
160 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 2");
162 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 2);
164 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create full surrogate");
170 see if the server recognises wide-a characters
172 static bool test_widea(struct torture_context
*tctx
,
173 struct smbcli_state
*cli
)
175 const uint32_t name1
[] = {'a'};
176 const uint32_t name2
[] = {0xff41};
177 const uint32_t name3
[] = {0xff21};
180 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
181 "setting up basedir");
183 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
185 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create 'a'");
187 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
189 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create wide-a");
191 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 1);
193 torture_assert_ntstatus_equal(tctx
, status
, NT_STATUS_OBJECT_NAME_COLLISION
,
194 "Failed to create wide-A");
199 struct torture_suite
*torture_charset(TALLOC_CTX
*mem_ctx
)
201 struct torture_suite
*suite
= torture_suite_create(mem_ctx
, "charset");
203 torture_suite_add_1smb_test(suite
, "Testing composite character (a umlaut)", test_composed
);
204 torture_suite_add_1smb_test(suite
, "Testing naked diacritical (umlaut)", test_diacritical
);
205 torture_suite_add_1smb_test(suite
, "Testing partial surrogate", test_surrogate
);
206 torture_suite_add_1smb_test(suite
, "Testing wide-a", test_widea
);