WebSVN – HelenOS-historic – Diff – /uspace/trunk/libc/generic/as.c


/*
 * Copyright (C) 2006 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
 /** @addtogroup libc
 * @{
 */
/** @file
 */
 
#include <as.h>
#include <libc.h>
#include <unistd.h>
#include <align.h>
 
/** Create address space area.
 *
 * @param address Virtual address where to place new address space area.
 * @param size Size of the area.
 * @param flags Flags describing type of the area.
 *
 * @return address on success, (void *) -1 otherwise.
 */
void *as_area_create(void *address, size_t size, int flags)
{
    return (void *) __SYSCALL3(SYS_AS_AREA_CREATE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);
}
 
/** Resize address space area.
 *
 * @param address Virtual address pointing into already existing address space area.
 * @param size New requested size of the area.
 * @param flags Currently unused.
 *
 * @return Zero on success or a code from @ref errno.h on failure.
 */
int as_area_resize(void *address, size_t size, int flags)
{
    return __SYSCALL3(SYS_AS_AREA_RESIZE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);
}
 
/** Destroy address space area.
 *
 * @param address Virtual address pointing into the address space area being destroyed.
 *
 * @return Zero on success or a code from @ref errno.h on failure.
 */
int as_area_destroy(void *address)
{
    return __SYSCALL1(SYS_AS_AREA_DESTROY, (sysarg_t ) address);
}
 
static size_t heapsize = 0;
static size_t maxheapsize = (size_t)(-1);
 
static void * last_allocated = 0;
 
/* Start of heap linker symbol */
extern char _heap;
 
/** Sbrk emulation
 *
 * @param incr New area that should be allocated or negative,
               if it should be shrinked
 * @return Pointer to newly allocated area
 */
void *sbrk(ssize_t incr)
{
    int rc;
    void *res;
    /* Check for invalid values */
    if (incr < 0 && -incr > heapsize)
        return NULL;
    /* Check for too large value */
    if (incr > 0 && incr+heapsize < heapsize)
        return NULL;
    /* Check for too small values */
    if (incr < 0 && incr+heapsize > heapsize)
        return NULL;
    /* Check for user limit */
    if ((maxheapsize!=(size_t)(-1)) && (heapsize + incr)>maxheapsize) return NULL;
 
    rc = as_area_resize(&_heap, heapsize + incr,0);
    if (rc != 0)
        return NULL;
   
    /* Compute start of new area */
    res = (void *)&_heap + heapsize;
 
    heapsize += incr;
 
    return res;
}
 
/** Set maximum heap size and return pointer just after the heap */
void *set_maxheapsize(size_t mhs)
{
    maxheapsize=mhs;
    /* Return pointer to area not managed by sbrk */
    return (void *)&_heap + maxheapsize;
 
}
 
/** Return pointer to some unmapped area, where fits new as_area
 *
 * TODO: make some first_fit/... algorithm, we are now just incrementing
 *       the pointer to last area
 */
void * as_get_mappable_page(size_t sz)
{
    void *res;
 
    /* Set heapsize to some meaningful value */
    if (maxheapsize == -1)
        set_maxheapsize(ALIGN_UP(USER_ADDRESS_SPACE_SIZE_ARCH>>1,PAGE_SIZE));
    if (!last_allocated)
        last_allocated = ALIGN_UP((void *)&_heap + maxheapsize, PAGE_SIZE);
   
    sz = ALIGN_UP(sz, PAGE_SIZE);
    res = last_allocated;
    last_allocated += sz;
 
    return res;
}
 
 
 /** @}
 */
 
 
 

Subversion Repositories HelenOS-historic

(root)/uspace/trunk/libc/generic/as.c – Rev 1509 → 1653

Rev 1509		Rev 1653
1	/*	1	/*
2	* Copyright (C) 2006 Jakub Jermar	2	* Copyright (C) 2006 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-		27	*/
-		28
-		29	/** @addtogroup libc
-		30	* @{
-		31	*/
-		32	/** @file
27	*/	33	*/
28		34
29	#include <as.h>	35	#include <as.h>
30	#include <libc.h>	36	#include <libc.h>
31	#include <unistd.h>	37	#include <unistd.h>
32	#include <align.h>	38	#include <align.h>
33		39
34	/** Create address space area.	40	/** Create address space area.
35	*	41	*
36	* @param address Virtual address where to place new address space area.	42	* @param address Virtual address where to place new address space area.
37	* @param size Size of the area.	43	* @param size Size of the area.
38	* @param flags Flags describing type of the area.	44	* @param flags Flags describing type of the area.
39	*	45	*
40	* @return address on success, (void *) -1 otherwise.	46	* @return address on success, (void *) -1 otherwise.
41	*/	47	*/
42	void as_area_create(void address, size_t size, int flags)	48	void as_area_create(void address, size_t size, int flags)
43	{	49	{
44	return (void *) __SYSCALL3(SYS_AS_AREA_CREATE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);	50	return (void *) __SYSCALL3(SYS_AS_AREA_CREATE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);
45	}	51	}
46		52
47	/** Resize address space area.	53	/** Resize address space area.
48	*	54	*
49	* @param address Virtual address pointing into already existing address space area.	55	* @param address Virtual address pointing into already existing address space area.
50	* @param size New requested size of the area.	56	* @param size New requested size of the area.
51	* @param flags Currently unused.	57	* @param flags Currently unused.
52	*	58	*
53	* @return Zero on success or a code from @ref errno.h on failure.	59	* @return Zero on success or a code from @ref errno.h on failure.
54	*/	60	*/
55	int as_area_resize(void *address, size_t size, int flags)	61	int as_area_resize(void *address, size_t size, int flags)
56	{	62	{
57	return __SYSCALL3(SYS_AS_AREA_RESIZE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);	63	return __SYSCALL3(SYS_AS_AREA_RESIZE, (sysarg_t ) address, (sysarg_t) size, (sysarg_t) flags);
58	}	64	}
59		65
60	/** Destroy address space area.	66	/** Destroy address space area.
61	*	67	*
62	* @param address Virtual address pointing into the address space area being destroyed.	68	* @param address Virtual address pointing into the address space area being destroyed.
63	*	69	*
64	* @return Zero on success or a code from @ref errno.h on failure.	70	* @return Zero on success or a code from @ref errno.h on failure.
65	*/	71	*/
66	int as_area_destroy(void *address)	72	int as_area_destroy(void *address)
67	{	73	{
68	return __SYSCALL1(SYS_AS_AREA_DESTROY, (sysarg_t ) address);	74	return __SYSCALL1(SYS_AS_AREA_DESTROY, (sysarg_t ) address);
69	}	75	}
70		76
71	static size_t heapsize = 0;	77	static size_t heapsize = 0;
72	static size_t maxheapsize = (size_t)(-1);	78	static size_t maxheapsize = (size_t)(-1);
73		79
74	static void * last_allocated = 0;	80	static void * last_allocated = 0;
75		81
76	/* Start of heap linker symbol */	82	/* Start of heap linker symbol */
77	extern char _heap;	83	extern char _heap;
78		84
79	/** Sbrk emulation	85	/** Sbrk emulation
80	*	86	*
81	* @param size New area that should be allocated or negative,	87	* @param incr New area that should be allocated or negative,
82	if it should be shrinked	88	if it should be shrinked
83	* @return Pointer to newly allocated area	89	* @return Pointer to newly allocated area
84	*/	90	*/
85	void *sbrk(ssize_t incr)	91	void *sbrk(ssize_t incr)
86	{	92	{
87	int rc;	93	int rc;
88	void *res;	94	void *res;
89	/* Check for invalid values */	95	/* Check for invalid values */
90	if (incr < 0 && -incr > heapsize)	96	if (incr < 0 && -incr > heapsize)
91	return NULL;	97	return NULL;
92	/* Check for too large value */	98	/* Check for too large value */
93	if (incr > 0 && incr+heapsize < heapsize)	99	if (incr > 0 && incr+heapsize < heapsize)
94	return NULL;	100	return NULL;
95	/* Check for too small values */	101	/* Check for too small values */
96	if (incr < 0 && incr+heapsize > heapsize)	102	if (incr < 0 && incr+heapsize > heapsize)
97	return NULL;	103	return NULL;
98	/* Check for user limit */	104	/* Check for user limit */
99	if ((maxheapsize!=(size_t)(-1)) && (heapsize + incr)>maxheapsize) return NULL;	105	if ((maxheapsize!=(size_t)(-1)) && (heapsize + incr)>maxheapsize) return NULL;
100		106
101	rc = as_area_resize(&_heap, heapsize + incr,0);	107	rc = as_area_resize(&_heap, heapsize + incr,0);
102	if (rc != 0)	108	if (rc != 0)
103	return NULL;	109	return NULL;
104		110
105	/* Compute start of new area */	111	/* Compute start of new area */
106	res = (void *)&_heap + heapsize;	112	res = (void *)&_heap + heapsize;
107		113
108	heapsize += incr;	114	heapsize += incr;
109		115
110	return res;	116	return res;
111	}	117	}
112		118
113	/** Set maximum heap size and return pointer just after the heap */	119	/** Set maximum heap size and return pointer just after the heap */
114	void *set_maxheapsize(size_t mhs)	120	void *set_maxheapsize(size_t mhs)
115	{	121	{
116	maxheapsize=mhs;	122	maxheapsize=mhs;
117	/* Return pointer to area not managed by sbrk */	123	/* Return pointer to area not managed by sbrk */
118	return (void *)&_heap + maxheapsize;	124	return (void *)&_heap + maxheapsize;
119		125
120	}	126	}
121		127
122	/** Return pointer to some unmapped area, where fits new as_area	128	/** Return pointer to some unmapped area, where fits new as_area
123	*	129	*
124	* TODO: make some first_fit/... algorithm, we are now just incrementing	130	* TODO: make some first_fit/... algorithm, we are now just incrementing
125	* the pointer to last area	131	* the pointer to last area
126	*/	132	*/
127	void * as_get_mappable_page(size_t sz)	133	void * as_get_mappable_page(size_t sz)
128	{	134	{
129	void *res;	135	void *res;
130		136
131	/* Set heapsize to some meaningful value */	137	/* Set heapsize to some meaningful value */
132	if (maxheapsize == -1)	138	if (maxheapsize == -1)
133	set_maxheapsize(ALIGN_UP(USER_ADDRESS_SPACE_SIZE_ARCH>>1,PAGE_SIZE));	139	set_maxheapsize(ALIGN_UP(USER_ADDRESS_SPACE_SIZE_ARCH>>1,PAGE_SIZE));
134	if (!last_allocated)	140	if (!last_allocated)
135	last_allocated = ALIGN_UP((void *)&_heap + maxheapsize, PAGE_SIZE);	141	last_allocated = ALIGN_UP((void *)&_heap + maxheapsize, PAGE_SIZE);
136		142
137	sz = ALIGN_UP(sz, PAGE_SIZE);	143	sz = ALIGN_UP(sz, PAGE_SIZE);
138	res = last_allocated;	144	res = last_allocated;
139	last_allocated += sz;	145	last_allocated += sz;
140		146
141	return res;	147	return res;
142	}	148	}
-		149
-		150
-		151	/** @}
-		152	*/
-		153
-		154
143		155