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: releng/10.3/contrib/libarchive/libarchive/test/test_acl_pax.c 248616 2013-03-22 13:36:03Z mm $"); 27 28/* 29 * Exercise the system-independent portion of the ACL support. 30 * Check that pax archive can save and restore ACL data. 31 * 32 * This should work on all systems, regardless of whether local 33 * filesystems support ACLs or not. 34 */ 35 36static unsigned char buff[16384]; 37 38struct acl_t { 39 int type; /* Type of ACL: "access" or "default" */ 40 int permset; /* Permissions for this class of users. */ 41 int tag; /* Owner, User, Owning group, group, other, etc. */ 42 int qual; /* GID or UID of user/group, depending on tag. */ 43 const char *name; /* Name of user/group, depending on tag. */ 44}; 45 46static struct acl_t acls0[] = { 47 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_EXECUTE, 48 ARCHIVE_ENTRY_ACL_USER_OBJ, 0, "" }, 49 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ, 50 ARCHIVE_ENTRY_ACL_GROUP_OBJ, 0, "" }, 51 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_WRITE, 52 ARCHIVE_ENTRY_ACL_OTHER, 0, "" }, 53}; 54 55static struct acl_t acls1[] = { 56 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_EXECUTE, 57 ARCHIVE_ENTRY_ACL_USER_OBJ, -1, "" }, 58 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ, 59 ARCHIVE_ENTRY_ACL_USER, 77, "user77" }, 60 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ, 61 ARCHIVE_ENTRY_ACL_GROUP_OBJ, -1, "" }, 62 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_WRITE, 63 ARCHIVE_ENTRY_ACL_OTHER, -1, "" }, 64}; 65 66static struct acl_t acls2[] = { 67 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_EXECUTE | ARCHIVE_ENTRY_ACL_READ, 68 ARCHIVE_ENTRY_ACL_USER_OBJ, -1, "" }, 69 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ, 70 ARCHIVE_ENTRY_ACL_USER, 77, "user77" }, 71 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 0, 72 ARCHIVE_ENTRY_ACL_USER, 78, "user78" }, 73 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_READ, 74 ARCHIVE_ENTRY_ACL_GROUP_OBJ, -1, "" }, 75 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 0007, 76 ARCHIVE_ENTRY_ACL_GROUP, 78, "group78" }, 77 { ARCHIVE_ENTRY_ACL_TYPE_ACCESS, ARCHIVE_ENTRY_ACL_WRITE | ARCHIVE_ENTRY_ACL_EXECUTE, 78 ARCHIVE_ENTRY_ACL_OTHER, -1, "" }, 79}; 80 81static void 82set_acls(struct archive_entry *ae, struct acl_t *acls, int n) 83{ 84 int i; 85 86 archive_entry_acl_clear(ae); 87 for (i = 0; i < n; i++) { 88 archive_entry_acl_add_entry(ae, 89 acls[i].type, acls[i].permset, acls[i].tag, acls[i].qual, 90 acls[i].name); 91 } 92} 93 94static int 95acl_match(struct acl_t *acl, int type, int permset, int tag, int qual, const char *name) 96{ 97 if (type != acl->type) 98 return (0); 99 if (permset != acl->permset) 100 return (0); 101 if (tag != acl->tag) 102 return (0); 103 if (tag == ARCHIVE_ENTRY_ACL_USER_OBJ) 104 return (1); 105 if (tag == ARCHIVE_ENTRY_ACL_GROUP_OBJ) 106 return (1); 107 if (tag == ARCHIVE_ENTRY_ACL_OTHER) 108 return (1); 109 if (qual != acl->qual) 110 return (0); 111 if (name == NULL) 112 return (acl->name == NULL || acl->name[0] == '\0'); 113 if (acl->name == NULL) 114 return (name == NULL || name[0] == '\0'); 115 return (0 == strcmp(name, acl->name)); 116} 117 118static void 119compare_acls(struct archive_entry *ae, struct acl_t *acls, int n, int mode) 120{ 121 int *marker = malloc(sizeof(marker[0]) * n); 122 int i; 123 int r; 124 int type, permset, tag, qual; 125 int matched; 126 const char *name; 127 128 for (i = 0; i < n; i++) 129 marker[i] = i; 130 131 while (0 == (r = archive_entry_acl_next(ae, 132 ARCHIVE_ENTRY_ACL_TYPE_ACCESS, 133 &type, &permset, &tag, &qual, &name))) { 134 for (i = 0, matched = 0; i < n && !matched; i++) { 135 if (acl_match(&acls[marker[i]], type, permset, 136 tag, qual, name)) { 137 /* We found a match; remove it. */ 138 marker[i] = marker[n - 1]; 139 n--; 140 matched = 1; 141 } 142 } 143 if (tag == ARCHIVE_ENTRY_ACL_USER_OBJ) { 144 if (!matched) printf("No match for user_obj perm\n"); 145 failure("USER_OBJ permset (%02o) != user mode (%02o)", 146 permset, 07 & (mode >> 6)); 147 assert((permset << 6) == (mode & 0700)); 148 } else if (tag == ARCHIVE_ENTRY_ACL_GROUP_OBJ) { 149 if (!matched) printf("No match for group_obj perm\n"); 150 failure("GROUP_OBJ permset %02o != group mode %02o", 151 permset, 07 & (mode >> 3)); 152 assert((permset << 3) == (mode & 0070)); 153 } else if (tag == ARCHIVE_ENTRY_ACL_OTHER) { 154 if (!matched) printf("No match for other perm\n"); 155 failure("OTHER permset (%02o) != other mode (%02o)", 156 permset, mode & 07); 157 assert((permset << 0) == (mode & 0007)); 158 } else { 159 failure("Could not find match for ACL " 160 "(type=%d,permset=%d,tag=%d,qual=%d,name=``%s'')", 161 type, permset, tag, qual, name); 162 assert(matched == 1); 163 } 164 } 165 assertEqualInt(ARCHIVE_EOF, r); 166 assert((mode_t)(mode & 0777) == (archive_entry_mode(ae) & 0777)); 167 failure("Could not find match for ACL " 168 "(type=%d,permset=%d,tag=%d,qual=%d,name=``%s'')", 169 acls[marker[0]].type, acls[marker[0]].permset, 170 acls[marker[0]].tag, acls[marker[0]].qual, acls[marker[0]].name); 171 assert(n == 0); /* Number of ACLs not matched should == 0 */ 172 free(marker); 173} 174 175DEFINE_TEST(test_acl_pax) 176{ 177 struct archive *a; 178 struct archive_entry *ae; 179 size_t used; 180 FILE *f; 181 void *reference; 182 size_t reference_size; 183 184 /* Write an archive to memory. */ 185 assert(NULL != (a = archive_write_new())); 186 assertA(0 == archive_write_set_format_pax(a)); 187 assertA(0 == archive_write_add_filter_none(a)); 188 assertA(0 == archive_write_set_bytes_per_block(a, 1)); 189 assertA(0 == archive_write_set_bytes_in_last_block(a, 1)); 190 assertA(0 == archive_write_open_memory(a, buff, sizeof(buff), &used)); 191 192 /* Write a series of files to the archive with different ACL info. */ 193 194 /* Create a simple archive_entry. */ 195 assert((ae = archive_entry_new()) != NULL); 196 archive_entry_set_pathname(ae, "file"); 197 archive_entry_set_mode(ae, S_IFREG | 0777); 198 199 /* Basic owner/owning group should just update mode bits. */ 200 set_acls(ae, acls0, sizeof(acls0)/sizeof(acls0[0])); 201 assertA(0 == archive_write_header(a, ae)); 202 203 /* With any extended ACL entry, we should read back a full set. */ 204 set_acls(ae, acls1, sizeof(acls1)/sizeof(acls1[0])); 205 assertA(0 == archive_write_header(a, ae)); 206 207 208 /* A more extensive set of ACLs. */ 209 set_acls(ae, acls2, sizeof(acls2)/sizeof(acls2[0])); 210 assertA(0 == archive_write_header(a, ae)); 211 212 /* 213 * Check that clearing ACLs gets rid of them all by repeating 214 * the first test. 215 */ 216 set_acls(ae, acls0, sizeof(acls0)/sizeof(acls0[0])); 217 assertA(0 == archive_write_header(a, ae)); 218 archive_entry_free(ae); 219 220 /* Close out the archive. */ 221 assertEqualIntA(a, ARCHIVE_OK, archive_write_close(a)); 222 assertEqualInt(ARCHIVE_OK, archive_write_free(a)); 223 224 /* Write out the data we generated to a file for manual inspection. */ 225 assert(NULL != (f = fopen("testout", "wb"))); 226 assertEqualInt(used, (size_t)fwrite(buff, 1, (unsigned int)used, f)); 227 fclose(f); 228 229 /* Write out the reference data to a file for manual inspection. */ 230 extract_reference_file("test_acl_pax.tar"); 231 reference = slurpfile(&reference_size, "test_acl_pax.tar"); 232 233 /* Assert that the generated data matches the built-in reference data.*/ 234 failure("Generated pax archive does not match reference; compare 'testout' to 'test_acl_pax.tar' reference file."); 235 assertEqualMem(buff, reference, reference_size); 236 failure("Generated pax archive does not match reference; compare 'testout' to 'test_acl_pax.tar' reference file."); 237 assertEqualInt((int)used, reference_size); 238 free(reference); 239 240 /* Read back each entry and check that the ACL data is right. */ 241 assert(NULL != (a = archive_read_new())); 242 assertA(0 == archive_read_support_format_all(a)); 243 assertA(0 == archive_read_support_filter_all(a)); 244 assertA(0 == archive_read_open_memory(a, buff, used)); 245 246 /* First item has no ACLs */ 247 assertA(0 == archive_read_next_header(a, &ae)); 248 failure("Basic ACLs shouldn't be stored as extended ACLs"); 249 assert(0 == archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS)); 250 failure("Basic ACLs should set mode to 0142, not %04o", 251 archive_entry_mode(ae)&0777); 252 assert((archive_entry_mode(ae) & 0777) == 0142); 253 254 /* Second item has a few ACLs */ 255 assertA(0 == archive_read_next_header(a, &ae)); 256 failure("One extended ACL should flag all ACLs to be returned."); 257 assert(4 == archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS)); 258 compare_acls(ae, acls1, sizeof(acls1)/sizeof(acls1[0]), 0142); 259 failure("Basic ACLs should set mode to 0142, not %04o", 260 archive_entry_mode(ae)&0777); 261 assert((archive_entry_mode(ae) & 0777) == 0142); 262 263 /* Third item has pretty extensive ACLs */ 264 assertA(0 == archive_read_next_header(a, &ae)); 265 assertEqualInt(6, archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS)); 266 compare_acls(ae, acls2, sizeof(acls2)/sizeof(acls2[0]), 0543); 267 failure("Basic ACLs should set mode to 0543, not %04o", 268 archive_entry_mode(ae)&0777); 269 assert((archive_entry_mode(ae) & 0777) == 0543); 270 271 /* Fourth item has no ACLs */ 272 assertA(0 == archive_read_next_header(a, &ae)); 273 failure("Basic ACLs shouldn't be stored as extended ACLs"); 274 assert(0 == archive_entry_acl_reset(ae, ARCHIVE_ENTRY_ACL_TYPE_ACCESS)); 275 failure("Basic ACLs should set mode to 0142, not %04o", 276 archive_entry_mode(ae)&0777); 277 assert((archive_entry_mode(ae) & 0777) == 0142); 278 279 /* Close the archive. */ 280 assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a)); 281 assertEqualInt(ARCHIVE_OK, archive_read_free(a)); 282} 283