RIP BOOL. Convert BOOL -> bool. I found a few interesting
[kai/samba.git] / source3 / torture / utable.c
1 /* 
2    Unix SMB/CIFS implementation.
3    SMB torture tester - unicode table dumper
4    Copyright (C) Andrew Tridgell 2001
5    
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10    
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "includes.h"
21
22 bool torture_utable(int dummy)
23 {
24         struct cli_state *cli;
25         fstring fname, alt_name;
26         int fnum;
27         smb_ucs2_t c2;
28         int c, len, fd;
29         int chars_allowed=0, alt_allowed=0;
30         uint8 valid[0x10000];
31
32         printf("starting utable\n");
33
34         if (!torture_open_connection(&cli, 0)) {
35                 return False;
36         }
37
38         memset(valid, 0, sizeof(valid));
39
40         cli_mkdir(cli, "\\utable");
41         cli_unlink(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_UTF16LE, CH_UNIX, 
50                                      &c2, 2, 
51                                      p, sizeof(fname)-strlen(fname), True);
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                         valid[c] = 1;
66                         d_printf("fname=[%s] alt_name=[%s]\n", fname, alt_name);
67                 }
68
69                 cli_close(cli, fnum);
70                 cli_unlink(cli, fname);
71
72                 if (c % 100 == 0) {
73                         printf("%d (%d/%d)\r", c, chars_allowed, alt_allowed);
74                 }
75         }
76         printf("%d (%d/%d)\n", c, chars_allowed, alt_allowed);
77
78         cli_rmdir(cli, "\\utable");
79
80         d_printf("%d chars allowed   %d alt chars allowed\n", chars_allowed, alt_allowed);
81
82         fd = open("valid.dat", O_WRONLY|O_CREAT|O_TRUNC, 0644);
83         if (fd == -1) {
84                 d_printf("Failed to create valid.dat - %s", strerror(errno));
85                 return False;
86         }
87         write(fd, valid, 0x10000);
88         close(fd);
89         d_printf("wrote valid.dat\n");
90
91         return True;
92 }
93
94
95 static char *form_name(int c)
96 {
97         static fstring fname;
98         smb_ucs2_t c2;
99         char *p;
100         int len;
101
102         fstrcpy(fname, "\\utable\\");
103         p = fname+strlen(fname);
104         SSVAL(&c2, 0, c);
105
106         len = convert_string(CH_UTF16LE, CH_UNIX, 
107                              &c2, 2, 
108                              p, sizeof(fname)-strlen(fname), True);
109         p[len] = 0;
110         return fname;
111 }
112
113 bool torture_casetable(int dummy)
114 {
115         static struct cli_state *cli;
116         char *fname;
117         int fnum;
118         int c, i;
119 #define MAX_EQUIVALENCE 8
120         smb_ucs2_t equiv[0x10000][MAX_EQUIVALENCE];
121         printf("starting casetable\n");
122
123         if (!torture_open_connection(&cli, 0)) {
124                 return False;
125         }
126
127         memset(equiv, 0, sizeof(equiv));
128
129         cli_unlink(cli, "\\utable\\*");
130         cli_rmdir(cli, "\\utable");
131         if (!cli_mkdir(cli, "\\utable")) {
132                 printf("Failed to create utable directory!\n");
133                 return False;
134         }
135
136         for (c=1; c < 0x10000; c++) {
137                 SMB_OFF_T size;
138
139                 if (c == '.' || c == '\\') continue;
140
141                 printf("%04x (%c)\n", c, isprint(c)?c:'.');
142
143                 fname = form_name(c);
144                 fnum = cli_nt_create_full(cli, fname, 0,
145                                           GENERIC_ALL_ACCESS, 
146                                           FILE_ATTRIBUTE_NORMAL,
147                                           FILE_SHARE_NONE,
148                                           FILE_OPEN_IF, 0, 0);
149
150                 if (fnum == -1) {
151                         printf("Failed to create file with char %04x\n", c);
152                         continue;
153                 }
154
155                 size = 0;
156
157                 if (!cli_qfileinfo(cli, fnum, NULL, &size, 
158                                    NULL, NULL, NULL, NULL, NULL)) continue;
159
160                 if (size > 0) {
161                         /* found a character equivalence! */
162                         int c2[MAX_EQUIVALENCE];
163
164                         if (size/sizeof(int) >= MAX_EQUIVALENCE) {
165                                 printf("too many chars match?? size=%ld c=0x%04x\n",
166                                        (unsigned long)size, c);
167                                 cli_close(cli, fnum);
168                                 return False;
169                         }
170
171                         cli_read(cli, fnum, (char *)c2, 0, size);
172                         printf("%04x: ", c);
173                         equiv[c][0] = c;
174                         for (i=0; i<size/sizeof(int); i++) {
175                                 printf("%04x ", c2[i]);
176                                 equiv[c][i+1] = c2[i];
177                         }
178                         printf("\n");
179                         fflush(stdout);
180                 }
181
182                 cli_write(cli, fnum, 0, (char *)&c, size, sizeof(c));
183                 cli_close(cli, fnum);
184         }
185
186         cli_unlink(cli, "\\utable\\*");
187         cli_rmdir(cli, "\\utable");
188
189         return True;
190 }