2 * Copyright (c) 1995 - 2001 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 #include <sys/types.h>
54 static void do_dir(const char *);
55 static void repeat_dir(const char *);
58 do_dir(const char *dirname
)
62 ret
= chdir (dirname
);
64 err (1, "chdir %s", dirname
);
72 read_and_truncate (const char *filename
, const struct stat
*sb
)
79 buf
= malloc (sb
->st_size
);
81 err (1, "malloc %lu", (unsigned long)sb
->st_size
);
82 fd
= open (filename
, O_RDONLY
);
84 err (1, "open readonly %s", filename
);
85 ret
= read (fd
, buf
, sb
->st_size
);
87 err (1, "read %s", filename
);
88 if (ret
!= sb
->st_size
)
89 errx (1, "short read from %s", filename
);
91 err (1, "close reading %s", filename
);
92 fd
= open (filename
, O_WRONLY
| O_TRUNC
, 0);
94 err(1, "open wronly-trunc %s", filename
);
95 ret
= write (fd
, buf
, sb
->st_size
);
97 err (1, "write %s", filename
);
98 if (ret
!= sb
->st_size
)
99 errx (1, "short write %s", filename
);
101 err (1, "close writing %s", filename
);
102 ret
= lstat (filename
, &sb2
);
104 err (1, "stat %s", filename
);
105 if (sb2
.st_size
!= sb
->st_size
)
106 errx (1, "wrong size after re-writing %s: %lu != %lu",
108 (unsigned long)sb
->st_size
, (unsigned long)sb2
.st_size
);
113 repeat_dir (const char *dirname
)
120 err(1, "opendir %s", dirname
);
121 while ((dp
= readdir (dir
)) != NULL
) {
125 if (strcmp (dp
->d_name
, ".") == 0
126 || strcmp (dp
->d_name
, "..") == 0)
129 ret
= lstat (dp
->d_name
, &sb
);
131 err (1, "lstat %s", dp
->d_name
);
132 if (S_ISDIR(sb
.st_mode
))
134 else if (S_ISREG(sb
.st_mode
))
135 read_and_truncate (dp
->d_name
, &sb
);
142 main(int argc
, char **argv
)
144 setprogname (argv
[0]);
147 errx (1, "usage: %s directory", argv
[0]);