Home
last modified time | relevance | path

Searched refs:vm (Results 1 – 25 of 112) sorted by relevance

12345

/titanic_53/usr/src/common/ficl/
H A Dprimitives.c70 markBranch(ficlDictionary *dictionary, ficlVm *vm, char *tag) in markBranch() argument
72 ficlStackPushPointer(vm->dataStack, dictionary->here); in markBranch()
73 ficlStackPushPointer(vm->dataStack, tag); in markBranch()
77 markControlTag(ficlVm *vm, char *tag) in markControlTag() argument
79 ficlStackPushPointer(vm->dataStack, tag); in markControlTag()
83 matchControlTag(ficlVm *vm, char *wantTag) in matchControlTag() argument
87 FICL_STACK_CHECK(vm->dataStack, 1, 0); in matchControlTag()
89 tag = (char *)ficlStackPopPointer(vm->dataStack); in matchControlTag()
96 ficlVmThrowError(vm, in matchControlTag()
107 resolveBackBranch(ficlDictionary *dictionary, ficlVm *vm, char *tag) in resolveBackBranch() argument
[all …]
H A Dtools.c61 static void ficlPrimitiveStepIn(ficlVm *vm);
62 static void ficlPrimitiveStepOver(ficlVm *vm);
63 static void ficlPrimitiveStepBreak(ficlVm *vm);
92 ficlVmSetBreak(ficlVm *vm, ficlBreakpoint *pBP) in ficlVmSetBreak() argument
94 ficlWord *pStep = ficlSystemLookup(vm->callback.system, "step-break"); in ficlVmSetBreak()
95 FICL_VM_ASSERT(vm, pStep); in ficlVmSetBreak()
97 pBP->address = vm->ip; in ficlVmSetBreak()
98 pBP->oldXT = *vm->ip; in ficlVmSetBreak()
99 *vm->ip = pStep; in ficlVmSetBreak()
106 ficlDebugPrompt(ficlVm *vm, int debug) in ficlDebugPrompt() argument
[all …]
H A Dfileaccess.c12 pushIor(ficlVm *vm, int success) in pushIor() argument
19 ficlStackPushInteger(vm->dataStack, ior); in pushIor()
24 ficlFileOpen(ficlVm *vm, char *writeMode) in ficlFileOpen() argument
26 int fam = ficlStackPopInteger(vm->dataStack); in ficlFileOpen()
27 int length = ficlStackPopInteger(vm->dataStack); in ficlFileOpen()
28 void *address = (void *)ficlStackPopPointer(vm->dataStack); in ficlFileOpen()
39 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen()
40 ficlStackPushInteger(vm->dataStack, EINVAL); in ficlFileOpen()
58 ficlStackPushPointer(vm->dataStack, NULL); in ficlFileOpen()
63 ficlStackPushPointer(vm->dataStack, ff); in ficlFileOpen()
[all …]
H A Dsearch.c56 ficlPrimitiveDefinitions(ficlVm *vm) in ficlPrimitiveDefinitions() argument
58 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveDefinitions()
60 FICL_VM_ASSERT(vm, dictionary); in ficlPrimitiveDefinitions()
62 ficlVmThrowError(vm, "DEFINITIONS error - empty search order"); in ficlPrimitiveDefinitions()
77 ficlPrimitiveForthWordlist(ficlVm *vm) in ficlPrimitiveForthWordlist() argument
79 ficlHash *hash = ficlVmGetDictionary(vm)->forthWordlist; in ficlPrimitiveForthWordlist()
80 ficlStackPushPointer(vm->dataStack, hash); in ficlPrimitiveForthWordlist()
90 ficlPrimitiveGetCurrent(ficlVm *vm) in ficlPrimitiveGetCurrent() argument
92 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveGetCurrent()
94 ficlStackPushPointer(vm->dataStack, dictionary->compilationWordlist); in ficlPrimitiveGetCurrent()
[all …]
H A Dextras.c15 ficlPrimitiveSystem(ficlVm *vm) in ficlPrimitiveSystem() argument
17 ficlCountedString *counted = (ficlCountedString *)vm->pad; in ficlPrimitiveSystem()
19 ficlVmGetString(vm, counted, '\n'); in ficlPrimitiveSystem()
24 sprintf(vm->pad, "System call returned %d\n", in ficlPrimitiveSystem()
26 ficlVmTextOut(vm, vm->pad); in ficlPrimitiveSystem()
27 ficlVmThrow(vm, FICL_VM_STATUS_QUIT); in ficlPrimitiveSystem()
30 ficlVmTextOut(vm, "Warning (system): nothing happened\n"); in ficlPrimitiveSystem()
43 ficlPrimitiveLoad(ficlVm *vm) in ficlPrimitiveLoad() argument
54 ficlVmGetString(vm, counted, '\n'); in ficlPrimitiveLoad()
57 ficlVmTextOut(vm, "Warning (load): nothing happened\n"); in ficlPrimitiveLoad()
[all …]
H A Dvm.c53 #define FICL_VM_CHECK(vm) \ argument
54 FICL_VM_ASSERT(vm, (*(vm->ip - 1)) == vm->runningWord)
56 #define FICL_VM_CHECK(vm) argument
63 ficlVmBranchRelative(ficlVm *vm, int offset) in ficlVmBranchRelative() argument
65 vm->ip += offset; in ficlVmBranchRelative()
75 ficlVmCreate(ficlVm *vm, unsigned nPStack, unsigned nRStack) in ficlVmCreate() argument
77 if (vm == NULL) { in ficlVmCreate()
78 vm = (ficlVm *)ficlMalloc(sizeof (ficlVm)); in ficlVmCreate()
79 FICL_ASSERT(NULL, vm); in ficlVmCreate()
80 memset(vm, 0, sizeof (ficlVm)); in ficlVmCreate()
[all …]
H A Dfloat.c56 ficlPrimitiveFConstant(ficlVm *vm) in ficlPrimitiveFConstant() argument
58 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveFConstant()
59 ficlString name = ficlVmGetWord(vm); in ficlPrimitiveFConstant()
61 FICL_STACK_CHECK(vm->floatStack, 1, 0); in ficlPrimitiveFConstant()
65 ficlDictionaryAppendCell(dictionary, ficlStackPop(vm->floatStack)); in ficlPrimitiveFConstant()
94 ficlPrimitiveF2Constant(ficlVm *vm) in ficlPrimitiveF2Constant() argument
96 ficlDictionary *dictionary = ficlVmGetDictionary(vm); in ficlPrimitiveF2Constant()
97 ficlString name = ficlVmGetWord(vm); in ficlPrimitiveF2Constant()
99 FICL_STACK_CHECK(vm->floatStack, 2, 0); in ficlPrimitiveF2Constant()
103 ficlDictionaryAppendCell(dictionary, ficlStackPop(vm->floatStack)); in ficlPrimitiveF2Constant()
[all …]
H A Dficl.h863 ficlVm *vm; /* used for debugging */ member
872 ficlStackCreate(ficlVm *vm, char *name, unsigned nCells);
928 typedef void (*ficlPrimitive)(ficlVm *vm);
947 ficlVm *vm; member
959 (*ficlCompatibilityOutputFunction)(ficlVm *vm, char *text, int newline);
1053 FICL_PLATFORM_EXTERN void ficlVmBranchRelative(ficlVm *vm, int offset);
1055 ficlVmCreate(ficlVm *vm, unsigned nPStack, unsigned nRStack);
1056 FICL_PLATFORM_EXTERN void ficlVmDestroy(ficlVm *vm);
1057 FICL_PLATFORM_EXTERN ficlDictionary *ficlVmGetDictionary(ficlVm *vm);
1059 ficlVmGetString(ficlVm *vm, ficlCountedString *spDest, char delimiter);
[all …]
H A Dprefix.c69 ficlVmParsePrefix(ficlVm *vm, ficlString s) in ficlVmParsePrefix() argument
73 ficlWord *word = ficlSystemLookup(vm->callback.system, list_name); in ficlVmParsePrefix()
104 ficlVmSetTibIndex(vm, in ficlVmParsePrefix()
105 s.text + n - vm->tib.text); in ficlVmParsePrefix()
106 ficlVmExecuteWord(vm, word); in ficlVmParsePrefix()
118 ficlPrimitiveTempBase(ficlVm *vm) in ficlPrimitiveTempBase() argument
120 int oldbase = vm->base; in ficlPrimitiveTempBase()
121 ficlString number = ficlVmGetWord0(vm); in ficlPrimitiveTempBase()
122 int base = ficlStackPopInteger(vm->dataStack); in ficlPrimitiveTempBase()
124 vm->base = base; in ficlPrimitiveTempBase()
[all …]
H A Dsystem.c121 callback.vm = NULL; in ficlSystemCreate()
159 system->callback.vm = NULL; in ficlSystemCreate()
271 ficlVm *vm = system->vmList; in ficlSystemDestroy() local
273 ficlVmDestroy(vm); in ficlSystemDestroy()
333 ficlVm *vm = ficlVmCreate(NULL, system->stackSize, system->stackSize); in ficlSystemCreateVm() local
334 vm->link = system->vmList; in ficlSystemCreateVm()
336 memcpy(&(vm->callback), &(system->callback), sizeof (system->callback)); in ficlSystemCreateVm()
337 vm->callback.vm = vm; in ficlSystemCreateVm()
338 vm->callback.system = system; in ficlSystemCreateVm()
340 system->vmList = vm; in ficlSystemCreateVm()
[all …]
/titanic_53/usr/src/contrib/ast/src/lib/libast/vmalloc/
H A Dvmdebug.c81 static void vmdbwarn(Vmalloc_t* vm, char* mesg, int n) in vmdbwarn() argument
83 static void vmdbwarn(vm, mesg, n) in vmdbwarn()
84 Vmalloc_t* vm; in vmdbwarn()
89 reg Vmdata_t* vd = vm->data;
98 static void dbwarn(Vmalloc_t* vm, Void_t* data, int where, in dbwarn() argument
101 static void dbwarn(vm, data, where, file, line, func, type) in dbwarn()
102 Vmalloc_t* vm; /* region holding the block */ in dbwarn()
132 bufp = (*_Vmstrcpy)(bufp, (*_Vmitoa)(VLONG(vm), 0), ':');
182 vmdbwarn(vm,buf,(int)(bufp-buf));
187 static void dbwatch(Vmalloc_t* vm, Void_t* data, in dbwatch() argument
[all …]
H A Dvmpool.c42 static Void_t* poolalloc(Vmalloc_t* vm, reg size_t size, int local) in poolalloc() argument
44 static Void_t* poolalloc(vm, size, local ) in poolalloc()
45 Vmalloc_t* vm; in poolalloc()
53 reg Vmdata_t *vd = vm->data;
64 SETLOCK(vm, local);
80 if((tp = (*_Vmextend)(vm,ROUND(size,vd->incr),NIL(Vmsearch_f))) )
106 (*_Vmtrace)(vm,NIL(Vmuchar_t*),(Vmuchar_t*)tp,vd->pool,0);
108 CLRLOCK(vm, local);
114 static long pooladdr(Vmalloc_t* vm, reg Void_t* addr, int local) in pooladdr() argument
116 static long pooladdr(vm, addr, local) in pooladdr()
[all …]
H A Dvmwalk.c36 int vmwalk(Vmalloc_t* vm, int(*segf)(Vmalloc_t*, Void_t*, size_t, Vmdisc_t*, Void_t*), Void_t* hand… in vmwalk() argument
38 int vmwalk(vm, segf, handle) in vmwalk()
39 Vmalloc_t* vm; in vmwalk()
47 if(!vm)
49 for(vm = Vmheap; vm; vm = vm->next)
50 { SETLOCK(vm, 0);
51 for(seg = vm->data->seg; seg; seg = seg->next)
52 if((rv = (*segf)(vm, seg->addr, seg->extent, vm->disc, handle)) < 0 )
54 CLRLOCK(vm, 0);
59 { SETLOCK(vm, 0);
[all …]
H A Dvmprofile.c36 #define PFVM(pf) ((pf)->data.data.vm)
54 Vmalloc_t* vm; /* region alloc from */ member
76 static Pfobj_t* pfsearch(Vmalloc_t* vm, char* file, int line) in pfsearch() argument
78 static Pfobj_t* pfsearch(vm, file, line) in pfsearch()
79 Vmalloc_t* vm; /* region allocating from */ in pfsearch()
101 h = line + (((Vmulong_t)vm)>>4);
106 if(PFLINE(pf) == line && PFVM(pf) == vm && strcmp(PFFILE(pf),file) == 0)
137 if(vm >= PFVM(pfvm))
139 if(!pfvm || PFVM(pfvm) > vm)
153 PFVM(pfvm) = vm;
[all …]
H A Dvmlast.c36 static Void_t* lastalloc(Vmalloc_t* vm, size_t size, int local) in lastalloc() argument
38 static Void_t* lastalloc(vm, size, local) in lastalloc()
39 Vmalloc_t* vm; in lastalloc()
47 Vmdata_t *vd = vm->data;
50 SETLOCK(vm, local);
65 if((tp = (*_Vmextend)(vm,size,NIL(Vmsearch_f))) )
83 (*_Vmtrace)(vm, NIL(Vmuchar_t*), (Vmuchar_t*)tp, orgsize, 0);
86 CLRLOCK(vm, local);
92 static int lastfree(Vmalloc_t* vm, reg Void_t* data, int local ) in lastfree() argument
94 static int lastfree(vm, data, local) in lastfree()
[all …]
H A Dvmclose.c35 int vmclose(Vmalloc_t* vm) in vmclose() argument
37 int vmclose(vm) in vmclose()
38 Vmalloc_t* vm; in vmclose()
43 Vmdata_t* vd = vm->data;
44 Vmdisc_t* disc = vm->disc;
47 if(vm == Vmheap) /* the heap is never freed */
50 if(vm->disc->exceptf && /* announcing closing event */
51 (rv = (*vm->disc->exceptf)(vm,VM_CLOSE,(Void_t*)1,vm->disc)) < 0 )
57 (*_Vmpfclose)(vm);
62 { if(v == vm)
[all …]
H A Dvmprivate.c40 static Block_t* _vmextend(reg Vmalloc_t* vm, size_t size, Vmsearch_f searchf ) in _vmextend() argument
42 static Block_t* _vmextend(vm, size, searchf ) in _vmextend()
43 reg Vmalloc_t* vm; /* region to increase in size */ in _vmextend()
52 reg Vmdata_t* vd = vm->data;
67 if(size > 2*vd->incr && vm->disc->round < vd->incr)
73 { addr = (Vmuchar_t*)(*vm->disc->memoryf)(vm,seg->addr,seg->extent,
74 seg->extent+size,vm->disc);
81 { if(!(addr = (Vmuchar_t*)(*vm->disc->memoryf)(vm, NIL(Void_t*), 0, size, vm->disc)) )
82 { if(vm->disc->exceptf) /* announce that no more memory is available */
84 CLRLOCK(vm, 0);
[all …]
H A Dmalloc.c378 Vmalloc_t *vm; in clrfreelist() local
388 if(vm = regionof((Void_t*)list)) in clrfreelist()
389 { if(asocasint(&vm->data->lock, 0, 1) == 0) /* can free this now */ in clrfreelist()
390 { (void)(*vm->meth.freef)(vm, (Void_t*)list, 1); in clrfreelist()
391 vm->data->lock = 0; in clrfreelist()
404 static int regexcept(Vmalloc_t* vm, int type, Void_t* data, Vmdisc_t* disc) in regexcept() argument
416 Vmalloc_t *vm; in getregion() local
464 if((vm = vmopen(&Regdisc.disc, Vmbest, VM_SHARE)) != NIL(Vmalloc_t*) ) in getregion()
465 { vm->data->lock = 1; /* lock new region now */ in getregion()
468 return (Region[p] = vm); in getregion()
[all …]
H A Dvmregion.c44 Vmalloc_t *vm; local
53 for(vm = Vmheap; vm; vm = vm->next)
54 if(vm->data == vd)
58 return vm;
H A Dvmgetmem.c37 Void_t* vmgetmem(Vmalloc_t* vm, Void_t* data, size_t size) in vmgetmem() argument
39 Void_t* vmgetmem(vm, data, size) in vmgetmem()
40 Vmalloc_t* vm; in vmgetmem()
45 if (!vm)
48 return vmresize(vm, data, size, VM_RSMOVE|VM_RSCOPY|VM_RSZERO);
49 vmclose(vm);
H A Dvmdisc.c37 Vmdisc_t* vmdisc(Vmalloc_t* vm, Vmdisc_t* disc) in vmdisc() argument
39 Vmdisc_t* vmdisc(vm, disc) in vmdisc()
40 Vmalloc_t* vm; in vmdisc()
44 Vmdisc_t* old = vm->disc;
48 (*old->exceptf)(vm,VM_DISC,(Void_t*)disc,old) != 0 )
50 vm->disc = disc;
H A Dvmopen.c45 { Vmalloc_t vm; /* embedded region if needed */ member
47 } vm; member
64 Vmalloc_t *vm, *vmp, vmproto; local
160 vm = &init->vm.vm;
161 else if(!(vm = vmalloc(Vmheap, sizeof(Vmalloc_t))) )
166 memcpy(vm, vmp, sizeof(Vmalloc_t));
167 vm->data = vd;
170 (void)(*disc->exceptf)(vm, VM_ENDOPEN, NIL(Void_t*), disc);
174 vm->next = Vmheap->next; Vmheap->next = vm;
177 return vm;
H A Dvmset.c36 int vmset(reg Vmalloc_t* vm, int flags, int on) in vmset() argument
38 int vmset(vm, flags, on) in vmset()
39 reg Vmalloc_t* vm; /* region being worked on */ in vmset()
45 Vmdata_t *vd = vm->data;
50 SETLOCK(vm, 0);
57 CLRLOCK(vm, 0);
/titanic_53/usr/src/contrib/ast/src/lib/libast/include/
H A Dvmalloc.h210 #define _VM_(vm) ((Vmalloc_t*)(vm)) argument
216 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)__FILE__) argument
218 #define _VMFILE_(vm) (_VM_(vm)->file = (char*)0)
222 #define _VMLINE_(vm) (_VM_(vm)->line = __LINE__) argument
224 #define _VMLINE_(vm) (_VM_(vm)->line = 0)
228 #define _VMFUNC_(vm) (_VM_(vm)->func = (char*)__FUNCTION__) argument
230 #define _VMFUNC_(vm) (_VM_(vm)->func = (char*)0)
233 #define _VMFL_(vm) (_VMFILE_(vm), _VMLINE_(vm), _VMFUNC_(vm)) argument
235 #define vmalloc(vm,sz) (_VMFL_(vm), \ argument
236 (*(_VM_(vm)->meth.allocf))((vm),(sz),0) )
[all …]
/titanic_53/usr/src/cmd/mdb/demo/common/
H A Dexample1.c68 vminfo_t vm; in vminfo() local
73 if (mdb_readvar(&vm, "vminfo") == -1) { in vminfo()
83 mdb_printf("%8llu pages of free memory\n", vm.freemem); in vminfo()
84 mdb_printf("%8llu pages of reserved swap\n", vm.swap_resv); in vminfo()
85 mdb_printf("%8llu pages of allocated swap\n", vm.swap_alloc); in vminfo()
86 mdb_printf("%8llu pages of unreserved swap\n", vm.swap_avail); in vminfo()
87 mdb_printf("%8llu pages of unallocated swap\n", vm.swap_free); in vminfo()

12345