1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
3 *
4 * Copyright (C) 1996
5 * David L. Nugent. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY DAVID L. NUGENT AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL DAVID L. NUGENT OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <dirent.h>
30 #include <err.h>
31 #include <errno.h>
32 #include <fcntl.h>
33 #include <string.h>
34 #include <unistd.h>
35
36 #include "pw.h"
37
38 void
copymkdir(int rootfd,char const * dir,int skelfd,mode_t mode,uid_t uid,gid_t gid,int flags)39 copymkdir(int rootfd, char const *dir, int skelfd, mode_t mode, uid_t uid,
40 gid_t gid, int flags)
41 {
42 char *p, lnk[MAXPATHLEN];
43 int len, srcfd, destfd;
44 ssize_t sz;
45 struct stat st;
46 struct dirent *e;
47 DIR *d;
48 mode_t pumask;
49
50 if (*dir == '/')
51 dir++;
52
53 pumask = umask(0);
54 umask(pumask);
55
56 if (mkdirat(rootfd, dir, mode) != 0) {
57
58 if (errno != EEXIST) {
59 warn("mkdir(%s)", dir);
60 return;
61 }
62
63 if (fchmodat(rootfd, dir, mode & ~pumask,
64 AT_SYMLINK_NOFOLLOW) == -1)
65 warn("chmod(%s)", dir);
66 }
67 if (fchownat(rootfd, dir, uid, gid, AT_SYMLINK_NOFOLLOW) == -1)
68 warn("chown(%s)", dir);
69 if (flags > 0 && chflagsat(rootfd, dir, flags,
70 AT_SYMLINK_NOFOLLOW) == -1)
71 warn("chflags(%s)", dir);
72 metalog_emit(dir, (mode | S_IFDIR) & ~pumask, uid, gid, flags);
73
74 if (skelfd == -1)
75 return;
76
77 if ((d = fdopendir(skelfd)) == NULL) {
78 close(skelfd);
79 return;
80 }
81
82 while ((e = readdir(d)) != NULL) {
83 char path[MAXPATHLEN];
84
85 if (strcmp(e->d_name, ".") == 0 || strcmp(e->d_name, "..") == 0)
86 continue;
87
88 p = e->d_name;
89 if (fstatat(skelfd, p, &st, AT_SYMLINK_NOFOLLOW) == -1)
90 continue;
91
92 if (strncmp(p, "dot.", 4) == 0) /* Conversion */
93 p += 3;
94 (void)snprintf(path, sizeof(path), "%s/%s", dir, p);
95
96 if (S_ISDIR(st.st_mode)) {
97 int fd;
98
99 fd = openat(skelfd, e->d_name, O_DIRECTORY);
100 if (fd == -1) {
101 warn("openat(%s)", e->d_name);
102 continue;
103 }
104 copymkdir(rootfd, path, fd, st.st_mode & _DEF_DIRMODE,
105 uid, gid, st.st_flags);
106 continue;
107 }
108
109 if (S_ISLNK(st.st_mode) &&
110 (len = readlinkat(skelfd, e->d_name, lnk, sizeof(lnk) - 1))
111 != -1) {
112 lnk[len] = '\0';
113 if (symlinkat(lnk, rootfd, path) != 0)
114 warn("symlink(%s)", path);
115 else if (fchownat(rootfd, path, uid, gid,
116 AT_SYMLINK_NOFOLLOW) != 0)
117 warn("chown(%s)", path);
118 metalog_emit_symlink(path, lnk, st.st_mode & ~pumask,
119 uid, gid);
120 continue;
121 }
122
123 if (!S_ISREG(st.st_mode))
124 continue;
125
126 if ((srcfd = openat(skelfd, e->d_name, O_RDONLY)) == -1)
127 continue;
128 destfd = openat(rootfd, path, O_RDWR | O_CREAT | O_EXCL,
129 st.st_mode);
130 if (destfd == -1) {
131 close(srcfd);
132 continue;
133 }
134
135 do {
136 sz = copy_file_range(srcfd, NULL, destfd, NULL,
137 SSIZE_MAX, 0);
138 } while (sz > 0);
139 if (sz < 0)
140 warn("copy_file_range");
141
142 close(srcfd);
143 /*
144 * Propagate special filesystem flags
145 */
146 if (fchown(destfd, uid, gid) != 0)
147 warn("chown(%s)", p);
148 if (fchflags(destfd, st.st_flags) != 0)
149 warn("chflags(%s)", p);
150 metalog_emit(path, st.st_mode & ~pumask, uid, gid, st.st_flags);
151 close(destfd);
152 }
153 closedir(d);
154 }
155