openbsd-20021119
[openafs.git] / src / afs / VNOPS / afs_vnop_symlink.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * afs_vnop_symlink.c - symlink and readlink vnodeops.
12  *
13  * Implements:
14  * afs_symlink
15  * afs_MemHandleLink
16  * afs_UFSHandleLink
17  * afs_readlink
18  *
19  */
20
21 #include <afsconfig.h>
22 #include "afs/param.h"
23
24 RCSID("$Header$");
25
26 #include "afs/sysincludes.h"    /* Standard vendor system headers */
27 #include "afsincludes.h"        /* Afs-based standard headers */
28 #include "afs/afs_stats.h" /* statistics */
29 #include "afs/afs_cbqueue.h"
30 #include "afs/nfsclient.h"
31 #include "afs/afs_osidnlc.h"
32
33 extern afs_rwlock_t afs_xvcache;
34 extern afs_rwlock_t afs_xcbhash;
35
36 /* Note: There is the bare bones beginning of symlink hints in the now
37  * defunct afs/afs_lookup.c file. Since they are not in use, making the call
38  * is just a performance hit.
39  */
40
41
42 /* don't set CDirty in here because RPC is called synchronously */
43 int
44 afs_symlink
45 #ifdef  AFS_OSF_ENV
46   (ndp, attrs, atargetName)
47     struct nameidata *ndp;
48     struct vattr *attrs;
49     register char *atargetName; {
50     register struct vcache *adp = VTOAFS(ndp->ni_dvp);
51     char *aname = ndp->ni_dent.d_name;
52     struct ucred *acred = ndp->ni_cred;
53 #else   /* AFS_OSF_ENV */
54   (OSI_VC_ARG(adp), aname, attrs, atargetName, acred)
55     OSI_VC_DECL(adp);
56     char *atargetName;
57     char *aname;
58     struct vattr *attrs;
59     struct AFS_UCRED *acred; {
60 #endif
61     afs_uint32 now = 0;
62     struct vrequest treq;
63     afs_int32 code;
64     struct conn *tc;
65     struct VenusFid newFid;
66     struct dcache *tdc;
67     afs_size_t offset, len;
68     afs_int32 alen;
69     struct server *hostp=0;
70     struct vcache *tvc;
71     struct AFSStoreStatus InStatus;
72     struct AFSFetchStatus OutFidStatus, OutDirStatus;
73     struct AFSCallBack CallBack;
74     struct AFSVolSync tsync;
75     struct volume*    volp=0;
76     struct afs_fakestat_state fakestate;
77     XSTATS_DECLS
78     OSI_VC_CONVERT(adp)
79     
80     AFS_STATCNT(afs_symlink);
81     afs_Trace2(afs_iclSetp, CM_TRACE_SYMLINK, ICL_TYPE_POINTER, adp,
82                 ICL_TYPE_STRING, aname);
83
84     if ((code = afs_InitReq(&treq, acred)))
85         goto done2;
86
87     afs_InitFakeStat(&fakestate);
88     code = afs_EvalFakeStat(&adp, &fakestate, &treq);
89     if (code)
90         goto done;
91
92     if (strlen(aname) > AFSNAMEMAX || strlen(atargetName) > AFSPATHMAX) {
93         code = ENAMETOOLONG;
94         goto done;
95     }
96
97     if (afs_IsDynroot(adp)) {
98         code = afs_DynrootVOPSymlink(adp, acred, aname, atargetName);
99         goto done;
100     }
101
102     code = afs_VerifyVCache(adp, &treq);
103     if (code) { 
104         code = afs_CheckCode(code, &treq, 30);
105         goto done;
106     }
107
108     /** If the volume is read-only, return error without making an RPC to the
109       * fileserver
110       */
111     if ( adp->states & CRO ) {
112         code = EROFS;
113         goto done;
114     }
115
116     InStatus.Mask = AFS_SETMODTIME | AFS_SETMODE;
117     InStatus.ClientModTime = osi_Time();
118     alen = strlen(atargetName);     /* we want it to include the null */
119     if (*atargetName == '#' || *atargetName == '%') {
120         InStatus.UnixModeBits = 0644;   /* mt pt: null from "." at end */
121         if (alen == 1) alen++;  /* Empty string */
122     } else {
123         InStatus.UnixModeBits = 0755;
124         alen++;     /* add in the null */
125     }
126     tdc = afs_GetDCache(adp, (afs_size_t) 0, &treq, &offset, &len, 1);
127     volp = afs_FindVolume(&adp->fid, READ_LOCK); /*parent is also in same vol*/
128     ObtainWriteLock(&adp->lock,156);
129     if (tdc) ObtainWriteLock(&tdc->lock, 636);
130     ObtainSharedLock(&afs_xvcache,17);  /* prevent others from creating this entry */
131     /* XXX Pay attention to afs_xvcache around the whole thing!! XXX */
132     do {
133         tc = afs_Conn(&adp->fid, &treq, SHARED_LOCK);
134         if (tc) {
135             hostp = tc->srvr->server;
136             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_SYMLINK);
137             if (adp->states & CForeign) {
138                 now = osi_Time();
139                 RX_AFS_GUNLOCK();
140                 code = RXAFS_DFSSymlink(tc->id, (struct AFSFid *) &adp->fid.Fid, aname,
141                                      atargetName, &InStatus, (struct AFSFid *) &newFid.Fid,
142                                      &OutFidStatus, &OutDirStatus, &CallBack, &tsync);
143                 RX_AFS_GLOCK();
144             } else {
145                 RX_AFS_GUNLOCK();
146                 code = RXAFS_Symlink(tc->id, (struct AFSFid *) &adp->fid.Fid, aname,
147                                      atargetName, &InStatus, (struct AFSFid *) &newFid.Fid,
148                                      &OutFidStatus, &OutDirStatus, &tsync);
149                 RX_AFS_GLOCK();
150             }
151           XSTATS_END_TIME;
152         }
153         else code = -1;
154     } while 
155        (afs_Analyze(tc, code, &adp->fid, &treq,
156                    AFS_STATS_FS_RPCIDX_SYMLINK, SHARED_LOCK, NULL));
157
158     UpgradeSToWLock(&afs_xvcache,40);
159     if (code) {
160         if (code < 0) {
161           ObtainWriteLock(&afs_xcbhash, 499);
162           afs_DequeueCallback(adp);
163           adp->states &= ~CStatd;
164           ReleaseWriteLock(&afs_xcbhash);
165           osi_dnlc_purgedp(adp);
166         }
167         ReleaseWriteLock(&adp->lock);
168         ReleaseWriteLock(&afs_xvcache);
169         if (tdc) {
170             ReleaseWriteLock(&tdc->lock);
171             afs_PutDCache(tdc);
172         }
173         goto done;
174     }
175     /* otherwise, we should see if we can make the change to the dir locally */
176     if (afs_LocalHero(adp, tdc, &OutDirStatus, 1)) {
177         /* we can do it locally */
178         code = afs_dir_Create(&tdc->f.inode, aname, &newFid.Fid);
179         if (code) { 
180             ZapDCE(tdc);        /* surprise error -- use invalid value */
181             DZap(&tdc->f.inode);
182         }
183     }
184     if (tdc) {
185         ReleaseWriteLock(&tdc->lock);
186         afs_PutDCache(tdc);
187     }
188     newFid.Cell = adp->fid.Cell;
189     newFid.Fid.Volume = adp->fid.Fid.Volume;
190     ReleaseWriteLock(&adp->lock);
191
192     /* now we're done with parent dir, create the link's entry.  Note that
193      * no one can get a pointer to the new cache entry until we release 
194      * the xvcache lock. */
195     tvc = afs_NewVCache(&newFid, hostp);
196     ObtainWriteLock(&tvc->lock,157);
197     ObtainWriteLock(&afs_xcbhash, 500);
198     tvc->states |= CStatd;              /* have valid info */
199     tvc->states &= ~CBulkFetching;
200
201     if (adp->states & CForeign) {
202         tvc->states |= CForeign;
203         /* We don't have to worry about losing the callback since we're doing it 
204          * under the afs_xvcache lock actually, afs_NewVCache may drop the 
205          * afs_xvcache lock, if it calls afs_FlushVCache */
206         tvc->cbExpires = CallBack.ExpirationTime + now;
207         afs_QueueCallback(tvc, CBHash(CallBack.ExpirationTime), volp);
208     } else {
209         tvc->cbExpires = 0x7fffffff;    /* never expires, they can't change */
210      /* since it never expires, we don't have to queue the callback */
211     }
212     ReleaseWriteLock(&afs_xcbhash);
213     afs_ProcessFS(tvc, &OutFidStatus, &treq);
214
215     if (!tvc->linkData) {
216         tvc->linkData = (char *) afs_osi_Alloc(alen);
217         strncpy(tvc->linkData, atargetName, alen-1);
218         tvc->linkData[alen-1] = 0;
219     }
220     ReleaseWriteLock(&tvc->lock);
221     ReleaseWriteLock(&afs_xvcache);
222     afs_PutVCache(tvc);
223     code = 0;
224 done:
225     afs_PutFakeStat(&fakestate);
226     if ( volp ) 
227         afs_PutVolume(volp, READ_LOCK);
228     code = afs_CheckCode(code, &treq, 31);
229 done2:
230 #ifdef  AFS_OSF_ENV
231     AFS_RELE(ndp->ni_dvp);
232 #endif  /* AFS_OSF_ENV */
233     return code;
234 }
235
236 int afs_MemHandleLink(register struct vcache *avc, struct vrequest *areq)
237 {
238       register struct dcache *tdc;
239       register char *tp, *rbuf;
240       afs_size_t offset, len;
241       afs_int32 tlen, alen;
242       register afs_int32 code;
243
244       AFS_STATCNT(afs_MemHandleLink);
245       /* two different formats, one for links protected 644, have a "." at
246          the end of the file name, which we turn into a null.  Others, 
247          protected 755, we add a null to the end of */
248       if (!avc->linkData) {
249           void *addr;
250           tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 0);
251           if (!tdc) {
252               return EIO;
253           }
254           /* otherwise we have the data loaded, go for it */
255           if (len > 1024) {
256               afs_PutDCache(tdc);
257               return EFAULT;
258           }
259           if (avc->m.Mode       & 0111) alen = len+1;   /* regular link */
260           else alen = len;                      /* mt point */
261           rbuf = (char *) osi_AllocLargeSpace(AFS_LRALLOCSIZ);
262           ObtainReadLock(&tdc->lock);
263           addr = afs_MemCacheOpen(tdc->f.inode);
264           tlen = len;
265           code = afs_MemReadBlk(addr, 0, rbuf, tlen);
266           afs_MemCacheClose(addr);
267           ReleaseReadLock(&tdc->lock);
268           afs_PutDCache(tdc);
269           rbuf[alen-1] = 0;
270           alen = strlen(rbuf) + 1;
271           tp = afs_osi_Alloc(alen); /* make room for terminating null */
272           memcpy(tp, rbuf, alen);
273           osi_FreeLargeSpace(rbuf);
274           if (code != len) {
275               afs_osi_Free(tp, alen);
276               return EIO;
277           }
278           avc->linkData = tp;
279       }
280       return 0;
281   }
282
283 int afs_UFSHandleLink(register struct vcache *avc, struct vrequest *areq)
284 {
285     register struct dcache *tdc;
286     register char *tp, *rbuf;
287     void *tfile;
288     afs_size_t offset, len;
289     afs_int32 tlen, alen;
290     register afs_int32 code;
291
292     /* two different formats, one for links protected 644, have a "." at the
293        end of the file name, which we turn into a null.  Others, protected
294        755, we add a null to the end of */
295     AFS_STATCNT(afs_UFSHandleLink);
296     if (!avc->linkData) {
297         tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 0);
298         afs_Trace3(afs_iclSetp, CM_TRACE_UFSLINK, ICL_TYPE_POINTER, avc,
299                         ICL_TYPE_POINTER, tdc,
300                         ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(avc->m.Length));
301         if (!tdc) {
302             return EIO;
303         }
304         /* otherwise we have the data loaded, go for it */
305         if (len > 1024) {
306             afs_PutDCache(tdc);
307             return EFAULT;
308         }
309         if (avc->m.Mode & 0111) alen = len+1;   /* regular link */
310         else alen = len;                        /* mt point */
311         rbuf = (char *) osi_AllocLargeSpace(AFS_LRALLOCSIZ);
312         tlen = len;
313         ObtainReadLock(&tdc->lock);
314         tfile = osi_UFSOpen (tdc->f.inode);
315         code = afs_osi_Read(tfile, -1, rbuf, tlen);
316         osi_UFSClose(tfile);
317         ReleaseReadLock(&tdc->lock);
318         afs_PutDCache(tdc);
319         rbuf[alen-1] = '\0';
320         alen = strlen(rbuf) + 1;
321         tp = afs_osi_Alloc(alen);       /* make room for terminating null */
322         memcpy(tp, rbuf, alen);
323         osi_FreeLargeSpace(rbuf);
324         if (code != tlen) {
325             afs_osi_Free(tp, alen);
326             return EIO;
327         }
328         avc->linkData = tp;
329     }
330     return 0;
331 }
332
333 int
334 afs_readlink(OSI_VC_ARG(avc), auio, acred)
335     OSI_VC_DECL(avc);
336     struct uio *auio;
337     struct AFS_UCRED *acred; 
338 {
339     register afs_int32 code;
340     struct vrequest treq;
341     register char *tp;
342     struct afs_fakestat_state fakestat;
343     OSI_VC_CONVERT(avc)
344
345     AFS_STATCNT(afs_readlink);
346     afs_Trace1(afs_iclSetp, CM_TRACE_READLINK, ICL_TYPE_POINTER, avc);
347     if ((code = afs_InitReq(&treq, acred))) return code;
348     afs_InitFakeStat(&fakestat);
349     code = afs_EvalFakeStat(&avc, &fakestat, &treq);
350     if (code) goto done;
351     code = afs_VerifyVCache(avc, &treq);
352     if (code) goto done;
353     if (vType(avc) != VLNK) {
354         code = EINVAL;
355         goto done;
356     }
357     ObtainWriteLock(&avc->lock,158);
358     code = afs_HandleLink(avc, &treq);
359     /* finally uiomove it to user-land */
360     if (code == 0) {
361         tp = avc->linkData;
362         if (tp) AFS_UIOMOVE(tp, strlen(tp), UIO_READ, auio, code);
363         else {
364             code = EIO;
365         }
366     }
367     ReleaseWriteLock(&avc->lock);
368 done:
369     afs_PutFakeStat(&fakestat);
370     code = afs_CheckCode(code, &treq, 32);
371     return code;
372 }