source: trunk/minix/commands/elle/sbvall.c@ 9

Last change on this file since 9 was 9, checked in by Mattia Monga, 14 years ago

Minix 3.1.2a

File size: 1.5 KB
Line 
1/* VALLOC - Aligned memory allocator
2 * Emulation of the 4.2BSD library routine of the same name.
3 * Copyright 1985 by Ken Harrenstien, SRI International
4 * This software is quasi-public; it may be used freely with
5 * like software, but may NOT be sold or made part of licensed
6 * products without permission of the author. In all cases
7 * the source code and any modifications thereto must remain
8 * available to any user.
9 *
10 * This is part of the SB library package.
11 * Any software using the SB library must likewise be made
12 * quasi-public, with freely available sources.
13 */
14
15#include "sb.h"
16
17char *
18valloc(size)
19unsigned size;
20{ register int pagmsk;
21 register SBMO i;
22 register struct smblk *sm, *smr;
23 struct smblk *sbm_mget(), *sbm_split();
24
25 pagmsk = getpagesize() - 1; /* Get page size in bytes, less 1 */
26 if(!(sm = sbm_mget(size+pagmsk, size+pagmsk))) /* Get area big enuf */
27 return(0);
28 /* Now find # bytes prior to 1st page boundary.
29 * This expression gives 0 if already at boundary, else #-1.
30 */
31 i = pagmsk - ((int)(sm->smaddr) & pagmsk);
32 if(i) /* If need to split off preceding stuff, */
33 { smr = sbm_split(sm, i+1); /* do so (note i adjusted) */
34 sbm_mfree(sm); /* Release preceding mem */
35 if(!(sm = smr)) return(0); /* If couldn't split, fail */
36 }
37 if(i = (sm->smlen - size)) /* See if any trailing stuff */
38 { smr = sbm_split(sm, size); /* Yeah, split it off too */
39 if(smr) sbm_mfree(smr); /* If couldn't split, excess OK. */
40 }
41 return((char *)(sm->smaddr));
42}
Note: See TracBrowser for help on using the repository browser.