Init

sys/lwp/alloc.h

@@ -0,0 +1,70 @@
+/* @(#) alloc.h 1.1 94/10/31 Copyr 1987 Sun Micro */
+/* Copyright (C) 1987. Sun Microsystems, Inc. */
+
+#ifndef _lwp_alloc_h
+#define	_lwp_alloc_h
+
+/*
+ * fast inline code to get/free some memory
+ * usage:
+ * GETCHUNK((cast), val, cookie) vs. val = (cast)getchunk(cookie);
+ * NR_GETCHUNK((cast), val, cookie) (doesn't use registers)
+ * FREECHUNK(cookie, chunk_address);
+ */
+
+extern int **__Mem;
+extern int *__MemType[];
+extern int __CacheSize[];
+extern int __CacheAlloc[];
+extern int __allocinit();
+extern int *__getchunk();
+extern void __freechunk();
+
+/*
+ * Obtain a chunk of cached memory.
+ */
+#define	GETCHUNK(cast, val, cookie) {			\
+	register int **p; 				\
+							\
+	p = &__MemType[(cookie)];			\
+	val = cast *p;					\
+	if (val != cast 0) {				\
+		*p = (int *)**p;			\
+		__CacheAlloc[cookie]--;			\
+	} else						\
+		val = cast __getchunk((cookie));	\
+}
+
+/*
+ * get a chunk w__ithout using a non-volatile register temp (procedure
+ * calls ok since they restore regs upon return).
+ */
+#define	NR_GETCHUNK(cast, val, cookie) {		\
+	__Mem = &__MemType[cookie];			\
+	val = cast *__Mem;				\
+	if (val != cast 0) {				\
+		*__Mem = (int *)**__Mem;		\
+		__CacheAlloc[cookie]--;			\
+	} else						\
+		val = cast __getchunk((cookie));	\
+}
+
+#define	FREECHUNK(cookie, addr) {			\
+		__freechunk((int)cookie, (caddr_t)addr);		\
+}
+
+/* size (in bytes) of a given memory type: constant with interrupt memory */
+#define	MEMSIZE(cookie) (__CacheSize[(cookie)])
+
+/*
+ * macros to hide which malloc we're using
+ * MEM_ALLOC must return an address that can be used as a stack.
+ * Thus, we use valloc. In the kernel, kmem_alloc is sufficient since
+ * we won't use mmap on stacks.
+ */
+#include <sys/kmem_alloc.h>
+#define	MEM_ALLOC(bsize)	new_kmem_alloc((u_int)(bsize), KMEM_SLEEP)
+#define	MEM_FREE(ptr, bsize) \
+	kmem_free((caddr_t)(ptr), (u_int)(bsize))
+
+#endif /* !_lwp_alloc_h */