From 47dfe299c8a5a64ade88d15ecf71f99800ea40cd Mon Sep 17 00:00:00 2001 From: Andrew Tridgell Date: Fri, 26 Mar 2004 02:39:48 +0000 Subject: - moved some of the base tests into torture/basic/ - added a CHARSET set of tests, which determines how the server deals with some specific charset issues related to UTF-16 support. Interestingly, Samba3 already passes all but one of these tests, because our incorrect UCS-2 and UTF-8 implementations where we don't check the validity of characters actually matches what Windows does! This means that adding UTF-16 support to Samba is going to be _much_ easier than we expected. (This used to be commit c8497a42364d186f08102224d5062d176ee81f5b) --- source4/torture/basic/charset.c | 269 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 269 insertions(+) create mode 100644 source4/torture/basic/charset.c (limited to 'source4/torture/basic/charset.c') diff --git a/source4/torture/basic/charset.c b/source4/torture/basic/charset.c new file mode 100644 index 0000000000..1a708ac055 --- /dev/null +++ b/source4/torture/basic/charset.c @@ -0,0 +1,269 @@ +/* + Unix SMB/CIFS implementation. + + SMB torture tester - charset test routines + + Copyright (C) Andrew Tridgell 2001 + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +*/ + +#include "includes.h" + +#define BASEDIR "\\chartest\\" + +/* + open a file using a set of unicode code points for the name + + the prefix BASEDIR is added before the name +*/ +static NTSTATUS unicode_open(struct cli_tree *tree, + TALLOC_CTX *mem_ctx, + uint32 open_disposition, + const uint32 *u_name, + size_t u_name_len) +{ + union smb_open io; + char *fname, *fname2=NULL, *ucs_name; + int i; + NTSTATUS status; + + ucs_name = malloc((1+u_name_len)*2); + if (!ucs_name) { + return NT_STATUS_NO_MEMORY; + } + + for (i=0;itree, mem_ctx, NTCREATEX_DISP_CREATE, name1, 2); + if (!NT_STATUS_IS_OK(status1)) { + printf("Failed to create composed name - %s\n", + nt_errstr(status1)); + return False; + } + + status2 = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name2, 1); + + if (!NT_STATUS_IS_OK(status2)) { + printf("Failed to create accented character - %s\n", + nt_errstr(status2)); + return False; + } + + return True; +} + +/* + see if the server recognises a naked diacritical +*/ +static BOOL test_diacritical(struct cli_state *cli, TALLOC_CTX *mem_ctx) +{ + const uint32 name1[] = {0x308}; + const uint32 name2[] = {0x308, 0x308}; + NTSTATUS status1, status2; + + printf("Testing naked diacritical (umlaut)\n"); + + status1 = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name1, 1); + + if (!NT_STATUS_IS_OK(status1)) { + printf("Failed to create naked diacritical - %s\n", + nt_errstr(status1)); + return False; + } + + /* try a double diacritical */ + status2 = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name2, 2); + + if (!NT_STATUS_IS_OK(status2)) { + printf("Failed to create double naked diacritical - %s\n", + nt_errstr(status2)); + return False; + } + + return True; +} + +/* + see if the server recognises a partial surrogate pair +*/ +static BOOL test_surrogate(struct cli_state *cli, TALLOC_CTX *mem_ctx) +{ + const uint32 name1[] = {0xd800}; + const uint32 name2[] = {0xdc00}; + const uint32 name3[] = {0xd800, 0xdc00}; + NTSTATUS status; + + printf("Testing partial surrogate\n"); + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name1, 1); + + if (!NT_STATUS_IS_OK(status)) { + printf("Failed to create partial surrogate 1 - %s\n", + nt_errstr(status)); + return False; + } + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name2, 1); + + if (!NT_STATUS_IS_OK(status)) { + printf("Failed to create partial surrogate 2 - %s\n", + nt_errstr(status)); + return False; + } + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name3, 2); + + if (!NT_STATUS_IS_OK(status)) { + printf("Failed to create full surrogate - %s\n", + nt_errstr(status)); + return False; + } + + return True; +} + +/* + see if the server recognises wide-a characters +*/ +static BOOL test_widea(struct cli_state *cli, TALLOC_CTX *mem_ctx) +{ + const uint32 name1[] = {'a'}; + const uint32 name2[] = {0xff41}; + const uint32 name3[] = {0xff21}; + NTSTATUS status; + + printf("Testing wide-a\n"); + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name1, 1); + + if (!NT_STATUS_IS_OK(status)) { + printf("Failed to create 'a' - %s\n", + nt_errstr(status)); + return False; + } + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name2, 1); + + if (!NT_STATUS_IS_OK(status)) { + printf("Failed to create wide-a - %s\n", + nt_errstr(status)); + return False; + } + + status = unicode_open(cli->tree, mem_ctx, NTCREATEX_DISP_CREATE, name3, 1); + + if (!NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_COLLISION)) { + printf("Expected %s creating wide-A - %s\n", + nt_errstr(NT_STATUS_OBJECT_NAME_COLLISION), + nt_errstr(status)); + return False; + } + + return True; +} + +BOOL torture_charset(int dummy) +{ + static struct cli_state *cli; + BOOL ret = True; + TALLOC_CTX *mem_ctx; + + mem_ctx = talloc_init("torture_charset"); + + if (!torture_open_connection(&cli)) { + return False; + } + + printf("Starting charset tests\n"); + + if (cli_deltree(cli->tree, BASEDIR) == -1) { + printf("Failed to clean " BASEDIR "\n"); + return False; + } + if (NT_STATUS_IS_ERR(cli_mkdir(cli->tree, BASEDIR))) { + printf("Failed to create " BASEDIR " - %s\n", cli_errstr(cli->tree)); + return False; + } + + if (!test_composed(cli, mem_ctx)) { + ret = False; + } + + if (!test_diacritical(cli, mem_ctx)) { + ret = False; + } + + if (!test_surrogate(cli, mem_ctx)) { + ret = False; + } + + if (!test_widea(cli, mem_ctx)) { + ret = False; + } + + return ret; +} -- cgit