xref: /onnv-gate/usr/src/lib/libbc/libc/gen/common/mallopt.c (revision 722:636b850d4ee9)
10Sstevel@tonic-gate /*
20Sstevel@tonic-gate  * CDDL HEADER START
30Sstevel@tonic-gate  *
40Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
50Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
60Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
70Sstevel@tonic-gate  * with the License.
80Sstevel@tonic-gate  *
90Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
100Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
110Sstevel@tonic-gate  * See the License for the specific language governing permissions
120Sstevel@tonic-gate  * and limitations under the License.
130Sstevel@tonic-gate  *
140Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
150Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
160Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
170Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
180Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
190Sstevel@tonic-gate  *
200Sstevel@tonic-gate  * CDDL HEADER END
210Sstevel@tonic-gate  */
22*722Smuffin /*
23*722Smuffin  * Copyright 1986 Sun Microsystems, Inc.  All rights reserved.
24*722Smuffin  * Use is subject to license terms.
25*722Smuffin  */
260Sstevel@tonic-gate 
27*722Smuffin #pragma ident	"%Z%%M%	%I%	%E% SMI"
280Sstevel@tonic-gate 
290Sstevel@tonic-gate #include "mallint.h"
300Sstevel@tonic-gate #include <errno.h>
310Sstevel@tonic-gate 
320Sstevel@tonic-gate /*
330Sstevel@tonic-gate  * mallopt -- System V-compatible malloc "optimizer"
340Sstevel@tonic-gate  */
35*722Smuffin int
mallopt(int cmd,int value)36*722Smuffin mallopt(int cmd, int value)
370Sstevel@tonic-gate {
380Sstevel@tonic-gate 	if (__mallinfo.smblks != 0)
39*722Smuffin 		return (-1);		/* small block has been allocated */
400Sstevel@tonic-gate 
410Sstevel@tonic-gate 	switch (cmd) {
420Sstevel@tonic-gate 	case M_MXFAST:		/* small block size */
430Sstevel@tonic-gate 		if (value < 0)
44*722Smuffin 			return (-1);
450Sstevel@tonic-gate 		__mallinfo.mxfast = value;
460Sstevel@tonic-gate 		break;
470Sstevel@tonic-gate 
480Sstevel@tonic-gate 	case M_NLBLKS:		/* # small blocks per holding block */
490Sstevel@tonic-gate 		if (value <= 0)
50*722Smuffin 			return (-1);
510Sstevel@tonic-gate 		__mallinfo.nlblks = value;
520Sstevel@tonic-gate 		break;
530Sstevel@tonic-gate 
540Sstevel@tonic-gate 	case M_GRAIN:		/* small block rounding factor */
550Sstevel@tonic-gate 		if (value <= 0)
56*722Smuffin 			return (-1);
570Sstevel@tonic-gate 		/* round up to multiple of minimum alignment */
580Sstevel@tonic-gate 		__mallinfo.grain = roundup(value, ALIGNSIZ);
590Sstevel@tonic-gate 		break;
600Sstevel@tonic-gate 
610Sstevel@tonic-gate 	case M_KEEP:		/* Sun algorithm always preserves data */
620Sstevel@tonic-gate 		break;
630Sstevel@tonic-gate 
640Sstevel@tonic-gate 	default:
65*722Smuffin 		return (-1);
660Sstevel@tonic-gate 	}
670Sstevel@tonic-gate 
680Sstevel@tonic-gate 	/* make sure that everything is consistent */
690Sstevel@tonic-gate 	__mallinfo.mxfast = roundup(__mallinfo.mxfast, __mallinfo.grain);
700Sstevel@tonic-gate 
71*722Smuffin 	return (0);
720Sstevel@tonic-gate }
730Sstevel@tonic-gate 
740Sstevel@tonic-gate 
750Sstevel@tonic-gate /*
760Sstevel@tonic-gate  * mallinfo -- System V-compatible malloc information reporter
770Sstevel@tonic-gate  */
780Sstevel@tonic-gate struct mallinfo
mallinfo(void)79*722Smuffin mallinfo(void)
800Sstevel@tonic-gate {
810Sstevel@tonic-gate 	struct mallinfo mi;
820Sstevel@tonic-gate 
830Sstevel@tonic-gate 	mi = __mallinfo;
840Sstevel@tonic-gate 	mi.uordblks = mi.uordbytes - (mi.allocated * sizeof(uint));
850Sstevel@tonic-gate 	mi.fordblks = mi.arena - (mi.treeoverhead + mi.uordblks +
860Sstevel@tonic-gate 					    (mi.ordblks * sizeof(uint)));
87*722Smuffin 	return (mi);
880Sstevel@tonic-gate }
89