contrib/libarchive/libarchive/test/test_compat_star_acl_posix1e.c

   1 /*-
   2  * Copyright (c) 2003-2007 Tim Kientzle
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24  */
  25 #include "test.h"
  26 __FBSDID("$FreeBSD$");
  27
  28 /*
  29  * Verify reading entries with POSIX.1e ACLs from archives created by star
  30  *
  31  * This should work on all systems, regardless of whether local filesystems
  32  * support ACLs or not.
  33  */
  34
  35 struct acl_t {
  36         int type;  /* Type of ACL: "access" or "default" */
  37         int permset; /* Permissions for this class of users. */
  38         int tag; /* Owner, User, Owning group, group, other, etc. */
  39         const char *name; /* Name of user/group, depending on tag. */
  40 };
  41
  42 static struct acl_t acls0[] = {
  43         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_EXECUTE,
  44           ARCHIVE_ENTRY_ACL_USER_OBJ, "" },
  45         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ,
  46           ARCHIVE_ENTRY_ACL_USER, "user77" },
  47         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ,
  48           ARCHIVE_ENTRY_ACL_GROUP_OBJ, "" },
  49         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ,
  50           ARCHIVE_ENTRY_ACL_MASK, ""},
  51         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_WRITE,
  52           ARCHIVE_ENTRY_ACL_OTHER, "" },
  53 };
  54
  55 static struct acl_t acls1[] = {
  56         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_EXECUTE | ARCHIVE_ENTRY_ACL_READ,
  57           ARCHIVE_ENTRY_ACL_USER_OBJ, "" },
  58         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ,
  59           ARCHIVE_ENTRY_ACL_USER, "user77" },
  60         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 0,
  61           ARCHIVE_ENTRY_ACL_USER, "user78" },
  62         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ,
  63           ARCHIVE_ENTRY_ACL_GROUP_OBJ, "" },
  64         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 0007,
  65           ARCHIVE_ENTRY_ACL_GROUP, "group78" },
  66         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 0007,
  67           ARCHIVE_ENTRY_ACL_MASK, ""},
  68         { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_WRITE | ARCHIVE_ENTRY_ACL_EXECUTE,
  69           ARCHIVE_ENTRY_ACL_OTHER, "" },
  70 };
  71
  72 static struct acl_t acls2[] = {
  73         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_EXECUTE,
  74           ARCHIVE_ENTRY_ACL_USER_OBJ, "" },
  75         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_READ,
  76           ARCHIVE_ENTRY_ACL_USER, "user77" },
  77         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_READ,
  78           ARCHIVE_ENTRY_ACL_GROUP_OBJ, "" },
  79         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_EXECUTE,
  80           ARCHIVE_ENTRY_ACL_GROUP, "group78" },
  81         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_READ | ARCHIVE_ENTRY_ACL_EXECUTE,
  82           ARCHIVE_ENTRY_ACL_MASK, ""},
  83         { ARCHIVE_ENTRY_ACL_TYPE_DEFAULT, ARCHIVE_ENTRY_ACL_WRITE,
  84           ARCHIVE_ENTRY_ACL_OTHER, "" },
  85 };
  86
  87 static int
  88 acl_match(struct acl_t *acl, int type, int permset, int tag, const char *name)
  89 {
  90         if (type != acl->type)
  91                 return (0);
  92         if (permset != acl->permset)
  93                 return (0);
  94         if (tag != acl->tag)
  95                 return (0);
  96         if (tag == ARCHIVE_ENTRY_ACL_USER_OBJ)
  97                 return (1);
  98         if (tag == ARCHIVE_ENTRY_ACL_GROUP_OBJ)
  99                 return (1);
 100         if (tag == ARCHIVE_ENTRY_ACL_OTHER)
 101                 return (1);
 102         if (tag == ARCHIVE_ENTRY_ACL_MASK)
 103                 return (1);
 104         if (name == NULL)
 105                 return (acl->name == NULL || acl->name[0] == '\0');
 106         if (acl->name == NULL)
 107                 return (name == NULL || name[0] == '\0');
 108         return (0 == strcmp(name, acl->name));
 109 }
 110
 111 static void
 112 compare_acls(struct archive_entry *ae, struct acl_t *acls, int n, int mode,
 113     int want_type)
 114 {
 115         int *marker = malloc(sizeof(marker[0]) * n);
 116         int i;
 117         int r;
 118         int type, permset, tag, qual;
 119         int matched;
 120         const char *name;
 121
 122         for (i = 0; i < n; i++)
 123                 marker[i] = i;
 124
 125         while (0 == (r = archive_entry_acl_next(ae, want_type,
 126                          &type, &permset, &tag, &qual, &name))) {
 127                 for (i = 0, matched = 0; i < n && !matched; i++) {
 128                         if (acl_match(&acls[marker[i]], type, permset,
 129                                 tag, name)) {
 130                                 /* We found a match; remove it. */
 131                                 marker[i] = marker[n - 1];
 132                                 n--;
 133                                 matched = 1;
 134                         }
 135                 }
 136                 if (tag == ARCHIVE_ENTRY_ACL_USER_OBJ) {
 137                         if (!matched) printf("No match for user_obj perm\n");
 138                         if (want_type == ARCHIVE_ENTRY_ACL_TYPE_ACCESS) {
 139                                 failure("USER_OBJ permset (%02o) != user mode (%02o)",
 140                                     permset, 07 & (mode >> 6));
 141                                 assert((permset << 6) == (mode & 0700));
 142                         }
 143                 } else if (tag == ARCHIVE_ENTRY_ACL_GROUP_OBJ) {
 144                         if (!matched) printf("No match for group_obj perm\n");
 145                         if (want_type == ARCHIVE_ENTRY_ACL_TYPE_ACCESS) {
 146                                 failure("GROUP_OBJ permset %02o != group mode %02o",
 147                                     permset, 07 & (mode >> 3));
 148                                 assert((permset << 3) == (mode & 0070));
 149                         }
 150                 } else if (tag == ARCHIVE_ENTRY_ACL_OTHER) {
 151                         if (!matched) printf("No match for other perm\n");
 152                         if (want_type == ARCHIVE_ENTRY_ACL_TYPE_ACCESS) {
 153                                 failure("OTHER permset (%02o) != other mode (%02o)",
 154                                     permset, mode & 07);
 155                                 assert((permset << 0) == (mode & 0007));
 156                         }
 157                 } else if (tag != ARCHIVE_ENTRY_ACL_MASK) {
 158                         failure("Could not find match for ACL "
 159                             "(type=%d,permset=%d,tag=%d,name=``%s'')",
 160                             type, permset, tag, name);
 161                         assert(matched == 1);
 162                 }
 163         }
 164         assertEqualInt(ARCHIVE_EOF, r);
 165         assert((mode_t)(mode & 0777) == (archive_entry_mode(ae) & 0777));
 166         failure("Could not find match for ACL "
 167             "(type=%d,permset=%d,tag=%d,name=``%s'')",
 168             acls[marker[0]].type, acls[marker[0]].permset,
 169             acls[marker[0]].tag, acls[marker[0]].name);
 170         assert(n == 0); /* Number of ACLs not matched should == 0 */
 171         free(marker);
 172 }
 173
 174 DEFINE_TEST(test_compat_star_acl_posix1e)
 175 {
 176         char name[] = "test_compat_star_acl_posix1e.tar";
 177         struct archive *a;
 178         struct archive_entry *ae;
 179
 180         /* Read archive file */
 181         assert(NULL != (a = archive_read_new()));
 182         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
 183         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
 184         extract_reference_file(name);
 185         assertEqualIntA(a, ARCHIVE_OK, archive_read_open_filename(a, name, 10240));
 186
 187         /* First item has a few ACLs */
 188         assertA(0 == archive_read_next_header(a, &ae));
 189         failure("One extended ACL should flag all ACLs to be returned.");
 190         assertEqualInt(5, archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS));
 191         compare_acls(ae, acls0, sizeof(acls0)/sizeof(acls0[0]), 0142, ARCHIVE_ENTRY_ACL_TYPE_ACCESS);
 192         failure("Basic ACLs should set mode to 0142, not %04o",
 193             archive_entry_mode(ae)&0777);
 194         assert((archive_entry_mode(ae) & 0777) == 0142);
 195
 196         /* Second item has pretty extensive ACLs */
 197         assertA(0 == archive_read_next_header(a, &ae));
 198         assertEqualInt(7, archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS));
 199         compare_acls(ae, acls1, sizeof(acls1)/sizeof(acls1[0]), 0543, ARCHIVE_ENTRY_ACL_TYPE_ACCESS);
 200         failure("Basic ACLs should set mode to 0543, not %04o",
 201             archive_entry_mode(ae)&0777);
 202         assert((archive_entry_mode(ae) & 0777) == 0543);
 203
 204         /* Third item has default ACLs */
 205         assertA(0 == archive_read_next_header(a, &ae));
 206         assertEqualInt(6, archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_DEFAULT));
 207         compare_acls(ae, acls2, sizeof(acls2)/sizeof(acls2[0]), 0142, ARCHIVE_ENTRY_ACL_TYPE_DEFAULT);
 208         failure("Basic ACLs should set mode to 0142, not %04o",
 209             archive_entry_mode(ae)&0777);
 210         assert((archive_entry_mode(ae) & 0777) == 0142);
 211
 212         /* Close the archive. */
 213         assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
 214         assertEqualInt(ARCHIVE_OK, archive_read_free(a));
 215 }