| File: | src/usr.bin/du/du.c |
| Warning: | line 123, column 2 Value stored to 'argc' is never read |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* $OpenBSD: du.c,v 1.32 2016/08/24 03:13:45 guenther Exp $ */ |
| 2 | /* $NetBSD: du.c,v 1.11 1996/10/18 07:20:35 thorpej Exp $ */ |
| 3 | |
| 4 | /* |
| 5 | * Copyright (c) 1989, 1993, 1994 |
| 6 | * The Regents of the University of California. All rights reserved. |
| 7 | * |
| 8 | * This code is derived from software contributed to Berkeley by |
| 9 | * Chris Newcomb. |
| 10 | * |
| 11 | * Redistribution and use in source and binary forms, with or without |
| 12 | * modification, are permitted provided that the following conditions |
| 13 | * are met: |
| 14 | * 1. Redistributions of source code must retain the above copyright |
| 15 | * notice, this list of conditions and the following disclaimer. |
| 16 | * 2. Redistributions in binary form must reproduce the above copyright |
| 17 | * notice, this list of conditions and the following disclaimer in the |
| 18 | * documentation and/or other materials provided with the distribution. |
| 19 | * 3. Neither the name of the University nor the names of its contributors |
| 20 | * may be used to endorse or promote products derived from this software |
| 21 | * without specific prior written permission. |
| 22 | * |
| 23 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
| 24 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| 25 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| 26 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
| 27 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| 28 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| 29 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| 30 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| 31 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| 32 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| 33 | * SUCH DAMAGE. |
| 34 | */ |
| 35 | |
| 36 | #include <sys/types.h> |
| 37 | #include <sys/stat.h> |
| 38 | |
| 39 | #include <dirent.h> |
| 40 | #include <err.h> |
| 41 | #include <errno(*__errno()).h> |
| 42 | #include <fts.h> |
| 43 | #include <limits.h> |
| 44 | #include <stdio.h> |
| 45 | #include <stdlib.h> |
| 46 | #include <string.h> |
| 47 | #include <sys/tree.h> |
| 48 | #include <unistd.h> |
| 49 | #include <util.h> |
| 50 | |
| 51 | |
| 52 | int linkchk(FTSENT *); |
| 53 | void prtout(int64_t, char *, int); |
| 54 | void usage(void); |
| 55 | |
| 56 | int |
| 57 | main(int argc, char *argv[]) |
| 58 | { |
| 59 | FTS *fts; |
| 60 | FTSENT *p; |
| 61 | long blocksize; |
| 62 | int64_t totalblocks; |
| 63 | int ftsoptions, listfiles, maxdepth; |
| 64 | int Hflag, Lflag, cflag, hflag, kflag; |
| 65 | int ch, notused, rval; |
| 66 | char **save; |
| 67 | const char *errstr; |
| 68 | |
| 69 | if (pledge("stdio rpath", NULL((void *)0)) == -1) |
| 70 | err(1, "pledge"); |
| 71 | |
| 72 | save = argv; |
| 73 | Hflag = Lflag = cflag = hflag = kflag = listfiles = 0; |
| 74 | totalblocks = 0; |
| 75 | ftsoptions = FTS_PHYSICAL0x0010; |
| 76 | maxdepth = -1; |
| 77 | while ((ch = getopt(argc, argv, "HLPacd:hkrsx")) != -1) |
| 78 | switch (ch) { |
| 79 | case 'H': |
| 80 | Hflag = 1; |
| 81 | Lflag = 0; |
| 82 | break; |
| 83 | case 'L': |
| 84 | Lflag = 1; |
| 85 | Hflag = 0; |
| 86 | break; |
| 87 | case 'P': |
| 88 | Hflag = Lflag = 0; |
| 89 | break; |
| 90 | case 'a': |
| 91 | listfiles = 1; |
| 92 | break; |
| 93 | case 'c': |
| 94 | cflag = 1; |
| 95 | break; |
| 96 | case 'd': |
| 97 | maxdepth = strtonum(optarg, 0, INT_MAX2147483647, &errstr); |
| 98 | if (errstr) { |
| 99 | warnx("max depth %s: %s", optarg, errstr); |
| 100 | usage(); |
| 101 | } |
| 102 | break; |
| 103 | case 'h': |
| 104 | hflag = 1; |
| 105 | kflag = 0; |
| 106 | break; |
| 107 | case 'k': |
| 108 | kflag = 1; |
| 109 | hflag = 0; |
| 110 | break; |
| 111 | case 's': |
| 112 | maxdepth = 0; |
| 113 | break; |
| 114 | case 'r': |
| 115 | break; |
| 116 | case 'x': |
| 117 | ftsoptions |= FTS_XDEV0x0040; |
| 118 | break; |
| 119 | case '?': |
| 120 | default: |
| 121 | usage(); |
| 122 | } |
| 123 | argc -= optind; |
Value stored to 'argc' is never read | |
| 124 | argv += optind; |
| 125 | |
| 126 | /* |
| 127 | * XXX |
| 128 | * Because of the way that fts(3) works, logical walks will not count |
| 129 | * the blocks actually used by symbolic links. We rationalize this by |
| 130 | * noting that users computing logical sizes are likely to do logical |
| 131 | * copies, so not counting the links is correct. The real reason is |
| 132 | * that we'd have to re-implement the kernel's symbolic link traversing |
| 133 | * algorithm to get this right. If, for example, you have relative |
| 134 | * symbolic links referencing other relative symbolic links, it gets |
| 135 | * very nasty, very fast. The bottom line is that it's documented in |
| 136 | * the man page, so it's a feature. |
| 137 | */ |
| 138 | if (Hflag) |
| 139 | ftsoptions |= FTS_COMFOLLOW0x0001; |
| 140 | if (Lflag) { |
| 141 | ftsoptions &= ~FTS_PHYSICAL0x0010; |
| 142 | ftsoptions |= FTS_LOGICAL0x0002; |
| 143 | } |
| 144 | |
| 145 | if (maxdepth == -1) |
| 146 | maxdepth = INT_MAX2147483647; |
| 147 | |
| 148 | if (!*argv) { |
| 149 | argv = save; |
| 150 | argv[0] = "."; |
| 151 | argv[1] = NULL((void *)0); |
| 152 | } |
| 153 | |
| 154 | if (hflag) |
| 155 | blocksize = 512; |
| 156 | else if (kflag) |
| 157 | blocksize = 1024; |
| 158 | else |
| 159 | (void)getbsize(¬used, &blocksize); |
| 160 | blocksize /= 512; |
| 161 | |
| 162 | if ((fts = fts_open(argv, ftsoptions, NULL((void *)0))) == NULL((void *)0)) |
| 163 | err(1, "fts_open"); |
| 164 | |
| 165 | for (rval = 0; (p = fts_read(fts)) != NULL((void *)0);) |
| 166 | switch (p->fts_info) { |
| 167 | case FTS_D1: /* Ignore. */ |
| 168 | break; |
| 169 | case FTS_DP6: |
| 170 | p->fts_parent->fts_number += |
| 171 | p->fts_number += p->fts_statp->st_blocks; |
| 172 | if (cflag) |
| 173 | totalblocks += p->fts_statp->st_blocks; |
| 174 | /* |
| 175 | * If listing each directory, or not listing files |
| 176 | * or directories and this is post-order of the |
| 177 | * root of a traversal, display the total. |
| 178 | */ |
| 179 | if (p->fts_level <= maxdepth) |
| 180 | prtout(howmany(p->fts_number,(((p->fts_number) + (((unsigned long)blocksize) - 1)) / (( unsigned long)blocksize)) |
| 181 | (unsigned long)blocksize)(((p->fts_number) + (((unsigned long)blocksize) - 1)) / (( unsigned long)blocksize)), p->fts_path, |
| 182 | hflag); |
| 183 | break; |
| 184 | case FTS_DC2: /* Ignore. */ |
| 185 | break; |
| 186 | case FTS_DNR4: /* Warn, continue. */ |
| 187 | case FTS_ERR7: |
| 188 | case FTS_NS10: |
| 189 | warnc(p->fts_errno, "%s", p->fts_path); |
| 190 | rval = 1; |
| 191 | break; |
| 192 | default: |
| 193 | if (p->fts_statp->st_nlink > 1 && linkchk(p)) |
| 194 | break; |
| 195 | /* |
| 196 | * If listing each file, or a non-directory file was |
| 197 | * the root of a traversal, display the total. |
| 198 | */ |
| 199 | if ((listfiles && p->fts_level <= maxdepth) || |
| 200 | p->fts_level == FTS_ROOTLEVEL0) |
| 201 | prtout(howmany(p->fts_statp->st_blocks,(((p->fts_statp->st_blocks) + ((blocksize) - 1)) / (blocksize )) |
| 202 | blocksize)(((p->fts_statp->st_blocks) + ((blocksize) - 1)) / (blocksize )), p->fts_path, hflag); |
| 203 | p->fts_parent->fts_number += p->fts_statp->st_blocks; |
| 204 | if (cflag) |
| 205 | totalblocks += p->fts_statp->st_blocks; |
| 206 | } |
| 207 | if (errno(*__errno())) |
| 208 | err(1, "fts_read"); |
| 209 | if (cflag) { |
| 210 | prtout(howmany(totalblocks, blocksize)(((totalblocks) + ((blocksize) - 1)) / (blocksize)), "total", hflag); |
| 211 | } |
| 212 | fts_close(fts); |
| 213 | exit(rval); |
| 214 | } |
| 215 | |
| 216 | |
| 217 | struct links_entry { |
| 218 | RB_ENTRY(links_entry)struct { struct links_entry *rbe_left; struct links_entry *rbe_right ; struct links_entry *rbe_parent; int rbe_color; } entry; |
| 219 | struct links_entry *fnext; |
| 220 | int links; |
| 221 | dev_t dev; |
| 222 | ino_t ino; |
| 223 | }; |
| 224 | |
| 225 | static int |
| 226 | links_cmp(struct links_entry *e1, struct links_entry *e2) |
| 227 | { |
| 228 | if (e1->dev == e2->dev) { |
| 229 | if (e1->ino == e2->ino) |
| 230 | return (0); |
| 231 | else |
| 232 | return (e1->ino < e2->ino ? -1 : 1); |
| 233 | } |
| 234 | else |
| 235 | return (e1->dev < e2->dev ? -1 : 1); |
| 236 | } |
| 237 | |
| 238 | RB_HEAD(ltree, links_entry)struct ltree { struct links_entry *rbh_root; } links = RB_INITIALIZER(&links){ ((void *)0) }; |
| 239 | |
| 240 | RB_GENERATE_STATIC(ltree, links_entry, entry, links_cmp)__attribute__((__unused__)) static void ltree_RB_INSERT_COLOR (struct ltree *head, struct links_entry *elm) { struct links_entry *parent, *gparent, *tmp; while ((parent = (elm)->entry.rbe_parent ) && (parent)->entry.rbe_color == 1) { gparent = ( parent)->entry.rbe_parent; if (parent == (gparent)->entry .rbe_left) { tmp = (gparent)->entry.rbe_right; if (tmp && (tmp)->entry.rbe_color == 1) { (tmp)->entry.rbe_color = 0; do { (parent)->entry.rbe_color = 0; (gparent)->entry .rbe_color = 1; } while (0); elm = gparent; continue; } if (( parent)->entry.rbe_right == elm) { do { (tmp) = (parent)-> entry.rbe_right; if (((parent)->entry.rbe_right = (tmp)-> entry.rbe_left)) { ((tmp)->entry.rbe_left)->entry.rbe_parent = (parent); } do {} while (0); if (((tmp)->entry.rbe_parent = (parent)->entry.rbe_parent)) { if ((parent) == ((parent )->entry.rbe_parent)->entry.rbe_left) ((parent)->entry .rbe_parent)->entry.rbe_left = (tmp); else ((parent)->entry .rbe_parent)->entry.rbe_right = (tmp); } else (head)->rbh_root = (tmp); (tmp)->entry.rbe_left = (parent); (parent)->entry .rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent )) do {} while (0); } while (0); tmp = parent; parent = elm; elm = tmp; } do { (parent)->entry.rbe_color = 0; (gparent)-> entry.rbe_color = 1; } while (0); do { (tmp) = (gparent)-> entry.rbe_left; if (((gparent)->entry.rbe_left = (tmp)-> entry.rbe_right)) { ((tmp)->entry.rbe_right)->entry.rbe_parent = (gparent); } do {} while (0); if (((tmp)->entry.rbe_parent = (gparent)->entry.rbe_parent)) { if ((gparent) == ((gparent )->entry.rbe_parent)->entry.rbe_left) ((gparent)->entry .rbe_parent)->entry.rbe_left = (tmp); else ((gparent)-> entry.rbe_parent)->entry.rbe_right = (tmp); } else (head)-> rbh_root = (tmp); (tmp)->entry.rbe_right = (gparent); (gparent )->entry.rbe_parent = (tmp); do {} while (0); if (((tmp)-> entry.rbe_parent)) do {} while (0); } while (0); } else { tmp = (gparent)->entry.rbe_left; if (tmp && (tmp)-> entry.rbe_color == 1) { (tmp)->entry.rbe_color = 0; do { ( parent)->entry.rbe_color = 0; (gparent)->entry.rbe_color = 1; } while (0); elm = gparent; continue; } if ((parent)-> entry.rbe_left == elm) { do { (tmp) = (parent)->entry.rbe_left ; if (((parent)->entry.rbe_left = (tmp)->entry.rbe_right )) { ((tmp)->entry.rbe_right)->entry.rbe_parent = (parent ); } do {} while (0); if (((tmp)->entry.rbe_parent = (parent )->entry.rbe_parent)) { if ((parent) == ((parent)->entry .rbe_parent)->entry.rbe_left) ((parent)->entry.rbe_parent )->entry.rbe_left = (tmp); else ((parent)->entry.rbe_parent )->entry.rbe_right = (tmp); } else (head)->rbh_root = ( tmp); (tmp)->entry.rbe_right = (parent); (parent)->entry .rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent )) do {} while (0); } while (0); tmp = parent; parent = elm; elm = tmp; } do { (parent)->entry.rbe_color = 0; (gparent)-> entry.rbe_color = 1; } while (0); do { (tmp) = (gparent)-> entry.rbe_right; if (((gparent)->entry.rbe_right = (tmp)-> entry.rbe_left)) { ((tmp)->entry.rbe_left)->entry.rbe_parent = (gparent); } do {} while (0); if (((tmp)->entry.rbe_parent = (gparent)->entry.rbe_parent)) { if ((gparent) == ((gparent )->entry.rbe_parent)->entry.rbe_left) ((gparent)->entry .rbe_parent)->entry.rbe_left = (tmp); else ((gparent)-> entry.rbe_parent)->entry.rbe_right = (tmp); } else (head)-> rbh_root = (tmp); (tmp)->entry.rbe_left = (gparent); (gparent )->entry.rbe_parent = (tmp); do {} while (0); if (((tmp)-> entry.rbe_parent)) do {} while (0); } while (0); } } (head-> rbh_root)->entry.rbe_color = 0; } __attribute__((__unused__ )) static void ltree_RB_REMOVE_COLOR(struct ltree *head, struct links_entry *parent, struct links_entry *elm) { struct links_entry *tmp; while ((elm == ((void *)0) || (elm)->entry.rbe_color == 0) && elm != (head)->rbh_root) { if ((parent)-> entry.rbe_left == elm) { tmp = (parent)->entry.rbe_right; if ((tmp)->entry.rbe_color == 1) { do { (tmp)->entry.rbe_color = 0; (parent)->entry.rbe_color = 1; } while (0); do { (tmp ) = (parent)->entry.rbe_right; if (((parent)->entry.rbe_right = (tmp)->entry.rbe_left)) { ((tmp)->entry.rbe_left)-> entry.rbe_parent = (parent); } do {} while (0); if (((tmp)-> entry.rbe_parent = (parent)->entry.rbe_parent)) { if ((parent ) == ((parent)->entry.rbe_parent)->entry.rbe_left) ((parent )->entry.rbe_parent)->entry.rbe_left = (tmp); else ((parent )->entry.rbe_parent)->entry.rbe_right = (tmp); } else ( head)->rbh_root = (tmp); (tmp)->entry.rbe_left = (parent ); (parent)->entry.rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent)) do {} while (0); } while (0); tmp = (parent)->entry.rbe_right; } if (((tmp)->entry.rbe_left == ((void *)0) || ((tmp)->entry.rbe_left)->entry.rbe_color == 0) && ((tmp)->entry.rbe_right == ((void *)0) || ((tmp)->entry.rbe_right)->entry.rbe_color == 0)) { (tmp )->entry.rbe_color = 1; elm = parent; parent = (elm)->entry .rbe_parent; } else { if ((tmp)->entry.rbe_right == ((void *)0) || ((tmp)->entry.rbe_right)->entry.rbe_color == 0 ) { struct links_entry *oleft; if ((oleft = (tmp)->entry.rbe_left )) (oleft)->entry.rbe_color = 0; (tmp)->entry.rbe_color = 1; do { (oleft) = (tmp)->entry.rbe_left; if (((tmp)-> entry.rbe_left = (oleft)->entry.rbe_right)) { ((oleft)-> entry.rbe_right)->entry.rbe_parent = (tmp); } do {} while ( 0); if (((oleft)->entry.rbe_parent = (tmp)->entry.rbe_parent )) { if ((tmp) == ((tmp)->entry.rbe_parent)->entry.rbe_left ) ((tmp)->entry.rbe_parent)->entry.rbe_left = (oleft); else ((tmp)->entry.rbe_parent)->entry.rbe_right = (oleft); } else (head)->rbh_root = (oleft); (oleft)->entry.rbe_right = (tmp); (tmp)->entry.rbe_parent = (oleft); do {} while ( 0); if (((oleft)->entry.rbe_parent)) do {} while (0); } while (0); tmp = (parent)->entry.rbe_right; } (tmp)->entry.rbe_color = (parent)->entry.rbe_color; (parent)->entry.rbe_color = 0; if ((tmp)->entry.rbe_right) ((tmp)->entry.rbe_right )->entry.rbe_color = 0; do { (tmp) = (parent)->entry.rbe_right ; if (((parent)->entry.rbe_right = (tmp)->entry.rbe_left )) { ((tmp)->entry.rbe_left)->entry.rbe_parent = (parent ); } do {} while (0); if (((tmp)->entry.rbe_parent = (parent )->entry.rbe_parent)) { if ((parent) == ((parent)->entry .rbe_parent)->entry.rbe_left) ((parent)->entry.rbe_parent )->entry.rbe_left = (tmp); else ((parent)->entry.rbe_parent )->entry.rbe_right = (tmp); } else (head)->rbh_root = ( tmp); (tmp)->entry.rbe_left = (parent); (parent)->entry .rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent )) do {} while (0); } while (0); elm = (head)->rbh_root; break ; } } else { tmp = (parent)->entry.rbe_left; if ((tmp)-> entry.rbe_color == 1) { do { (tmp)->entry.rbe_color = 0; ( parent)->entry.rbe_color = 1; } while (0); do { (tmp) = (parent )->entry.rbe_left; if (((parent)->entry.rbe_left = (tmp )->entry.rbe_right)) { ((tmp)->entry.rbe_right)->entry .rbe_parent = (parent); } do {} while (0); if (((tmp)->entry .rbe_parent = (parent)->entry.rbe_parent)) { if ((parent) == ((parent)->entry.rbe_parent)->entry.rbe_left) ((parent )->entry.rbe_parent)->entry.rbe_left = (tmp); else ((parent )->entry.rbe_parent)->entry.rbe_right = (tmp); } else ( head)->rbh_root = (tmp); (tmp)->entry.rbe_right = (parent ); (parent)->entry.rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent)) do {} while (0); } while (0); tmp = (parent)->entry.rbe_left; } if (((tmp)->entry.rbe_left == ((void *)0) || ((tmp)->entry.rbe_left)->entry.rbe_color == 0) && ((tmp)->entry.rbe_right == ((void *)0) || ((tmp)->entry.rbe_right)->entry.rbe_color == 0)) { (tmp )->entry.rbe_color = 1; elm = parent; parent = (elm)->entry .rbe_parent; } else { if ((tmp)->entry.rbe_left == ((void * )0) || ((tmp)->entry.rbe_left)->entry.rbe_color == 0) { struct links_entry *oright; if ((oright = (tmp)->entry.rbe_right )) (oright)->entry.rbe_color = 0; (tmp)->entry.rbe_color = 1; do { (oright) = (tmp)->entry.rbe_right; if (((tmp)-> entry.rbe_right = (oright)->entry.rbe_left)) { ((oright)-> entry.rbe_left)->entry.rbe_parent = (tmp); } do {} while ( 0); if (((oright)->entry.rbe_parent = (tmp)->entry.rbe_parent )) { if ((tmp) == ((tmp)->entry.rbe_parent)->entry.rbe_left ) ((tmp)->entry.rbe_parent)->entry.rbe_left = (oright); else ((tmp)->entry.rbe_parent)->entry.rbe_right = (oright ); } else (head)->rbh_root = (oright); (oright)->entry. rbe_left = (tmp); (tmp)->entry.rbe_parent = (oright); do { } while (0); if (((oright)->entry.rbe_parent)) do {} while (0); } while (0); tmp = (parent)->entry.rbe_left; } (tmp) ->entry.rbe_color = (parent)->entry.rbe_color; (parent) ->entry.rbe_color = 0; if ((tmp)->entry.rbe_left) ((tmp )->entry.rbe_left)->entry.rbe_color = 0; do { (tmp) = ( parent)->entry.rbe_left; if (((parent)->entry.rbe_left = (tmp)->entry.rbe_right)) { ((tmp)->entry.rbe_right)-> entry.rbe_parent = (parent); } do {} while (0); if (((tmp)-> entry.rbe_parent = (parent)->entry.rbe_parent)) { if ((parent ) == ((parent)->entry.rbe_parent)->entry.rbe_left) ((parent )->entry.rbe_parent)->entry.rbe_left = (tmp); else ((parent )->entry.rbe_parent)->entry.rbe_right = (tmp); } else ( head)->rbh_root = (tmp); (tmp)->entry.rbe_right = (parent ); (parent)->entry.rbe_parent = (tmp); do {} while (0); if (((tmp)->entry.rbe_parent)) do {} while (0); } while (0); elm = (head)->rbh_root; break; } } } if (elm) (elm)->entry .rbe_color = 0; } __attribute__((__unused__)) static struct links_entry * ltree_RB_REMOVE(struct ltree *head, struct links_entry *elm ) { struct links_entry *child, *parent, *old = elm; int color ; if ((elm)->entry.rbe_left == ((void *)0)) child = (elm)-> entry.rbe_right; else if ((elm)->entry.rbe_right == ((void *)0)) child = (elm)->entry.rbe_left; else { struct links_entry *left; elm = (elm)->entry.rbe_right; while ((left = (elm) ->entry.rbe_left)) elm = left; child = (elm)->entry.rbe_right ; parent = (elm)->entry.rbe_parent; color = (elm)->entry .rbe_color; if (child) (child)->entry.rbe_parent = parent; if (parent) { if ((parent)->entry.rbe_left == elm) (parent )->entry.rbe_left = child; else (parent)->entry.rbe_right = child; do {} while (0); } else (head)->rbh_root = child ; if ((elm)->entry.rbe_parent == old) parent = elm; (elm)-> entry = (old)->entry; if ((old)->entry.rbe_parent) { if (((old)->entry.rbe_parent)->entry.rbe_left == old) ((old )->entry.rbe_parent)->entry.rbe_left = elm; else ((old) ->entry.rbe_parent)->entry.rbe_right = elm; do {} while (0); } else (head)->rbh_root = elm; ((old)->entry.rbe_left )->entry.rbe_parent = elm; if ((old)->entry.rbe_right) ( (old)->entry.rbe_right)->entry.rbe_parent = elm; if (parent ) { left = parent; do { do {} while (0); } while ((left = (left )->entry.rbe_parent)); } goto color; } parent = (elm)-> entry.rbe_parent; color = (elm)->entry.rbe_color; if (child ) (child)->entry.rbe_parent = parent; if (parent) { if ((parent )->entry.rbe_left == elm) (parent)->entry.rbe_left = child ; else (parent)->entry.rbe_right = child; do {} while (0); } else (head)->rbh_root = child; color: if (color == 0) ltree_RB_REMOVE_COLOR (head, parent, child); return (old); } __attribute__((__unused__ )) static struct links_entry * ltree_RB_INSERT(struct ltree * head, struct links_entry *elm) { struct links_entry *tmp; struct links_entry *parent = ((void *)0); int comp = 0; tmp = (head )->rbh_root; while (tmp) { parent = tmp; comp = (links_cmp )(elm, parent); if (comp < 0) tmp = (tmp)->entry.rbe_left ; else if (comp > 0) tmp = (tmp)->entry.rbe_right; else return (tmp); } do { (elm)->entry.rbe_parent = parent; (elm )->entry.rbe_left = (elm)->entry.rbe_right = ((void *)0 ); (elm)->entry.rbe_color = 1; } while (0); if (parent != ( (void *)0)) { if (comp < 0) (parent)->entry.rbe_left = elm ; else (parent)->entry.rbe_right = elm; do {} while (0); } else (head)->rbh_root = elm; ltree_RB_INSERT_COLOR(head, elm ); return (((void *)0)); } __attribute__((__unused__)) static struct links_entry * ltree_RB_FIND(struct ltree *head, struct links_entry *elm) { struct links_entry *tmp = (head)->rbh_root ; int comp; while (tmp) { comp = links_cmp(elm, tmp); if (comp < 0) tmp = (tmp)->entry.rbe_left; else if (comp > 0 ) tmp = (tmp)->entry.rbe_right; else return (tmp); } return (((void *)0)); } __attribute__((__unused__)) static struct links_entry * ltree_RB_NFIND(struct ltree *head, struct links_entry *elm ) { struct links_entry *tmp = (head)->rbh_root; struct links_entry *res = ((void *)0); int comp; while (tmp) { comp = links_cmp (elm, tmp); if (comp < 0) { res = tmp; tmp = (tmp)->entry .rbe_left; } else if (comp > 0) tmp = (tmp)->entry.rbe_right ; else return (tmp); } return (res); } __attribute__((__unused__ )) static struct links_entry * ltree_RB_NEXT(struct links_entry *elm) { if ((elm)->entry.rbe_right) { elm = (elm)->entry .rbe_right; while ((elm)->entry.rbe_left) elm = (elm)-> entry.rbe_left; } else { if ((elm)->entry.rbe_parent && (elm == ((elm)->entry.rbe_parent)->entry.rbe_left)) elm = (elm)->entry.rbe_parent; else { while ((elm)->entry. rbe_parent && (elm == ((elm)->entry.rbe_parent)-> entry.rbe_right)) elm = (elm)->entry.rbe_parent; elm = (elm )->entry.rbe_parent; } } return (elm); } __attribute__((__unused__ )) static struct links_entry * ltree_RB_PREV(struct links_entry *elm) { if ((elm)->entry.rbe_left) { elm = (elm)->entry .rbe_left; while ((elm)->entry.rbe_right) elm = (elm)-> entry.rbe_right; } else { if ((elm)->entry.rbe_parent && (elm == ((elm)->entry.rbe_parent)->entry.rbe_right)) elm = (elm)->entry.rbe_parent; else { while ((elm)->entry. rbe_parent && (elm == ((elm)->entry.rbe_parent)-> entry.rbe_left)) elm = (elm)->entry.rbe_parent; elm = (elm )->entry.rbe_parent; } } return (elm); } __attribute__((__unused__ )) static struct links_entry * ltree_RB_MINMAX(struct ltree * head, int val) { struct links_entry *tmp = (head)->rbh_root ; struct links_entry *parent = ((void *)0); while (tmp) { parent = tmp; if (val < 0) tmp = (tmp)->entry.rbe_left; else tmp = (tmp)->entry.rbe_right; } return (parent); }; |
| 241 | |
| 242 | |
| 243 | int |
| 244 | linkchk(FTSENT *p) |
| 245 | { |
| 246 | static struct links_entry *free_list = NULL((void *)0); |
| 247 | static int stop_allocating = 0; |
| 248 | struct links_entry ltmp, *le; |
| 249 | struct stat *st; |
| 250 | |
| 251 | st = p->fts_statp; |
| 252 | |
| 253 | ltmp.ino = st->st_ino; |
| 254 | ltmp.dev = st->st_dev; |
| 255 | |
| 256 | le = RB_FIND(ltree, &links, <mp)ltree_RB_FIND(&links, <mp); |
| 257 | if (le != NULL((void *)0)) { |
| 258 | /* |
| 259 | * Save memory by releasing an entry when we've seen |
| 260 | * all of it's links. |
| 261 | */ |
| 262 | if (--le->links <= 0) { |
| 263 | RB_REMOVE(ltree, &links, le)ltree_RB_REMOVE(&links, le); |
| 264 | /* Recycle this node through the free list */ |
| 265 | if (stop_allocating) { |
| 266 | free(le); |
| 267 | } else { |
| 268 | le->fnext = free_list; |
| 269 | free_list = le; |
| 270 | } |
| 271 | } |
| 272 | return (1); |
| 273 | } |
| 274 | |
| 275 | if (stop_allocating) |
| 276 | return (0); |
| 277 | |
| 278 | /* Add this entry to the links cache. */ |
| 279 | if (free_list != NULL((void *)0)) { |
| 280 | /* Pull a node from the free list if we can. */ |
| 281 | le = free_list; |
| 282 | free_list = le->fnext; |
| 283 | } else |
| 284 | /* Malloc one if we have to. */ |
| 285 | le = malloc(sizeof(struct links_entry)); |
| 286 | |
| 287 | if (le == NULL((void *)0)) { |
| 288 | stop_allocating = 1; |
| 289 | warnx("No more memory for tracking hard links"); |
| 290 | return (0); |
| 291 | } |
| 292 | |
| 293 | le->dev = st->st_dev; |
| 294 | le->ino = st->st_ino; |
| 295 | le->links = st->st_nlink - 1; |
| 296 | le->fnext = NULL((void *)0); |
| 297 | |
| 298 | RB_INSERT(ltree, &links, le)ltree_RB_INSERT(&links, le); |
| 299 | |
| 300 | return (0); |
| 301 | } |
| 302 | |
| 303 | void |
| 304 | prtout(int64_t size, char *path, int hflag) |
| 305 | { |
| 306 | if (!hflag) |
| 307 | (void)printf("%lld\t%s\n", size, path); |
| 308 | else { |
| 309 | char buf[FMT_SCALED_STRSIZE7]; |
| 310 | |
| 311 | if (fmt_scaled(size * 512, buf) == 0) |
| 312 | (void)printf("%s\t%s\n", buf, path); |
| 313 | else |
| 314 | (void)printf("%lld\t%s\n", size, path); |
| 315 | } |
| 316 | } |
| 317 | |
| 318 | void |
| 319 | usage(void) |
| 320 | { |
| 321 | |
| 322 | (void)fprintf(stderr(&__sF[2]), |
| 323 | "usage: du [-achkrsx] [-H | -L | -P] [-d depth] [file ...]\n"); |
| 324 | exit(1); |
| 325 | } |