source3/modules/vfs_catia.c

   1 /*
   2  * Catia VFS module
   3  *
   4  * Implement a fixed mapping of forbidden NT characters in filenames that are
   5  * used a lot by the CAD package Catia.
   6  *
   7  * Yes, this a BAD BAD UGLY INCOMPLETE hack, but it helps quite some people
   8  * out there. Catia V4 on AIX uses characters like "<*$ a *lot*, all forbidden
   9  * under Windows...
  10  *
  11  * Copyright (C) Volker Lendecke, 2005
  12  *
  13  * This program is free software; you can redistribute it and/or modify
  14  * it under the terms of the GNU General Public License as published by
  15  * the Free Software Foundation; either version 2 of the License, or
  16  * (at your option) any later version.
  17  *
  18  * This program is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU General Public License for more details.
  22  *
  23  * You should have received a copy of the GNU General Public License
  24  * along with this program; if not, write to the Free Software
  25  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  26  */
  27
  28
  29 #include "includes.h"
  30
  31 static void catia_string_replace(char *s, unsigned char oldc, unsigned
  32                                  char newc)
  33 {
  34         static smb_ucs2_t tmpbuf[sizeof(pstring)];
  35         smb_ucs2_t *ptr = tmpbuf;
  36         smb_ucs2_t old = oldc;
  37
  38         push_ucs2(NULL, tmpbuf, s, sizeof(tmpbuf), STR_TERMINATE);
  39
  40         for (;*ptr;ptr++)
  41                 if (*ptr==old) *ptr=newc;
  42
  43         pull_ucs2(NULL, s, tmpbuf, -1, sizeof(tmpbuf), STR_TERMINATE);
  44 }
  45
  46 static void from_unix(char *s)
  47 {
  48         catia_string_replace(s, '\x22', '\xa8');
  49         catia_string_replace(s, '\x2a', '\xa4');
  50         catia_string_replace(s, '\x2f', '\xf8');
  51         catia_string_replace(s, '\x3a', '\xf7');
  52         catia_string_replace(s, '\x3c', '\xab');
  53         catia_string_replace(s, '\x3e', '\xbb');
  54         catia_string_replace(s, '\x3f', '\xbf');
  55         catia_string_replace(s, '\x5c', '\xff');
  56         catia_string_replace(s, '\x7c', '\xa6');
  57         catia_string_replace(s, ' ', '\xb1');
  58 }
  59
  60 static void to_unix(char *s)
  61 {
  62         catia_string_replace(s, '\xa8', '\x22');
  63         catia_string_replace(s, '\xa4', '\x2a');
  64         catia_string_replace(s, '\xf8', '\x2f');
  65         catia_string_replace(s, '\xf7', '\x3a');
  66         catia_string_replace(s, '\xab', '\x3c');
  67         catia_string_replace(s, '\xbb', '\x3e');
  68         catia_string_replace(s, '\xbf', '\x3f');
  69         catia_string_replace(s, '\xff', '\x5c');
  70         catia_string_replace(s, '\xa6', '\x7c');
  71         catia_string_replace(s, '\xb1', ' ');
  72 }
  73
  74 static SMB_STRUCT_DIR *catia_opendir(vfs_handle_struct *handle,
  75                           const char *fname, const char *mask, uint32 attr)
  76 {
  77         pstring name;
  78         pstrcpy(name, fname);
  79         to_unix(name);
  80
  81         return SMB_VFS_NEXT_OPENDIR(handle, name, mask, attr);
  82 }
  83
  84 static SMB_STRUCT_DIRENT *catia_readdir(vfs_handle_struct *handle,
  85                                         SMB_STRUCT_DIR *dirp)
  86 {
  87         SMB_STRUCT_DIRENT *result = SMB_VFS_NEXT_READDIR(handle, dirp);
  88
  89         if (result == NULL)
  90                 return result;
  91
  92         from_unix(result->d_name);
  93         return result;
  94 }
  95
  96 static int catia_open(vfs_handle_struct *handle,
  97                       const char *fname, files_struct *fsp, int flags, mode_t mode)
  98 {
  99         pstring name;
 100
 101         pstrcpy(name, fname);
 102         to_unix(name);
 103
 104         return SMB_VFS_NEXT_OPEN(handle, name, fsp, flags, mode);
 105 }
 106
 107 static int catia_rename(vfs_handle_struct *handle,
 108                         const char *oldname, const char *newname)
 109 {
 110         pstring oname, nname;
 111
 112         pstrcpy(oname, oldname);
 113         to_unix(oname);
 114         pstrcpy(nname, newname);
 115         to_unix(nname);
 116
 117         DEBUG(10, ("converted old name: %s\n", oname));
 118         DEBUG(10, ("converted new name: %s\n", nname));
 119
 120         return SMB_VFS_NEXT_RENAME(handle, oname, nname);
 121 }
 122
 123 static int catia_stat(vfs_handle_struct *handle,
 124                       const char *fname, SMB_STRUCT_STAT *sbuf)
 125 {
 126         pstring name;
 127         pstrcpy(name, fname);
 128         to_unix(name);
 129
 130         return SMB_VFS_NEXT_STAT(handle, name, sbuf);
 131 }
 132
 133 static int catia_lstat(vfs_handle_struct *handle,
 134                        const char *path, SMB_STRUCT_STAT *sbuf)
 135 {
 136         pstring name;
 137         pstrcpy(name, path);
 138         to_unix(name);
 139
 140         return SMB_VFS_NEXT_LSTAT(handle, name, sbuf);
 141 }
 142
 143 static int catia_unlink(vfs_handle_struct *handle, const char *path)
 144 {
 145         pstring name;
 146         pstrcpy(name, path);
 147         to_unix(name);
 148
 149         return SMB_VFS_NEXT_UNLINK(handle, name);
 150 }
 151
 152 static int catia_chmod(vfs_handle_struct *handle,
 153                        const char *path, mode_t mode)
 154 {
 155         pstring name;
 156         pstrcpy(name, path);
 157         to_unix(name);
 158
 159         return SMB_VFS_NEXT_CHMOD(handle, name, mode);
 160 }
 161
 162 static int catia_chown(vfs_handle_struct *handle,
 163                        const char *path, uid_t uid, gid_t gid)
 164 {
 165         pstring name;
 166         pstrcpy(name, path);
 167         to_unix(name);
 168
 169         return SMB_VFS_NEXT_CHOWN(handle, name, uid, gid);
 170 }
 171
 172 static int catia_lchown(vfs_handle_struct *handle,
 173                        const char *path, uid_t uid, gid_t gid)
 174 {
 175         pstring name;
 176         pstrcpy(name, path);
 177         to_unix(name);
 178
 179         return SMB_VFS_NEXT_LCHOWN(handle, name, uid, gid);
 180 }
 181
 182 static int catia_chdir(vfs_handle_struct *handle,
 183                        const char *path)
 184 {
 185         pstring name;
 186         pstrcpy(name, path);
 187         to_unix(name);
 188
 189         return SMB_VFS_NEXT_CHDIR(handle, name);
 190 }
 191
 192 static char *catia_getwd(vfs_handle_struct *handle, char *buf)
 193 {
 194         return SMB_VFS_NEXT_GETWD(handle, buf);
 195 }
 196
 197 static int catia_ntimes(vfs_handle_struct *handle,
 198                        const char *path, const struct timespec ts[2])
 199 {
 200         return SMB_VFS_NEXT_NTIMES(handle, path, ts);
 201 }
 202
 203 static BOOL catia_symlink(vfs_handle_struct *handle,
 204                           const char *oldpath, const char *newpath)
 205 {
 206         return SMB_VFS_NEXT_SYMLINK(handle, oldpath, newpath);
 207 }
 208
 209 static BOOL catia_readlink(vfs_handle_struct *handle,
 210                            const char *path, char *buf, size_t bufsiz)
 211 {
 212         return SMB_VFS_NEXT_READLINK(handle, path, buf, bufsiz);
 213 }
 214
 215 static int catia_link(vfs_handle_struct *handle,
 216                       const char *oldpath, const char *newpath)
 217 {
 218         return SMB_VFS_NEXT_LINK(handle, oldpath, newpath);
 219 }
 220
 221 static int catia_mknod(vfs_handle_struct *handle,
 222                        const char *path, mode_t mode, SMB_DEV_T dev)
 223 {
 224         return SMB_VFS_NEXT_MKNOD(handle, path, mode, dev);
 225 }
 226
 227 static char *catia_realpath(vfs_handle_struct *handle,
 228                             const char *path, char *resolved_path)
 229 {
 230         return SMB_VFS_NEXT_REALPATH(handle, path, resolved_path);
 231 }
 232
 233 static size_t catia_get_nt_acl(vfs_handle_struct *handle, files_struct *fsp,
 234                                const char *name, uint32 security_info,
 235                                struct  security_descriptor **ppdesc)
 236 {
 237         return SMB_VFS_NEXT_GET_NT_ACL(handle, fsp, name, security_info,
 238                                        ppdesc);
 239 }
 240
 241 static BOOL catia_set_nt_acl(vfs_handle_struct *handle, files_struct *fsp,
 242                              const char *name, uint32 security_info_sent,
 243                              struct security_descriptor *psd)
 244 {
 245         return SMB_VFS_NEXT_SET_NT_ACL(handle, fsp, name, security_info_sent,
 246                                        psd);
 247 }
 248
 249 static int catia_chmod_acl(vfs_handle_struct *handle,
 250                            const char *name, mode_t mode)
 251 {
 252         /* If the underlying VFS doesn't have ACL support... */
 253         if (!handle->vfs_next.ops.chmod_acl) {
 254                 errno = ENOSYS;
 255                 return -1;
 256         }
 257         return SMB_VFS_NEXT_CHMOD_ACL(handle, name, mode);
 258 }
 259
 260 /* VFS operations structure */
 261
 262 static vfs_op_tuple catia_op_tuples[] = {
 263
 264         /* Directory operations */
 265
 266         {SMB_VFS_OP(catia_opendir), SMB_VFS_OP_OPENDIR,
 267 SMB_VFS_LAYER_TRANSPARENT},
 268         {SMB_VFS_OP(catia_readdir), SMB_VFS_OP_READDIR,
 269 SMB_VFS_LAYER_TRANSPARENT},
 270
 271         /* File operations */
 272
 273         {SMB_VFS_OP(catia_open), SMB_VFS_OP_OPEN,
 274 SMB_VFS_LAYER_TRANSPARENT},
 275         {SMB_VFS_OP(catia_rename),                      SMB_VFS_OP_RENAME,
 276         SMB_VFS_LAYER_TRANSPARENT},
 277         {SMB_VFS_OP(catia_stat), SMB_VFS_OP_STAT,
 278 SMB_VFS_LAYER_TRANSPARENT},
 279         {SMB_VFS_OP(catia_lstat),                       SMB_VFS_OP_LSTAT,
 280 SMB_VFS_LAYER_TRANSPARENT},
 281         {SMB_VFS_OP(catia_unlink),                      SMB_VFS_OP_UNLINK,
 282         SMB_VFS_LAYER_TRANSPARENT},
 283         {SMB_VFS_OP(catia_chmod),                       SMB_VFS_OP_CHMOD,
 284 SMB_VFS_LAYER_TRANSPARENT},
 285         {SMB_VFS_OP(catia_chown),                       SMB_VFS_OP_CHOWN,
 286 SMB_VFS_LAYER_TRANSPARENT},
 287         {SMB_VFS_OP(catia_lchown),                      SMB_VFS_OP_LCHOWN,
 288 SMB_VFS_LAYER_TRANSPARENT},
 289         {SMB_VFS_OP(catia_chdir),                       SMB_VFS_OP_CHDIR,
 290 SMB_VFS_LAYER_TRANSPARENT},
 291         {SMB_VFS_OP(catia_getwd),                       SMB_VFS_OP_GETWD,
 292 SMB_VFS_LAYER_TRANSPARENT},
 293         {SMB_VFS_OP(catia_ntimes),                       SMB_VFS_OP_NTIMES,
 294 SMB_VFS_LAYER_TRANSPARENT},
 295         {SMB_VFS_OP(catia_symlink), SMB_VFS_OP_SYMLINK,
 296 SMB_VFS_LAYER_TRANSPARENT},
 297         {SMB_VFS_OP(catia_readlink), SMB_VFS_OP_READLINK,
 298 SMB_VFS_LAYER_TRANSPARENT},
 299         {SMB_VFS_OP(catia_link), SMB_VFS_OP_LINK,
 300 SMB_VFS_LAYER_TRANSPARENT},
 301         {SMB_VFS_OP(catia_mknod),                       SMB_VFS_OP_MKNOD,
 302 SMB_VFS_LAYER_TRANSPARENT},
 303         {SMB_VFS_OP(catia_realpath), SMB_VFS_OP_REALPATH,
 304 SMB_VFS_LAYER_TRANSPARENT},
 305
 306         /* NT File ACL operations */
 307
 308         {SMB_VFS_OP(catia_get_nt_acl), SMB_VFS_OP_GET_NT_ACL,
 309 SMB_VFS_LAYER_TRANSPARENT},
 310         {SMB_VFS_OP(catia_set_nt_acl), SMB_VFS_OP_SET_NT_ACL,
 311 SMB_VFS_LAYER_TRANSPARENT},
 312
 313         /* POSIX ACL operations */
 314
 315         {SMB_VFS_OP(catia_chmod_acl), SMB_VFS_OP_CHMOD_ACL,
 316 SMB_VFS_LAYER_TRANSPARENT},
 317
 318
 319         {NULL,                                          SMB_VFS_OP_NOOP,
 320 SMB_VFS_LAYER_NOOP}
 321 };
 322
 323 NTSTATUS vfs_catia_init(void);
 324 NTSTATUS vfs_catia_init(void)
 325 {
 326         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "catia",
 327 catia_op_tuples);
 328 }