libatalk/vfs/acl.c

   1 /*
   2   $Id: acl.c,v 1.2 2009-11-26 18:17:12 franklahm Exp $
   3   Copyright (c) 2009 Frank Lahm <franklahm@gmail.com>
   4
   5   This program is free software; you can redistribute it and/or modify
   6   it under the terms of the GNU General Public License as published by
   7   the Free Software Foundation; either version 2 of the License, or
   8   (at your option) any later version.
   9
  10   This program is distributed in the hope that it will be useful,
  11   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13   GNU General Public License for more details.
  14 */
  15
  16 #ifdef HAVE_CONFIG_H
  17 #include "config.h"
  18 #endif /* HAVE_CONFIG_H */
  19
  20 #include <unistd.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <errno.h>
  24 #include <sys/acl.h>
  25
  26 #include <atalk/afp.h>
  27 #include <atalk/util.h>
  28 #include <atalk/logger.h>
  29
  30 /* Get ACL. Allocates storage as needed. Caller must free.
  31  * Returns no of ACEs or -1 on error.  */
  32 int get_nfsv4_acl(const char *name, ace_t **retAces)
  33 {
  34     int ace_count = -1;
  35     ace_t *aces;
  36
  37     *retAces = NULL;
  38     ace_count = acl(name, ACE_GETACLCNT, 0, NULL);
  39     if (ace_count <= 0) {
  40         LOG(log_error, logtype_afpd, "get_nfsv4_acl: acl('%s/%s', ACE_GETACLCNT): ace_count %i, error: %s",
  41             getcwdpath(), name, ace_count, strerror(errno));
  42         return -1;
  43     }
  44
  45     aces = malloc(ace_count * sizeof(ace_t));
  46     if (aces == NULL) {
  47         LOG(log_error, logtype_afpd, "get_nfsv4_acl: malloc error");
  48         return -1;
  49     }
  50
  51     if ( (acl(name, ACE_GETACL, ace_count, aces)) == -1 ) {
  52         LOG(log_error, logtype_afpd, "get_nfsv4_acl: acl(ACE_GETACL) error");
  53         free(aces);
  54         return -1;
  55     }
  56
  57     LOG(log_debug9, logtype_afpd, "get_nfsv4_acl: file: %s -> No. of ACEs: %d", name, ace_count);
  58     *retAces = aces;
  59
  60     return ace_count;
  61 }
  62
  63 /* Removes all non-trivial ACLs from object. Returns full AFPERR code. */
  64 int remove_acl(const char *name)
  65 {
  66     int ret,i, ace_count, trivial_aces, new_aces_count;
  67     ace_t *old_aces = NULL;
  68     ace_t *new_aces = NULL;
  69
  70     LOG(log_debug9, logtype_afpd, "remove_acl: BEGIN");
  71
  72     /* Get existing ACL and count trivial ACEs */
  73     if ((ace_count = get_nfsv4_acl(name, &old_aces)) == -1)
  74         return AFPERR_MISC;
  75     trivial_aces = 0;
  76     for ( i=0; i < ace_count; i++) {
  77         if (old_aces[i].a_flags & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE))
  78             trivial_aces++;
  79     }
  80
  81     /* malloc buffer for new ACL */
  82     if ((new_aces = malloc(trivial_aces * sizeof(ace_t))) == NULL) {
  83         LOG(log_error, logtype_afpd, "remove_acl: malloc %s", strerror(errno));
  84         ret = AFPERR_MISC;
  85         goto exit;
  86     }
  87
  88     /* Now copy the trivial ACEs */
  89     new_aces_count = 0;
  90     for (i=0; i < ace_count; i++) {
  91         if (old_aces[i].a_flags  & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE)) {
  92             memcpy(&new_aces[new_aces_count], &old_aces[i], sizeof(ace_t));
  93             new_aces_count++;
  94         }
  95     }
  96
  97     if ( (acl(name, ACE_SETACL, trivial_aces, new_aces)) == 0)
  98         ret = AFP_OK;
  99     else {
 100         LOG(log_error, logtype_afpd, "set_acl: error setting acl: %s", strerror(errno));
 101         if (errno == (EACCES | EPERM))
 102             ret = AFPERR_ACCESS;
 103         else if (errno == ENOENT)
 104             ret = AFPERR_NOITEM;
 105         else
 106             ret = AFPERR_MISC;
 107     }
 108
 109 exit:
 110     free(old_aces);
 111     free(new_aces);
 112
 113     LOG(log_debug9, logtype_afpd, "remove_acl: END");
 114     return ret;
 115 }