r3447: more include/system/XXX.h include files
[jelmer/samba4-debian.git] / source / ntvfs / simple / svfs_util.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    simple NTVFS filesystem backend
5
6    Copyright (C) Andrew Tridgell 2003
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22 /*
23   utility functions for simple backend
24 */
25
26 #include "includes.h"
27 #include "svfs.h"
28 #include "system/time.h"
29 #include "system/dir.h"
30
31 /*
32   convert a windows path to a unix path - don't do any manging or case sensitive handling
33 */
34 char *svfs_unix_path(struct ntvfs_module_context *ntvfs,
35                      struct smbsrv_request *req, const char *name)
36 {
37         struct svfs_private *private = ntvfs->private_data;
38         char *ret;
39
40         if (*name != '\\') {
41                 ret = talloc_asprintf(req, "%s/%s", private->connectpath, name);
42         } else {
43                 ret = talloc_asprintf(req, "%s%s", private->connectpath, name);
44         }
45         all_string_sub(ret, "\\", "/", 0);
46
47         strlower(ret + strlen(private->connectpath));
48
49         return ret;
50 }
51
52
53 /*
54   read a directory and find all matching file names and stat info
55   returned names are separate unix and DOS names. The returned names
56   are relative to the directory
57 */
58 struct svfs_dir *svfs_list_unix(TALLOC_CTX *mem_ctx, struct smbsrv_request *req, const char *unix_path)
59 {
60         char *p, *mask;
61         struct svfs_dir *dir;
62         DIR *odir;
63         struct dirent *dent;
64         uint_t allocated = 0;
65         char *low_mask;
66
67         dir = talloc_p(mem_ctx, struct svfs_dir);
68         if (!dir) { return NULL; }
69
70         dir->count = 0;
71         dir->files = 0;
72
73         /* find the base directory */
74         p = strrchr(unix_path, '/');
75         if (!p) { return NULL; }
76
77         dir->unix_dir = talloc_strndup(mem_ctx, unix_path, PTR_DIFF(p, unix_path));
78         if (!dir->unix_dir) { return NULL; }
79
80         /* the wildcard pattern is the last part */
81         mask = p+1;
82
83         low_mask = talloc_strdup(mem_ctx, mask);
84         if (!low_mask) { return NULL; }
85         strlower(low_mask);
86
87         odir = opendir(dir->unix_dir);
88         if (!odir) { return NULL; }
89
90         while ((dent = readdir(odir))) {
91                 uint_t i = dir->count;
92                 char *full_name;
93                 char *low_name;
94
95                 if (strchr(dent->d_name, ':') && !strchr(unix_path, ':')) {
96                         /* don't show streams in dir listing */
97                         continue;
98                 }
99
100                 low_name = talloc_strdup(mem_ctx, dent->d_name);
101                 if (!low_name) { continue; }
102                 strlower(low_name);
103
104                 /* check it matches the wildcard pattern */
105                 if (ms_fnmatch(low_mask, low_name, PROTOCOL_NT1) != 0) {
106                         continue;
107                 }
108                 
109                 if (dir->count >= allocated) {
110                         allocated = (allocated + 100) * 1.2;
111                         dir->files = talloc_realloc_p(dir, dir->files, struct svfs_dirfile, allocated);
112                         if (!dir->files) { 
113                                 closedir(odir);
114                                 return NULL;
115                         }
116                 }
117
118                 dir->files[i].name = low_name;
119                 if (!dir->files[i].name) { continue; }
120
121                 asprintf(&full_name, "%s/%s", dir->unix_dir, dir->files[i].name);
122                 if (!full_name) { continue; }
123
124                 if (stat(full_name, &dir->files[i].st) == 0) { 
125                         dir->count++;
126                 }
127
128                 free(full_name); 
129         }
130
131         closedir(odir);
132
133         return dir;
134 }
135
136 /*
137   read a directory and find all matching file names and stat info
138   returned names are separate unix and DOS names. The returned names
139   are relative to the directory
140 */
141 struct svfs_dir *svfs_list(struct ntvfs_module_context *ntvfs, struct smbsrv_request *req, const char *pattern)
142 {
143         struct svfs_private *private = ntvfs->private_data;
144         char *unix_path;
145
146         unix_path = svfs_unix_path(ntvfs, req, pattern);
147         if (!unix_path) { return NULL; }
148
149         return svfs_list_unix(private, req, unix_path);
150 }
151
152
153 /*******************************************************************
154 set the time on a file via file descriptor
155 *******************************************************************/
156 int svfs_file_utime(int fd, struct utimbuf *times)
157 {
158         char *fd_path = NULL;
159         int ret;
160
161         asprintf(&fd_path, "/proc/self/%d", fd);
162         if (!fd_path) {
163                 errno = ENOMEM;
164                 return -1;
165         }
166         
167         ret = utime(fd_path, times);
168         free(fd_path);
169         return ret;
170 }
171
172
173 /*
174   map a unix file attrib to a DOS attribute
175 */
176 uint16_t svfs_unix_to_dos_attrib(mode_t mode)
177 {
178         uint16_t ret = 0;
179         if (S_ISDIR(mode)) ret |= FILE_ATTRIBUTE_DIRECTORY;
180         if (!(mode & S_IWUSR)) ret |= FILE_ATTRIBUTE_READONLY;
181         return ret;
182 }
183
184 /*
185   build a file_id from a stat struct
186 */
187 uint64_t svfs_file_id(struct stat *st)
188 {
189         uint64_t ret = st->st_ino;
190         ret <<= 32;
191         ret |= st->st_dev;
192         return ret;
193 }