v7fs_populate.c revision 1.1 1 /* $NetBSD: v7fs_populate.c,v 1.1 2011/07/18 08:58:39 uch Exp $ */
2
3 /*-
4 * Copyright (c) 2011 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by UCHIYAMA Yasushi.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #if HAVE_NBTOOL_CONFIG_H
33 #include "nbtool_config.h"
34 #endif
35
36 #include <sys/cdefs.h>
37 #if defined(__RCSID) && !defined(__lint)
38 __RCSID("$NetBSD: v7fs_populate.c,v 1.1 2011/07/18 08:58:39 uch Exp $");
39 #endif /* !__lint */
40
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <unistd.h>
45 #include <fcntl.h>
46 #include <errno.h>
47 #include <err.h>
48
49 #if !HAVE_NBTOOL_CONFIG_H
50 #include <sys/mount.h>
51 #endif
52
53 #include "makefs.h"
54 #include "v7fs.h"
55 #include "v7fs_impl.h"
56 #include "v7fs_inode.h"
57 #include "v7fs_superblock.h"
58 #include "v7fs_datablock.h"
59 #include "v7fs_endian.h"
60 #include "v7fs_file.h"
61 #include "v7fs_makefs.h"
62 #include "newfs_v7fs.h"
63
64 extern bool verbose;
65 #define VPRINTF(fmt, args...) { if (verbose) printf(fmt, ##args); }
66
67 static void
68 attr_setup(fsnode *node, struct v7fs_fileattr *attr)
69 {
70 struct stat *st = &node->inode->st;
71
72 attr->mode = node->type | st->st_mode;
73 attr->uid = st->st_uid;
74 attr->gid = st->st_gid;
75 attr->device = 0;
76 attr->ctime = st->st_ctime;
77 attr->atime = st->st_atime;
78 attr->mtime = st->st_mtime;
79 }
80
81 static int
82 allocate(struct v7fs_self *fs, struct v7fs_inode *parent_inode, fsnode *node,
83 dev_t dev, struct v7fs_inode *inode)
84 {
85 int error;
86 v7fs_ino_t ino;
87 struct v7fs_fileattr attr;
88
89 memset(inode, 0, sizeof(*inode));
90
91 attr_setup(node, &attr);
92 attr.device = dev;
93 if ((error = v7fs_file_allocate(fs, parent_inode, node->name, &attr,
94 &ino))) {
95 errno = error;
96 warn("%s", node->name);
97 return error;
98 }
99 node->inode->ino = ino;
100 node->inode->flags |= FI_ALLOCATED;
101 if ((error = v7fs_inode_load(fs, inode, ino))) {
102 errno = error;
103 warn("%s", node->name);
104 return error;
105 }
106
107 return 0;
108 }
109
110 struct copy_arg {
111 int fd;
112 uint8_t buf[V7FS_BSIZE];
113 };
114
115 static int
116 copy_subr(struct v7fs_self *fs, void *ctx, v7fs_daddr_t blk, size_t sz)
117 {
118 struct copy_arg *p = ctx;
119
120 if ((sz = read(p->fd, p->buf, sz)) != sz) {
121 return V7FS_ITERATOR_ERROR;
122 }
123
124 if (!fs->io.write(fs->io.cookie, p->buf, blk)) {
125 errno = EIO;
126 return V7FS_ITERATOR_ERROR;
127 }
128 progress(0);
129
130 return 0;
131 }
132
133 static int
134 file_copy(struct v7fs_self *fs, struct v7fs_inode *parent_inode, fsnode *node,
135 const char *filepath)
136 {
137 struct v7fs_inode inode;
138 const char *errmsg;
139 fsinode *fnode = node->inode;
140 int error = 0;
141 int fd;
142
143 /* Check hard-link */
144 if ((fnode->nlink > 1) && (fnode->flags & FI_ALLOCATED)) {
145 if ((error = v7fs_inode_load(fs, &inode, fnode->ino))) {
146 errmsg = "inode load";
147 goto err_exit;
148 }
149 if ((error = v7fs_file_link(fs, parent_inode, &inode,
150 node->name))) {
151 errmsg = "hard link";
152 goto err_exit;
153 }
154 return 0;
155 }
156
157 /* Allocate file */
158 if ((error = allocate(fs, parent_inode, node, 0, &inode))) {
159 errmsg = "file allocate";
160 goto err_exit;
161 }
162 if ((error = v7fs_datablock_expand(fs, &inode, fnode->st.st_size))) {
163 errmsg = "datablock expand";
164 goto err_exit;
165 }
166
167 /* Data copy */
168 if ((fd = open(filepath, O_RDONLY)) == -1) {
169 error = errno;
170 errmsg = "source file";
171 goto err_exit;
172 }
173
174 error = v7fs_datablock_foreach(fs, &inode, copy_subr,
175 &(struct copy_arg){ .fd = fd });
176 if (error != V7FS_ITERATOR_END) {
177 errmsg = "data copy";
178 close(fd);
179 goto err_exit;
180 } else {
181 error = 0;
182 }
183 close(fd);
184
185 return error;
186
187 err_exit:
188 errno = error;
189 warn("%s %s", node->name, errmsg);
190
191 return error;
192 }
193
194 static int
195 populate_walk(struct v7fs_self *fs, struct v7fs_inode *parent_inode,
196 fsnode *root, char *dir)
197 {
198 fsnode *cur;
199 char *mydir = dir + strlen(dir);
200 char srcpath[MAXPATHLEN + 1];
201 struct v7fs_inode inode;
202 int error = 0;
203 bool failed = false;
204
205 for (cur = root; cur != NULL; cur = cur->next) {
206 switch (cur->type & S_IFMT) {
207 default:
208 VPRINTF("%x\n", cur->flags & S_IFMT);
209 break;
210 case S_IFCHR:
211 /*FALLTHROUGH*/
212 case S_IFBLK:
213 if ((error = allocate(fs, parent_inode, cur,
214 cur->inode->st.st_rdev, &inode))) {
215 errno = error;
216 warn("%s", cur->name);
217 }
218 break;
219 case S_IFDIR:
220 if (!cur->child) /*'.'*/
221 break;
222 /* Allocate this directory. */
223 if ((error = allocate(fs, parent_inode, cur, 0,
224 &inode))) {
225 errno = error;
226 warn("%s", cur->name);
227 } else {
228 /* Populate children. */
229 mydir[0] = '/';
230 strcpy(&mydir[1], cur->name);
231 error = populate_walk(fs, &inode, cur->child,
232 dir);
233 mydir[0] = '\0';
234 }
235 break;
236 case S_IFREG:
237 snprintf(srcpath, sizeof(srcpath), "%s/%s", dir,
238 cur->name);
239 error = file_copy(fs, parent_inode, cur, srcpath);
240 break;
241 case S_IFLNK:
242 if ((error = allocate(fs, parent_inode, cur, 0,
243 &inode))) {
244 errno = error;
245 warn("%s", cur->name);
246 } else {
247 v7fs_file_symlink(fs, &inode, cur->symlink);
248 }
249 break;
250 }
251 if (error)
252 failed = true;
253 }
254
255 return failed ? 2 : 0;
256 }
257
258 int
259 v7fs_populate(const char *dir, fsnode *root, fsinfo_t *fsopts,
260 const struct v7fs_mount_device *device)
261 {
262 v7fs_opt_t *v7fs_opts = fsopts->fs_specific;
263 static char path[MAXPATHLEN + 1];
264 struct v7fs_inode root_inode;
265 struct v7fs_self *fs;
266 int error;
267
268 if ((error = v7fs_io_init(&fs, device, V7FS_BSIZE))) {
269 errno = error;
270 warn("I/O setup failed.");
271 return error;
272 }
273 fs->endian = device->endian;
274 v7fs_endian_init(fs);
275
276 if ((error = v7fs_superblock_load(fs))) {
277 errno = error;
278 warn("Can't load superblock.");
279 return error;
280 }
281 fsopts->superblock = &fs->superblock; /* not used. */
282
283 if ((error = v7fs_inode_load(fs, &root_inode, V7FS_ROOT_INODE))) {
284 errno = error;
285 warn("Can't load root inode.");
286 return error;
287 }
288
289 progress(&(struct progress_arg){ .label = "populate", .tick =
290 v7fs_opts->npuredatablk / PROGRESS_BAR_GRANULE });
291
292 strncpy(path, dir, sizeof(path));
293 error = populate_walk(fs, &root_inode, root, path);
294
295 v7fs_inode_writeback(fs, &root_inode);
296 v7fs_superblock_writeback(fs);
297
298 return error;
299 }
300