ffs_inode.c revision 1.77 1 1.77 yamt /* $NetBSD: ffs_inode.c,v 1.77 2005/11/02 12:39:00 yamt Exp $ */
2 1.5 cgd
3 1.1 mycroft /*
4 1.1 mycroft * Copyright (c) 1982, 1986, 1989, 1993
5 1.1 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 mycroft *
7 1.1 mycroft * Redistribution and use in source and binary forms, with or without
8 1.1 mycroft * modification, are permitted provided that the following conditions
9 1.1 mycroft * are met:
10 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
11 1.1 mycroft * notice, this list of conditions and the following disclaimer.
12 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
14 1.1 mycroft * documentation and/or other materials provided with the distribution.
15 1.60 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 mycroft * may be used to endorse or promote products derived from this software
17 1.1 mycroft * without specific prior written permission.
18 1.1 mycroft *
19 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 mycroft * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 mycroft * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 mycroft * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 mycroft * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 mycroft * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 mycroft * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 mycroft * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 mycroft * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 mycroft * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 mycroft * SUCH DAMAGE.
30 1.1 mycroft *
31 1.18 fvdl * @(#)ffs_inode.c 8.13 (Berkeley) 4/21/95
32 1.1 mycroft */
33 1.46 lukem
34 1.46 lukem #include <sys/cdefs.h>
35 1.77 yamt __KERNEL_RCSID(0, "$NetBSD: ffs_inode.c,v 1.77 2005/11/02 12:39:00 yamt Exp $");
36 1.17 mrg
37 1.41 mrg #if defined(_KERNEL_OPT)
38 1.25 thorpej #include "opt_ffs.h"
39 1.20 scottr #include "opt_quota.h"
40 1.21 scottr #endif
41 1.1 mycroft
42 1.1 mycroft #include <sys/param.h>
43 1.1 mycroft #include <sys/systm.h>
44 1.1 mycroft #include <sys/mount.h>
45 1.1 mycroft #include <sys/proc.h>
46 1.1 mycroft #include <sys/file.h>
47 1.1 mycroft #include <sys/buf.h>
48 1.1 mycroft #include <sys/vnode.h>
49 1.1 mycroft #include <sys/kernel.h>
50 1.1 mycroft #include <sys/malloc.h>
51 1.1 mycroft #include <sys/trace.h>
52 1.1 mycroft #include <sys/resourcevar.h>
53 1.16 mrg
54 1.1 mycroft #include <ufs/ufs/quota.h>
55 1.1 mycroft #include <ufs/ufs/inode.h>
56 1.1 mycroft #include <ufs/ufs/ufsmount.h>
57 1.1 mycroft #include <ufs/ufs/ufs_extern.h>
58 1.19 bouyer #include <ufs/ufs/ufs_bswap.h>
59 1.1 mycroft
60 1.1 mycroft #include <ufs/ffs/fs.h>
61 1.1 mycroft #include <ufs/ffs/ffs_extern.h>
62 1.1 mycroft
63 1.72 thorpej static int ffs_indirtrunc(struct inode *, daddr_t, daddr_t, daddr_t, int,
64 1.72 thorpej int64_t *);
65 1.1 mycroft
66 1.1 mycroft /*
67 1.13 tls * Update the access, modified, and inode change times as specified
68 1.13 tls * by the IN_ACCESS, IN_UPDATE, and IN_CHANGE flags respectively.
69 1.13 tls * The IN_MODIFIED flag is used to specify that the inode needs to be
70 1.13 tls * updated but that the times have already been set. The access
71 1.13 tls * and modified times are taken from the second and third parameters;
72 1.13 tls * the inode change time is always taken from the current time. If
73 1.31 perseant * UPDATE_WAIT flag is set, or UPDATE_DIROP is set and we are not doing
74 1.31 perseant * softupdates, then wait for the disk write of the inode to complete.
75 1.1 mycroft */
76 1.13 tls
77 1.1 mycroft int
78 1.77 yamt ffs_update(struct vnode *vp, const struct timespec *acc,
79 1.77 yamt const struct timespec *mod, int updflags)
80 1.9 christos {
81 1.30 augustss struct fs *fs;
82 1.1 mycroft struct buf *bp;
83 1.1 mycroft struct inode *ip;
84 1.1 mycroft int error;
85 1.24 thorpej caddr_t cp;
86 1.34 mycroft int waitfor, flags;
87 1.1 mycroft
88 1.77 yamt if (vp->v_mount->mnt_flag & MNT_RDONLY)
89 1.11 mycroft return (0);
90 1.77 yamt ip = VTOI(vp);
91 1.77 yamt FFS_ITIMES(ip, acc, mod, NULL);
92 1.77 yamt if (updflags & UPDATE_CLOSE)
93 1.65 mycroft flags = ip->i_flag & (IN_MODIFIED | IN_ACCESSED);
94 1.65 mycroft else
95 1.65 mycroft flags = ip->i_flag & IN_MODIFIED;
96 1.34 mycroft if (flags == 0)
97 1.1 mycroft return (0);
98 1.1 mycroft fs = ip->i_fs;
99 1.31 perseant
100 1.35 mycroft if ((flags & IN_MODIFIED) != 0 &&
101 1.77 yamt (vp->v_mount->mnt_flag & MNT_ASYNC) == 0) {
102 1.77 yamt waitfor = updflags & UPDATE_WAIT;
103 1.77 yamt if ((updflags & UPDATE_DIROP) && !DOINGSOFTDEP(vp))
104 1.35 mycroft waitfor |= UPDATE_WAIT;
105 1.35 mycroft } else
106 1.35 mycroft waitfor = 0;
107 1.31 perseant
108 1.1 mycroft /*
109 1.1 mycroft * Ensure that uid and gid are correct. This is a temporary
110 1.1 mycroft * fix until fsck has been changed to do the update.
111 1.1 mycroft */
112 1.55 fvdl if (fs->fs_magic == FS_UFS1_MAGIC && /* XXX */
113 1.55 fvdl fs->fs_old_inodefmt < FS_44INODEFMT) { /* XXX */
114 1.55 fvdl ip->i_ffs1_ouid = ip->i_uid; /* XXX */
115 1.55 fvdl ip->i_ffs1_ogid = ip->i_gid; /* XXX */
116 1.18 fvdl } /* XXX */
117 1.9 christos error = bread(ip->i_devvp,
118 1.9 christos fsbtodb(fs, ino_to_fsba(fs, ip->i_number)),
119 1.9 christos (int)fs->fs_bsize, NOCRED, &bp);
120 1.9 christos if (error) {
121 1.1 mycroft brelse(bp);
122 1.1 mycroft return (error);
123 1.1 mycroft }
124 1.35 mycroft ip->i_flag &= ~(IN_MODIFIED | IN_ACCESSED);
125 1.77 yamt if (DOINGSOFTDEP(vp))
126 1.31 perseant softdep_update_inodeblock(ip, bp, waitfor);
127 1.55 fvdl else if (ip->i_ffs_effnlink != ip->i_nlink)
128 1.29 fvdl panic("ffs_update: bad link cnt");
129 1.55 fvdl if (fs->fs_magic == FS_UFS1_MAGIC) {
130 1.55 fvdl cp = (caddr_t)bp->b_data +
131 1.55 fvdl (ino_to_fsbo(fs, ip->i_number) * DINODE1_SIZE);
132 1.23 christos #ifdef FFS_EI
133 1.55 fvdl if (UFS_FSNEEDSWAP(fs))
134 1.55 fvdl ffs_dinode1_swap(ip->i_din.ffs1_din,
135 1.55 fvdl (struct ufs1_dinode *)cp);
136 1.55 fvdl else
137 1.55 fvdl #endif
138 1.55 fvdl memcpy(cp, ip->i_din.ffs1_din, DINODE1_SIZE);
139 1.55 fvdl } else {
140 1.55 fvdl cp = (caddr_t)bp->b_data +
141 1.55 fvdl (ino_to_fsbo(fs, ip->i_number) * DINODE2_SIZE);
142 1.55 fvdl #ifdef FFS_EI
143 1.55 fvdl if (UFS_FSNEEDSWAP(fs))
144 1.55 fvdl ffs_dinode2_swap(ip->i_din.ffs2_din,
145 1.55 fvdl (struct ufs2_dinode *)cp);
146 1.55 fvdl else
147 1.23 christos #endif
148 1.55 fvdl memcpy(cp, ip->i_din.ffs2_din, DINODE2_SIZE);
149 1.55 fvdl }
150 1.35 mycroft if (waitfor) {
151 1.1 mycroft return (bwrite(bp));
152 1.29 fvdl } else {
153 1.1 mycroft bdwrite(bp);
154 1.1 mycroft return (0);
155 1.1 mycroft }
156 1.1 mycroft }
157 1.1 mycroft
158 1.1 mycroft #define SINGLE 0 /* index of single indirect block */
159 1.1 mycroft #define DOUBLE 1 /* index of double indirect block */
160 1.1 mycroft #define TRIPLE 2 /* index of triple indirect block */
161 1.1 mycroft /*
162 1.1 mycroft * Truncate the inode oip to at most length size, freeing the
163 1.1 mycroft * disk blocks.
164 1.1 mycroft */
165 1.9 christos int
166 1.77 yamt ffs_truncate(struct vnode *ovp, off_t length, int ioflag, struct ucred *cred,
167 1.77 yamt struct proc *p)
168 1.9 christos {
169 1.43 chs struct genfs_node *gp = VTOG(ovp);
170 1.53 fvdl daddr_t lastblock;
171 1.68 mycroft struct inode *oip = VTOI(ovp);
172 1.53 fvdl daddr_t bn, lastiblock[NIADDR], indir_lbn[NIADDR];
173 1.64 hannken daddr_t blks[NDADDR + NIADDR];
174 1.30 augustss struct fs *fs;
175 1.1 mycroft int offset, size, level;
176 1.55 fvdl int64_t count, blocksreleased = 0;
177 1.77 yamt int i, aflag, nblocks;
178 1.38 chs int error, allerror = 0;
179 1.1 mycroft off_t osize;
180 1.67 mycroft int sync;
181 1.68 mycroft struct ufsmount *ump = oip->i_ump;
182 1.1 mycroft
183 1.2 pk if (length < 0)
184 1.3 mycroft return (EINVAL);
185 1.68 mycroft
186 1.1 mycroft if (ovp->v_type == VLNK &&
187 1.68 mycroft (oip->i_size < ump->um_maxsymlinklen ||
188 1.68 mycroft (ump->um_maxsymlinklen == 0 && DIP(oip, blocks) == 0))) {
189 1.38 chs KDASSERT(length == 0);
190 1.55 fvdl memset(SHORTLINK(oip), 0, (size_t)oip->i_size);
191 1.55 fvdl oip->i_size = 0;
192 1.57 kristerw DIP_ASSIGN(oip, size, 0);
193 1.1 mycroft oip->i_flag |= IN_CHANGE | IN_UPDATE;
194 1.77 yamt return (ffs_update(ovp, NULL, NULL, 0));
195 1.1 mycroft }
196 1.55 fvdl if (oip->i_size == length) {
197 1.1 mycroft oip->i_flag |= IN_CHANGE | IN_UPDATE;
198 1.77 yamt return (ffs_update(ovp, NULL, NULL, 0));
199 1.1 mycroft }
200 1.1 mycroft #ifdef QUOTA
201 1.9 christos if ((error = getinoquota(oip)) != 0)
202 1.1 mycroft return (error);
203 1.1 mycroft #endif
204 1.1 mycroft fs = oip->i_fs;
205 1.68 mycroft if (length > ump->um_maxfilesize)
206 1.38 chs return (EFBIG);
207 1.38 chs
208 1.63 hannken if ((oip->i_flags & SF_SNAPSHOT) != 0)
209 1.63 hannken ffs_snapremove(ovp);
210 1.63 hannken
211 1.55 fvdl osize = oip->i_size;
212 1.50 chs aflag = ioflag & IO_SYNC ? B_SYNC : 0;
213 1.29 fvdl
214 1.38 chs /*
215 1.38 chs * Lengthen the size of the file. We must ensure that the
216 1.38 chs * last byte of the file is allocated. Since the smallest
217 1.38 chs * value of osize is 0, length will be at least 1.
218 1.38 chs */
219 1.38 chs
220 1.38 chs if (osize < length) {
221 1.48 chs if (lblkno(fs, osize) < NDADDR &&
222 1.48 chs lblkno(fs, osize) != lblkno(fs, length) &&
223 1.48 chs blkroundup(fs, osize) != osize) {
224 1.69 mycroft off_t eob;
225 1.69 mycroft
226 1.69 mycroft eob = blkroundup(fs, osize);
227 1.69 mycroft error = ufs_balloc_range(ovp, osize, eob - osize,
228 1.77 yamt cred, aflag);
229 1.68 mycroft if (error)
230 1.48 chs return error;
231 1.48 chs if (ioflag & IO_SYNC) {
232 1.69 mycroft ovp->v_size = eob;
233 1.48 chs simple_lock(&ovp->v_interlock);
234 1.49 chs VOP_PUTPAGES(ovp,
235 1.69 mycroft trunc_page(osize & fs->fs_bmask),
236 1.69 mycroft round_page(eob), PGO_CLEANIT | PGO_SYNCIO);
237 1.48 chs }
238 1.48 chs }
239 1.77 yamt error = ufs_balloc_range(ovp, length - 1, 1, cred, aflag);
240 1.45 chs if (error) {
241 1.77 yamt (void) ffs_truncate(ovp, osize, ioflag & IO_SYNC,
242 1.77 yamt cred, p);
243 1.68 mycroft return (error);
244 1.45 chs }
245 1.43 chs uvm_vnp_setsize(ovp, length);
246 1.38 chs oip->i_flag |= IN_CHANGE | IN_UPDATE;
247 1.55 fvdl KASSERT(ovp->v_size == oip->i_size);
248 1.77 yamt return (ffs_update(ovp, NULL, NULL, 0));
249 1.38 chs }
250 1.38 chs
251 1.38 chs /*
252 1.38 chs * When truncating a regular file down to a non-block-aligned size,
253 1.38 chs * we must zero the part of last block which is past the new EOF.
254 1.38 chs * We must synchronously flush the zeroed pages to disk
255 1.38 chs * since the new pages will be invalidated as soon as we
256 1.38 chs * inform the VM system of the new, smaller size.
257 1.48 chs * We must do this before acquiring the GLOCK, since fetching
258 1.38 chs * the pages will acquire the GLOCK internally.
259 1.38 chs * So there is a window where another thread could see a whole
260 1.38 chs * zeroed page past EOF, but that's life.
261 1.38 chs */
262 1.38 chs
263 1.38 chs offset = blkoff(fs, length);
264 1.70 mycroft if (ovp->v_type == VREG && offset != 0 && osize > length) {
265 1.70 mycroft daddr_t lbn;
266 1.38 chs voff_t eoz;
267 1.38 chs
268 1.77 yamt error = ufs_balloc_range(ovp, length - 1, 1, cred, aflag);
269 1.67 mycroft if (error)
270 1.50 chs return error;
271 1.70 mycroft lbn = lblkno(fs, length);
272 1.70 mycroft size = blksize(fs, oip, lbn);
273 1.70 mycroft eoz = MIN(lblktosize(fs, lbn) + size, osize);
274 1.38 chs uvm_vnp_zerorange(ovp, length, eoz - length);
275 1.70 mycroft if (round_page(eoz) > round_page(length)) {
276 1.70 mycroft simple_lock(&ovp->v_interlock);
277 1.70 mycroft error = VOP_PUTPAGES(ovp, round_page(length),
278 1.70 mycroft round_page(eoz),
279 1.71 mycroft PGO_CLEANIT | PGO_DEACTIVATE |
280 1.71 mycroft ((ioflag & IO_SYNC) ? PGO_SYNCIO : 0));
281 1.70 mycroft if (error)
282 1.70 mycroft return error;
283 1.70 mycroft }
284 1.38 chs }
285 1.38 chs
286 1.43 chs lockmgr(&gp->g_glock, LK_EXCLUSIVE, NULL);
287 1.38 chs
288 1.29 fvdl if (DOINGSOFTDEP(ovp)) {
289 1.29 fvdl if (length > 0) {
290 1.29 fvdl /*
291 1.29 fvdl * If a file is only partially truncated, then
292 1.29 fvdl * we have to clean up the data structures
293 1.29 fvdl * describing the allocation past the truncation
294 1.29 fvdl * point. Finding and deallocating those structures
295 1.29 fvdl * is a lot of work. Since partial truncation occurs
296 1.29 fvdl * rarely, we solve the problem by syncing the file
297 1.29 fvdl * so that it will have no data structures left.
298 1.29 fvdl */
299 1.77 yamt if ((error = VOP_FSYNC(ovp, cred, FSYNC_WAIT,
300 1.77 yamt 0, 0, p)) != 0) {
301 1.43 chs lockmgr(&gp->g_glock, LK_RELEASE, NULL);
302 1.29 fvdl return (error);
303 1.52 simonb }
304 1.51 fvdl if (oip->i_flag & IN_SPACECOUNTED)
305 1.55 fvdl fs->fs_pendingblocks -= DIP(oip, blocks);
306 1.29 fvdl } else {
307 1.40 augustss uvm_vnp_setsize(ovp, length);
308 1.29 fvdl #ifdef QUOTA
309 1.55 fvdl (void) chkdq(oip, -DIP(oip, blocks), NOCRED, 0);
310 1.29 fvdl #endif
311 1.55 fvdl softdep_setup_freeblocks(oip, length, 0);
312 1.77 yamt (void) vinvalbuf(ovp, 0, cred, p, 0, 0);
313 1.43 chs lockmgr(&gp->g_glock, LK_RELEASE, NULL);
314 1.29 fvdl oip->i_flag |= IN_CHANGE | IN_UPDATE;
315 1.77 yamt return (ffs_update(ovp, NULL, NULL, 0));
316 1.29 fvdl }
317 1.29 fvdl }
318 1.55 fvdl oip->i_size = length;
319 1.57 kristerw DIP_ASSIGN(oip, size, length);
320 1.18 fvdl uvm_vnp_setsize(ovp, length);
321 1.1 mycroft /*
322 1.1 mycroft * Calculate index into inode's block list of
323 1.1 mycroft * last direct and indirect blocks (if any)
324 1.1 mycroft * which we want to keep. Lastblock is -1 when
325 1.1 mycroft * the file is truncated to 0.
326 1.1 mycroft */
327 1.1 mycroft lastblock = lblkno(fs, length + fs->fs_bsize - 1) - 1;
328 1.1 mycroft lastiblock[SINGLE] = lastblock - NDADDR;
329 1.1 mycroft lastiblock[DOUBLE] = lastiblock[SINGLE] - NINDIR(fs);
330 1.1 mycroft lastiblock[TRIPLE] = lastiblock[DOUBLE] - NINDIR(fs) * NINDIR(fs);
331 1.1 mycroft nblocks = btodb(fs->fs_bsize);
332 1.1 mycroft /*
333 1.1 mycroft * Update file and block pointers on disk before we start freeing
334 1.1 mycroft * blocks. If we crash before free'ing blocks below, the blocks
335 1.1 mycroft * will be returned to the free list. lastiblock values are also
336 1.1 mycroft * normalized to -1 for calls to ffs_indirtrunc below.
337 1.1 mycroft */
338 1.67 mycroft sync = 0;
339 1.55 fvdl for (level = TRIPLE; level >= SINGLE; level--) {
340 1.64 hannken blks[NDADDR + level] = DIP(oip, ib[level]);
341 1.67 mycroft if (lastiblock[level] < 0 && blks[NDADDR + level] != 0) {
342 1.67 mycroft sync = 1;
343 1.57 kristerw DIP_ASSIGN(oip, ib[level], 0);
344 1.1 mycroft lastiblock[level] = -1;
345 1.1 mycroft }
346 1.55 fvdl }
347 1.55 fvdl for (i = 0; i < NDADDR; i++) {
348 1.64 hannken blks[i] = DIP(oip, db[i]);
349 1.67 mycroft if (i > lastblock && blks[i] != 0) {
350 1.67 mycroft sync = 1;
351 1.57 kristerw DIP_ASSIGN(oip, db[i], 0);
352 1.67 mycroft }
353 1.67 mycroft }
354 1.68 mycroft oip->i_flag |= IN_CHANGE | IN_UPDATE;
355 1.67 mycroft if (sync) {
356 1.77 yamt error = ffs_update(ovp, NULL, NULL, UPDATE_WAIT);
357 1.67 mycroft if (error && !allerror)
358 1.67 mycroft allerror = error;
359 1.55 fvdl }
360 1.32 mycroft
361 1.1 mycroft /*
362 1.1 mycroft * Having written the new inode to disk, save its new configuration
363 1.1 mycroft * and put back the old block pointers long enough to process them.
364 1.1 mycroft * Note that we save the new block configuration so we can check it
365 1.1 mycroft * when we are done.
366 1.1 mycroft */
367 1.55 fvdl for (i = 0; i < NDADDR; i++) {
368 1.64 hannken bn = DIP(oip, db[i]);
369 1.64 hannken DIP_ASSIGN(oip, db[i], blks[i]);
370 1.64 hannken blks[i] = bn;
371 1.55 fvdl }
372 1.55 fvdl for (i = 0; i < NIADDR; i++) {
373 1.64 hannken bn = DIP(oip, ib[i]);
374 1.64 hannken DIP_ASSIGN(oip, ib[i], blks[NDADDR + i]);
375 1.64 hannken blks[NDADDR + i] = bn;
376 1.55 fvdl }
377 1.55 fvdl
378 1.55 fvdl oip->i_size = osize;
379 1.57 kristerw DIP_ASSIGN(oip, size, osize);
380 1.32 mycroft error = vtruncbuf(ovp, lastblock + 1, 0, 0);
381 1.32 mycroft if (error && !allerror)
382 1.32 mycroft allerror = error;
383 1.1 mycroft
384 1.1 mycroft /*
385 1.1 mycroft * Indirect blocks first.
386 1.1 mycroft */
387 1.1 mycroft indir_lbn[SINGLE] = -NDADDR;
388 1.1 mycroft indir_lbn[DOUBLE] = indir_lbn[SINGLE] - NINDIR(fs) - 1;
389 1.1 mycroft indir_lbn[TRIPLE] = indir_lbn[DOUBLE] - NINDIR(fs) * NINDIR(fs) - 1;
390 1.1 mycroft for (level = TRIPLE; level >= SINGLE; level--) {
391 1.55 fvdl if (oip->i_ump->um_fstype == UFS1)
392 1.55 fvdl bn = ufs_rw32(oip->i_ffs1_ib[level],UFS_FSNEEDSWAP(fs));
393 1.55 fvdl else
394 1.55 fvdl bn = ufs_rw64(oip->i_ffs2_ib[level],UFS_FSNEEDSWAP(fs));
395 1.1 mycroft if (bn != 0) {
396 1.1 mycroft error = ffs_indirtrunc(oip, indir_lbn[level],
397 1.1 mycroft fsbtodb(fs, bn), lastiblock[level], level, &count);
398 1.1 mycroft if (error)
399 1.1 mycroft allerror = error;
400 1.1 mycroft blocksreleased += count;
401 1.1 mycroft if (lastiblock[level] < 0) {
402 1.57 kristerw DIP_ASSIGN(oip, ib[level], 0);
403 1.63 hannken ffs_blkfree(fs, oip->i_devvp, bn, fs->fs_bsize,
404 1.63 hannken oip->i_number);
405 1.1 mycroft blocksreleased += nblocks;
406 1.1 mycroft }
407 1.1 mycroft }
408 1.1 mycroft if (lastiblock[level] >= 0)
409 1.1 mycroft goto done;
410 1.1 mycroft }
411 1.1 mycroft
412 1.1 mycroft /*
413 1.1 mycroft * All whole direct blocks or frags.
414 1.1 mycroft */
415 1.1 mycroft for (i = NDADDR - 1; i > lastblock; i--) {
416 1.30 augustss long bsize;
417 1.1 mycroft
418 1.55 fvdl if (oip->i_ump->um_fstype == UFS1)
419 1.55 fvdl bn = ufs_rw32(oip->i_ffs1_db[i], UFS_FSNEEDSWAP(fs));
420 1.55 fvdl else
421 1.55 fvdl bn = ufs_rw64(oip->i_ffs2_db[i], UFS_FSNEEDSWAP(fs));
422 1.1 mycroft if (bn == 0)
423 1.1 mycroft continue;
424 1.57 kristerw DIP_ASSIGN(oip, db[i], 0);
425 1.1 mycroft bsize = blksize(fs, oip, i);
426 1.63 hannken ffs_blkfree(fs, oip->i_devvp, bn, bsize, oip->i_number);
427 1.1 mycroft blocksreleased += btodb(bsize);
428 1.1 mycroft }
429 1.1 mycroft if (lastblock < 0)
430 1.1 mycroft goto done;
431 1.1 mycroft
432 1.1 mycroft /*
433 1.1 mycroft * Finally, look for a change in size of the
434 1.1 mycroft * last direct block; release any frags.
435 1.1 mycroft */
436 1.55 fvdl if (oip->i_ump->um_fstype == UFS1)
437 1.55 fvdl bn = ufs_rw32(oip->i_ffs1_db[lastblock], UFS_FSNEEDSWAP(fs));
438 1.55 fvdl else
439 1.55 fvdl bn = ufs_rw64(oip->i_ffs2_db[lastblock], UFS_FSNEEDSWAP(fs));
440 1.1 mycroft if (bn != 0) {
441 1.1 mycroft long oldspace, newspace;
442 1.1 mycroft
443 1.1 mycroft /*
444 1.1 mycroft * Calculate amount of space we're giving
445 1.1 mycroft * back as old block size minus new block size.
446 1.1 mycroft */
447 1.1 mycroft oldspace = blksize(fs, oip, lastblock);
448 1.55 fvdl oip->i_size = length;
449 1.57 kristerw DIP_ASSIGN(oip, size, length);
450 1.1 mycroft newspace = blksize(fs, oip, lastblock);
451 1.1 mycroft if (newspace == 0)
452 1.1 mycroft panic("itrunc: newspace");
453 1.1 mycroft if (oldspace - newspace > 0) {
454 1.1 mycroft /*
455 1.1 mycroft * Block number of space to be free'd is
456 1.1 mycroft * the old block # plus the number of frags
457 1.1 mycroft * required for the storage we're keeping.
458 1.1 mycroft */
459 1.1 mycroft bn += numfrags(fs, newspace);
460 1.63 hannken ffs_blkfree(fs, oip->i_devvp, bn, oldspace - newspace,
461 1.63 hannken oip->i_number);
462 1.1 mycroft blocksreleased += btodb(oldspace - newspace);
463 1.1 mycroft }
464 1.1 mycroft }
465 1.32 mycroft
466 1.1 mycroft done:
467 1.1 mycroft #ifdef DIAGNOSTIC
468 1.1 mycroft for (level = SINGLE; level <= TRIPLE; level++)
469 1.64 hannken if (blks[NDADDR + level] != DIP(oip, ib[level]))
470 1.1 mycroft panic("itrunc1");
471 1.1 mycroft for (i = 0; i < NDADDR; i++)
472 1.64 hannken if (blks[i] != DIP(oip, db[i]))
473 1.1 mycroft panic("itrunc2");
474 1.1 mycroft if (length == 0 &&
475 1.32 mycroft (!LIST_EMPTY(&ovp->v_cleanblkhd) || !LIST_EMPTY(&ovp->v_dirtyblkhd)))
476 1.1 mycroft panic("itrunc3");
477 1.1 mycroft #endif /* DIAGNOSTIC */
478 1.1 mycroft /*
479 1.1 mycroft * Put back the real size.
480 1.1 mycroft */
481 1.55 fvdl oip->i_size = length;
482 1.57 kristerw DIP_ASSIGN(oip, size, length);
483 1.57 kristerw DIP_ADD(oip, blocks, -blocksreleased);
484 1.43 chs lockmgr(&gp->g_glock, LK_RELEASE, NULL);
485 1.1 mycroft oip->i_flag |= IN_CHANGE;
486 1.1 mycroft #ifdef QUOTA
487 1.1 mycroft (void) chkdq(oip, -blocksreleased, NOCRED, 0);
488 1.1 mycroft #endif
489 1.55 fvdl KASSERT(ovp->v_type != VREG || ovp->v_size == oip->i_size);
490 1.1 mycroft return (allerror);
491 1.1 mycroft }
492 1.1 mycroft
493 1.1 mycroft /*
494 1.1 mycroft * Release blocks associated with the inode ip and stored in the indirect
495 1.1 mycroft * block bn. Blocks are free'd in LIFO order up to (but not including)
496 1.1 mycroft * lastbn. If level is greater than SINGLE, the block is an indirect block
497 1.1 mycroft * and recursive calls to indirtrunc must be used to cleanse other indirect
498 1.1 mycroft * blocks.
499 1.1 mycroft *
500 1.1 mycroft * NB: triple indirect blocks are untested.
501 1.1 mycroft */
502 1.1 mycroft static int
503 1.72 thorpej ffs_indirtrunc(struct inode *ip, daddr_t lbn, daddr_t dbn, daddr_t lastbn,
504 1.72 thorpej int level, int64_t *countp)
505 1.1 mycroft {
506 1.30 augustss int i;
507 1.1 mycroft struct buf *bp;
508 1.30 augustss struct fs *fs = ip->i_fs;
509 1.55 fvdl int32_t *bap1 = NULL;
510 1.55 fvdl int64_t *bap2 = NULL;
511 1.1 mycroft struct vnode *vp;
512 1.53 fvdl daddr_t nb, nlbn, last;
513 1.55 fvdl char *copy = NULL;
514 1.55 fvdl int64_t blkcount, factor, blocksreleased = 0;
515 1.55 fvdl int nblocks;
516 1.1 mycroft int error = 0, allerror = 0;
517 1.55 fvdl #ifdef FFS_EI
518 1.55 fvdl const int needswap = UFS_FSNEEDSWAP(fs);
519 1.55 fvdl #endif
520 1.55 fvdl #define RBAP(ip, i) (((ip)->i_ump->um_fstype == UFS1) ? \
521 1.55 fvdl ufs_rw32(bap1[i], needswap) : ufs_rw64(bap2[i], needswap))
522 1.57 kristerw #define BAP_ASSIGN(ip, i, value) \
523 1.57 kristerw do { \
524 1.57 kristerw if ((ip)->i_ump->um_fstype == UFS1) \
525 1.57 kristerw bap1[i] = (value); \
526 1.57 kristerw else \
527 1.57 kristerw bap2[i] = (value); \
528 1.57 kristerw } while(0)
529 1.1 mycroft
530 1.1 mycroft /*
531 1.1 mycroft * Calculate index in current block of last
532 1.1 mycroft * block to be kept. -1 indicates the entire
533 1.1 mycroft * block so we need not calculate the index.
534 1.1 mycroft */
535 1.1 mycroft factor = 1;
536 1.1 mycroft for (i = SINGLE; i < level; i++)
537 1.1 mycroft factor *= NINDIR(fs);
538 1.1 mycroft last = lastbn;
539 1.1 mycroft if (lastbn > 0)
540 1.1 mycroft last /= factor;
541 1.1 mycroft nblocks = btodb(fs->fs_bsize);
542 1.1 mycroft /*
543 1.1 mycroft * Get buffer of block pointers, zero those entries corresponding
544 1.1 mycroft * to blocks to be free'd, and update on disk copy first. Since
545 1.1 mycroft * double(triple) indirect before single(double) indirect, calls
546 1.1 mycroft * to bmap on these blocks will fail. However, we already have
547 1.1 mycroft * the on disk address, so we have to set the b_blkno field
548 1.1 mycroft * explicitly instead of letting bread do everything for us.
549 1.1 mycroft */
550 1.1 mycroft vp = ITOV(ip);
551 1.1 mycroft bp = getblk(vp, lbn, (int)fs->fs_bsize, 0, 0);
552 1.1 mycroft if (bp->b_flags & (B_DONE | B_DELWRI)) {
553 1.1 mycroft /* Braces must be here in case trace evaluates to nothing. */
554 1.1 mycroft trace(TR_BREADHIT, pack(vp, fs->fs_bsize), lbn);
555 1.1 mycroft } else {
556 1.1 mycroft trace(TR_BREADMISS, pack(vp, fs->fs_bsize), lbn);
557 1.1 mycroft curproc->p_stats->p_ru.ru_inblock++; /* pay for read */
558 1.1 mycroft bp->b_flags |= B_READ;
559 1.1 mycroft if (bp->b_bcount > bp->b_bufsize)
560 1.1 mycroft panic("ffs_indirtrunc: bad buffer size");
561 1.1 mycroft bp->b_blkno = dbn;
562 1.61 yamt BIO_SETPRIO(bp, BPRIO_TIMECRITICAL);
563 1.62 hannken VOP_STRATEGY(vp, bp);
564 1.1 mycroft error = biowait(bp);
565 1.1 mycroft }
566 1.1 mycroft if (error) {
567 1.1 mycroft brelse(bp);
568 1.1 mycroft *countp = 0;
569 1.1 mycroft return (error);
570 1.1 mycroft }
571 1.1 mycroft
572 1.55 fvdl if (ip->i_ump->um_fstype == UFS1)
573 1.55 fvdl bap1 = (int32_t *)bp->b_data;
574 1.55 fvdl else
575 1.55 fvdl bap2 = (int64_t *)bp->b_data;
576 1.33 mycroft if (lastbn >= 0) {
577 1.55 fvdl copy = malloc(fs->fs_bsize, M_TEMP, M_WAITOK);
578 1.55 fvdl memcpy((caddr_t)copy, bp->b_data, (u_int)fs->fs_bsize);
579 1.55 fvdl for (i = last + 1; i < NINDIR(fs); i++)
580 1.57 kristerw BAP_ASSIGN(ip, i, 0);
581 1.12 thorpej error = bwrite(bp);
582 1.12 thorpej if (error)
583 1.12 thorpej allerror = error;
584 1.55 fvdl if (ip->i_ump->um_fstype == UFS1)
585 1.55 fvdl bap1 = (int32_t *)copy;
586 1.55 fvdl else
587 1.55 fvdl bap2 = (int64_t *)copy;
588 1.12 thorpej }
589 1.1 mycroft
590 1.1 mycroft /*
591 1.1 mycroft * Recursively free totally unused blocks.
592 1.1 mycroft */
593 1.1 mycroft for (i = NINDIR(fs) - 1, nlbn = lbn + 1 - i * factor; i > last;
594 1.1 mycroft i--, nlbn += factor) {
595 1.55 fvdl nb = RBAP(ip, i);
596 1.1 mycroft if (nb == 0)
597 1.1 mycroft continue;
598 1.1 mycroft if (level > SINGLE) {
599 1.9 christos error = ffs_indirtrunc(ip, nlbn, fsbtodb(fs, nb),
600 1.53 fvdl (daddr_t)-1, level - 1,
601 1.9 christos &blkcount);
602 1.9 christos if (error)
603 1.1 mycroft allerror = error;
604 1.1 mycroft blocksreleased += blkcount;
605 1.1 mycroft }
606 1.63 hannken ffs_blkfree(fs, ip->i_devvp, nb, fs->fs_bsize, ip->i_number);
607 1.1 mycroft blocksreleased += nblocks;
608 1.1 mycroft }
609 1.1 mycroft
610 1.1 mycroft /*
611 1.1 mycroft * Recursively free last partial block.
612 1.1 mycroft */
613 1.1 mycroft if (level > SINGLE && lastbn >= 0) {
614 1.1 mycroft last = lastbn % factor;
615 1.55 fvdl nb = RBAP(ip, i);
616 1.1 mycroft if (nb != 0) {
617 1.9 christos error = ffs_indirtrunc(ip, nlbn, fsbtodb(fs, nb),
618 1.9 christos last, level - 1, &blkcount);
619 1.9 christos if (error)
620 1.1 mycroft allerror = error;
621 1.1 mycroft blocksreleased += blkcount;
622 1.1 mycroft }
623 1.1 mycroft }
624 1.12 thorpej
625 1.12 thorpej if (copy != NULL) {
626 1.12 thorpej FREE(copy, M_TEMP);
627 1.12 thorpej } else {
628 1.12 thorpej bp->b_flags |= B_INVAL;
629 1.12 thorpej brelse(bp);
630 1.12 thorpej }
631 1.12 thorpej
632 1.1 mycroft *countp = blocksreleased;
633 1.1 mycroft return (allerror);
634 1.1 mycroft }
635 1.74 drochner
636 1.74 drochner void
637 1.74 drochner ffs_itimes(struct inode *ip, const struct timespec *acc,
638 1.74 drochner const struct timespec *mod, const struct timespec *cre)
639 1.74 drochner {
640 1.74 drochner struct timespec *ts = NULL, tsb;
641 1.75 christos
642 1.76 yamt if (!(ip->i_flag & (IN_ACCESS | IN_CHANGE | IN_UPDATE | IN_MODIFY))) {
643 1.76 yamt return;
644 1.76 yamt }
645 1.75 christos
646 1.74 drochner if (ip->i_flag & IN_ACCESS) {
647 1.74 drochner if (acc == NULL)
648 1.74 drochner acc = ts == NULL ? (ts = nanotime(&tsb)) : ts;
649 1.74 drochner DIP_ASSIGN(ip, atime, acc->tv_sec);
650 1.74 drochner DIP_ASSIGN(ip, atimensec, acc->tv_nsec);
651 1.74 drochner }
652 1.74 drochner if (ip->i_flag & (IN_UPDATE | IN_MODIFY)) {
653 1.74 drochner if ((ip->i_flags & SF_SNAPSHOT) == 0) {
654 1.74 drochner if (mod == NULL)
655 1.74 drochner mod = ts == NULL ? (ts = nanotime(&tsb)) : ts;
656 1.74 drochner DIP_ASSIGN(ip, mtime, mod->tv_sec);
657 1.74 drochner DIP_ASSIGN(ip, mtimensec, mod->tv_nsec);
658 1.74 drochner }
659 1.74 drochner ip->i_modrev++;
660 1.74 drochner }
661 1.74 drochner if (ip->i_flag & (IN_CHANGE | IN_MODIFY)) {
662 1.74 drochner if (cre == NULL)
663 1.74 drochner cre = ts == NULL ? (ts = nanotime(&tsb)) : ts;
664 1.74 drochner DIP_ASSIGN(ip, ctime, cre->tv_sec);
665 1.74 drochner DIP_ASSIGN(ip, ctimensec, cre->tv_nsec);
666 1.74 drochner }
667 1.74 drochner if (ip->i_flag & (IN_ACCESS | IN_MODIFY))
668 1.74 drochner ip->i_flag |= IN_ACCESSED;
669 1.74 drochner if (ip->i_flag & (IN_UPDATE | IN_CHANGE))
670 1.74 drochner ip->i_flag |= IN_MODIFIED;
671 1.74 drochner ip->i_flag &= ~(IN_ACCESS | IN_CHANGE | IN_UPDATE | IN_MODIFY);
672 1.74 drochner }
673