2 * Copyright (c) 2003-2004 Tim Kientzle
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer
10 * in this position and unchanged.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 #include "archive_platform.h"
28 __FBSDID("$FreeBSD: src/lib/libarchive/archive_write_open_file.c,v 1.8 2004/10/17 23:47:30 kientzle Exp $");
38 #include "archive_private.h"
40 struct write_file_data {
45 static int file_close(struct archive *, void *);
46 static int file_open(struct archive *, void *);
47 static ssize_t file_write(struct archive *, void *, void *buff, size_t);
50 archive_write_open_file(struct archive *a, const char *filename)
52 struct write_file_data *mine;
54 if (filename == NULL) {
55 mine = malloc(sizeof(*mine));
57 archive_set_error(a, ENOMEM, "No memory");
58 return (ARCHIVE_FATAL);
60 mine->filename[0] = 0;
62 mine = malloc(sizeof(*mine) + strlen(filename));
64 archive_set_error(a, ENOMEM, "No memory");
65 return (ARCHIVE_FATAL);
67 strcpy(mine->filename, filename);
70 return (archive_write_open(a, mine,
71 file_open, file_write, file_close));
75 file_open(struct archive *a, void *client_data)
78 struct write_file_data *mine;
83 flags = O_WRONLY | O_CREAT | O_TRUNC;
85 if (*mine->filename != 0) {
86 mine->fd = open(mine->filename, flags, 0666);
89 * If client hasn't explicitly set the last block
90 * handling, then set it here: If the output is a
91 * block or character device, pad the last block,
92 * otherwise leave it unpadded.
94 if (mine->fd >= 0 && a->bytes_in_last_block < 0) {
95 if (fstat(mine->fd, &st) == 0) {
97 if (S_ISCHR(st.st_mode) ||
98 S_ISBLK(st.st_mode) ||
100 /* Pad last block. */
101 archive_write_set_bytes_in_last_block(a, 0);
103 /* Don't pad last block. */
104 archive_write_set_bytes_in_last_block(a, 1);
109 if (a->bytes_in_last_block < 0) /* Still default? */
110 /* Last block will be fully padded. */
111 archive_write_set_bytes_in_last_block(a, 0);
115 archive_set_error(a, errno, "Failed to open '%s'",
117 return (ARCHIVE_FATAL);
120 if (pst == NULL && fstat(mine->fd, &st) == 0)
123 archive_set_error(a, errno, "Couldn't stat '%s'",
125 return (ARCHIVE_FATAL);
128 a->skip_file_dev = pst->st_dev;
129 a->skip_file_ino = pst->st_ino;
135 file_write(struct archive *a, void *client_data, void *buff, size_t length)
137 struct write_file_data *mine;
138 ssize_t bytesWritten;
141 bytesWritten = write(mine->fd, buff, length);
142 if (bytesWritten <= 0) {
143 archive_set_error(a, errno, "Write error");
146 return (bytesWritten);
150 file_close(struct archive *a, void *client_data)
152 struct write_file_data *mine = client_data;
154 (void)a; /* UNUSED */