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 i
= 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
, false);
61 torture_comment(tctx
, "Failed to convert UCS2 Name into unix - convert_string_talloc() failure\n");
62 talloc_free(ucs_name
);
63 return NT_STATUS_NO_MEMORY
;
66 fname2
= talloc_asprintf(ucs_name
, "%s%s", BASEDIR
, fname
);
68 talloc_free(ucs_name
);
69 return NT_STATUS_NO_MEMORY
;
72 io
.generic
.level
= RAW_OPEN_NTCREATEX
;
73 io
.ntcreatex
.in
.flags
= NTCREATEX_FLAGS_EXTENDED
;
74 io
.ntcreatex
.in
.root_fid
= 0;
75 io
.ntcreatex
.in
.access_mask
= SEC_RIGHTS_FILE_ALL
;
76 io
.ntcreatex
.in
.alloc_size
= 0;
77 io
.ntcreatex
.in
.file_attr
= FILE_ATTRIBUTE_NORMAL
;
78 io
.ntcreatex
.in
.share_access
= NTCREATEX_SHARE_ACCESS_NONE
;
79 io
.ntcreatex
.in
.open_disposition
= NTCREATEX_DISP_CREATE
;
80 io
.ntcreatex
.in
.create_options
= 0;
81 io
.ntcreatex
.in
.impersonation
= NTCREATEX_IMPERSONATION_ANONYMOUS
;
82 io
.ntcreatex
.in
.security_flags
= 0;
83 io
.ntcreatex
.in
.fname
= fname2
;
84 io
.ntcreatex
.in
.open_disposition
= open_disposition
;
86 status
= smb_raw_open(tree
, tctx
, &io
);
88 talloc_free(ucs_name
);
95 see if the server recognises composed characters
97 static bool test_composed(struct torture_context
*tctx
,
98 struct smbcli_state
*cli
)
100 const uint32_t name1
[] = {0x61, 0x308};
101 const uint32_t name2
[] = {0xe4};
102 NTSTATUS status1
, status2
;
104 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
105 "setting up basedir");
107 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 2);
108 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create composed name");
110 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
112 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create accented character");
118 see if the server recognises a naked diacritical
120 static bool test_diacritical(struct torture_context
*tctx
,
121 struct smbcli_state
*cli
)
123 const uint32_t name1
[] = {0x308};
124 const uint32_t name2
[] = {0x308, 0x308};
125 NTSTATUS status1
, status2
;
127 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
128 "setting up basedir");
130 status1
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
132 torture_assert_ntstatus_ok(tctx
, status1
, "Failed to create naked diacritical");
134 /* try a double diacritical */
135 status2
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 2);
137 torture_assert_ntstatus_ok(tctx
, status2
, "Failed to create double naked diacritical");
143 see if the server recognises a partial surrogate pair
145 static bool test_surrogate(struct torture_context
*tctx
,
146 struct smbcli_state
*cli
)
148 const uint32_t name1
[] = {0xd800};
149 const uint32_t name2
[] = {0xdc00};
150 const uint32_t name3
[] = {0xd800, 0xdc00};
153 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
154 "setting up basedir");
156 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
158 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 1");
160 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
162 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create partial surrogate 2");
164 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 2);
166 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create full surrogate");
172 see if the server recognises wide-a characters
174 static bool test_widea(struct torture_context
*tctx
,
175 struct smbcli_state
*cli
)
177 const uint32_t name1
[] = {'a'};
178 const uint32_t name2
[] = {0xff41};
179 const uint32_t name3
[] = {0xff21};
182 torture_assert(tctx
, torture_setup_dir(cli
, BASEDIR
),
183 "setting up basedir");
185 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name1
, 1);
187 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create 'a'");
189 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name2
, 1);
191 torture_assert_ntstatus_ok(tctx
, status
, "Failed to create wide-a");
193 status
= unicode_open(tctx
, cli
->tree
, tctx
, NTCREATEX_DISP_CREATE
, name3
, 1);
195 torture_assert_ntstatus_equal(tctx
, status
, NT_STATUS_OBJECT_NAME_COLLISION
,
196 "Failed to create wide-A");
201 struct torture_suite
*torture_charset(TALLOC_CTX
*mem_ctx
)
203 struct torture_suite
*suite
= torture_suite_create(mem_ctx
, "CHARSET");
205 torture_suite_add_1smb_test(suite
, "Testing composite character (a umlaut)", test_composed
);
206 torture_suite_add_1smb_test(suite
, "Testing naked diacritical (umlaut)", test_diacritical
);
207 torture_suite_add_1smb_test(suite
, "Testing partial surrogate", test_surrogate
);
208 torture_suite_add_1smb_test(suite
, "Testing wide-a", test_widea
);