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