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