Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / sys / vfs / isofs / cd9660 / cd9660_node.c
1 /*-
2  * Copyright (c) 1982, 1986, 1989, 1994, 1995
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley
6  * by Pace Willisson (pace@blitz.com).  The Rock Ridge Extension
7  * Support code is derived from software contributed to Berkeley
8  * by Atsushi Murai (amurai@spec.co.jp).
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *      This product includes software developed by the University of
21  *      California, Berkeley and its contributors.
22  * 4. Neither the name of the University nor the names of its contributors
23  *    may be used to endorse or promote products derived from this software
24  *    without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36  * SUCH DAMAGE.
37  *
38  *      @(#)cd9660_node.c       8.2 (Berkeley) 1/23/94
39  * $FreeBSD: src/sys/isofs/cd9660/cd9660_node.c,v 1.29.2.1 2000/07/08 14:35:56 bp Exp $
40  * $DragonFly: src/sys/vfs/isofs/cd9660/cd9660_node.c,v 1.2 2003/06/17 04:28:41 dillon Exp $
41  */
42
43 #include <sys/param.h>
44 #include <sys/systm.h>
45 #include <sys/mount.h>
46 #include <sys/proc.h>
47 #include <sys/buf.h>
48 #include <sys/vnode.h>
49 #include <sys/malloc.h>
50 #include <sys/stat.h>
51
52 #include <isofs/cd9660/iso.h>
53 #include <isofs/cd9660/cd9660_node.h>
54 #include <isofs/cd9660/cd9660_mount.h>
55
56 /*
57  * Structures associated with iso_node caching.
58  */
59 static struct iso_node **isohashtbl;
60 static u_long isohash;
61 #define INOHASH(device, inum)   ((minor(device) + ((inum)>>12)) & isohash)
62 #ifndef NULL_SIMPLELOCKS
63 static struct simplelock cd9660_ihash_slock;
64 #endif
65
66 static void cd9660_ihashrem __P((struct iso_node *));
67 static unsigned cd9660_chars2ui __P((unsigned char *begin, int len));
68
69 /*
70  * Initialize hash links for inodes and dnodes.
71  */
72 int
73 cd9660_init(vfsp)
74         struct vfsconf *vfsp;
75 {
76
77         isohashtbl = hashinit(desiredvnodes, M_ISOFSMNT, &isohash);
78         simple_lock_init(&cd9660_ihash_slock);
79         return (0);
80 }
81
82 int
83 cd9660_uninit(vfsp)
84         struct vfsconf *vfsp;
85 {
86
87         if (isohashtbl != NULL)
88                 free(isohashtbl, M_ISOFSMNT);
89         return (0);
90 }
91
92
93 /*
94  * Use the device/inum pair to find the incore inode, and return a pointer
95  * to it. If it is in core, but locked, wait for it.
96  */
97 struct vnode *
98 cd9660_ihashget(dev, inum)
99         dev_t dev;
100         ino_t inum;
101 {
102         struct proc *p = curproc;               /* XXX */
103         struct iso_node *ip;
104         struct vnode *vp;
105
106 loop:
107         simple_lock(&cd9660_ihash_slock);
108         for (ip = isohashtbl[INOHASH(dev, inum)]; ip; ip = ip->i_next) {
109                 if (inum == ip->i_number && dev == ip->i_dev) {
110                         vp = ITOV(ip);
111                         simple_lock(&vp->v_interlock);
112                         simple_unlock(&cd9660_ihash_slock);
113                         if (vget(vp, LK_EXCLUSIVE | LK_INTERLOCK, p))
114                                 goto loop;
115                         return (vp);
116                 }
117         }
118         simple_unlock(&cd9660_ihash_slock);
119         return (NULL);
120 }
121
122 /*
123  * Insert the inode into the hash table, and return it locked.
124  */
125 void
126 cd9660_ihashins(ip)
127         struct iso_node *ip;
128 {
129         struct proc *p = curproc;               /* XXX */
130         struct iso_node **ipp, *iq;
131
132         simple_lock(&cd9660_ihash_slock);
133         ipp = &isohashtbl[INOHASH(ip->i_dev, ip->i_number)];
134         if ((iq = *ipp) != NULL)
135                 iq->i_prev = &ip->i_next;
136         ip->i_next = iq;
137         ip->i_prev = ipp;
138         *ipp = ip;
139         simple_unlock(&cd9660_ihash_slock);
140
141         lockmgr(&ip->i_lock, LK_EXCLUSIVE, (struct simplelock *)0, p);
142 }
143
144 /*
145  * Remove the inode from the hash table.
146  */
147 static void
148 cd9660_ihashrem(ip)
149         register struct iso_node *ip;
150 {
151         register struct iso_node *iq;
152
153         simple_lock(&cd9660_ihash_slock);
154         if ((iq = ip->i_next) != NULL)
155                 iq->i_prev = ip->i_prev;
156         *ip->i_prev = iq;
157 #ifdef DIAGNOSTIC
158         ip->i_next = NULL;
159         ip->i_prev = NULL;
160 #endif
161         simple_unlock(&cd9660_ihash_slock);
162 }
163
164 /*
165  * Last reference to an inode, write the inode out and if necessary,
166  * truncate and deallocate the file.
167  */
168 int
169 cd9660_inactive(ap)
170         struct vop_inactive_args /* {
171                 struct vnode *a_vp;
172                 struct proc *a_p;
173         } */ *ap;
174 {
175         struct vnode *vp = ap->a_vp;
176         struct proc *p = ap->a_p;
177         register struct iso_node *ip = VTOI(vp);
178         int error = 0;
179
180         if (prtactive && vp->v_usecount != 0)
181                 vprint("cd9660_inactive: pushing active", vp);
182
183         ip->i_flag = 0;
184         VOP_UNLOCK(vp, 0, p);
185         /*
186          * If we are done with the inode, reclaim it
187          * so that it can be reused immediately.
188          */
189         if (ip->inode.iso_mode == 0)
190                 vrecycle(vp, (struct simplelock *)0, p);
191         return error;
192 }
193
194 /*
195  * Reclaim an inode so that it can be used for other purposes.
196  */
197 int
198 cd9660_reclaim(ap)
199         struct vop_reclaim_args /* {
200                 struct vnode *a_vp;
201                 struct proc *a_p;
202         } */ *ap;
203 {
204         register struct vnode *vp = ap->a_vp;
205         register struct iso_node *ip = VTOI(vp);
206
207         if (prtactive && vp->v_usecount != 0)
208                 vprint("cd9660_reclaim: pushing active", vp);
209         /*
210          * Remove the inode from its hash chain.
211          */
212         cd9660_ihashrem(ip);
213         /*
214          * Purge old data structures associated with the inode.
215          */
216         cache_purge(vp);
217         if (ip->i_devvp) {
218                 vrele(ip->i_devvp);
219                 ip->i_devvp = 0;
220         }
221         FREE(vp->v_data, M_ISOFSNODE);
222         vp->v_data = NULL;
223         return (0);
224 }
225
226 /*
227  * File attributes
228  */
229 void
230 cd9660_defattr(isodir, inop, bp, ftype)
231         struct iso_directory_record *isodir;
232         struct iso_node *inop;
233         struct buf *bp;
234         enum ISO_FTYPE ftype;
235 {
236         struct buf *bp2 = NULL;
237         struct iso_mnt *imp;
238         struct iso_extended_attributes *ap = NULL;
239         int off;
240
241         /* high sierra does not have timezone data, flag is one byte ahead */
242         if (isonum_711(ftype == ISO_FTYPE_HIGH_SIERRA?
243                        &isodir->date[6]: isodir->flags)&2) {
244                 inop->inode.iso_mode = S_IFDIR;
245                 /*
246                  * If we return 2, fts() will assume there are no subdirectories
247                  * (just links for the path and .), so instead we return 1.
248                  */
249                 inop->inode.iso_links = 1;
250         } else {
251                 inop->inode.iso_mode = S_IFREG;
252                 inop->inode.iso_links = 1;
253         }
254         if (!bp
255             && ((imp = inop->i_mnt)->im_flags & ISOFSMNT_EXTATT)
256             && (off = isonum_711(isodir->ext_attr_length))) {
257                 cd9660_blkatoff(ITOV(inop), (off_t)-(off << imp->im_bshift), NULL,
258                              &bp2);
259                 bp = bp2;
260         }
261         if (bp) {
262                 ap = (struct iso_extended_attributes *)bp->b_data;
263                 
264                 if (isonum_711(ap->version) == 1) {
265                         if (!(ap->perm[0]&0x40))
266                                 inop->inode.iso_mode |= VEXEC >> 6;
267                         if (!(ap->perm[0]&0x10))
268                                 inop->inode.iso_mode |= VREAD >> 6;
269                         if (!(ap->perm[0]&4))
270                                 inop->inode.iso_mode |= VEXEC >> 3;
271                         if (!(ap->perm[0]&1))
272                                 inop->inode.iso_mode |= VREAD >> 3;
273                         if (!(ap->perm[1]&0x40))
274                                 inop->inode.iso_mode |= VEXEC;
275                         if (!(ap->perm[1]&0x10))
276                                 inop->inode.iso_mode |= VREAD;
277                         inop->inode.iso_uid = isonum_723(ap->owner); /* what about 0? */
278                         inop->inode.iso_gid = isonum_723(ap->group); /* what about 0? */
279                 } else
280                         ap = NULL;
281         }
282         if (!ap) {
283                 inop->inode.iso_mode |= VREAD|VEXEC|(VREAD|VEXEC)>>3|(VREAD|VEXEC)>>6;
284                 inop->inode.iso_uid = (uid_t)0;
285                 inop->inode.iso_gid = (gid_t)0;
286         }
287         if (bp2)
288                 brelse(bp2);
289 }
290
291 /*
292  * Time stamps
293  */
294 void
295 cd9660_deftstamp(isodir,inop,bp,ftype)
296         struct iso_directory_record *isodir;
297         struct iso_node *inop;
298         struct buf *bp;
299         enum ISO_FTYPE ftype;
300 {
301         struct buf *bp2 = NULL;
302         struct iso_mnt *imp;
303         struct iso_extended_attributes *ap = NULL;
304         int off;
305
306         if (!bp
307             && ((imp = inop->i_mnt)->im_flags & ISOFSMNT_EXTATT)
308             && (off = isonum_711(isodir->ext_attr_length))) {
309                 cd9660_blkatoff(ITOV(inop), (off_t)-(off << imp->im_bshift), NULL,
310                              &bp2);
311                 bp = bp2;
312         }
313         if (bp) {
314                 ap = (struct iso_extended_attributes *)bp->b_data;
315                 
316                 if (ftype != ISO_FTYPE_HIGH_SIERRA
317                     && isonum_711(ap->version) == 1) {
318                         if (!cd9660_tstamp_conv17(ap->ftime,&inop->inode.iso_atime))
319                                 cd9660_tstamp_conv17(ap->ctime,&inop->inode.iso_atime);
320                         if (!cd9660_tstamp_conv17(ap->ctime,&inop->inode.iso_ctime))
321                                 inop->inode.iso_ctime = inop->inode.iso_atime;
322                         if (!cd9660_tstamp_conv17(ap->mtime,&inop->inode.iso_mtime))
323                                 inop->inode.iso_mtime = inop->inode.iso_ctime;
324                 } else
325                         ap = NULL;
326         }
327         if (!ap) {
328                 cd9660_tstamp_conv7(isodir->date,&inop->inode.iso_ctime,ftype);
329                 inop->inode.iso_atime = inop->inode.iso_ctime;
330                 inop->inode.iso_mtime = inop->inode.iso_ctime;
331         }
332         if (bp2)
333                 brelse(bp2);
334 }
335
336 int
337 cd9660_tstamp_conv7(pi,pu,ftype)
338         u_char *pi;
339         struct timespec *pu;
340         enum ISO_FTYPE ftype;
341 {
342         int crtime, days;
343         int y, m, d, hour, minute, second, tz;
344
345         y = pi[0] + 1900;
346         m = pi[1];
347         d = pi[2];
348         hour = pi[3];
349         minute = pi[4];
350         second = pi[5];
351         if(ftype != ISO_FTYPE_HIGH_SIERRA)
352                 tz = pi[6];
353         else
354                 /* original high sierra misses timezone data */
355                 tz = 0;
356
357         if (y < 1970) {
358                 pu->tv_sec  = 0;
359                 pu->tv_nsec = 0;
360                 return 0;
361         } else {
362 #ifdef  ORIGINAL
363                 /* computes day number relative to Sept. 19th,1989 */
364                 /* don't even *THINK* about changing formula. It works! */
365                 days = 367*(y-1980)-7*(y+(m+9)/12)/4-3*((y+(m-9)/7)/100+1)/4+275*m/9+d-100;
366 #else
367                 /*
368                  * Changed :-) to make it relative to Jan. 1st, 1970
369                  * and to disambiguate negative division
370                  */
371                 days = 367*(y-1960)-7*(y+(m+9)/12)/4-3*((y+(m+9)/12-1)/100+1)/4+275*m/9+d-239;
372 #endif
373                 crtime = ((((days * 24) + hour) * 60 + minute) * 60) + second;
374
375                 /* timezone offset is unreliable on some disks */
376                 if (-48 <= tz && tz <= 52)
377                         crtime -= tz * 15 * 60;
378         }
379         pu->tv_sec  = crtime;
380         pu->tv_nsec = 0;
381         return 1;
382 }
383
384 static u_int
385 cd9660_chars2ui(begin,len)
386         u_char *begin;
387         int len;
388 {
389         u_int rc;
390         
391         for (rc = 0; --len >= 0;) {
392                 rc *= 10;
393                 rc += *begin++ - '0';
394         }
395         return rc;
396 }
397
398 int
399 cd9660_tstamp_conv17(pi,pu)
400         u_char *pi;
401         struct timespec *pu;
402 {
403         u_char buf[7];
404         
405         /* year:"0001"-"9999" -> -1900  */
406         buf[0] = cd9660_chars2ui(pi,4) - 1900;
407
408         /* month: " 1"-"12"   -> 1 - 12 */
409         buf[1] = cd9660_chars2ui(pi + 4,2);
410
411         /* day:   " 1"-"31"   -> 1 - 31 */
412         buf[2] = cd9660_chars2ui(pi + 6,2);
413
414         /* hour:  " 0"-"23"   -> 0 - 23 */
415         buf[3] = cd9660_chars2ui(pi + 8,2);
416
417         /* minute:" 0"-"59"   -> 0 - 59 */
418         buf[4] = cd9660_chars2ui(pi + 10,2);
419
420         /* second:" 0"-"59"   -> 0 - 59 */
421         buf[5] = cd9660_chars2ui(pi + 12,2);
422
423         /* difference of GMT */
424         buf[6] = pi[16];
425
426         return cd9660_tstamp_conv7(buf, pu, ISO_FTYPE_DEFAULT);
427 }
428
429 ino_t
430 isodirino(isodir, imp)
431         struct iso_directory_record *isodir;
432         struct iso_mnt *imp;
433 {
434         ino_t ino;
435
436         ino = (isonum_733(isodir->extent) + isonum_711(isodir->ext_attr_length))
437               << imp->im_bshift;
438         return (ino);
439 }