4 * Implement a fixed mapping of forbidden NT characters in filenames that are
5 * used a lot by the CAD package Catia.
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
11 * Copyright (C) Volker Lendecke, 2005
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 3 of the License, or
16 * (at your option) any later version.
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.
23 * You should have received a copy of the GNU General Public License
24 * along with this program; if not, see <http://www.gnu.org/licenses/>.
30 static char *catia_string_replace(TALLOC_CTX
*ctx
,
35 smb_ucs2_t
*tmpbuf
= NULL
;
36 smb_ucs2_t
*ptr
= NULL
;
37 smb_ucs2_t old
= oldc
;
39 size_t converted_size
;
45 if (!push_ucs2_talloc(ctx
, &tmpbuf
, s
, &converted_size
)) {
57 if (!pull_ucs2_talloc(ctx
, &ret
, tmpbuf
, &converted_size
)) {
65 static char *from_unix(TALLOC_CTX
*ctx
, const char *s
)
67 char *ret
= catia_string_replace(ctx
, s
, '\x22', '\xa8');
68 ret
= catia_string_replace(ctx
, ret
, '\x2a', '\xa4');
69 ret
= catia_string_replace(ctx
, ret
, '\x2f', '\xf8');
70 ret
= catia_string_replace(ctx
, ret
, '\x3a', '\xf7');
71 ret
= catia_string_replace(ctx
, ret
, '\x3c', '\xab');
72 ret
= catia_string_replace(ctx
, ret
, '\x3e', '\xbb');
73 ret
= catia_string_replace(ctx
, ret
, '\x3f', '\xbf');
74 ret
= catia_string_replace(ctx
, ret
, '\x5c', '\xff');
75 ret
= catia_string_replace(ctx
, ret
, '\x7c', '\xa6');
76 return catia_string_replace(ctx
, ret
, ' ', '\xb1');
79 static char *to_unix(TALLOC_CTX
*ctx
, const char *s
)
81 char *ret
= catia_string_replace(ctx
, s
, '\xa8', '\x22');
82 ret
= catia_string_replace(ctx
, ret
, '\xa4', '\x2a');
83 ret
= catia_string_replace(ctx
, ret
, '\xf8', '\x2f');
84 ret
= catia_string_replace(ctx
, ret
, '\xf7', '\x3a');
85 ret
= catia_string_replace(ctx
, ret
, '\xab', '\x3c');
86 ret
= catia_string_replace(ctx
, ret
, '\xbb', '\x3e');
87 ret
= catia_string_replace(ctx
, ret
, '\xbf', '\x3f');
88 ret
= catia_string_replace(ctx
, ret
, '\xff', '\x5c');
89 ret
= catia_string_replace(ctx
, ret
, '\xa6', '\x7c');
90 return catia_string_replace(ctx
, ret
, '\xb1', ' ');
93 static SMB_STRUCT_DIR
*catia_opendir(vfs_handle_struct
*handle
,
94 const char *fname
, const char *mask
, uint32 attr
)
96 char *name
= to_unix(talloc_tos(), fname
);
102 return SMB_VFS_NEXT_OPENDIR(handle
, name
, mask
, attr
);
105 static SMB_STRUCT_DIRENT
*catia_readdir(vfs_handle_struct
*handle
,
106 SMB_STRUCT_DIR
*dirp
,
107 SMB_STRUCT_STAT
*sbuf
)
109 SMB_STRUCT_DIRENT
*result
= NULL
;
110 SMB_STRUCT_DIRENT
*newdirent
= NULL
;
114 result
= SMB_VFS_NEXT_READDIR(handle
, dirp
, NULL
);
115 if (result
== NULL
) {
119 newname
= from_unix(talloc_tos(), result
->d_name
);
123 newnamelen
= strlen(newname
)+1;
124 newdirent
= (SMB_STRUCT_DIRENT
*)TALLOC_ARRAY(talloc_tos(),
126 sizeof(SMB_STRUCT_DIRENT
)+
131 memcpy(newdirent
, result
, sizeof(SMB_STRUCT_DIRENT
));
132 memcpy(&newdirent
->d_name
, newname
, newnamelen
);
136 static int catia_open(vfs_handle_struct
*handle
,
137 struct smb_filename
*smb_fname
,
146 name
= to_unix(talloc_tos(), smb_fname
->base_name
);
152 tmp_base_name
= smb_fname
->base_name
;
153 smb_fname
->base_name
= name
;
155 ret
= SMB_VFS_NEXT_OPEN(handle
, smb_fname
, fsp
, flags
, mode
);
157 smb_fname
->base_name
= tmp_base_name
;
163 static int catia_rename(vfs_handle_struct
*handle
,
164 const struct smb_filename
*smb_fname_src
,
165 const struct smb_filename
*smb_fname_dst
)
167 TALLOC_CTX
*ctx
= talloc_tos();
170 struct smb_filename
*smb_fname_src_tmp
= NULL
;
171 struct smb_filename
*smb_fname_dst_tmp
= NULL
;
175 oname
= to_unix(ctx
, smb_fname_src
->base_name
);
176 nname
= to_unix(ctx
, smb_fname_dst
->base_name
);
177 if (!oname
|| !nname
) {
182 /* Setup temporary smb_filename structs. */
183 status
= copy_smb_filename(talloc_tos(), smb_fname_src
,
185 if (!NT_STATUS_IS_OK(status
)) {
186 errno
= map_errno_from_nt_status(status
);
189 status
= copy_smb_filename(talloc_tos(), smb_fname_dst
,
191 if (!NT_STATUS_IS_OK(status
)) {
192 errno
= map_errno_from_nt_status(status
);
196 smb_fname_src_tmp
->base_name
= oname
;
197 smb_fname_dst_tmp
->base_name
= nname
;
199 DEBUG(10, ("converted old name: %s\n",
200 smb_fname_str_dbg(smb_fname_src_tmp
)));
201 DEBUG(10, ("converted new name: %s\n",
202 smb_fname_str_dbg(smb_fname_dst_tmp
)));
204 ret
= SMB_VFS_NEXT_RENAME(handle
, smb_fname_src_tmp
,
209 TALLOC_FREE(smb_fname_src_tmp
);
210 TALLOC_FREE(smb_fname_dst_tmp
);
214 static int catia_stat(vfs_handle_struct
*handle
,
215 struct smb_filename
*smb_fname
)
221 name
= to_unix(talloc_tos(), smb_fname
->base_name
);
227 tmp_base_name
= smb_fname
->base_name
;
228 smb_fname
->base_name
= name
;
230 ret
= SMB_VFS_NEXT_STAT(handle
, smb_fname
);
232 smb_fname
->base_name
= tmp_base_name
;
238 static int catia_lstat(vfs_handle_struct
*handle
,
239 struct smb_filename
*smb_fname
)
245 name
= to_unix(talloc_tos(), smb_fname
->base_name
);
251 tmp_base_name
= smb_fname
->base_name
;
252 smb_fname
->base_name
= name
;
254 ret
= SMB_VFS_NEXT_LSTAT(handle
, smb_fname
);
256 smb_fname
->base_name
= tmp_base_name
;
262 static int catia_unlink(vfs_handle_struct
*handle
,
263 const struct smb_filename
*smb_fname
)
265 struct smb_filename
*smb_fname_tmp
= NULL
;
270 name
= to_unix(talloc_tos(), smb_fname
->base_name
);
276 /* Setup temporary smb_filename structs. */
277 status
= copy_smb_filename(talloc_tos(), smb_fname
,
279 if (!NT_STATUS_IS_OK(status
)) {
280 errno
= map_errno_from_nt_status(status
);
284 smb_fname_tmp
->base_name
= name
;
286 ret
= SMB_VFS_NEXT_UNLINK(handle
, smb_fname_tmp
);
288 TALLOC_FREE(smb_fname_tmp
);
292 static int catia_chmod(vfs_handle_struct
*handle
,
293 const char *path
, mode_t mode
)
295 char *name
= to_unix(talloc_tos(), path
);
301 return SMB_VFS_NEXT_CHMOD(handle
, name
, mode
);
304 static int catia_chown(vfs_handle_struct
*handle
,
305 const char *path
, uid_t uid
, gid_t gid
)
307 char *name
= to_unix(talloc_tos(), path
);
313 return SMB_VFS_NEXT_CHOWN(handle
, name
, uid
, gid
);
316 static int catia_lchown(vfs_handle_struct
*handle
,
317 const char *path
, uid_t uid
, gid_t gid
)
319 char *name
= to_unix(talloc_tos(), path
);
325 return SMB_VFS_NEXT_LCHOWN(handle
, name
, uid
, gid
);
328 static int catia_chdir(vfs_handle_struct
*handle
,
331 char *name
= to_unix(talloc_tos(), path
);
337 return SMB_VFS_NEXT_CHDIR(handle
, name
);
340 /* VFS operations structure */
342 static vfs_op_tuple catia_op_tuples
[] = {
344 /* Directory operations */
346 {SMB_VFS_OP(catia_opendir
), SMB_VFS_OP_OPENDIR
,
347 SMB_VFS_LAYER_TRANSPARENT
},
348 {SMB_VFS_OP(catia_readdir
), SMB_VFS_OP_READDIR
,
349 SMB_VFS_LAYER_TRANSPARENT
},
351 /* File operations */
353 {SMB_VFS_OP(catia_open
), SMB_VFS_OP_OPEN
,
354 SMB_VFS_LAYER_TRANSPARENT
},
355 {SMB_VFS_OP(catia_rename
), SMB_VFS_OP_RENAME
,
356 SMB_VFS_LAYER_TRANSPARENT
},
357 {SMB_VFS_OP(catia_stat
), SMB_VFS_OP_STAT
,
358 SMB_VFS_LAYER_TRANSPARENT
},
359 {SMB_VFS_OP(catia_lstat
), SMB_VFS_OP_LSTAT
,
360 SMB_VFS_LAYER_TRANSPARENT
},
361 {SMB_VFS_OP(catia_unlink
), SMB_VFS_OP_UNLINK
,
362 SMB_VFS_LAYER_TRANSPARENT
},
363 {SMB_VFS_OP(catia_chmod
), SMB_VFS_OP_CHMOD
,
364 SMB_VFS_LAYER_TRANSPARENT
},
365 {SMB_VFS_OP(catia_chown
), SMB_VFS_OP_CHOWN
,
366 SMB_VFS_LAYER_TRANSPARENT
},
367 {SMB_VFS_OP(catia_lchown
), SMB_VFS_OP_LCHOWN
,
368 SMB_VFS_LAYER_TRANSPARENT
},
369 {SMB_VFS_OP(catia_chdir
), SMB_VFS_OP_CHDIR
,
370 SMB_VFS_LAYER_TRANSPARENT
},
372 {NULL
, SMB_VFS_OP_NOOP
,
376 NTSTATUS
vfs_catia_init(void);
377 NTSTATUS
vfs_catia_init(void)
379 return smb_register_vfs(SMB_VFS_INTERFACE_VERSION
, "catia",