r23779: Change from v2 or later to v3 or later.
[kai/samba.git] / source / libsmb / libsmb_compat.c
1 /* 
2    Unix SMB/CIFS implementation.
3    SMB client library implementation (Old interface compatibility)
4    Copyright (C) Andrew Tridgell 1998
5    Copyright (C) Richard Sharpe 2000
6    Copyright (C) John Terpstra 2000
7    Copyright (C) Tom Jansen (Ninja ISD) 2002 
8    Copyright (C) Derrell Lipman 2003
9    
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14    
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19    
20    You should have received a copy of the GNU General Public License
21    along with this program; if not, write to the Free Software
22    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 */
24
25
26 #include "includes.h"
27
28 #include "include/libsmb_internal.h"
29
30 struct smbc_compat_fdlist {
31         SMBCFILE * file;
32         int fd;
33         struct smbc_compat_fdlist *next, *prev;
34 };
35
36 static SMBCCTX * statcont = NULL;
37 static int smbc_compat_initialized = 0;
38 static int smbc_compat_nextfd = 0;
39 static struct smbc_compat_fdlist * smbc_compat_fd_in_use = NULL;
40 static struct smbc_compat_fdlist * smbc_compat_fd_avail = NULL;
41
42 /* Find an fd and return the SMBCFILE * or NULL on failure */
43 static SMBCFILE * find_fd(int fd)
44 {
45         struct smbc_compat_fdlist * f = smbc_compat_fd_in_use;
46         while (f) {
47                 if (f->fd == fd) 
48                         return f->file;
49                 f = f->next;
50         }
51         return NULL;
52 }
53
54 /* Add an fd, returns 0 on success, -1 on error with errno set */
55 static int add_fd(SMBCFILE * file)
56 {
57         struct smbc_compat_fdlist * f = smbc_compat_fd_avail;
58
59         if (f) {
60                 /* We found one that's available */
61                 DLIST_REMOVE(smbc_compat_fd_avail, f);
62
63         } else {
64                 /*
65                  * None were available, so allocate one.  Keep the number of
66                  * file descriptors determinate.  This allows the application
67                  * to allocate bitmaps or mapping of file descriptors based on
68                  * a known maximum number of file descriptors that will ever
69                  * be returned.
70                  */
71                 if (smbc_compat_nextfd >= FD_SETSIZE) {
72                         errno = EMFILE;
73                         return -1;
74                 }
75
76                 f = SMB_MALLOC_P(struct smbc_compat_fdlist);
77                 if (!f) {
78                         errno = ENOMEM;
79                         return -1;
80                 }
81         
82                 f->fd = SMBC_BASE_FD + smbc_compat_nextfd++;
83         }
84
85         f->file = file;
86         DLIST_ADD(smbc_compat_fd_in_use, f);
87
88         return f->fd;
89 }
90
91
92
93 /* Delete an fd, returns 0 on success */
94 static int del_fd(int fd)
95 {
96         struct smbc_compat_fdlist * f = smbc_compat_fd_in_use;
97
98         while (f) {
99                 if (f->fd == fd) 
100                         break;
101                 f = f->next;
102         }
103
104         if (f) {
105                 /* found */
106                 DLIST_REMOVE(smbc_compat_fd_in_use, f);
107                 f->file = NULL;
108                 DLIST_ADD(smbc_compat_fd_avail, f);
109                 return 0;
110         }
111         return 1;
112 }
113  
114
115
116 int smbc_init(smbc_get_auth_data_fn fn, int debug)
117 {
118         if (!smbc_compat_initialized) {
119                 statcont = smbc_new_context();
120                 if (!statcont) 
121                         return -1;
122
123                 statcont->debug = debug;
124                 statcont->callbacks.auth_fn = fn;
125                 
126                 if (!smbc_init_context(statcont)) {
127                         smbc_free_context(statcont, False);
128                         return -1;
129                 }
130
131                 smbc_compat_initialized = 1;
132
133                 return 0;
134         }
135         return 0;
136 }
137
138
139 SMBCCTX *smbc_set_context(SMBCCTX * context)
140 {
141         SMBCCTX *old_context = statcont;
142
143         if (context) {
144                 /* Save provided context.  It must have been initialized! */
145                 statcont = context;
146
147                 /* You'd better know what you're doing.  We won't help you. */
148                 smbc_compat_initialized = 1;
149         }
150         
151         return old_context;
152 }
153
154
155 int smbc_open(const char *furl, int flags, mode_t mode)
156 {
157         SMBCFILE * file;
158         int fd;
159
160         file = statcont->open(statcont, furl, flags, mode);
161         if (!file)
162                 return -1;
163
164         fd = add_fd(file);
165         if (fd == -1) 
166                 statcont->close_fn(statcont, file);
167         return fd;
168 }
169
170
171 int smbc_creat(const char *furl, mode_t mode)
172 {
173         SMBCFILE * file;
174         int fd;
175
176         file = statcont->creat(statcont, furl, mode);
177         if (!file)
178                 return -1;
179
180         fd = add_fd(file);
181         if (fd == -1) {
182                 /* Hmm... should we delete the file too ? I guess we could try */
183                 statcont->close_fn(statcont, file);
184                 statcont->unlink(statcont, furl);
185         }
186         return fd;
187 }
188
189
190 ssize_t smbc_read(int fd, void *buf, size_t bufsize)
191 {
192         SMBCFILE * file = find_fd(fd);
193         return statcont->read(statcont, file, buf, bufsize);
194 }
195
196 ssize_t smbc_write(int fd, void *buf, size_t bufsize)
197 {
198         SMBCFILE * file = find_fd(fd);
199         return statcont->write(statcont, file, buf, bufsize);
200 }
201
202 off_t smbc_lseek(int fd, off_t offset, int whence)
203 {
204         SMBCFILE * file = find_fd(fd);
205         return statcont->lseek(statcont, file, offset, whence);
206 }
207
208 int smbc_close(int fd)
209 {
210         SMBCFILE * file = find_fd(fd);
211         del_fd(fd);
212         return statcont->close_fn(statcont, file);
213 }
214
215 int smbc_unlink(const char *fname)
216 {
217         return statcont->unlink(statcont, fname);
218 }
219
220 int smbc_rename(const char *ourl, const char *nurl)
221 {
222         return statcont->rename(statcont, ourl, statcont, nurl);
223 }
224
225 int smbc_opendir(const char *durl)
226 {
227         SMBCFILE * file;
228         int fd;
229
230         file = statcont->opendir(statcont, durl);
231         if (!file)
232                 return -1;
233
234         fd = add_fd(file);
235         if (fd == -1) 
236                 statcont->closedir(statcont, file);
237
238         return fd;
239 }
240
241 int smbc_closedir(int dh) 
242 {
243         SMBCFILE * file = find_fd(dh);
244         del_fd(dh);
245         return statcont->closedir(statcont, file);
246 }
247
248 int smbc_getdents(unsigned int dh, struct smbc_dirent *dirp, int count)
249 {
250         SMBCFILE * file = find_fd(dh);
251         return statcont->getdents(statcont, file,dirp, count);
252 }
253
254 struct smbc_dirent* smbc_readdir(unsigned int dh)
255 {
256         SMBCFILE * file = find_fd(dh);
257         return statcont->readdir(statcont, file);
258 }
259
260 off_t smbc_telldir(int dh)
261 {
262         SMBCFILE * file = find_fd(dh);
263         return statcont->telldir(statcont, file);
264 }
265
266 int smbc_lseekdir(int fd, off_t offset)
267 {
268         SMBCFILE * file = find_fd(fd);
269         return statcont->lseekdir(statcont, file, offset);
270 }
271
272 int smbc_mkdir(const char *durl, mode_t mode)
273 {
274         return statcont->mkdir(statcont, durl, mode);
275 }
276
277 int smbc_rmdir(const char *durl)
278 {
279         return statcont->rmdir(statcont, durl);
280 }
281
282 int smbc_stat(const char *url, struct stat *st)
283 {
284         return statcont->stat(statcont, url, st);
285 }
286
287 int smbc_fstat(int fd, struct stat *st)
288 {
289         SMBCFILE * file = find_fd(fd);
290         return statcont->fstat(statcont, file, st);
291 }
292
293 int smbc_chmod(const char *url, mode_t mode)
294 {
295         return statcont->chmod(statcont, url, mode);
296 }
297
298 int smbc_utimes(const char *fname, struct timeval *tbuf)
299 {
300         return statcont->utimes(statcont, fname, tbuf);
301 }
302
303 #ifdef HAVE_UTIME_H
304 int smbc_utime(const char *fname, struct utimbuf *utbuf)
305 {
306         struct timeval tv[2];
307
308         if (utbuf == NULL)
309                 return statcont->utimes(statcont, fname, NULL);
310
311         tv[0].tv_sec = utbuf->actime;
312         tv[1].tv_sec = utbuf->modtime;
313         tv[0].tv_usec = tv[1].tv_usec = 0;
314
315         return statcont->utimes(statcont, fname, tv);
316 }
317 #endif
318
319 int smbc_setxattr(const char *fname,
320                   const char *name,
321                   const void *value,
322                   size_t size,
323                   int flags)
324 {
325         return statcont->setxattr(statcont, fname, name, value, size, flags);
326 }
327
328 int smbc_lsetxattr(const char *fname,
329                    const char *name,
330                    const void *value,
331                    size_t size,
332                    int flags)
333 {
334         return statcont->setxattr(statcont, fname, name, value, size, flags);
335 }
336
337 int smbc_fsetxattr(int fd,
338                    const char *name,
339                    const void *value,
340                    size_t size,
341                    int flags)
342 {
343         SMBCFILE * file = find_fd(fd);
344         if (file == NULL) {
345                 errno = EBADF;
346                 return -1;
347         }
348         return statcont->setxattr(statcont, file->fname,
349                                   name, value, size, flags);
350 }
351
352 int smbc_getxattr(const char *fname,
353                   const char *name,
354                   const void *value,
355                   size_t size)
356 {
357         return statcont->getxattr(statcont, fname, name, value, size);
358 }
359
360 int smbc_lgetxattr(const char *fname,
361                    const char *name,
362                    const void *value,
363                    size_t size)
364 {
365         return statcont->getxattr(statcont, fname, name, value, size);
366 }
367
368 int smbc_fgetxattr(int fd,
369                    const char *name,
370                    const void *value,
371                    size_t size)
372 {
373         SMBCFILE * file = find_fd(fd);
374         if (file == NULL) {
375                 errno = EBADF;
376                 return -1;
377         }
378         return statcont->getxattr(statcont, file->fname, name, value, size);
379 }
380
381 int smbc_removexattr(const char *fname,
382                      const char *name)
383 {
384         return statcont->removexattr(statcont, fname, name);
385 }
386
387 int smbc_lremovexattr(const char *fname,
388                       const char *name)
389 {
390         return statcont->removexattr(statcont, fname, name);
391 }
392
393 int smbc_fremovexattr(int fd,
394                       const char *name)
395 {
396         SMBCFILE * file = find_fd(fd);
397         if (file == NULL) {
398                 errno = EBADF;
399                 return -1;
400         }
401         return statcont->removexattr(statcont, file->fname, name);
402 }
403
404 int smbc_listxattr(const char *fname,
405                    char *list,
406                    size_t size)
407 {
408         return statcont->listxattr(statcont, fname, list, size);
409 }
410
411 int smbc_llistxattr(const char *fname,
412                     char *list,
413                     size_t size)
414 {
415         return statcont->listxattr(statcont, fname, list, size);
416 }
417
418 int smbc_flistxattr(int fd,
419                     char *list,
420                     size_t size)
421 {
422         SMBCFILE * file = find_fd(fd);
423         if (file == NULL) {
424                 errno = EBADF;
425                 return -1;
426         }
427         return statcont->listxattr(statcont, file->fname, list, size);
428 }
429
430 int smbc_print_file(const char *fname, const char *printq)
431 {
432         return statcont->print_file(statcont, fname, statcont, printq);
433 }
434
435 int smbc_open_print_job(const char *fname)
436 {
437         SMBCFILE * file = statcont->open_print_job(statcont, fname);
438         if (!file) return -1;
439         return file->cli_fd;
440 }
441
442 int smbc_list_print_jobs(const char *purl, smbc_list_print_job_fn fn)
443 {
444         return statcont->list_print_jobs(statcont, purl, fn);
445 }
446
447 int smbc_unlink_print_job(const char *purl, int id)
448 {
449         return statcont->unlink_print_job(statcont, purl, id);
450 }
451
452