1/* 2 * Convert JFS2 NFS4/AIXC acls to NT acls and vice versa. 3 * 4 * Copyright (C) Volker Lendecke, 2006 5 * 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 3 of the License, or 9 * (at your option) any later version. 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, see <http://www.gnu.org/licenses/>. 18 */ 19 20#include "includes.h" 21#include "nfs4_acls.h" 22 23#undef DBGC_CLASS 24#define DBGC_CLASS DBGC_VFS 25 26#define AIXACL2_MODULE_NAME "aixacl2" 27 28extern SMB_ACL_T aixacl_to_smbacl( struct acl *file_acl); 29extern struct acl *aixacl_smb_to_aixacl(SMB_ACL_TYPE_T acltype, SMB_ACL_T theacl); 30 31typedef union aixjfs2_acl_t { 32 nfs4_acl_int_t jfs2_acl[1]; 33 aixc_acl_t aixc_acl[1]; 34}AIXJFS2_ACL_T; 35 36static int32_t aixacl2_getlen(AIXJFS2_ACL_T *acl, acl_type_t *type) 37{ 38 int32_t len; 39 40 if(type->u64 == ACL_NFS4) { 41 len = acl->jfs2_acl[0].aclLength; 42 } 43 else { 44 if(type->u64 == ACL_AIXC) { 45 len = acl->aixc_acl[0].acl_len; 46 } else { 47 DEBUG(0,("aixacl2_getlen:unknown type:%d\n",type->u64)); 48 return False; 49 } 50 } 51 DEBUG(10,("aixacl2_getlen:%d\n",len)); 52 return len; 53} 54 55static AIXJFS2_ACL_T *aixjfs2_getacl_alloc(const char *fname, acl_type_t *type) 56{ 57 AIXJFS2_ACL_T *acl; 58 size_t len = 200; 59 mode_t mode; 60 int ret; 61 uint64_t ctl_flag=0; 62 TALLOC_CTX *mem_ctx; 63 64 mem_ctx = talloc_tos(); 65 acl = (AIXJFS2_ACL_T *)TALLOC_SIZE(mem_ctx, len); 66 if (acl == NULL) { 67 errno = ENOMEM; 68 return NULL; 69 } 70 71 if(type->u64 == ACL_ANY) { 72 ctl_flag = ctl_flag | GET_ACLINFO_ONLY; 73 } 74 75 ret = aclx_get((char *)fname, ctl_flag, type, acl, &len, &mode); 76 if ((ret != 0) && (errno == ENOSPC)) { 77 len = aixacl2_getlen(acl, type) + sizeof(AIXJFS2_ACL_T); 78 DEBUG(10,("aixjfs2_getacl_alloc - acl_len:%d\n",len)); 79 80 acl = (AIXJFS2_ACL_T *)TALLOC_SIZE(mem_ctx, len); 81 if (acl == NULL) { 82 errno = ENOMEM; 83 return NULL; 84 } 85 86 ret = aclx_get((char *)fname, ctl_flag, type, acl, &len, &mode); 87 } 88 if (ret != 0) { 89 DEBUG(8, ("aclx_get failed with %s\n", strerror(errno))); 90 return NULL; 91 } 92 93 return acl; 94} 95 96static bool aixjfs2_get_nfs4_acl(const char *name, 97 SMB4ACL_T **ppacl, bool *pretryPosix) 98{ 99 int32_t i; 100 101 AIXJFS2_ACL_T *pacl = NULL; 102 nfs4_acl_int_t *jfs2_acl = NULL; 103 nfs4_ace_int_t *jfs2_ace = NULL; 104 acl_type_t type; 105 106 DEBUG(10,("jfs2 get_nt_acl invoked for %s\n", name)); 107 108 memset(&type, 0, sizeof(acl_type_t)); 109 type.u64 = ACL_NFS4; 110 111 pacl = aixjfs2_getacl_alloc(name, &type); 112 if (pacl == NULL) { 113 DEBUG(9, ("aixjfs2_getacl_alloc failed for %s with %s\n", 114 name, strerror(errno))); 115 if (errno==ENOSYS) 116 *pretryPosix = True; 117 return False; 118 } 119 120 jfs2_acl = &pacl->jfs2_acl[0]; 121 DEBUG(10, ("len: %d, version: %d, nace: %d, type: 0x%x\n", 122 jfs2_acl->aclLength, jfs2_acl->aclVersion, jfs2_acl->aclEntryN, type.u64)); 123 124 *ppacl = smb_create_smb4acl(); 125 if (*ppacl==NULL) 126 return False; 127 128 jfs2_ace = &jfs2_acl->aclEntry[0]; 129 for (i=0; i<jfs2_acl->aclEntryN; i++) { 130 SMB_ACE4PROP_T aceprop; 131 132 DEBUG(10, ("type: %d, iflags: %x, flags: %x, mask: %x, " 133 "who: %d, aclLen: %d\n", jfs2_ace->aceType, jfs2_ace->flags, 134 jfs2_ace->aceFlags, jfs2_ace->aceMask, jfs2_ace->aceWho.id, jfs2_ace->entryLen)); 135 136 aceprop.aceType = jfs2_ace->aceType; 137 aceprop.aceFlags = jfs2_ace->aceFlags; 138 aceprop.aceMask = jfs2_ace->aceMask; 139 aceprop.flags = (jfs2_ace->flags&ACE4_ID_SPECIAL) ? SMB_ACE4_ID_SPECIAL : 0; 140 141 /* don't care it's real content is only 16 or 32 bit */ 142 aceprop.who.id = jfs2_ace->aceWho.id; 143 144 if (smb_add_ace4(*ppacl, &aceprop)==NULL) 145 return False; 146 147 /* iterate to the next jfs2 ace */ 148 jfs2_ace = (nfs4_ace_int_t *)(((char *)jfs2_ace) + jfs2_ace->entryLen); 149 } 150 151 DEBUG(10,("jfs2 get_nt_acl finished successfully\n")); 152 153 return True; 154} 155 156static NTSTATUS aixjfs2_fget_nt_acl(vfs_handle_struct *handle, 157 files_struct *fsp, uint32 security_info, 158 SEC_DESC **ppdesc) 159{ 160 SMB4ACL_T *pacl = NULL; 161 bool result; 162 bool retryPosix = False; 163 164 *ppdesc = NULL; 165 result = aixjfs2_get_nfs4_acl(fsp->fsp_name->base_name, &pacl, 166 &retryPosix); 167 if (retryPosix) 168 { 169 DEBUG(10, ("retrying with posix acl...\n")); 170 return posix_fget_nt_acl(fsp, security_info, ppdesc); 171 } 172 if (result==False) 173 return NT_STATUS_ACCESS_DENIED; 174 175 return smb_fget_nt_acl_nfs4(fsp, security_info, ppdesc, pacl); 176} 177 178static NTSTATUS aixjfs2_get_nt_acl(vfs_handle_struct *handle, 179 const char *name, 180 uint32 security_info, SEC_DESC **ppdesc) 181{ 182 SMB4ACL_T *pacl = NULL; 183 bool result; 184 bool retryPosix = False; 185 186 *ppdesc = NULL; 187 result = aixjfs2_get_nfs4_acl(name, &pacl, &retryPosix); 188 if (retryPosix) 189 { 190 DEBUG(10, ("retrying with posix acl...\n")); 191 return posix_get_nt_acl(handle->conn, name, security_info, 192 ppdesc); 193 } 194 if (result==False) 195 return NT_STATUS_ACCESS_DENIED; 196 197 return smb_get_nt_acl_nfs4(handle->conn, name, security_info, ppdesc, 198 pacl); 199} 200 201static SMB_ACL_T aixjfs2_get_posix_acl(const char *path, acl_type_t type) 202{ 203 aixc_acl_t *pacl; 204 AIXJFS2_ACL_T *acl; 205 SMB_ACL_T result = NULL; 206 int ret; 207 208 acl = aixjfs2_getacl_alloc(path, &type); 209 210 if (acl == NULL) { 211 DEBUG(10, ("aixjfs2_getacl failed for %s with %s\n", 212 path, strerror(errno))); 213 if (errno == 0) { 214 errno = EINVAL; 215 } 216 goto done; 217 } 218 219 pacl = &acl->aixc_acl[0]; 220 DEBUG(10, ("len: %d, mode: %d\n", 221 pacl->acl_len, pacl->acl_mode)); 222 223 result = aixacl_to_smbacl(pacl); 224 if (result == NULL) { 225 goto done; 226 } 227 228 done: 229 if (errno != 0) { 230 SAFE_FREE(result); 231 } 232 return result; 233} 234 235SMB_ACL_T aixjfs2_sys_acl_get_file(vfs_handle_struct *handle, 236 const char *path_p, 237 SMB_ACL_TYPE_T type) 238{ 239 acl_type_t aixjfs2_type; 240 241 switch(type) { 242 case SMB_ACL_TYPE_ACCESS: 243 aixjfs2_type.u64 = ACL_AIXC; 244 break; 245 case SMB_ACL_TYPE_DEFAULT: 246 DEBUG(0, ("Got AIX JFS2 unsupported type: %d\n", type)); 247 return NULL; 248 default: 249 DEBUG(0, ("Got invalid type: %d\n", type)); 250 smb_panic("exiting"); 251 } 252 253 return aixjfs2_get_posix_acl(path_p, aixjfs2_type); 254} 255 256SMB_ACL_T aixjfs2_sys_acl_get_fd(vfs_handle_struct *handle, 257 files_struct *fsp) 258{ 259 acl_type_t aixjfs2_type; 260 aixjfs2_type.u64 = ACL_AIXC; 261 262 return aixjfs2_get_posix_acl(fsp->fsp_name->base_name, aixjfs2_type); 263} 264 265/* 266 * Test whether we have that aclType support on the given path 267 */ 268static int aixjfs2_query_acl_support( 269 char *filepath, 270 uint64_t aclType, 271 acl_type_t *pacl_type_info 272) 273{ 274 acl_types_list_t acl_type_list; 275 size_t acl_type_list_len = sizeof(acl_types_list_t); 276 uint32_t i; 277 278 memset(&acl_type_list, 0, sizeof(acl_type_list)); 279 280 if (aclx_gettypes(filepath, &acl_type_list, &acl_type_list_len)) { 281 DEBUG(2, ("aclx_gettypes failed with error %s for %s\n", 282 strerror(errno), filepath)); 283 return -1; 284 } 285 286 for(i=0; i<acl_type_list.num_entries; i++) { 287 if (acl_type_list.entries[i].u64==aclType) { 288 memcpy(pacl_type_info, acl_type_list.entries + i, sizeof(acl_type_t)); 289 DEBUG(10, ("found %s ACL support for %s\n", 290 pacl_type_info->acl_type, filepath)); 291 return 0; 292 } 293 } 294 295 return 1; /* haven't found that ACL type. */ 296} 297 298static bool aixjfs2_process_smbacl(files_struct *fsp, SMB4ACL_T *smbacl) 299{ 300 SMB4ACE_T *smbace; 301 TALLOC_CTX *mem_ctx; 302 nfs4_acl_int_t *jfs2acl; 303 int32_t entryLen; 304 uint32 aclLen, naces; 305 int rc; 306 acl_type_t acltype; 307 308 DEBUG(10, ("jfs2_process_smbacl invoked on %s\n", fsp_str_dbg(fsp))); 309 310 /* no need to be freed which is alloced with mem_ctx */ 311 mem_ctx = talloc_tos(); 312 313 entryLen = sizeof(nfs4_ace_int_t); 314 if (entryLen & 0x03) 315 entryLen = entryLen + 4 - (entryLen%4); 316 317 naces = smb_get_naces(smbacl); 318 aclLen = ACL_V4_SIZ + naces * entryLen; 319 jfs2acl = (nfs4_acl_int_t *)TALLOC_SIZE(mem_ctx, aclLen); 320 if (jfs2acl==NULL) { 321 DEBUG(0, ("TALLOC_SIZE failed\n")); 322 errno = ENOMEM; 323 return False; 324 } 325 326 jfs2acl->aclLength = ACL_V4_SIZ; 327 jfs2acl->aclVersion = NFS4_ACL_INT_STRUCT_VERSION; 328 jfs2acl->aclEntryN = 0; 329 330 for(smbace = smb_first_ace4(smbacl); smbace!=NULL; smbace = smb_next_ace4(smbace)) 331 { 332 SMB_ACE4PROP_T *aceprop = smb_get_ace4(smbace); 333 nfs4_ace_int_t *jfs2_ace = (nfs4_ace_int_t *)(((char *)jfs2acl) + jfs2acl->aclLength); 334 335 memset(jfs2_ace, 0, entryLen); 336 jfs2_ace->entryLen = entryLen; /* won't store textual "who" */ 337 jfs2_ace->aceType = aceprop->aceType; /* only ACCES|DENY supported by jfs2 */ 338 jfs2_ace->aceFlags = aceprop->aceFlags; 339 jfs2_ace->aceMask = aceprop->aceMask; 340 jfs2_ace->flags = (aceprop->flags&SMB_ACE4_ID_SPECIAL) ? ACE4_ID_SPECIAL : 0; 341 342 /* don't care it's real content is only 16 or 32 bit */ 343 jfs2_ace->aceWho.id = aceprop->who.id; 344 345 /* iterate to the next jfs2 ace */ 346 jfs2acl->aclLength += jfs2_ace->entryLen; 347 jfs2acl->aclEntryN++; 348 } 349 SMB_ASSERT(jfs2acl->aclEntryN==naces); 350 351 /* Don't query it (again) */ 352 memset(&acltype, 0, sizeof(acl_type_t)); 353 acltype.u64 = ACL_NFS4; 354 355 /* won't set S_ISUID - the only one JFS2/NFS4 accepts */ 356 rc = aclx_put( 357 fsp->fsp_name->base_name, 358 SET_ACL, /* set only the ACL, not mode bits */ 359 acltype, /* not a pointer !!! */ 360 jfs2acl, 361 jfs2acl->aclLength, 362 0 /* don't set here mode bits */ 363 ); 364 if (rc) { 365 DEBUG(8, ("aclx_put failed with %s\n", strerror(errno))); 366 return False; 367 } 368 369 DEBUG(10, ("jfs2_process_smbacl succeeded.\n")); 370 return True; 371} 372 373static NTSTATUS aixjfs2_set_nt_acl_common(files_struct *fsp, uint32 security_info_sent, const SEC_DESC *psd) 374{ 375 acl_type_t acl_type_info; 376 NTSTATUS result = NT_STATUS_ACCESS_DENIED; 377 int rc; 378 379 rc = aixjfs2_query_acl_support( 380 fsp->fsp_name, 381 ACL_NFS4, 382 &acl_type_info); 383 384 if (rc==0) 385 { 386 result = smb_set_nt_acl_nfs4( 387 fsp, security_info_sent, psd, 388 aixjfs2_process_smbacl); 389 } else if (rc==1) { /* assume POSIX ACL - by default... */ 390 result = set_nt_acl(fsp, security_info_sent, psd); 391 } else 392 result = map_nt_error_from_unix(errno); /* query failed */ 393 394 return result; 395} 396 397NTSTATUS aixjfs2_fset_nt_acl(vfs_handle_struct *handle, files_struct *fsp, uint32 security_info_sent, const SEC_DESC *psd) 398{ 399 return aixjfs2_set_nt_acl_common(fsp, security_info_sent, psd); 400} 401 402int aixjfs2_sys_acl_set_file(vfs_handle_struct *handle, 403 const char *name, 404 SMB_ACL_TYPE_T type, 405 SMB_ACL_T theacl) 406{ 407 struct acl *acl_aixc; 408 acl_type_t acl_type_info; 409 int rc; 410 411 DEBUG(10, ("aixjfs2_sys_acl_set_file invoked for %s", name)); 412 413 rc = aixjfs2_query_acl_support((char *)name, ACL_AIXC, &acl_type_info); 414 if (rc) { 415 DEBUG(8, ("jfs2_set_nt_acl: AIXC support not found\n")); 416 return -1; 417 } 418 419 acl_aixc = aixacl_smb_to_aixacl(type, theacl); 420 if (!acl_aixc) 421 return -1; 422 423 rc = aclx_put( 424 (char *)name, 425 SET_ACL, /* set only the ACL, not mode bits */ 426 acl_type_info, 427 acl_aixc, 428 acl_aixc->acl_len, 429 0 430 ); 431 if (rc) { 432 DEBUG(2, ("aclx_put failed with %s for %s\n", 433 strerror(errno), name)); 434 return -1; 435 } 436 437 return 0; 438} 439 440int aixjfs2_sys_acl_set_fd(vfs_handle_struct *handle, 441 files_struct *fsp, 442 SMB_ACL_T theacl) 443{ 444 struct acl *acl_aixc; 445 acl_type_t acl_type_info; 446 int rc; 447 448 DEBUG(10, ("aixjfs2_sys_acl_set_fd invoked for %s", fsp_str_dbg(fsp))); 449 450 rc = aixjfs2_query_acl_support(fsp->fsp_name->base_name, ACL_AIXC, 451 &acl_type_info); 452 if (rc) { 453 DEBUG(8, ("jfs2_set_nt_acl: AIXC support not found\n")); 454 return -1; 455 } 456 457 acl_aixc = aixacl_smb_to_aixacl(SMB_ACL_TYPE_ACCESS, theacl); 458 if (!acl_aixc) 459 return -1; 460 461 rc = aclx_fput( 462 fsp->fh->fd, 463 SET_ACL, /* set only the ACL, not mode bits */ 464 acl_type_info, 465 acl_aixc, 466 acl_aixc->acl_len, 467 0 468 ); 469 if (rc) { 470 DEBUG(2, ("aclx_fput failed with %s for %s\n", 471 strerror(errno), fsp_str_dbg(fsp))); 472 return -1; 473 } 474 475 return 0; 476} 477 478int aixjfs2_sys_acl_delete_def_file(vfs_handle_struct *handle, 479 const char *path) 480{ 481 /* Not available under AIXC ACL */ 482 /* Don't report here any error otherwise */ 483 /* upper layer will break the normal execution */ 484 return 0; 485} 486 487static struct vfs_fn_pointers vfs_aixacl2_fns = { 488 .fget_nt_acl = aixjfs2_fget_nt_acl, 489 .get_nt_acl = aixjfs2_get_nt_acl, 490 .fset_nt_acl = aixjfs2_fset_nt_acl, 491 .sys_acl_get_file = aixjfs2_sys_acl_get_file, 492 .sys_acl_get_fd = aixjfs2_sys_acl_get_fd, 493 .sys_acl_set_file = aixjfs2_sys_acl_set_file, 494 .sys_acl_set_fd = aixjfs2_sys_acl_set_fd, 495 .sys_acl_delete_def_file = aixjfs2_sys_acl_delete_def_file 496}; 497 498NTSTATUS vfs_aixacl2_init(void); 499NTSTATUS vfs_aixacl2_init(void) 500{ 501 return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, AIXACL2_MODULE_NAME, 502 &vfs_aixacl2_fns); 503} 504