@create
Chris Jones (cjones@freenet.edmonton.ab.ca)
Sun, 12 May 1996 19:12:59 PDT
=09What I did to fix that is:
#1) Removed the wizard check from $quota_utils:bi_create,
#2) Protected the create() builtin via $server_options.protect_create
#3) Set up $bf_create() along these lines:
=09if (!length(children($garbage)))
=09set_task_perms(#2);
=09foo =3D create();
=09chparent(foo, args[<whatever it is>]);
=09$wiz_utils:chown(foo, args[<whatever it is>]);
=09set_task_perms(caller_perms);
=09return foo;
=09else
=09set_task_perms(#2);
=09foo =3D children($garbage)[random(length(children($garbage)))];
=09chparent(foo, args[<whatever it is>]);
=09$wiz_utils:chown(foo, args[<whatever it is>]);
=09set_task_perms(caller_perms);
=09return foo;
=09endif
/---- Chris Jones ----v- PGP Fingerprint --------------------------------\
|42 -It's the answer! | 95 2F 8F 26 F9 CA 4B 1A D1 CA C1 5E F9 76 59 AB |
\---------------------^--------------------------------------------------/
On Sun, 12 May 1996, Mike Carns wrote:
> The $byte_quota_utils fix didn't help. Here's the taceback:
> #42:controls, line 3: Invalid indirection
> ... called from #90:moveto acceptable (this =3D=3D #2), line 11
> ... called from #1:accept (this =3D=3D #2), line 2
> ... called from built-in function move()
> ... called from #4:@create (this =3D=3D #2), line 41
> (End of traceback)
>=20
> I'd look at it on Lambda, but as I said, I don't have an account (i'm 4--
> something on the wait list).
>=20
> Mcarns
>=20
>=20
> =D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1=D1----------------=
---------------------------------------
> | Windows 95 =3D Macintosh 89 | Michael Carns =
|
> | DOS is a four letter word | mcarns@crl.com =
|
> | MSDOS just say NO! | http://192.188.37.4/~mcarns/ =
|
> -------------------------------------------------------------------------=
-
>=20
>=20