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], copybuf[4096];
43 int len, homefd, srcfd, destfd;
44 ssize_t sz;
45 struct stat st;
46 struct dirent *e;
47 DIR *d;
48
49 if (*dir == '/')
50 dir++;
51
52 if (mkdirat(rootfd, dir, mode) != 0 && errno != EEXIST) {
53 warn("mkdir(%s)", dir);
54 return;
55 }
56 fchownat(rootfd, dir, uid, gid, AT_SYMLINK_NOFOLLOW);
57 if (flags > 0)
58 chflagsat(rootfd, dir, flags, AT_SYMLINK_NOFOLLOW);
59
60 if (skelfd == -1)
61 return;
62
63 homefd = openat(rootfd, dir, O_DIRECTORY);
64 if ((d = fdopendir(skelfd)) == NULL) {
65 close(skelfd);
66 close(homefd);
67 return;
68 }
69
70 while ((e = readdir(d)) != NULL) {
71 if (strcmp(e->d_name, ".") == 0 || strcmp(e->d_name, "..") == 0)
72 continue;
73
74 p = e->d_name;
75 if (fstatat(skelfd, p, &st, AT_SYMLINK_NOFOLLOW) == -1)
76 continue;
77
78 if (strncmp(p, "dot.", 4) == 0) /* Conversion */
79 p += 3;
80
81 if (S_ISDIR(st.st_mode)) {
82 copymkdir(homefd, p, openat(skelfd, e->d_name, O_DIRECTORY),
83 st.st_mode & _DEF_DIRMODE, uid, gid, st.st_flags);
84 continue;
85 }
86
87 if (S_ISLNK(st.st_mode) &&
88 (len = readlinkat(skelfd, e->d_name, lnk, sizeof(lnk) -1))
89 != -1) {
90 lnk[len] = '\0';
91 symlinkat(lnk, homefd, p);
92 fchownat(homefd, p, uid, gid, AT_SYMLINK_NOFOLLOW);
93 continue;
94 }
95
96 if (!S_ISREG(st.st_mode))
97 continue;
98
99 if ((srcfd = openat(skelfd, e->d_name, O_RDONLY)) == -1)
100 continue;
101 destfd = openat(homefd, p, O_RDWR | O_CREAT | O_EXCL,
102 st.st_mode);
103 if (destfd == -1) {
104 close(srcfd);
105 continue;
106 }
107
108 while ((sz = read(srcfd, copybuf, sizeof(copybuf))) > 0)
109 write(destfd, copybuf, sz);
110
111 close(srcfd);
112 /*
113 * Propagate special filesystem flags
114 */
115 fchown(destfd, uid, gid);
116 fchflags(destfd, st.st_flags);
117 close(destfd);
118 }
119 closedir(d);
120 }
121