OpenCoverage

watch.c

Absolute File Name:/home/opencoverage/opencoverage/guest-scripts/bash/src/lib/malloc/watch.c
Source codeSwitch to Preprocessed file
LineSourceCount
1/* watch.c - watchpoint functions for malloc */-
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 <stdio.h>-
26-
27#include "imalloc.h"-
28-
29#ifdef MALLOC_WATCH-
30#include "watch.h"-
31-
32#define WATCH_MAX 32-
33-
34int _malloc_nwatch;-
35static PTR_T _malloc_watch_list[WATCH_MAX];-
36-
37static void-
38watch_warn (addr, file, line, type, data)-
39 PTR_T addr;-
40 const char *file;-
41 int line, type;-
42 unsigned long data;-
43{-
44 char *tag;-
45-
46 if (type == W_ALLOC)
type == 0x01Description
TRUEnever evaluated
FALSEnever evaluated
0
47 tag = "allocated";
never executed: tag = "allocated";
0
48 else if (type == W_FREE)
type == 0x02Description
TRUEnever evaluated
FALSEnever evaluated
0
49 tag = "freed";
never executed: tag = "freed";
0
50 else if (type == W_REALLOC)
type == 0x04Description
TRUEnever evaluated
FALSEnever evaluated
0
51 tag = "requesting resize";
never executed: tag = "requesting resize";
0
52 else if (type == W_RESIZED)
type == 0x08Description
TRUEnever evaluated
FALSEnever evaluated
0
53 tag = "just resized";
never executed: tag = "just resized";
0
54 else-
55 tag = "bug: unknown operation";
never executed: tag = "bug: unknown operation";
0
56-
57 fprintf (stderr, "malloc: watch alert: %p %s ", addr, tag);-
58 if (data != (unsigned long)-1)
data != (unsigned long)-1Description
TRUEnever evaluated
FALSEnever evaluated
0
59 fprintf (stderr, "(size %lu) ", data);
never executed: fprintf ( stderr , "(size %lu) ", data);
0
60 fprintf (stderr, "from '%s:%d'\n", file ? file : "unknown", line);-
61}
never executed: end of block
0
62-
63void-
64_malloc_ckwatch (addr, file, line, type, data)-
65 PTR_T addr;-
66 const char *file;-
67 int line, type;-
68 unsigned long data;-
69{-
70 register int i;-
71-
72 for (i = _malloc_nwatch - 1; i >= 0; i--)
i >= 0Description
TRUEnever evaluated
FALSEnever evaluated
0
73 {-
74 if (_malloc_watch_list[i] == addr)
_malloc_watch_list[i] == addrDescription
TRUEnever evaluated
FALSEnever evaluated
0
75 {-
76 watch_warn (addr, file, line, type, data);-
77 return;
never executed: return;
0
78 }-
79 }
never executed: end of block
0
80}
never executed: end of block
0
81#endif /* MALLOC_WATCH */-
82-
83PTR_T-
84malloc_watch (addr)-
85 PTR_T addr;-
86{-
87 register int i;-
88 PTR_T ret;-
89-
90 if (addr == 0)
addr == 0Description
TRUEnever evaluated
FALSEnever evaluated
0
91 return addr;
never executed: return addr;
0
92 ret = (PTR_T)0;-
93-
94#ifdef MALLOC_WATCH-
95 for (i = _malloc_nwatch - 1; i >= 0; i--)
i >= 0Description
TRUEnever evaluated
FALSEnever evaluated
0
96 {-
97 if (_malloc_watch_list[i] == addr)
_malloc_watch_list[i] == addrDescription
TRUEnever evaluated
FALSEnever evaluated
0
98 break;
never executed: break;
0
99 }
never executed: end of block
0
100 if (i < 0)
i < 0Description
TRUEnever evaluated
FALSEnever evaluated
0
101 {-
102 if (_malloc_nwatch == WATCH_MAX) /* full, take out first */
_malloc_nwatch == 32Description
TRUEnever evaluated
FALSEnever evaluated
0
103 {-
104 ret = _malloc_watch_list[0];-
105 _malloc_nwatch--;-
106 for (i = 0; i < _malloc_nwatch; i++)
i < _malloc_nwatchDescription
TRUEnever evaluated
FALSEnever evaluated
0
107 _malloc_watch_list[i] = _malloc_watch_list[i+1];
never executed: _malloc_watch_list[i] = _malloc_watch_list[i+1];
0
108 }
never executed: end of block
0
109 _malloc_watch_list[_malloc_nwatch++] = addr;-
110 }
never executed: end of block
0
111#endif-
112-
113 return ret;
never executed: return ret;
0
114}-
115-
116/* Remove a watchpoint set on ADDR. If ADDR is NULL, remove all-
117 watchpoints. Returns ADDR if everything went OK, NULL if ADDR was-
118 not being watched. */-
119PTR_T-
120malloc_unwatch (addr)-
121 PTR_T addr;-
122{-
123#ifdef MALLOC_WATCH-
124 register int i;-
125-
126 if (addr == 0)
addr == 0Description
TRUEnever evaluated
FALSEnever evaluated
0
127 {-
128 for (i = 0; i < _malloc_nwatch; i++)
i < _malloc_nwatchDescription
TRUEnever evaluated
FALSEnever evaluated
0
129 _malloc_watch_list[i] = (PTR_T)0;
never executed: _malloc_watch_list[i] = (void *)0;
0
130 _malloc_nwatch = 0;-
131 return ((PTR_T)0);
never executed: return ((void *)0);
0
132 }-
133 else-
134 {-
135 for (i = 0; i < _malloc_nwatch; i++)
i < _malloc_nwatchDescription
TRUEnever evaluated
FALSEnever evaluated
0
136 {-
137 if (_malloc_watch_list[i] == addr)
_malloc_watch_list[i] == addrDescription
TRUEnever evaluated
FALSEnever evaluated
0
138 break;
never executed: break;
0
139 }
never executed: end of block
0
140 if (i == _malloc_nwatch)
i == _malloc_nwatchDescription
TRUEnever evaluated
FALSEnever evaluated
0
141 return ((PTR_T)0); /* not found */
never executed: return ((void *)0);
0
142 /* shuffle everything from i+1 to end down 1 */-
143 _malloc_nwatch--;-
144 for ( ; i < _malloc_nwatch; i++)
i < _malloc_nwatchDescription
TRUEnever evaluated
FALSEnever evaluated
0
145 _malloc_watch_list[i] = _malloc_watch_list[i+1];
never executed: _malloc_watch_list[i] = _malloc_watch_list[i+1];
0
146 return addr;
never executed: return addr;
0
147 }-
148#else-
149 return ((PTR_T)0);-
150#endif-
151}-
Source codeSwitch to Preprocessed file
Generated by Squish Coco 4.1.2