source3/modules/vfs_aixacl2.c

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