rev |
line source |
yuuji@0
|
1 /* ========================================================================
|
yuuji@0
|
2 * Copyright 1988-2006 University of Washington
|
yuuji@0
|
3 *
|
yuuji@0
|
4 * Licensed under the Apache License, Version 2.0 (the "License");
|
yuuji@0
|
5 * you may not use this file except in compliance with the License.
|
yuuji@0
|
6 * You may obtain a copy of the License at
|
yuuji@0
|
7 *
|
yuuji@0
|
8 * http://www.apache.org/licenses/LICENSE-2.0
|
yuuji@0
|
9 *
|
yuuji@0
|
10 *
|
yuuji@0
|
11 * ========================================================================
|
yuuji@0
|
12 */
|
yuuji@0
|
13
|
yuuji@0
|
14 /*
|
yuuji@0
|
15 * Program: Free storage management routines
|
yuuji@0
|
16 *
|
yuuji@0
|
17 * Author: Mark Crispin
|
yuuji@0
|
18 * Networks and Distributed Computing
|
yuuji@0
|
19 * Computing & Communications
|
yuuji@0
|
20 * University of Washington
|
yuuji@0
|
21 * Administration Building, AG-44
|
yuuji@0
|
22 * Seattle, WA 98195
|
yuuji@0
|
23 * Internet: MRC@CAC.Washington.EDU
|
yuuji@0
|
24 *
|
yuuji@0
|
25 * Date: 1 August 1988
|
yuuji@0
|
26 * Last Edited: 30 August 2006
|
yuuji@0
|
27 */
|
yuuji@0
|
28
|
yuuji@0
|
29 /* Get a block of free storage
|
yuuji@0
|
30 * Accepts: size of desired block
|
yuuji@0
|
31 * Returns: free storage block
|
yuuji@0
|
32 */
|
yuuji@0
|
33
|
yuuji@0
|
34 void *fs_get (size_t size)
|
yuuji@0
|
35 {
|
yuuji@0
|
36 blocknotify_t bn = (blocknotify_t) mail_parameters (NIL,GET_BLOCKNOTIFY,NIL);
|
yuuji@0
|
37 void *data = (*bn) (BLOCK_SENSITIVE,NIL);
|
yuuji@0
|
38 void *block = malloc (size ? size : (size_t) 1);
|
yuuji@0
|
39 if (!block) fatal ("Out of memory");
|
yuuji@0
|
40 (*bn) (BLOCK_NONSENSITIVE,data);
|
yuuji@0
|
41 return (block);
|
yuuji@0
|
42 }
|
yuuji@0
|
43
|
yuuji@0
|
44
|
yuuji@0
|
45 /* Resize a block of free storage
|
yuuji@0
|
46 * Accepts: ** pointer to current block
|
yuuji@0
|
47 * new size
|
yuuji@0
|
48 */
|
yuuji@0
|
49
|
yuuji@0
|
50 void fs_resize (void **block,size_t size)
|
yuuji@0
|
51 {
|
yuuji@0
|
52 blocknotify_t bn = (blocknotify_t) mail_parameters (NIL,GET_BLOCKNOTIFY,NIL);
|
yuuji@0
|
53 void *data = (*bn) (BLOCK_SENSITIVE,NIL);
|
yuuji@0
|
54 if (!(*block = realloc (*block,size ? size : (size_t) 1)))
|
yuuji@0
|
55 fatal ("Can't resize memory");
|
yuuji@0
|
56 (*bn) (BLOCK_NONSENSITIVE,data);
|
yuuji@0
|
57 }
|
yuuji@0
|
58
|
yuuji@0
|
59
|
yuuji@0
|
60 /* Return a block of free storage
|
yuuji@0
|
61 * Accepts: ** pointer to free storage block
|
yuuji@0
|
62 */
|
yuuji@0
|
63
|
yuuji@0
|
64 void fs_give (void **block)
|
yuuji@0
|
65 {
|
yuuji@0
|
66 blocknotify_t bn = (blocknotify_t) mail_parameters (NIL,GET_BLOCKNOTIFY,NIL);
|
yuuji@0
|
67 void *data = (*bn) (BLOCK_SENSITIVE,NIL);
|
yuuji@0
|
68 free (*block);
|
yuuji@0
|
69 *block = NIL;
|
yuuji@0
|
70 (*bn) (BLOCK_NONSENSITIVE,data);
|
yuuji@0
|
71 }
|