afs: Avoid panics on failed return from afs_CFileOpen
[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
25 #include "afs/sysincludes.h"    /* Standard vendor system headers */
26 #include "afsincludes.h"        /* Afs-based standard headers */
27 #include "afs/afs_stats.h"      /* statistics */
28 #include "afs/afs_cbqueue.h"
29 #include "afs/nfsclient.h"
30 #include "afs/afs_osidnlc.h"
31
32 extern afs_rwlock_t afs_xvcache;
33 extern afs_rwlock_t afs_xcbhash;
34
35 /* Note: There is the bare bones beginning of symlink hints in the now
36  * defunct afs/afs_lookup.c file. Since they are not in use, making the call
37  * is just a performance hit.
38  */
39
40 static int
41 afs_DisconCreateSymlink(struct vcache *avc, char *aname, 
42                         struct vrequest *areq) {
43     struct dcache *tdc;
44     struct osi_file *tfile;
45     afs_size_t offset, len;
46     int code = 0;
47
48     tdc = afs_GetDCache(avc, 0, areq, &offset, &len, 0);
49     if (!tdc) {
50         /* printf("afs_DisconCreateSymlink: can't get new dcache for symlink.\n"); */
51         return ENETDOWN;
52     }
53
54     len = strlen(aname);
55     avc->f.m.Length = len;
56
57     ObtainWriteLock(&tdc->lock, 720);
58     tfile = afs_CFileOpen(&tdc->f.inode);
59     if (!tfile) {
60         code = EIO;
61         goto done;
62     }
63     afs_AdjustSize(tdc, len);
64     tdc->validPos = len;
65     afs_CFileWrite(tfile, 0, aname, len);
66     afs_CFileClose(tfile);
67  done:
68     ReleaseWriteLock(&tdc->lock);
69     return code;
70 }
71
72 /* don't set CDirty in here because RPC is called synchronously */
73 int 
74 afs_symlink(OSI_VC_DECL(adp), char *aname, struct vattr *attrs, 
75             char *atargetName, struct vcache **tvcp, afs_ucred_t *acred)
76 {
77     afs_uint32 now = 0;
78     struct vrequest *treq = NULL;
79     afs_int32 code = 0;
80     struct afs_conn *tc;
81     struct VenusFid newFid;
82     struct dcache *tdc;
83     afs_size_t offset, len;
84     afs_int32 alen;
85     struct server *hostp = 0;
86     struct vcache *tvc;
87     struct AFSStoreStatus InStatus;
88     struct AFSFetchStatus *OutFidStatus, *OutDirStatus;
89     struct AFSCallBack CallBack;
90     struct AFSVolSync tsync;
91     struct volume *volp = 0;
92     struct afs_fakestat_state fakestate;
93     struct rx_connection *rxconn;
94     XSTATS_DECLS;
95     OSI_VC_CONVERT(adp);
96
97     AFS_STATCNT(afs_symlink);
98     afs_Trace2(afs_iclSetp, CM_TRACE_SYMLINK, ICL_TYPE_POINTER, adp,
99                ICL_TYPE_STRING, aname);
100
101     OutFidStatus = osi_AllocSmallSpace(sizeof(struct AFSFetchStatus));
102     OutDirStatus = osi_AllocSmallSpace(sizeof(struct AFSFetchStatus));
103     memset(&InStatus, 0, sizeof(InStatus));
104
105     if ((code = afs_CreateReq(&treq, acred)))
106         goto done2;
107
108     afs_InitFakeStat(&fakestate);
109
110     AFS_DISCON_LOCK();
111     
112     code = afs_EvalFakeStat(&adp, &fakestate, treq);
113     if (code)
114         goto done;
115
116     if (strlen(aname) > AFSNAMEMAX || strlen(atargetName) > AFSPATHMAX) {
117         code = ENAMETOOLONG;
118         goto done;
119     }
120
121     if (afs_IsDynroot(adp)) {
122         code = afs_DynrootVOPSymlink(adp, acred, aname, atargetName);
123         goto done;
124     }
125     if (afs_IsDynrootMount(adp)) {
126         code = EROFS;
127         goto done;
128     }
129
130     code = afs_VerifyVCache(adp, treq);
131     if (code) {
132         code = afs_CheckCode(code, treq, 30);
133         goto done;
134     }
135
136     /** If the volume is read-only, return error without making an RPC to the
137       * fileserver
138       */
139     if (adp->f.states & CRO) {
140         code = EROFS;
141         goto done;
142     }
143
144     if (AFS_IS_DISCONNECTED && !AFS_IS_DISCON_RW) {
145         code = ENETDOWN;
146         goto done;
147     }
148     
149     InStatus.Mask = AFS_SETMODTIME | AFS_SETMODE;
150     InStatus.ClientModTime = osi_Time();
151     alen = strlen(atargetName); /* we want it to include the null */
152     if ( (*atargetName == '#' || *atargetName == '%') && alen > 1 && atargetName[alen-1] == '.') {
153         InStatus.UnixModeBits = 0644;   /* mt pt: null from "." at end */
154         if (alen == 1)
155             alen++;             /* Empty string */
156     } else {
157         InStatus.UnixModeBits = 0755;
158         alen++;                 /* add in the null */
159     }
160     tdc = afs_GetDCache(adp, (afs_size_t) 0, treq, &offset, &len, 1);
161     volp = afs_FindVolume(&adp->f.fid, READ_LOCK);      /*parent is also in same vol */
162     ObtainWriteLock(&adp->lock, 156);
163     if (tdc)
164         ObtainWriteLock(&tdc->lock, 636);
165     /* No further locks: if the SymLink succeeds, it does not matter what happens
166      * to our local copy of the directory. If somebody tampers with it in the meantime,
167      * the copy will be invalidated */
168     if (!AFS_IS_DISCON_RW) {
169         do {
170             tc = afs_Conn(&adp->f.fid, treq, SHARED_LOCK, &rxconn);
171             if (tc) {
172                 hostp = tc->parent->srvr->server;
173                 XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_SYMLINK);
174                 if (adp->f.states & CForeign) {
175                     now = osi_Time();
176                     RX_AFS_GUNLOCK();
177                     code = 
178                         RXAFS_DFSSymlink(rxconn,
179                                          (struct AFSFid *)&adp->f.fid.Fid,
180                                          aname, atargetName, &InStatus,
181                                          (struct AFSFid *)&newFid.Fid,
182                                          OutFidStatus, OutDirStatus,
183                                          &CallBack, &tsync);
184                     RX_AFS_GLOCK();
185                 } else {
186                     RX_AFS_GUNLOCK();
187                     code =
188                         RXAFS_Symlink(rxconn, (struct AFSFid *)&adp->f.fid.Fid,
189                                       aname, atargetName, &InStatus,
190                                       (struct AFSFid *)&newFid.Fid, 
191                                       OutFidStatus, OutDirStatus, &tsync);
192                     RX_AFS_GLOCK();
193                 }
194                 XSTATS_END_TIME;
195             } else
196                 code = -1;
197         } while (afs_Analyze
198                     (tc, rxconn, code, &adp->f.fid, treq, AFS_STATS_FS_RPCIDX_SYMLINK,
199                      SHARED_LOCK, NULL));
200     } else {
201         newFid.Cell = adp->f.fid.Cell;
202         newFid.Fid.Volume = adp->f.fid.Fid.Volume;
203         afs_GenFakeFid(&newFid, VREG, 0);
204     }
205
206     ObtainWriteLock(&afs_xvcache, 40);
207     if (code) {
208         if (code < 0) {
209             afs_StaleVCache(adp);
210         }
211         ReleaseWriteLock(&adp->lock);
212         ReleaseWriteLock(&afs_xvcache);
213         if (tdc) {
214             ReleaseWriteLock(&tdc->lock);
215             afs_PutDCache(tdc);
216         }
217         goto done;
218     }
219     /* otherwise, we should see if we can make the change to the dir locally */
220     if (AFS_IS_DISCON_RW || afs_LocalHero(adp, tdc, OutDirStatus, 1)) {
221         /* we can do it locally */
222         ObtainWriteLock(&afs_xdcache, 293);
223         /* If the following fails because the name has been created in the meantime, the
224          * directory is out-of-date - the file server knows best! */
225         code = afs_dir_Create(tdc, aname, &newFid.Fid);
226         ReleaseWriteLock(&afs_xdcache);
227         if (code && !AFS_IS_DISCON_RW) {
228             ZapDCE(tdc);        /* surprise error -- use invalid value */
229             DZap(tdc);
230         }
231     }
232     if (tdc) {
233         ReleaseWriteLock(&tdc->lock);
234         afs_PutDCache(tdc);
235     }
236     newFid.Cell = adp->f.fid.Cell;
237     newFid.Fid.Volume = adp->f.fid.Fid.Volume;
238     ReleaseWriteLock(&adp->lock);
239
240     /* now we're done with parent dir, create the link's entry.  Note that
241      * no one can get a pointer to the new cache entry until we release 
242      * the xvcache lock. */
243     tvc = afs_NewVCache(&newFid, hostp);
244     if (!tvc)
245     {
246         code = -2;
247         ReleaseWriteLock(&afs_xvcache);
248         goto done;
249     }
250     ObtainWriteLock(&tvc->lock, 157);
251     ObtainWriteLock(&afs_xcbhash, 500);
252     tvc->f.states |= CStatd;    /* have valid info */
253     tvc->f.states &= ~CBulkFetching;
254
255     if (adp->f.states & CForeign) {
256         tvc->f.states |= CForeign;
257         /* We don't have to worry about losing the callback since we're doing it 
258          * under the afs_xvcache lock actually, afs_NewVCache may drop the 
259          * afs_xvcache lock, if it calls afs_FlushVCache */
260         tvc->cbExpires = CallBack.ExpirationTime + now;
261         afs_QueueCallback(tvc, CBHash(CallBack.ExpirationTime), volp);
262     } else {
263         tvc->cbExpires = 0x7fffffff;    /* never expires, they can't change */
264         /* since it never expires, we don't have to queue the callback */
265     }
266     ReleaseWriteLock(&afs_xcbhash);
267
268     if (AFS_IS_DISCON_RW) {
269         attrs->va_mode = InStatus.UnixModeBits;
270         afs_GenDisconStatus(adp, tvc, &newFid, attrs, treq, VLNK);
271         code = afs_DisconCreateSymlink(tvc, atargetName, treq);
272         if (code) {
273             /* XXX - When this goes wrong, we need to tidy up the changes we made to
274              * the parent, and get rid of the vcache we just created */
275             ReleaseWriteLock(&tvc->lock);
276             ReleaseWriteLock(&afs_xvcache);
277             afs_PutVCache(tvc);
278             goto done;
279         }
280         afs_DisconAddDirty(tvc, VDisconCreate, 0);
281     } else {
282         afs_ProcessFS(tvc, OutFidStatus, treq);
283     }
284
285     if (!tvc->linkData) {
286         tvc->linkData = afs_osi_Alloc(alen);
287         osi_Assert(tvc->linkData != NULL);
288         strncpy(tvc->linkData, atargetName, alen - 1);
289         tvc->linkData[alen - 1] = 0;
290     }
291     ReleaseWriteLock(&tvc->lock);
292     ReleaseWriteLock(&afs_xvcache);
293     if (tvcp)
294         *tvcp = tvc;
295     else
296         afs_PutVCache(tvc);
297     code = 0;
298   done:
299     afs_PutFakeStat(&fakestate);
300     if (volp)
301         afs_PutVolume(volp, READ_LOCK);
302     AFS_DISCON_UNLOCK();
303     code = afs_CheckCode(code, treq, 31);
304     afs_DestroyReq(treq);
305   done2:
306     osi_FreeSmallSpace(OutFidStatus);
307     osi_FreeSmallSpace(OutDirStatus);
308     return code;
309 }
310
311 int
312 afs_MemHandleLink(struct vcache *avc, struct vrequest *areq)
313 {
314     struct dcache *tdc;
315     char *tp, *rbuf;
316     afs_size_t offset, len;
317     afs_int32 tlen, alen;
318     afs_int32 code;
319
320     AFS_STATCNT(afs_MemHandleLink);
321     /* two different formats, one for links protected 644, have a "." at
322      * the end of the file name, which we turn into a null.  Others, 
323      * protected 755, we add a null to the end of */
324     if (!avc->linkData) {
325         void *addr;
326         tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 0);
327         if (!tdc) {
328             return EIO;
329         }
330         /* otherwise we have the data loaded, go for it */
331         if (len > 1024) {
332             afs_PutDCache(tdc);
333             return EFAULT;
334         }
335         if (avc->f.m.Mode & 0111)
336             alen = len + 1;     /* regular link */
337         else
338             alen = len;         /* mt point */
339         rbuf = osi_AllocLargeSpace(AFS_LRALLOCSIZ);
340         ObtainReadLock(&tdc->lock);
341         addr = afs_MemCacheOpen(&tdc->f.inode);
342         tlen = len;
343         code = afs_MemReadBlk(addr, 0, rbuf, tlen);
344         afs_MemCacheClose(addr);
345         ReleaseReadLock(&tdc->lock);
346         afs_PutDCache(tdc);
347         rbuf[alen - 1] = 0;
348         alen = strlen(rbuf) + 1;
349         tp = afs_osi_Alloc(alen);       /* make room for terminating null */
350         osi_Assert(tp != NULL);
351         memcpy(tp, rbuf, alen);
352         osi_FreeLargeSpace(rbuf);
353         if (code != len) {
354             afs_osi_Free(tp, alen);
355             return EIO;
356         }
357         avc->linkData = tp;
358     }
359     return 0;
360 }
361
362 int
363 afs_UFSHandleLink(struct vcache *avc, struct vrequest *areq)
364 {
365     struct dcache *tdc;
366     char *tp, *rbuf;
367     void *tfile;
368     afs_size_t offset, len;
369     afs_int32 tlen, alen;
370     afs_int32 code;
371
372     /* two different formats, one for links protected 644, have a "." at the
373      * end of the file name, which we turn into a null.  Others, protected
374      * 755, we add a null to the end of */
375     AFS_STATCNT(afs_UFSHandleLink);
376     if (!avc->linkData) {
377         tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 0);
378         afs_Trace3(afs_iclSetp, CM_TRACE_UFSLINK, ICL_TYPE_POINTER, avc,
379                    ICL_TYPE_POINTER, tdc, ICL_TYPE_OFFSET,
380                    ICL_HANDLE_OFFSET(avc->f.m.Length));
381         if (!tdc) {
382             if (AFS_IS_DISCONNECTED)
383                 return ENETDOWN;
384             else
385                 return EIO;
386         }
387         /* otherwise we have the data loaded, go for it */
388         if (len > 1024) {
389             afs_PutDCache(tdc);
390             return EFAULT;
391         }
392         if (avc->f.m.Mode & 0111)
393             alen = len + 1;     /* regular link */
394         else
395             alen = len;         /* mt point */
396         rbuf = osi_AllocLargeSpace(AFS_LRALLOCSIZ);
397         tlen = len;
398         ObtainReadLock(&tdc->lock);
399         tfile = osi_UFSOpen(&tdc->f.inode);
400         if (!tfile) {
401             ReleaseReadLock(&tdc->lock);
402             afs_PutDCache(tdc);
403             osi_FreeLargeSpace(rbuf);
404             return EIO;
405         }
406         code = afs_osi_Read(tfile, -1, rbuf, tlen);
407         osi_UFSClose(tfile);
408         ReleaseReadLock(&tdc->lock);
409         afs_PutDCache(tdc);
410         rbuf[alen - 1] = '\0';
411         alen = strlen(rbuf) + 1;
412         tp = afs_osi_Alloc(alen);       /* make room for terminating null */
413         osi_Assert(tp != NULL);
414         memcpy(tp, rbuf, alen);
415         osi_FreeLargeSpace(rbuf);
416         if (code != tlen) {
417             afs_osi_Free(tp, alen);
418             return EIO;
419         }
420         avc->linkData = tp;
421     }
422     return 0;
423 }
424
425 int
426 afs_readlink(OSI_VC_DECL(avc), struct uio *auio, afs_ucred_t *acred)
427 {
428     afs_int32 code;
429     struct vrequest *treq = NULL;
430     char *tp;
431     struct afs_fakestat_state fakestat;
432     OSI_VC_CONVERT(avc);
433
434     AFS_STATCNT(afs_readlink);
435     afs_Trace1(afs_iclSetp, CM_TRACE_READLINK, ICL_TYPE_POINTER, avc);
436     if ((code = afs_CreateReq(&treq, acred)))
437         return code;
438     afs_InitFakeStat(&fakestat);
439
440     AFS_DISCON_LOCK();
441     
442     code = afs_EvalFakeStat(&avc, &fakestat, treq);
443     if (code)
444         goto done;
445     code = afs_VerifyVCache(avc, treq);
446     if (code)
447         goto done;
448     if (vType(avc) != VLNK) {
449         code = EINVAL;
450         goto done;
451     }
452     ObtainWriteLock(&avc->lock, 158);
453     code = afs_HandleLink(avc, treq);
454     /* finally uiomove it to user-land */
455     if (code == 0) {
456         tp = avc->linkData;
457         if (tp)
458             AFS_UIOMOVE(tp, strlen(tp), UIO_READ, auio, code);
459         else {
460             code = EIO;
461         }
462     }
463     ReleaseWriteLock(&avc->lock);
464   done:
465     afs_PutFakeStat(&fakestat);
466     AFS_DISCON_UNLOCK();
467     code = afs_CheckCode(code, treq, 32);
468     afs_DestroyReq(treq);
469     return code;
470 }