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