2 * Copyright (C) 2010 The Android Open Source Project
4 * Licensed under the Apache License, Version 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at
8 * http://www.apache.org/licenses/LICENSE-2.0
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
17 #include "make_ext4fs.h"
18 #include "ext4_utils.h"
24 #include <sparse/sparse.h>
36 #include <sys/types.h>
38 /* TODO: Not implemented:
39 Allocating blocks in the same block group as the file inode
40 Hash or binary tree directories
43 static int filter_dot(const struct dirent
*d
)
45 return (strcmp(d
->d_name
, "..") && strcmp(d
->d_name
, "."));
48 static u32
build_default_directory_structure(const char *dir_path
)
52 struct dentry dentries
= {
53 .filename
= "lost+found",
54 .file_type
= EXT4_FT_DIR
,
60 root_inode
= make_directory(0, 1, &dentries
, 1);
61 inode
= make_directory(root_inode
, 0, NULL
, 0);
62 *dentries
.inode
= inode
;
63 inode_set_permissions(inode
, dentries
.mode
,
64 dentries
.uid
, dentries
.gid
, dentries
.mtime
);
70 /* Read a local directory and create the same tree in the generated filesystem.
71 Calls itself recursively with each directory in the given directory.
72 full_path is an absolute or relative path, with a trailing slash, to the
73 directory on disk that should be copied, or NULL if this is a directory
74 that does not exist on disk (e.g. lost+found).
75 dir_path is an absolute path, with trailing slash, to the same directory
76 if the image were mounted at the specified mount point */
77 static u32
build_directory_structure(const char *full_path
, const char *dir_path
,
78 u32 dir_inode
, fs_config_func_t fs_config_func
,
79 int verbose
, time_t fixed_time
)
82 struct dentry
*dentries
;
83 struct dirent
**namelist
= NULL
;
90 bool needs_lost_and_found
= false;
93 entries
= scandir(full_path
, &namelist
, filter_dot
, (void*)alphasort
);
96 /* The scandir function implemented in glibc has a bug that makes it
97 erroneously fail with ENOMEM under certain circumstances.
98 As a workaround we can retry the scandir call with the same arguments.
99 GLIBC BZ: https://sourceware.org/bugzilla/show_bug.cgi?id=17804 */
101 entries
= scandir(full_path
, &namelist
, filter_dot
, (void*)alphasort
);
104 error_errno("scandir");
105 return EXT4_ALLOCATE_FAILED
;
110 if (dir_inode
== 0) {
111 /* root directory, check if lost+found already exists */
112 for (i
= 0; i
< entries
; i
++)
113 if (strcmp(namelist
[i
]->d_name
, "lost+found") == 0)
116 needs_lost_and_found
= true;
119 dentries
= calloc(entries
, sizeof(struct dentry
));
120 if (dentries
== NULL
)
121 critical_error_errno("malloc");
123 for (i
= 0; i
< entries
; i
++) {
124 dentries
[i
].filename
= strdup(namelist
[i
]->d_name
);
125 if (dentries
[i
].filename
== NULL
)
126 critical_error_errno("strdup");
128 asprintf(&dentries
[i
].path
, "%s%s", dir_path
, namelist
[i
]->d_name
);
129 asprintf(&dentries
[i
].full_path
, "%s%s", full_path
, namelist
[i
]->d_name
);
133 ret
= lstat(dentries
[i
].full_path
, &stat
);
135 error_errno("lstat");
141 dentries
[i
].size
= stat
.st_size
;
142 dentries
[i
].mode
= stat
.st_mode
& (S_ISUID
|S_ISGID
|S_ISVTX
|S_IRWXU
|S_IRWXG
|S_IRWXO
);
143 if (fixed_time
== -1) {
144 dentries
[i
].mtime
= stat
.st_mtime
;
146 dentries
[i
].mtime
= fixed_time
;
148 uint64_t capabilities
;
149 if (fs_config_func
!= NULL
) {
150 unsigned int mode
= 0;
151 unsigned int uid
= 0;
152 unsigned int gid
= 0;
153 int dir
= S_ISDIR(stat
.st_mode
);
154 fs_config_func(dentries
[i
].path
, dir
, &uid
, &gid
, &mode
, &capabilities
);
155 dentries
[i
].mode
= mode
;
156 dentries
[i
].uid
= uid
;
157 dentries
[i
].gid
= gid
;
158 dentries
[i
].capabilities
= capabilities
;
161 if (S_ISREG(stat
.st_mode
)) {
162 dentries
[i
].file_type
= EXT4_FT_REG_FILE
;
163 } else if (S_ISDIR(stat
.st_mode
)) {
164 dentries
[i
].file_type
= EXT4_FT_DIR
;
166 } else if (S_ISCHR(stat
.st_mode
)) {
167 dentries
[i
].file_type
= EXT4_FT_CHRDEV
;
168 } else if (S_ISBLK(stat
.st_mode
)) {
169 dentries
[i
].file_type
= EXT4_FT_BLKDEV
;
170 } else if (S_ISFIFO(stat
.st_mode
)) {
171 dentries
[i
].file_type
= EXT4_FT_FIFO
;
172 } else if (S_ISSOCK(stat
.st_mode
)) {
173 dentries
[i
].file_type
= EXT4_FT_SOCK
;
174 } else if (S_ISLNK(stat
.st_mode
)) {
175 dentries
[i
].file_type
= EXT4_FT_SYMLINK
;
176 dentries
[i
].link
= calloc(info
.block_size
, 1);
177 readlink(dentries
[i
].full_path
, dentries
[i
].link
, info
.block_size
- 1);
179 error("unknown file type on %s", dentries
[i
].path
);
186 if (needs_lost_and_found
) {
187 /* insert a lost+found directory at the beginning of the dentries */
188 struct dentry
*tmp
= calloc(entries
+ 1, sizeof(struct dentry
));
189 memset(tmp
, 0, sizeof(struct dentry
));
190 memcpy(tmp
+ 1, dentries
, entries
* sizeof(struct dentry
));
193 dentries
[0].filename
= strdup("lost+found");
194 asprintf(&dentries
[0].path
, "%slost+found", dir_path
);
195 dentries
[0].full_path
= NULL
;
196 dentries
[0].size
= 0;
197 dentries
[0].mode
= S_IRWXU
;
198 dentries
[0].file_type
= EXT4_FT_DIR
;
205 inode
= make_directory(dir_inode
, entries
, dentries
, dirs
);
207 for (i
= 0; i
< entries
; i
++) {
208 if (dentries
[i
].file_type
== EXT4_FT_REG_FILE
) {
209 entry_inode
= make_file(dentries
[i
].full_path
, dentries
[i
].size
);
210 } else if (dentries
[i
].file_type
== EXT4_FT_DIR
) {
211 char *subdir_full_path
= NULL
;
212 char *subdir_dir_path
;
213 if (dentries
[i
].full_path
) {
214 ret
= asprintf(&subdir_full_path
, "%s/", dentries
[i
].full_path
);
216 critical_error_errno("asprintf");
218 ret
= asprintf(&subdir_dir_path
, "%s/", dentries
[i
].path
);
220 critical_error_errno("asprintf");
221 entry_inode
= build_directory_structure(subdir_full_path
,
222 subdir_dir_path
, inode
, fs_config_func
, verbose
, fixed_time
);
223 free(subdir_full_path
);
224 free(subdir_dir_path
);
225 } else if (dentries
[i
].file_type
== EXT4_FT_SYMLINK
) {
226 entry_inode
= make_link(dentries
[i
].link
);
227 } else if (dentries
[i
].file_type
== EXT4_FT_CHRDEV
||
228 dentries
[i
].file_type
== EXT4_FT_BLKDEV
||
229 dentries
[i
].file_type
== EXT4_FT_SOCK
||
230 dentries
[i
].file_type
== EXT4_FT_FIFO
) {
231 entry_inode
= make_special(dentries
[i
].full_path
);
233 error("unknown file type on %s", dentries
[i
].path
);
236 *dentries
[i
].inode
= entry_inode
;
238 ret
= inode_set_permissions(entry_inode
, dentries
[i
].mode
,
239 dentries
[i
].uid
, dentries
[i
].gid
,
242 error("failed to set permissions on %s\n", dentries
[i
].path
);
245 * It's important to call inode_set_selinux() before
246 * inode_set_capabilities(). Extended attributes need to
247 * be stored sorted order, and we guarantee this by making
248 * the calls in the proper order.
249 * Please see xattr_assert_sane() in contents.c
251 ret
= inode_set_selinux(entry_inode
, dentries
[i
].secon
);
253 error("failed to set SELinux context on %s\n", dentries
[i
].path
);
254 ret
= inode_set_capabilities(entry_inode
, dentries
[i
].capabilities
);
256 error("failed to set capability on %s\n", dentries
[i
].path
);
258 free(dentries
[i
].path
);
259 free(dentries
[i
].full_path
);
260 free(dentries
[i
].link
);
261 free((void *)dentries
[i
].filename
);
262 free(dentries
[i
].secon
);
270 static u32
compute_block_size()
275 static u32
compute_journal_blocks()
277 u32 journal_blocks
= DIV_ROUND_UP(info
.len
, info
.block_size
) / 64;
278 if (journal_blocks
< 1024)
279 journal_blocks
= 1024;
280 if (journal_blocks
> 32768)
281 journal_blocks
= 32768;
282 return journal_blocks
;
285 static u32
compute_blocks_per_group()
287 return info
.block_size
* 8;
290 static u32
compute_inodes()
292 return DIV_ROUND_UP(info
.len
, info
.block_size
) / 4;
295 static u32
compute_inodes_per_group()
297 u32 blocks
= DIV_ROUND_UP(info
.len
, info
.block_size
);
298 u32 block_groups
= DIV_ROUND_UP(blocks
, info
.blocks_per_group
);
299 u32 inodes
= DIV_ROUND_UP(info
.inodes
, block_groups
);
300 inodes
= EXT4_ALIGN(inodes
, (info
.block_size
/ info
.inode_size
));
302 /* After properly rounding up the number of inodes/group,
303 * make sure to update the total inodes field in the info struct.
305 info
.inodes
= inodes
* block_groups
;
310 static u32
compute_bg_desc_reserve_blocks()
312 u32 blocks
= DIV_ROUND_UP(info
.len
, info
.block_size
);
313 u32 block_groups
= DIV_ROUND_UP(blocks
, info
.blocks_per_group
);
314 u32 bg_desc_blocks
= DIV_ROUND_UP(block_groups
* sizeof(struct ext2_group_desc
),
317 u32 bg_desc_reserve_blocks
=
318 DIV_ROUND_UP(block_groups
* 1024 * sizeof(struct ext2_group_desc
),
319 info
.block_size
) - bg_desc_blocks
;
321 if (bg_desc_reserve_blocks
> info
.block_size
/ sizeof(u32
))
322 bg_desc_reserve_blocks
= info
.block_size
/ sizeof(u32
);
324 return bg_desc_reserve_blocks
;
327 void reset_ext4fs_info() {
328 // Reset all the global data structures used by make_ext4fs so it
329 // can be called again.
330 memset(&info
, 0, sizeof(info
));
331 memset(&aux_info
, 0, sizeof(aux_info
));
333 if (ext4_sparse_file
) {
334 sparse_file_destroy(ext4_sparse_file
);
335 ext4_sparse_file
= NULL
;
339 int make_ext4fs_sparse_fd(int fd
, long long len
,
340 const char *mountpoint
)
345 return make_ext4fs_internal(fd
, NULL
, mountpoint
, NULL
, 0, 1, 0, 0, 0, -1, NULL
);
348 int make_ext4fs(const char *filename
, long long len
,
349 const char *mountpoint
)
357 fd
= open(filename
, O_WRONLY
| O_CREAT
| O_TRUNC
, 0644);
363 status
= make_ext4fs_internal(fd
, NULL
, mountpoint
, NULL
, 0, 0, 0, 1, 0, -1, NULL
);
369 /* return a newly-malloc'd string that is a copy of str. The new string
370 is guaranteed to have a trailing slash. If absolute is true, the new string
371 is also guaranteed to have a leading slash.
373 static char *canonicalize_slashes(const char *str
, bool absolute
)
376 int len
= strlen(str
);
387 if (str
[0] != '/' && absolute
) {
390 if (str
[len
- 1] != '/') {
393 ret
= malloc(newlen
+ 1);
395 critical_error("malloc");
399 if (str
[0] != '/' && absolute
) {
406 if (str
[len
- 1] != '/') {
410 if (ptr
!= ret
+ newlen
) {
411 critical_error("assertion failed\n");
419 static char *canonicalize_abs_slashes(const char *str
)
421 return canonicalize_slashes(str
, true);
424 static char *canonicalize_rel_slashes(const char *str
)
426 return canonicalize_slashes(str
, false);
429 int make_ext4fs_internal(int fd
, const char *_directory
,
430 const char *_mountpoint
, fs_config_func_t fs_config_func
, int gzip
,
431 int sparse
, int crc
, int wipe
,
432 int verbose
, time_t fixed_time
,
433 FILE* block_list_file
)
438 char *directory
= NULL
;
440 if (setjmp(setjmp_env
))
441 return EXIT_FAILURE
; /* Handle a call to longjmp() */
443 if (_mountpoint
== NULL
) {
444 mountpoint
= strdup("");
446 mountpoint
= canonicalize_abs_slashes(_mountpoint
);
450 directory
= canonicalize_rel_slashes(_directory
);
454 info
.len
= get_file_size(fd
);
457 fprintf(stderr
, "Need size of filesystem\n");
461 if (info
.block_size
<= 0)
462 info
.block_size
= compute_block_size();
464 /* Round down the filesystem length to be a multiple of the block size */
465 info
.len
&= ~((u64
)info
.block_size
- 1);
467 if (info
.journal_blocks
== 0)
468 info
.journal_blocks
= compute_journal_blocks();
470 if (info
.no_journal
== 0)
471 info
.feat_compat
= EXT4_FEATURE_COMPAT_HAS_JOURNAL
;
473 info
.journal_blocks
= 0;
475 if (info
.blocks_per_group
<= 0)
476 info
.blocks_per_group
= compute_blocks_per_group();
478 if (info
.inodes
<= 0)
479 info
.inodes
= compute_inodes();
481 if (info
.inode_size
<= 0)
482 info
.inode_size
= 256;
484 if (info
.label
== NULL
)
487 info
.inodes_per_group
= compute_inodes_per_group();
490 EXT4_FEATURE_COMPAT_RESIZE_INODE
|
491 EXT4_FEATURE_COMPAT_EXT_ATTR
;
493 info
.feat_ro_compat
|=
494 EXT4_FEATURE_RO_COMPAT_SPARSE_SUPER
|
495 EXT4_FEATURE_RO_COMPAT_LARGE_FILE
|
496 EXT4_FEATURE_RO_COMPAT_GDT_CSUM
;
498 info
.feat_incompat
|=
499 EXT4_FEATURE_INCOMPAT_EXTENTS
|
500 EXT4_FEATURE_INCOMPAT_FILETYPE
;
503 info
.bg_desc_reserve_blocks
= compute_bg_desc_reserve_blocks();
505 printf("Creating filesystem with parameters:\n");
506 printf(" Size: %"PRIu64
"\n", info
.len
);
507 printf(" Block size: %d\n", info
.block_size
);
508 printf(" Blocks per group: %d\n", info
.blocks_per_group
);
509 printf(" Inodes per group: %d\n", info
.inodes_per_group
);
510 printf(" Inode size: %d\n", info
.inode_size
);
511 printf(" Journal blocks: %d\n", info
.journal_blocks
);
512 printf(" Label: %s\n", info
.label
);
514 ext4_create_fs_aux_info();
516 printf(" Blocks: %"PRIu64
"\n", aux_info
.len_blocks
);
517 printf(" Block groups: %d\n", aux_info
.groups
);
518 printf(" Reserved block group size: %d\n", info
.bg_desc_reserve_blocks
);
520 ext4_sparse_file
= sparse_file_new(info
.block_size
, info
.len
);
522 block_allocator_init();
526 if (reserve_inodes(0, 10) == EXT4_ALLOCATE_FAILED
)
527 error("failed to reserve first 10 inodes");
529 if (info
.feat_compat
& EXT4_FEATURE_COMPAT_HAS_JOURNAL
)
530 ext4_create_journal_inode();
532 if (info
.feat_compat
& EXT4_FEATURE_COMPAT_RESIZE_INODE
)
533 ext4_create_resize_inode();
536 // Windows needs only 'create an empty fs image' functionality
538 root_inode_num
= build_default_directory_structure(mountpoint
);
541 root_inode_num
= build_directory_structure(directory
, mountpoint
, 0,
542 fs_config_func
, verbose
, fixed_time
);
544 root_inode_num
= build_default_directory_structure(mountpoint
);
547 root_mode
= S_IRWXU
| S_IRGRP
| S_IXGRP
| S_IROTH
| S_IXOTH
;
548 inode_set_permissions(root_inode_num
, root_mode
, 0, 0, 0);
554 if (block_list_file
) {
555 size_t dirlen
= directory
? strlen(directory
) : 0;
556 struct block_allocation
* p
= get_saved_allocation_chain();
558 if (directory
&& strncmp(p
->filename
, directory
, dirlen
) == 0) {
559 // substitute mountpoint for the leading directory in the filename, in the output file
560 fprintf(block_list_file
, "%s%s", mountpoint
, p
->filename
+ dirlen
);
562 fprintf(block_list_file
, "%s", p
->filename
);
564 print_blocks(block_list_file
, p
);
565 struct block_allocation
* pn
= p
->next
;
571 printf("Created filesystem with %d/%d inodes and %d/%d blocks\n",
572 aux_info
.sb
->s_inodes_count
- aux_info
.sb
->s_free_inodes_count
,
573 aux_info
.sb
->s_inodes_count
,
574 aux_info
.sb
->s_blocks_count_lo
- aux_info
.sb
->s_free_blocks_count_lo
,
575 aux_info
.sb
->s_blocks_count_lo
);
577 if (wipe
&& WIPE_IS_SUPPORTED
) {
578 wipe_block_device(fd
, info
.len
);
581 write_ext4_image(fd
, gzip
, sparse
, crc
);
583 sparse_file_destroy(ext4_sparse_file
);
584 ext4_sparse_file
= NULL
;