2 * Copyright 2000, International Business Machines Corporation and others.
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
16 #include <afsconfig.h>
17 #include "afs/param.h"
22 #include "afs/sysincludes.h" /* Standard vendor system headers */
23 #include "afsincludes.h" /* Afs-based standard headers */
24 #include "afs/afs_stats.h" /* statistics */
25 #include "afs/afs_cbqueue.h"
26 #include "afs/nfsclient.h"
27 #include "afs/afs_osidnlc.h"
28 #include "afs/unified_afs.h"
30 /* question: does afs_create need to set CDirty in the adp or the avc?
31 * I think we can get away without it, but I'm not sure. Note that
32 * afs_setattr is called in here for truncation.
36 afs_create(OSI_VC_DECL(adp), char *aname, struct vattr *attrs, int flags,
37 int amode, struct vcache **avcp, struct AFS_UCRED *acred)
38 #else /* AFS_SGI64_ENV */
40 afs_create(OSI_VC_DECL(adp), char *aname, struct vattr *attrs,
41 enum vcexcl aexcl, int amode, struct vcache **avcp,
42 struct AFS_UCRED *acred)
43 #endif /* AFS_SGI64_ENV */
45 afs_int32 origCBs, origZaps, finalZaps;
47 register afs_int32 code;
48 register struct conn *tc;
49 struct VenusFid newFid;
50 struct AFSStoreStatus InStatus;
51 struct AFSFetchStatus OutFidStatus, OutDirStatus;
52 struct AFSVolSync tsync;
53 struct AFSCallBack CallBack;
56 afs_size_t offset, len;
57 struct server *hostp = 0;
59 struct volume *volp = 0;
60 struct afs_fakestat_state fakestate;
65 AFS_STATCNT(afs_create);
66 if ((code = afs_InitReq(&treq, acred)))
69 afs_Trace3(afs_iclSetp, CM_TRACE_CREATE, ICL_TYPE_POINTER, adp,
70 ICL_TYPE_STRING, aname, ICL_TYPE_INT32, amode);
72 afs_InitFakeStat(&fakestate);
75 /* If avcp is passed not null, it's the old reference to this file.
76 * We can use this to avoid create races. For now, just decrement
77 * the reference count on it.
80 AFS_RELE(AFSTOV(*avcp));
85 if (strlen(aname) > AFSNAMEMAX) {
90 if (!afs_ENameOK(aname)) {
94 switch (attrs->va_type) {
97 #if !defined(AFS_SUN5_ENV)
101 /* We don't support special devices or FIFOs */
109 code = afs_EvalFakeStat(&adp, &fakestate, &treq);
113 code = afs_VerifyVCache(adp, &treq);
117 /** If the volume is read-only, return error without making an RPC to the
120 if (adp->states & CRO) {
125 if (AFS_IS_DISCONNECTED && !AFS_IS_DISCON_RW) {
130 tdc = afs_GetDCache(adp, (afs_size_t) 0, &treq, &offset, &len, 1);
131 ObtainWriteLock(&adp->lock, 135);
133 ObtainSharedLock(&tdc->lock, 630);
136 * Make sure that the data in the cache is current. We may have
137 * received a callback while we were waiting for the write lock.
139 if (!(adp->states & CStatd)
140 || (tdc && !hsame(adp->m.DataVersion, tdc->f.versionNo))) {
141 ReleaseWriteLock(&adp->lock);
143 ReleaseSharedLock(&tdc->lock);
149 /* see if file already exists. If it does, we only set
150 * the size attributes (to handle O_TRUNC) */
151 code = afs_dir_Lookup(tdc, aname, &newFid.Fid); /* use dnlc first xxx */
153 ReleaseSharedLock(&tdc->lock);
155 ReleaseWriteLock(&adp->lock);
159 if (aexcl != NONEXCL) {
161 code = EEXIST; /* file exists in excl mode open */
164 /* found the file, so use it */
165 newFid.Cell = adp->fid.Cell;
166 newFid.Fid.Volume = adp->fid.Fid.Volume;
168 if (newFid.Fid.Unique == 0) {
169 tvc = afs_LookupVCache(&newFid, &treq, NULL, adp, aname);
171 if (!tvc) /* lookup failed or wasn't called */
172 tvc = afs_GetVCache(&newFid, &treq, NULL, NULL);
175 /* if the thing exists, we need the right access to open it.
176 * we must check that here, since no other checks are
177 * made by the open system call */
178 len = attrs->va_size; /* only do the truncate */
180 * We used to check always for READ access before; the
181 * problem is that we will fail if the existing file
182 * has mode -w-w-w, which is wrong.
185 && !afs_AccessOK(tvc, PRSFS_READ, &treq, CHECK_MODE_BITS)) {
190 #if defined(AFS_DARWIN80_ENV)
191 if ((amode & VWRITE) || VATTR_IS_ACTIVE(attrs, va_data_size))
192 #elif defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
193 if ((amode & VWRITE) || (attrs->va_mask & AT_SIZE))
195 if ((amode & VWRITE) || len != 0xffffffff)
198 /* needed for write access check */
199 tvc->parentVnode = adp->fid.Fid.Vnode;
200 tvc->parentUnique = adp->fid.Fid.Unique;
201 /* need write mode for these guys */
203 (tvc, PRSFS_WRITE, &treq, CHECK_MODE_BITS)) {
209 #if defined(AFS_DARWIN80_ENV)
210 if (VATTR_IS_ACTIVE(attrs, va_data_size))
211 #elif defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
212 if (attrs->va_mask & AT_SIZE)
214 if (len != 0xffffffff)
217 if (vType(tvc) != VREG) {
223 #if defined(AFS_DARWIN80_ENV)
225 VATTR_SET_SUPPORTED(attrs, va_data_size);
226 VATTR_SET_ACTIVE(attrs, va_data_size);
227 #elif defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
228 attrs->va_mask = AT_SIZE;
232 attrs->va_size = len;
233 ObtainWriteLock(&tvc->lock, 136);
234 tvc->states |= CCreating;
235 ReleaseWriteLock(&tvc->lock);
236 #if defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
237 #if defined(AFS_SGI64_ENV)
239 afs_setattr(VNODE_TO_FIRST_BHV((vnode_t *) tvc),
242 code = afs_setattr(tvc, attrs, 0, acred);
243 #endif /* AFS_SGI64_ENV */
244 #else /* SUN5 || SGI */
245 code = afs_setattr(tvc, attrs, acred);
246 #endif /* SUN5 || SGI */
247 ObtainWriteLock(&tvc->lock, 137);
248 tvc->states &= ~CCreating;
249 ReleaseWriteLock(&tvc->lock);
257 code = ENOENT; /* shouldn't get here */
258 /* make sure vrefCount bumped only if code == 0 */
263 /* if we create the file, we don't do any access checks, since
264 * that's how O_CREAT is supposed to work */
265 if (adp->states & CForeign) {
266 origCBs = afs_allCBs;
267 origZaps = afs_allZaps;
269 origCBs = afs_evenCBs; /* if changes, we don't really have a callback */
270 origZaps = afs_evenZaps; /* number of even numbered vnodes discarded */
272 InStatus.Mask = AFS_SETMODTIME | AFS_SETMODE | AFS_SETGROUP;
273 InStatus.ClientModTime = osi_Time();
274 InStatus.Group = (afs_int32) acred->cr_gid;
275 if (AFS_NFSXLATORREQ(acred)) {
277 * XXX The following is mainly used to fix a bug in the HP-UX
278 * nfs client where they create files with mode of 0 without
279 * doing any setattr later on to fix it. * XXX
281 #if defined(AFS_AIX_ENV)
282 if (attrs->va_mode != -1) {
284 #if defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
285 if (attrs->va_mask & AT_MODE) {
287 if (attrs->va_mode != ((unsigned short)-1)) {
291 attrs->va_mode = 0x1b6; /* XXX default mode: rw-rw-rw XXX */
295 if (!AFS_IS_DISCONNECTED) {
296 /* If not disconnected, connect to the server.*/
298 InStatus.UnixModeBits = attrs->va_mode & 0xffff; /* only care about protection bits */
300 tc = afs_Conn(&adp->fid, &treq, SHARED_LOCK);
302 hostp = tc->srvr->server; /* remember for callback processing */
304 XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_CREATEFILE);
307 RXAFS_CreateFile(tc->id, (struct AFSFid *)&adp->fid.Fid,
308 aname, &InStatus, (struct AFSFid *)
309 &newFid.Fid, &OutFidStatus, &OutDirStatus,
313 CallBack.ExpirationTime += now;
317 (tc, code, &adp->fid, &treq, AFS_STATS_FS_RPCIDX_CREATEFILE,
320 if ((code == EEXIST || code == UAEEXIST) &&
323 #else /* AFS_SGI64_ENV */
327 /* if we get an EEXIST in nonexcl mode, just do a lookup */
329 ReleaseSharedLock(&tdc->lock);
332 ReleaseWriteLock(&adp->lock);
333 #if !(defined(AFS_OSF_ENV) || defined(AFS_DARWIN_ENV))
334 #if defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV)
335 #if defined(AFS_SGI64_ENV)
336 code = afs_lookup(VNODE_TO_FIRST_BHV((vnode_t *) adp), aname, avcp,
337 NULL, 0, NULL, acred);
339 code = afs_lookup(adp, aname, avcp, NULL, 0, NULL, acred);
340 #endif /* AFS_SGI64_ENV */
341 #else /* SUN5 || SGI */
342 code = afs_lookup(adp, aname, avcp, acred);
343 #endif /* SUN5 || SGI */
344 #endif /* !(AFS_OSF_ENV || AFS_DARWIN_ENV) */
350 ObtainWriteLock(&afs_xcbhash, 488);
351 afs_DequeueCallback(adp);
352 adp->states &= ~CStatd;
353 ReleaseWriteLock(&afs_xcbhash);
354 osi_dnlc_purgedp(adp);
356 ReleaseWriteLock(&adp->lock);
358 ReleaseSharedLock(&tdc->lock);
365 #if defined(AFS_DISCON_ENV)
366 /* Generate a fake FID for disconnected mode. */
367 newFid.Cell = adp->fid.Cell;
368 newFid.Fid.Volume = adp->fid.Fid.Volume;
369 afs_GenFakeFid(&newFid, VREG);
371 } /* if (!AFS_IS_DISCON_RW) */
373 /* otherwise, we should see if we can make the change to the dir locally */
375 UpgradeSToWLock(&tdc->lock, 631);
376 if (AFS_IS_DISCON_RW || afs_LocalHero(adp, tdc, &OutDirStatus, 1)) {
377 /* we can do it locally */
378 ObtainWriteLock(&afs_xdcache, 291);
379 code = afs_dir_Create(tdc, aname, &newFid.Fid);
380 ReleaseWriteLock(&afs_xdcache);
387 ReleaseWriteLock(&tdc->lock);
390 newFid.Cell = adp->fid.Cell;
391 newFid.Fid.Volume = adp->fid.Fid.Volume;
392 ReleaseWriteLock(&adp->lock);
393 volp = afs_FindVolume(&newFid, READ_LOCK);
395 /* New tricky optimistic callback handling algorithm for file creation works
396 * as follows. We create the file essentially with no locks set at all. File
397 * server may thus handle operations from others cache managers as well as from
398 * this very own cache manager that reference the file in question before
399 * we managed to create the cache entry. However, if anyone else changes
400 * any of the status information for a file, we'll see afs_evenCBs increase
401 * (files always have even fids). If someone on this workstation manages
402 * to do something to the file, they'll end up having to create a cache
403 * entry for the new file. Either we'll find it once we've got the afs_xvcache
404 * lock set, or it was also *deleted* the vnode before we got there, in which case
405 * we will find evenZaps has changed, too. Thus, we only assume we have the right
406 * status information if no callbacks or vnode removals have occurred to even
407 * numbered files from the time the call started until the time that we got the xvcache
408 * lock set. Of course, this also assumes that any call that modifies a file first
409 * gets a write lock on the file's vnode, but if that weren't true, the whole cache manager
410 * would fail, since no call would be able to update the local vnode status after modifying
411 * a file on a file server. */
412 ObtainWriteLock(&afs_xvcache, 138);
413 if (adp->states & CForeign)
414 finalZaps = afs_allZaps; /* do this before calling newvcache */
416 finalZaps = afs_evenZaps; /* do this before calling newvcache */
417 /* don't need to call RemoveVCB, since only path leaving a callback is the
418 * one where we pass through afs_NewVCache. Can't have queued a VCB unless
419 * we created and freed an entry between file creation time and here, and the
420 * freeing of the vnode will change evenZaps. Don't need to update the VLRU
421 * queue, since the find will only succeed in the event of a create race, and
422 * then the vcache will be at the front of the VLRU queue anyway... */
423 if (!(tvc = afs_FindVCache(&newFid, 0, DO_STATS))) {
424 tvc = afs_NewVCache(&newFid, hostp);
427 ObtainWriteLock(&tvc->lock, 139);
429 ObtainWriteLock(&afs_xcbhash, 489);
430 finalCBs = afs_evenCBs;
431 /* add the callback in */
432 if (adp->states & CForeign) {
433 tvc->states |= CForeign;
434 finalCBs = afs_allCBs;
436 if (origCBs == finalCBs && origZaps == finalZaps) {
437 tvc->states |= CStatd; /* we've fake entire thing, so don't stat */
438 tvc->states &= ~CBulkFetching;
439 tvc->cbExpires = CallBack.ExpirationTime;
440 afs_QueueCallback(tvc, CBHash(CallBack.ExpirationTime), volp);
442 afs_DequeueCallback(tvc);
443 tvc->states &= ~(CStatd | CUnique);
445 if (tvc->fid.Fid.Vnode & 1 || (vType(tvc) == VDIR))
446 osi_dnlc_purgedp(tvc);
448 ReleaseWriteLock(&afs_xcbhash);
449 if (!AFS_IS_DISCON_RW)
450 afs_ProcessFS(tvc, &OutFidStatus, &treq);
451 tvc->parentVnode = adp->fid.Fid.Vnode;
452 tvc->parentUnique = adp->fid.Fid.Unique;
453 ReleaseWriteLock(&tvc->lock);
457 if (AFS_IS_DISCON_RW) {
458 #if defined(AFS_DISCON_ENV)
459 /* After tvc has been created, we can do various ops on it. */
460 /* Add to dirty list. */
461 if (!tvc->ddirty_flags ||
462 (tvc->ddirty_flags == VDisconShadowed)) {
463 /* Put it in the list only if it's fresh. */
464 ObtainWriteLock(&afs_DDirtyVCListLock, 729);
465 AFS_DISCON_ADD_DIRTY(tvc);
466 ReleaseWriteLock(&afs_DDirtyVCListLock);
469 /* Set create flag. */
470 ObtainWriteLock(&tvc->lock, 730);
471 afs_GenDisconStatus(adp, tvc, &newFid, attrs, &treq, VREG);
472 tvc->ddirty_flags |= VDisconCreate;
473 ReleaseWriteLock(&tvc->lock);
475 #endif /* #ifdef AFS_DISCON_ENV */
476 } /* if (AFS_IS_DISCON_RW) */
482 /* otherwise cache entry already exists, someone else must
483 * have created it. Comments used to say: "don't need write
484 * lock to *clear* these flags" but we should do it anyway.
485 * Code used to clear stat bit and callback, but I don't see
486 * the point -- we didn't have a create race, somebody else just
487 * snuck into NewVCache before we got here, probably a racing
493 ReleaseWriteLock(&afs_xvcache);
500 afs_PutVolume(volp, READ_LOCK);
503 afs_AddMarinerName(aname, *avcp);
504 /* return the new status in vattr */
505 afs_CopyOutAttrs(*avcp, attrs);
508 if (!code && !strcmp(aname, "core"))
509 tvc->states |= CCore1;
512 afs_PutFakeStat(&fakestate);
513 code = afs_CheckCode(code, &treq, 20);
521 * Check to see if we can track the change locally: requires that
522 * we have sufficiently recent info in data cache. If so, we
523 * know the new DataVersion number, and place it correctly in both the
524 * data and stat cache entries. This routine returns 1 if we should
525 * do the operation locally, and 0 otherwise.
527 * This routine must be called with the stat cache entry write-locked,
528 * and dcache entry write-locked.
531 afs_LocalHero(register struct vcache *avc, register struct dcache *adc,
532 register AFSFetchStatus * astat, register int aincr)
534 register afs_int32 ok;
537 AFS_STATCNT(afs_LocalHero);
538 hset64(avers, astat->dataVersionHigh, astat->DataVersion);
539 /* this *is* the version number, no matter what */
541 ok = (hsame(avc->m.DataVersion, adc->f.versionNo) && avc->callback
542 && (avc->states & CStatd) && avc->cbExpires >= osi_Time());
546 #if defined(AFS_SGI_ENV)
547 osi_Assert(avc->v.v_type == VDIR);
549 /* The bulk status code used the length as a sequence number. */
550 /* Don't update the vcache entry unless the stats are current. */
551 if (avc->states & CStatd) {
552 hset(avc->m.DataVersion, avers);
553 #ifdef AFS_64BIT_CLIENT
554 FillInt64(avc->m.Length, astat->Length_hi, astat->Length);
555 #else /* AFS_64BIT_CLIENT */
556 avc->m.Length = astat->Length;
557 #endif /* AFS_64BIT_CLIENT */
558 avc->m.Date = astat->ClientModTime;
561 /* we've been tracking things correctly */
562 adc->dflags |= DFEntryMod;
563 adc->f.versionNo = avers;
570 if (avc->states & CStatd) {
571 osi_dnlc_purgedp(avc);