OpenCoverage

stats.c

Absolute File Name:/home/opencoverage/opencoverage/guest-scripts/bash/src/lib/malloc/stats.c
Source codeSwitch to Preprocessed file
LineSourceCount
1/* stats.c - malloc statistics */-
2-
3/* Copyright (C) 2001-2003 Free Software Foundation, Inc.-
4-
5 This file is part of GNU Bash, the Bourne-Again SHell.-
6-
7 Bash is free software: you can redistribute it and/or modify-
8 it under the terms of the GNU General Public License as published by-
9 the Free Software Foundation, either version 3 of the License, or-
10 (at your option) any later version.-
11-
12 Bash is distributed in the hope that it will be useful,-
13 but WITHOUT ANY WARRANTY; without even the implied warranty of-
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the-
15 GNU General Public License for more details.-
16-
17 You should have received a copy of the GNU General Public License-
18 along with Bash. If not, see <http://www.gnu.org/licenses/>.-
19*/-
20-
21#ifdef HAVE_CONFIG_H-
22# include <config.h>-
23#endif-
24-
25#include "imalloc.h"-
26-
27#ifdef MALLOC_STATS-
28-
29#include <stdio.h>-
30#ifdef HAVE_UNISTD_H-
31# include <unistd.h>-
32#endif-
33#include <string.h>-
34-
35#include "mstats.h"-
36-
37extern int malloc_free_blocks __P((int));-
38-
39extern struct _malstats _mstats;-
40-
41extern FILE *_imalloc_fopen __P((char *, char *, char *, char *, size_t));-
42-
43struct bucket_stats-
44malloc_bucket_stats (size)-
45 int size;-
46{-
47 struct bucket_stats v;-
48-
49 v.nfree = 0;-
50-
51 if (size < 0 || size >= NBUCKETS)
size < 0Description
TRUEnever evaluated
FALSEnever evaluated
size >= 30Description
TRUEnever evaluated
FALSEnever evaluated
0
52 {-
53 v.blocksize = 0;-
54 v.nused = v.nmal = v.nmorecore = v.nlesscore = v.nsplit = 0;-
55 return v;
never executed: return v;
0
56 }-
57-
58 v.blocksize = 1 << (size + 3);-
59 v.nused = _mstats.nmalloc[size];-
60 v.nmal = _mstats.tmalloc[size];-
61 v.nmorecore = _mstats.nmorecore[size];-
62 v.nlesscore = _mstats.nlesscore[size];-
63 v.nsplit = _mstats.nsplit[size];-
64 v.ncoalesce = _mstats.ncoalesce[size];-
65-
66 v.nfree = malloc_free_blocks (size); /* call back to malloc.c */-
67-
68 return v;
never executed: return v;
0
69}-
70-
71/* Return a copy of _MSTATS, with two additional fields filled in:-
72 BYTESFREE is the total number of bytes on free lists. BYTESUSED-
73 is the total number of bytes in use. These two fields are fairly-
74 expensive to compute, so we do it only when asked to. */-
75struct _malstats-
76malloc_stats ()-
77{-
78 struct _malstats result;-
79 struct bucket_stats v;-
80 register int i;-
81-
82 result = _mstats;-
83 result.bytesused = result.bytesfree = 0;-
84 for (i = 0; i < NBUCKETS; i++)
i < 30Description
TRUEnever evaluated
FALSEnever evaluated
0
85 {-
86 v = malloc_bucket_stats (i);-
87 result.bytesfree += v.nfree * v.blocksize;-
88 result.bytesused += v.nused * v.blocksize;-
89 }
never executed: end of block
0
90 return (result);
never executed: return (result);
0
91}-
92-
93static void-
94_print_malloc_stats (s, fp)-
95 char *s;-
96 FILE *fp;-
97{-
98 register int i;-
99 unsigned long totused, totfree;-
100 struct bucket_stats v;-
101-
102 fprintf (fp, "Memory allocation statistics: %s\n size\tfree\tin use\ttotal\tmorecore lesscore split\tcoalesce\n", s ? s : "");-
103 for (i = totused = totfree = 0; i < NBUCKETS; i++)
i < 30Description
TRUEnever evaluated
FALSEnever evaluated
0
104 {-
105 v = malloc_bucket_stats (i);-
106 if (v.nmal > 0)
v.nmal > 0Description
TRUEnever evaluated
FALSEnever evaluated
0
107 fprintf (fp, "%8lu\t%4d\t%6d\t%5d\t%8d\t%d %5d %8d\n", (unsigned long)v.blocksize, v.nfree, v.nused, v.nmal, v.nmorecore, v.nlesscore, v.nsplit, v.ncoalesce);
never executed: fprintf (fp, "%8lu\t%4d\t%6d\t%5d\t%8d\t%d %5d %8d\n", (unsigned long)v.blocksize, v.nfree, v.nused, v.nmal, v.nmorecore, v.nlesscore, v.nsplit, v.ncoalesce);
0
108 totfree += v.nfree * v.blocksize;-
109 totused += v.nused * v.blocksize;-
110 }
never executed: end of block
0
111 fprintf (fp, "\nTotal bytes in use: %lu, total bytes free: %lu\n",-
112 totused, totfree);-
113 fprintf (fp, "\nTotal bytes requested by application: %lu\n", (unsigned long)_mstats.bytesreq);-
114 fprintf (fp, "Total mallocs: %d, total frees: %d, total reallocs: %d (%d copies)\n",-
115 _mstats.nmal, _mstats.nfre, _mstats.nrealloc, _mstats.nrcopy);-
116 fprintf (fp, "Total sbrks: %d, total bytes via sbrk: %d\n",-
117 _mstats.nsbrk, _mstats.tsbrk);-
118 fprintf (fp, "Total blocks split: %d, total block coalesces: %d\n",-
119 _mstats.tbsplit, _mstats.tbcoalesce);-
120}
never executed: end of block
0
121-
122void-
123print_malloc_stats (s)-
124 char *s;-
125{-
126 _print_malloc_stats (s, stderr);-
127}
never executed: end of block
0
128-
129void-
130fprint_malloc_stats (s, fp)-
131 char *s;-
132 FILE *fp;-
133{-
134 _print_malloc_stats (s, fp);-
135}
never executed: end of block
0
136-
137#define TRACEROOT "/var/tmp/maltrace/stats."-
138-
139void-
140trace_malloc_stats (s, fn)-
141 char *s, *fn;-
142{-
143 FILE *fp;-
144 char defname[sizeof (TRACEROOT) + 64];-
145 static char mallbuf[1024];-
146-
147 fp = _imalloc_fopen (s, fn, TRACEROOT, defname, sizeof (defname));-
148 if (fp)
fpDescription
TRUEnever evaluated
FALSEnever evaluated
0
149 {-
150 setvbuf (fp, mallbuf, _IOFBF, sizeof (mallbuf));-
151 _print_malloc_stats (s, fp);-
152 fflush(fp);-
153 fclose(fp);-
154 }
never executed: end of block
0
155}
never executed: end of block
0
156-
157#endif /* MALLOC_STATS */-
158-
159#if defined (MALLOC_STATS) || defined (MALLOC_TRACE)-
160FILE *-
161_imalloc_fopen (s, fn, def, defbuf, defsiz)-
162 char *s;-
163 char *fn;-
164 char *def;-
165 char *defbuf;-
166 size_t defsiz;-
167{-
168 char fname[1024];-
169 long l;-
170 FILE *fp;-
171-
172 l = (long)getpid ();-
173 if (fn == 0)
fn == 0Description
TRUEnever evaluated
FALSEnever evaluated
0
174 {-
175 sprintf (defbuf, "%s%ld", def, l);-
176 fp = fopen(defbuf, "w");-
177 }
never executed: end of block
0
178 else-
179 {-
180 char *p, *q, *r;-
181 char pidbuf[32];-
182 int sp;-
183-
184 sprintf (pidbuf, "%ld", l);-
185 if ((strlen (pidbuf) + strlen (fn) + 2) >= sizeof (fname))
(strlen (pidbu...sizeof (fname)Description
TRUEnever evaluated
FALSEnever evaluated
0
186 return ((FILE *)0);
never executed: return ((FILE *)0);
0
187 for (sp = 0, p = fname, q = fn; *q; )
*qDescription
TRUEnever evaluated
FALSEnever evaluated
0
188 {-
189 if (sp == 0 && *q == '%' && q[1] == 'p')
sp == 0Description
TRUEnever evaluated
FALSEnever evaluated
*q == '%'Description
TRUEnever evaluated
FALSEnever evaluated
q[1] == 'p'Description
TRUEnever evaluated
FALSEnever evaluated
0
190 {-
191 sp = 1;-
192 for (r = pidbuf; *r; )
*rDescription
TRUEnever evaluated
FALSEnever evaluated
0
193 *p++ = *r++;
never executed: *p++ = *r++;
0
194 q += 2;-
195 }
never executed: end of block
0
196 else-
197 *p++ = *q++;
never executed: *p++ = *q++;
0
198 }-
199 *p = '\0';-
200 fp = fopen (fname, "w");-
201 }
never executed: end of block
0
202-
203 return fp;
never executed: return fp;
0
204}-
205#endif /* MALLOC_STATS || MALLOC_TRACE */-
Source codeSwitch to Preprocessed file
Generated by Squish Coco 4.1.2