the CASETABLE torture target now generates the complete unicode
[kai/samba.git] / source3 / torture / utable.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 3.0
4    SMB torture tester - unicode table dumper
5    Copyright (C) Andrew Tridgell 2001
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #define NO_SYSLOG
23
24 #include "includes.h"
25
26 BOOL torture_utable(int dummy)
27 {
28         static struct cli_state cli;
29         fstring fname, alt_name;
30         int fnum;
31         smb_ucs2_t c2;
32         int c, len;
33         int chars_allowed=0, alt_allowed=0;
34
35         printf("starting utable\n");
36
37         if (!torture_open_connection(&cli)) {
38                 return False;
39         }
40
41         cli_mkdir(&cli, "\\utable");
42
43         for (c=1; c < 0x10000; c++) {
44                 char *p;
45
46                 SSVAL(&c2, 0, c);
47                 fstrcpy(fname, "\\utable\\x");
48                 p = fname+strlen(fname);
49                 len = convert_string(CH_UCS2, CH_UNIX, 
50                                      &c2, 2, 
51                                      p, sizeof(fname)-strlen(fname));
52                 p[len] = 0;
53                 fstrcat(fname,"_a_long_extension");
54
55                 fnum = cli_open(&cli, fname, O_RDWR | O_CREAT | O_TRUNC, 
56                                 DENY_NONE);
57                 if (fnum == -1) continue;
58
59                 chars_allowed++;
60
61                 cli_qpathinfo_alt_name(&cli, fname, alt_name);
62
63                 if (strncmp(alt_name, "X_A_L", 5) != 0) {
64                         alt_allowed++;
65                         /* d_printf("fname=[%s] alt_name=[%s]\n", fname, alt_name); */
66                 }
67
68                 cli_close(&cli, fnum);
69                 cli_unlink(&cli, fname);
70
71                 if (c % 100 == 0) {
72                         printf("%d (%d/%d)\r", c, chars_allowed, alt_allowed);
73                 }
74         }
75         printf("%d (%d/%d)\n", c, chars_allowed, alt_allowed);
76
77         cli_rmdir(&cli, "\\utable");
78
79         d_printf("%d chars allowed   %d alt chars allowed\n", chars_allowed, alt_allowed);
80
81         return True;
82 }
83
84
85 static char *form_name(int c)
86 {
87         static fstring fname;
88         smb_ucs2_t c2;
89         char *p;
90         int len;
91
92         fstrcpy(fname, "\\utable\\x");
93         p = fname+strlen(fname);
94         SSVAL(&c2, 0, c);
95
96         len = convert_string(CH_UCS2, CH_UNIX, 
97                              &c2, 2, 
98                              p, sizeof(fname)-strlen(fname));
99         p[len] = 0;
100         fstrcat(fname,"_a_long_extension");
101         return fname;
102 }
103
104 BOOL torture_casetable(int dummy)
105 {
106         static struct cli_state cli;
107         char *fname;
108         int fnum;
109         int c;
110
111         printf("starting utable\n");
112
113         if (!torture_open_connection(&cli)) {
114                 return False;
115         }
116
117         cli_mkdir(&cli, "\\utable");
118         cli_unlink(&cli, "\\utable\\*");
119
120         for (c=1; c < 0x10000; c++) {
121                 fname = form_name(c);
122                 fnum = cli_nt_create_full(&cli, fname, 
123                                           GENERIC_ALL_ACCESS, 
124                                           FILE_ATTRIBUTE_NORMAL,
125                                           FILE_SHARE_NONE,
126                                           FILE_CREATE, 0);
127
128                 if (fnum == -1 && 
129                     NT_STATUS_EQUAL(cli_nt_error(&cli),NT_STATUS_OBJECT_NAME_COLLISION)) {
130                         /* found a character equivalence! */
131                         int c2;
132                         
133                         fnum = cli_nt_create_full(&cli, fname, 
134                                                   GENERIC_ALL_ACCESS, 
135                                                   FILE_ATTRIBUTE_NORMAL,
136                                                   FILE_SHARE_NONE,
137                                                   FILE_OPEN, 0);
138                         if (fnum == -1 || 
139                             cli_read(&cli, fnum, (char *)&c2, 0, sizeof(c2)) != sizeof(c2)) {
140                                 continue;
141                         }
142
143                         printf("%04x == %04x\n", c, c2);
144                         cli_close(&cli, fnum);
145                         continue;
146                 }
147
148                 cli_write(&cli, fnum, 0, (char *)&c, 0, sizeof(c));
149                 cli_close(&cli, fnum);
150         }
151
152         cli_unlink(&cli, "\\utable\\*");
153         cli_rmdir(&cli, "\\utable");
154
155         return True;
156 }