Branch: Tag:


1999-01-21 09:15:55 by Fredrik Hübinette (Hubbe) <>

security system v1.0E-100 checked in... (lots of work left to do)

Rev: src/array.c:1.43
Rev: src/array.h:1.15
Rev: src/builtin_functions.c:1.145
Rev: src/error.h:1.26
Rev: src/interpret.c:1.112
Rev: src/interpret.h:1.25
Rev: src/main.c:1.61
Rev: src/mapping.c:1.38
Rev: src/mapping.h:1.13
Rev: src/modules/files/file.c:1.133
Rev: src/modules/system/system.c:1.61
Rev: src/multiset.c:1.13
Rev: src/multiset.h:1.8
Rev: src/object.c:1.54
Rev: src/object.h:1.20
Rev: src/opcodes.c:1.35
Rev: src/otable.h:1.3(DEAD)
Rev: src/program.c:1.106
Rev: src/program.h:1.47
Rev: src/security.c:1.1
Rev: src/security.h:1.1
Rev: src/svalue.h:1.20
Rev: src/
Rev: src/threads.c:1.86

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: mapping.c,v 1.37 1998/11/22 11:03:02 hubbe Exp $"); + RCSID("$Id: mapping.c,v 1.38 1999/01/21 09:15:05 hubbe Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"
19:   #include "las.h"   #include "gc.h"   #include "stralloc.h" + #include "security.h"      #define AVG_LINK_LENGTH 4   #define MIN_LINK_LENGTH 1
106:       m=ALLOC_STRUCT(mapping);    +  INITIALIZE_PROT(m);    init_mapping(m,size);       m->next = first_mapping;
130:    fatal("really free mapping on mapping with nonzero refs.\n");   #endif    +  FREE_PROT(m); +     MAPPING_LOOP(m)    {    free_svalue(& k->val);