]> CyberLeo.Net >> Repos - FreeBSD/stable/10.git/blob - contrib/libarchive/libarchive/test/test_open_fd.c
MFC r368207,368607:
[FreeBSD/stable/10.git] / contrib / libarchive / libarchive / test / test_open_fd.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 #if defined(_WIN32) && !defined(__CYGWIN__)
29 #define open _open
30 #if !defined(__BORLANDC__)
31 #ifdef lseek
32 #undef lseek
33 #endif
34 #define lseek _lseek
35 #endif
36 #define close _close
37 #endif
38
39 DEFINE_TEST(test_open_fd)
40 {
41         char buff[64];
42         struct archive_entry *ae;
43         struct archive *a;
44         int fd;
45         const char *skip_open_fd_err_test;
46
47 #if defined(__BORLANDC__)
48         fd = open("test.tar", O_RDWR | O_CREAT | O_BINARY);
49 #else
50         fd = open("test.tar", O_RDWR | O_CREAT | O_BINARY, 0777);
51 #endif
52         assert(fd >= 0);
53         if (fd < 0)
54                 return;
55
56         /* Write an archive through this fd. */
57         assert((a = archive_write_new()) != NULL);
58         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
59         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_none(a));
60         assertEqualIntA(a, ARCHIVE_OK, archive_write_open_fd(a, fd));
61
62         /*
63          * Write a file to it.
64          */
65         assert((ae = archive_entry_new()) != NULL);
66         archive_entry_set_mtime(ae, 1, 0);
67         archive_entry_copy_pathname(ae, "file");
68         archive_entry_set_mode(ae, S_IFREG | 0755);
69         archive_entry_set_size(ae, 8);
70         assertEqualIntA(a, ARCHIVE_OK, archive_write_header(a, ae));
71         archive_entry_free(ae);
72         assertEqualIntA(a, 8, archive_write_data(a, "12345678", 9));
73
74         /*
75          * Write a second file to it.
76          */
77         assert((ae = archive_entry_new()) != NULL);
78         archive_entry_copy_pathname(ae, "file2");
79         archive_entry_set_mode(ae, S_IFREG | 0755);
80         archive_entry_set_size(ae, 819200);
81         assertEqualIntA(a, ARCHIVE_OK, archive_write_header(a, ae));
82         archive_entry_free(ae);
83
84         /* Close out the archive. */
85         assertEqualIntA(a, ARCHIVE_OK, archive_write_close(a));
86         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
87
88         /*
89          * Now, read the data back.
90          */
91         assert(lseek(fd, 0, SEEK_SET) == 0);
92         assert((a = archive_read_new()) != NULL);
93         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
94         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
95         assertEqualIntA(a, ARCHIVE_OK, archive_read_open_fd(a, fd, 512));
96
97         assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
98         assertEqualInt(1, archive_entry_mtime(ae));
99         assertEqualInt(0, archive_entry_mtime_nsec(ae));
100         assertEqualInt(0, archive_entry_atime(ae));
101         assertEqualInt(0, archive_entry_ctime(ae));
102         assertEqualString("file", archive_entry_pathname(ae));
103         assert((S_IFREG | 0755) == archive_entry_mode(ae));
104         assertEqualInt(8, archive_entry_size(ae));
105         assertEqualIntA(a, 8, archive_read_data(a, buff, 10));
106         assertEqualMem(buff, "12345678", 8);
107
108         assertEqualIntA(a, ARCHIVE_OK, archive_read_next_header(a, &ae));
109         assertEqualString("file2", archive_entry_pathname(ae));
110         assert((S_IFREG | 0755) == archive_entry_mode(ae));
111         assertEqualInt(819200, archive_entry_size(ae));
112         assertEqualIntA(a, ARCHIVE_OK, archive_read_data_skip(a));
113
114         /* Verify the end of the archive. */
115         assertEqualIntA(a, ARCHIVE_EOF, archive_read_next_header(a, &ae));
116         assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
117         assertEqualInt(ARCHIVE_OK, archive_read_free(a));
118         close(fd);
119
120         skip_open_fd_err_test = getenv("SKIP_OPEN_FD_ERR_TEST");
121         if(skip_open_fd_err_test == NULL) {
122                 /*
123                  * Verify some of the error handling.
124                  */
125                 assert((a = archive_read_new()) != NULL);
126                 assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
127                 assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
128                 /* FD 100 shouldn't be open. */
129                 assertEqualIntA(a, ARCHIVE_FATAL,
130                 archive_read_open_fd(a, 100, 512));
131                 assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
132                 assertEqualInt(ARCHIVE_OK, archive_read_free(a));
133         }
134 }