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>
49 static void do_dir(const char *);
50 static void repeat_dir(const char *);
53 do_dir(const char *dirname
)
59 err(1, "chdir %s", dirname
);
67 read_and_truncate(const char *filename
, const struct stat
*sb
)
74 buf
= malloc(sb
->st_size
);
76 err(1, "malloc %lu", (unsigned long)sb
->st_size
);
77 fd
= open(filename
, O_RDONLY
);
79 err(1, "open readonly %s", filename
);
80 ret
= read(fd
, buf
, sb
->st_size
);
82 err(1, "read %s", filename
);
83 if (ret
!= sb
->st_size
)
84 errx(1, "short read from %s", filename
);
86 err(1, "close reading %s", filename
);
87 fd
= open(filename
, O_WRONLY
| O_TRUNC
, 0);
89 err(1, "open wronly-trunc %s", filename
);
90 ret
= write(fd
, buf
, sb
->st_size
);
92 err(1, "write %s", filename
);
93 if (ret
!= sb
->st_size
)
94 errx(1, "short write %s", filename
);
96 err(1, "close writing %s", filename
);
97 ret
= lstat(filename
, &sb2
);
99 err(1, "stat %s", filename
);
100 if (sb2
.st_size
!= sb
->st_size
)
101 errx(1, "wrong size after re-writing %s: %lu != %lu", filename
,
102 (unsigned long)sb
->st_size
, (unsigned long)sb2
.st_size
);
107 repeat_dir(const char *dirname
)
114 err(1, "opendir %s", dirname
);
115 while ((dp
= readdir(dir
)) != NULL
) {
119 if (strcmp(dp
->d_name
, ".") == 0 || strcmp(dp
->d_name
, "..") == 0)
122 ret
= lstat(dp
->d_name
, &sb
);
124 err(1, "lstat %s", dp
->d_name
);
125 if (S_ISDIR(sb
.st_mode
))
127 else if (S_ISREG(sb
.st_mode
))
128 read_and_truncate(dp
->d_name
, &sb
);
135 main(int argc
, char **argv
)
139 errx(1, "usage: %s directory", argv
[0]);