7aae9d8561641b65dba16b54658f736da2e67387
[kai/samba.git] / source3 / client / testsmbc.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 2.0
4    SMB client library test program
5    Copyright (C) Andrew Tridgell 1998
6    Copyright (C) Richard Sharpe 2000
7    Copyright (C) John Terpsra 2000
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include <stdio.h>
25 #include <errno.h>
26 #include <sys/time.h>
27 #include <string.h>
28 #include <unistd.h>
29 #include <stdlib.h>
30 #include <libsmbclient.h>
31
32 void auth_fn(const char *server, const char *share,
33              char *workgroup, int wgmaxlen, char *username, int unmaxlen,
34              char *password, int pwmaxlen)
35 {
36   char temp[128];
37
38   fprintf(stdout, "Need password for //%s/%s\n", server, share);
39
40   fprintf(stdout, "Enter workgroup: [%s] ", workgroup);
41   fgets(temp, sizeof(temp), stdin);
42
43   if (temp[strlen(temp) - 1] == 0x0a) /* A new line? */
44     temp[strlen(temp) - 1] = 0x00;
45
46   if (temp[0]) strncpy(workgroup, temp, wgmaxlen - 1);
47
48   fprintf(stdout, "Enter username: [%s] ", username);
49   fgets(temp, sizeof(temp), stdin);
50
51   if (temp[strlen(temp) - 1] == 0x0a) /* A new line? */
52     temp[strlen(temp) - 1] = 0x00;
53
54   if (temp[0]) strncpy(username, temp, unmaxlen - 1);
55
56   fprintf(stdout, "Enter password: [%s] ", password);
57   fgets(temp, sizeof(temp), stdin);
58
59   if (temp[strlen(temp) - 1] == 0x0a) /* A new line? */
60     temp[strlen(temp) - 1] = 0x00;
61
62   if (temp[0]) strncpy(password, temp, pwmaxlen - 1);
63
64 }
65
66 int global_id = 0;
67
68 void print_list_fn(struct print_job_info *pji)
69 {
70
71   fprintf(stdout, "Print job: ID: %u, Prio: %u, Size: %u, User: %s, Name: %s\n",
72           pji->id, pji->priority, pji->size, pji->user, pji->name);
73
74   global_id = pji->id;
75
76 }
77
78 int main(int argc, char *argv[])
79 {
80   int err, fd, dh1, dh2, dh3, dsize, dirc;
81   const char *file = "smb://samba/public/testfile.txt";
82   const char *file2 = "smb://samba/public/testfile2.txt";
83   char buff[256];
84   char dirbuf[512];
85   char *dirp;
86   struct stat st1, st2;
87
88   err = smbc_init(auth_fn,  10); /* Initialize things */
89
90   if (err < 0) {
91
92     fprintf(stderr, "Initializing the smbclient library ...: %s\n", strerror(errno));
93
94   }
95
96   if (argc > 1) {
97
98     /* Try to list the print jobs ... */
99
100     if (smbc_list_print_jobs("smb://samba/pclp", print_list_fn) < 0) {
101
102       fprintf(stderr, "Could not list print jobs: %s, %d\n", strerror(errno), errno);
103       exit(1);
104
105     }
106
107     /* Try to delete the last job listed */
108
109     if (global_id > 0) {
110
111       fprintf(stdout, "Trying to delete print job %u\n", global_id);
112
113       if (smbc_unlink_print_job("smb://samba/pclp", global_id) < 0) {
114
115         fprintf(stderr, "Failed to unlink job id %u, %s, %u\n", global_id, 
116                 strerror(errno), errno);
117
118         exit(1);
119
120       }
121
122     }
123
124     /* Try to print a file ... */
125
126     if (smbc_print_file("smb://samba/public/testfile2.txt", "smb://samba/pclp") < 0) {
127
128       fprintf(stderr, "Failed to print job: %s %u\n", strerror(errno), errno);
129       exit(1);
130
131     }
132
133     /* Try to delete argv[1] as a file ... */
134     
135     if (smbc_unlink(argv[1]) < 0) {
136
137       fprintf(stderr, "Could not unlink: %s, %s, %d\n",
138               argv[1], strerror(errno), errno);
139
140       exit(0);
141
142     }
143
144     if ((dh1 = smbc_opendir("smb://"))<1) {
145
146       fprintf(stderr, "Could not open directory: smb://: %s\n",
147               strerror(errno));
148
149       exit(1);
150
151     }
152
153     if ((dh2 = smbc_opendir("smb://sambanet")) < 0) {
154
155       fprintf(stderr, "Could not open directory: smb://sambanet: %s\n",
156               strerror(errno));
157
158       exit(1);
159
160     }
161
162     if ((dh3 = smbc_opendir("smb://samba")) < 0) {
163
164       fprintf(stderr, "Could not open directory: smb://samba: %s\n",
165               strerror(errno));
166
167       exit(1);
168
169     }
170
171     fprintf(stdout, "Directory handles: %u, %u, %u\n", dh1, dh2, dh3);
172
173     /* Now, list those directories, but in funny ways ... */
174
175     dirp = (char *)dirbuf;
176
177     if ((dirc = smbc_getdents(dh1, (struct smbc_dirent *)dirp, 
178                               sizeof(dirbuf))) < 0) {
179
180       fprintf(stderr, "Problems getting directory entries: %s\n",
181               strerror(errno));
182
183       exit(1);
184
185     }
186
187     /* Now, process the list of names ... */
188
189     fprintf(stdout, "Directory listing, size = %u\n", dirc);
190
191     while (dirc > 0) {
192
193       dsize = ((struct smbc_dirent *)dirp)->dirlen;
194       fprintf(stdout, "Dir Ent, Type: %u, Name: %s, Comment: %s\n",
195               ((struct smbc_dirent *)dirp)->smbc_type, 
196               ((struct smbc_dirent *)dirp)->name, 
197               ((struct smbc_dirent *)dirp)->comment);
198
199       dirp += dsize;
200       (char *)dirc -= dsize;
201
202     }
203
204     dirp = (char *)dirbuf;
205
206     if ((dirc = smbc_getdents(dh2, (struct smbc_dirent *)dirp, 
207                               sizeof(dirbuf))) < 0) {
208
209       fprintf(stderr, "Problems getting directory entries: %s\n",
210               strerror(errno));
211
212       exit(1);
213
214     }
215
216     /* Now, process the list of names ... */
217
218     fprintf(stdout, "\nDirectory listing, size = %u\n", dirc);
219
220     while (dirc > 0) {
221
222       dsize = ((struct smbc_dirent *)dirp)->dirlen;
223       fprintf(stdout, "Dir Ent, Type: %u, Name: %s, Comment: %s\n",
224               ((struct smbc_dirent *)dirp)->smbc_type, 
225               ((struct smbc_dirent *)dirp)->name, 
226               ((struct smbc_dirent *)dirp)->comment);
227
228       dirp += dsize;
229       (char *)dirc -= dsize;
230
231     }
232
233     dirp = (char *)dirbuf;
234
235     if ((dirc = smbc_getdents(dh3, (struct smbc_dirent *)dirp, 
236                               sizeof(dirbuf))) < 0) {
237
238       fprintf(stderr, "Problems getting directory entries: %s\n",
239               strerror(errno));
240
241       exit(1);
242
243     }
244
245     /* Now, process the list of names ... */
246
247     fprintf(stdout, "Directory listing, size = %u\n", dirc);
248
249     while (dirc > 0) {
250
251       dsize = ((struct smbc_dirent *)dirp)->dirlen;
252       fprintf(stdout, "\nDir Ent, Type: %u, Name: %s, Comment: %s\n",
253               ((struct smbc_dirent *)dirp)->smbc_type, 
254               ((struct smbc_dirent *)dirp)->name, 
255               ((struct smbc_dirent *)dirp)->comment);
256
257       (char *)dirp += dsize;
258       (char *)dirc -= dsize;
259
260     }
261
262     exit(1);
263
264   }
265
266   /* For now, open a file on a server that is hard coded ... later will
267    * read from the command line ...
268    */
269
270   fd = smbc_open(file, O_RDWR | O_CREAT | O_TRUNC, 0666);
271
272   if (fd < 0) {
273
274     fprintf(stderr, "Creating file: %s: %s\n", file, strerror(errno));
275     exit(0);
276
277   }
278
279   fprintf(stdout, "Opened or created file: %s\n", file);
280
281   /* Now, write some date to the file ... */
282
283   bzero(buff, sizeof(buff));
284   strcpy(buff, "Some test data for the moment ...");
285
286   err = smbc_write(fd, buff, sizeof(buff));
287
288   if (err < 0) {
289     
290     fprintf(stderr, "writing file: %s: %s\n", file, strerror(errno));
291     exit(0);
292
293   }
294
295   fprintf(stdout, "Wrote %d bytes to file: %s\n", sizeof(buff), buff);
296
297   /* Now, seek the file back to offset 0 */
298
299   err = smbc_lseek(fd, SEEK_SET, 0);
300
301   if (err < 0) {
302
303     fprintf(stderr, "Seeking file: %s: %s\n", file, strerror(errno));
304     exit(0);
305
306   }
307
308   fprintf(stdout, "Completed lseek on file: %s\n", file);
309
310   /* Now, read the file contents back ... */
311
312   err = smbc_read(fd, buff, sizeof(buff));
313
314   if (err < 0) {
315
316     fprintf(stderr, "Reading file: %s: %s\n", file, strerror(errno));
317     exit(0);
318
319   }
320
321   fprintf(stdout, "Read file: %s\n", buff);  /* Should check the contents */
322
323   fprintf(stdout, "Now fstat'ing file: %s\n", file);
324
325   err = smbc_fstat(fd, &st1);
326
327   if (err < 0) {
328
329     fprintf(stderr, "Fstat'ing file: %s: %s\n", file, strerror(errno));
330     exit(0);
331
332   }
333
334
335   /* Now, close the file ... */
336
337   err = smbc_close(fd);
338
339   if (err < 0) {
340
341     fprintf(stderr, "Closing file: %s: %s\n", file, strerror(errno));
342
343   }
344
345   /* Now, rename the file ... */
346
347   err = smbc_rename(file, file2);
348
349   if (err < 0) {
350
351     fprintf(stderr, "Renaming file: %s to %s: %s\n", file, file2, strerror(errno));
352
353   }
354
355   fprintf(stdout, "Renamed file %s to %s\n", file, file2);
356
357   /* Now, create a file and delete it ... */
358
359   fprintf(stdout, "Now, creating file: %s so we can delete it.\n", file);
360
361   fd = smbc_open(file, O_RDWR | O_CREAT, 0666);
362
363   if (fd < 0) {
364
365     fprintf(stderr, "Creating file: %s: %s\n", file, strerror(errno));
366     exit(0);
367
368   }
369
370   fprintf(stdout, "Opened or created file: %s\n", file);
371
372   err = smbc_close(fd);
373
374   if (err < 0) {
375
376     fprintf(stderr, "Closing file: %s: %s\n", file, strerror(errno));
377     exit(0);
378
379   }
380   
381   /* Now, delete the file ... */
382
383   fprintf(stdout, "File %s created, now deleting ...\n", file);
384
385   err = smbc_unlink(file);
386
387   if (err < 0) {
388
389     fprintf(stderr, "Deleting file: %s: %s\n", file, strerror(errno));
390     exit(0);
391
392   }
393
394   /* Now, stat the file, file 2 ... */
395
396   fprintf(stdout, "Now stat'ing file: %s\n", file);
397
398   err = smbc_stat(file2, &st2);
399
400   if (err < 0) {
401
402     fprintf(stderr, "Stat'ing file: %s: %s\n", file, strerror(errno));
403     exit(0);
404
405   }
406
407   fprintf(stdout, "Stat'ed file:   %s. Size = %d, mode = %04X\n", file2, 
408           (int)st2.st_size, st2.st_mode);
409   fprintf(stdout, "    time: %s\n", ctime(&st2.st_atime));
410   fprintf(stdout, "Earlier stat:   %s, Size = %d, mode = %04X\n", file, 
411           (int)st1.st_size, st1.st_mode);
412   fprintf(stdout, "    time: %s\n", ctime(&st1.st_atime));
413
414   /* Now, make a directory ... */
415
416   fprintf(stdout, "Making directory smb://samba/public/make-dir\n");
417
418   if (smbc_mkdir("smb://samba/public/make-dir", 0666) < 0) {
419
420     fprintf(stderr, "Error making directory: smb://samba/public/make-dir: %s\n", 
421             strerror(errno));
422
423     if (errno == EEXIST) { /* Try to delete the directory */
424
425       fprintf(stdout, "Trying to delete directory: smb://samba/public/make-dir\n");
426
427       if (smbc_rmdir("smb://samba/public/make-dir") < 0) { /* Error */
428
429         fprintf(stderr, "Error removing directory: smb://samba/public/make-dir: %s\n", strerror(errno));
430
431         exit(0);
432
433       }
434
435       fprintf(stdout, "Making directory: smb://samba/public/make-dir\n");
436
437       if (smbc_mkdir("smb://samba/public/make-dir", 666) < 0) {
438
439         fprintf(stderr, "Error making directory: smb://samba/public/make-dir: %s\n",
440                 strerror(errno));
441
442         fprintf(stderr, "I give up!\n");
443
444         exit(1);
445
446       }
447
448     }
449
450     exit(0);
451     
452   }
453
454   fprintf(stdout, "Made dir: make-dir\n");
455   return 0;
456 }