Files
fpocket/doc/deprecated/programmers_guide/html/memhandler_8c-source.html
2020-06-06 16:04:20 +02:00

589 lines
53 KiB
HTML

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<title>fpocket: memhandler.c Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css">
<link href="doxygen.css" rel="stylesheet" type="text/css">
</head><body>
<img src="fpocket_logo_small.png" width="545" height="150">
<!-- Generated by Doxygen 1.5.6 -->
<script type="text/javascript">
<!--
function changeDisplayState (e){
var num=this.id.replace(/[^[0-9]/g,'');
var button=this.firstChild;
var sectionDiv=document.getElementById('dynsection'+num);
if (sectionDiv.style.display=='none'||sectionDiv.style.display==''){
sectionDiv.style.display='block';
button.src='open.gif';
}else{
sectionDiv.style.display='none';
button.src='closed.gif';
}
}
function initDynSections(){
var divs=document.getElementsByTagName('div');
var sectionCounter=1;
for(var i=0;i<divs.length-1;i++){
if(divs[i].className=='dynheader'&&divs[i+1].className=='dynsection'){
var header=divs[i];
var section=divs[i+1];
var button=header.firstChild;
if (button!='IMG'){
divs[i].insertBefore(document.createTextNode(' '),divs[i].firstChild);
button=document.createElement('img');
divs[i].insertBefore(button,divs[i].firstChild);
}
header.style.cursor='pointer';
header.onclick=changeDisplayState;
header.id='dynheader'+sectionCounter;
button.src='closed.gif';
section.id='dynsection'+sectionCounter;
section.style.display='none';
section.style.marginLeft='14px';
sectionCounter++;
}
}
}
window.onload = initDynSections;
-->
</script>
<div class="navigation" id="top">
<div class="tabs">
<ul>
<li><a href="index.html"><span>Main&nbsp;Page</span></a></li>
<li><a href="annotated.html"><span>Data&nbsp;Structures</span></a></li>
<li class="current"><a href="files.html"><span>Files</span></a></li>
</ul>
</div>
<h1>memhandler.c</h1><a href="memhandler_8c.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001
<a name="l00002"></a>00002 <span class="preprocessor">#include "../headers/memhandler.h"</span>
<a name="l00003"></a>00003
<a name="l00004"></a>00004 <span class="comment">/*</span>
<a name="l00005"></a>00005 <span class="comment"></span>
<a name="l00006"></a>00006 <span class="comment">## GENERAL INFORMATION</span>
<a name="l00007"></a>00007 <span class="comment">##</span>
<a name="l00008"></a>00008 <span class="comment">## FILE memhandler.h</span>
<a name="l00009"></a>00009 <span class="comment">## AUTHORS P. Schmidtke and V. Le Guilloux</span>
<a name="l00010"></a>00010 <span class="comment">## LAST MODIFIED 28-11-08</span>
<a name="l00011"></a>00011 <span class="comment">##</span>
<a name="l00012"></a>00012 <span class="comment">## SPECIFICATIONS</span>
<a name="l00013"></a>00013 <span class="comment">##</span>
<a name="l00014"></a>00014 <span class="comment">## This file implements a memory handler. Whenever you call </span>
<a name="l00015"></a>00015 <span class="comment">## my_bloc_malloc function, the allocated pointer will be </span>
<a name="l00016"></a>00016 <span class="comment">## stored in a simple chained list. Then, if a malloc fails, </span>
<a name="l00017"></a>00017 <span class="comment">## or if you call the my_exit function, all allocated variable </span>
<a name="l00018"></a>00018 <span class="comment">## will be freed if not NULL of course. Therefore, a bloc </span>
<a name="l00019"></a>00019 <span class="comment">## allocated by my_... functions MUST be freed by the my_free, </span>
<a name="l00020"></a>00020 <span class="comment">## or a double free error should appears.</span>
<a name="l00021"></a>00021 <span class="comment">##</span>
<a name="l00022"></a>00022 <span class="comment">## WARNING</span>
<a name="l00023"></a>00023 <span class="comment">##</span>
<a name="l00024"></a>00024 <span class="comment">## This is an easy way to handle memory. However, if many bloc </span>
<a name="l00025"></a>00025 <span class="comment">## are allocated and removed during the programm, it might be </span>
<a name="l00026"></a>00026 <span class="comment">## solwed down as for each free, as we have to look for the bloc </span>
<a name="l00027"></a>00027 <span class="comment">## to free in the list, and remove it.</span>
<a name="l00028"></a>00028 <span class="comment">##</span>
<a name="l00029"></a>00029 <span class="comment">## REMEMBER: if you use my_malloc, you MUST use my_free. If you </span>
<a name="l00030"></a>00030 <span class="comment">## free a bloc allocated by my_(..), and if you call free_all at </span>
<a name="l00031"></a>00031 <span class="comment">## the end, a double free coprruption will occure.</span>
<a name="l00032"></a>00032 <span class="comment">##</span>
<a name="l00033"></a>00033 <span class="comment">## MODIFICATIONS HISTORY</span>
<a name="l00034"></a>00034 <span class="comment">##</span>
<a name="l00035"></a>00035 <span class="comment">## 28-11-08 (v) Comments UTD</span>
<a name="l00036"></a>00036 <span class="comment">## 01-04-08 (v) Added comments and creation of history</span>
<a name="l00037"></a>00037 <span class="comment">## 01-01-08 (vp) Created (random date...)</span>
<a name="l00038"></a>00038 <span class="comment">## </span>
<a name="l00039"></a>00039 <span class="comment">## TODO or SUGGESTIONS</span>
<a name="l00040"></a>00040 <span class="comment">##</span>
<a name="l00041"></a>00041 <span class="comment"></span>
<a name="l00042"></a>00042 <span class="comment">*/</span>
<a name="l00043"></a>00043
<a name="l00044"></a>00044
<a name="l00045"></a>00045 <span class="comment">/*</span>
<a name="l00046"></a>00046 <span class="comment"> COPYRIGHT DISCLAIMER</span>
<a name="l00047"></a>00047 <span class="comment"></span>
<a name="l00048"></a>00048 <span class="comment"> Vincent Le Guilloux, Peter Schmidtke and Pierre Tuffery, hereby</span>
<a name="l00049"></a>00049 <span class="comment"> disclaim all copyright interest in the program “fpocket” (which</span>
<a name="l00050"></a>00050 <span class="comment"> performs protein cavity detection) written by Vincent Le Guilloux and Peter</span>
<a name="l00051"></a>00051 <span class="comment"> Schmidtke.</span>
<a name="l00052"></a>00052 <span class="comment"></span>
<a name="l00053"></a>00053 <span class="comment"> Vincent Le Guilloux 28 November 2008</span>
<a name="l00054"></a>00054 <span class="comment"> Peter Schmidtke 28 November 2008</span>
<a name="l00055"></a>00055 <span class="comment"> Pierre Tuffery 28 November 2008</span>
<a name="l00056"></a>00056 <span class="comment"></span>
<a name="l00057"></a>00057 <span class="comment"> GNU GPL</span>
<a name="l00058"></a>00058 <span class="comment"></span>
<a name="l00059"></a>00059 <span class="comment"> This file is part of the fpocket package.</span>
<a name="l00060"></a>00060 <span class="comment"></span>
<a name="l00061"></a>00061 <span class="comment"> fpocket is free software: you can redistribute it and/or modify</span>
<a name="l00062"></a>00062 <span class="comment"> it under the terms of the GNU General Public License as published by</span>
<a name="l00063"></a>00063 <span class="comment"> the Free Software Foundation, either version 3 of the License, or</span>
<a name="l00064"></a>00064 <span class="comment"> (at your option) any later version.</span>
<a name="l00065"></a>00065 <span class="comment"></span>
<a name="l00066"></a>00066 <span class="comment"> fpocket is distributed in the hope that it will be useful,</span>
<a name="l00067"></a>00067 <span class="comment"> but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
<a name="l00068"></a>00068 <span class="comment"> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</span>
<a name="l00069"></a>00069 <span class="comment"> GNU General Public License for more details.</span>
<a name="l00070"></a>00070 <span class="comment"></span>
<a name="l00071"></a>00071 <span class="comment"> You should have received a copy of the GNU General Public License</span>
<a name="l00072"></a>00072 <span class="comment"> along with fpocket. If not, see &lt;http://www.gnu.org/licenses/&gt;.</span>
<a name="l00073"></a>00073 <span class="comment"></span>
<a name="l00074"></a>00074 <span class="comment">**/</span>
<a name="l00075"></a>00075
<a name="l00076"></a>00076 <span class="comment"></span>
<a name="l00077"></a>00077 <span class="comment">/**&lt; Pointer node of a chained list */</span>
<a name="l00078"></a>00078
<a name="l00079"></a><a class="code" href="structptr__node.html">00079</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structptr__node.html">ptr_node</a>
<a name="l00080"></a>00080 {
<a name="l00081"></a><a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">00081</a> <span class="keyword">struct </span><a class="code" href="structptr__node.html">ptr_node</a> *<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ; <span class="comment">/**&lt; next pointer node*/</span>
<a name="l00082"></a><a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">00082</a> <span class="keywordtype">void</span> *<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a> ; <span class="comment">/**&lt; pointer to void*/</span>
<a name="l00083"></a>00083
<a name="l00084"></a>00084 } <a class="code" href="structptr__node.html">ptr_node</a> ;
<a name="l00085"></a>00085 <span class="comment"></span>
<a name="l00086"></a>00086 <span class="comment">/**&lt; Simple chained structures to store allocated pointers */</span>
<a name="l00087"></a><a class="code" href="structptr__lst.html">00087</a> <span class="keyword">typedef</span> <span class="keyword">struct</span>
<a name="l00088"></a>00088 {
<a name="l00089"></a><a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">00089</a> <a class="code" href="structptr__node.html">ptr_node</a> *first ; <span class="comment">/**&lt; first pointer of the chained list*/</span>
<a name="l00090"></a><a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">00090</a> <a class="code" href="structptr__node.html">ptr_node</a> *last ; <span class="comment">/**&lt; last pointer in the chained list*/</span>
<a name="l00091"></a>00091
<a name="l00092"></a><a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">00092</a> <span class="keywordtype">size_t</span> n_ptr ; <span class="comment">/**&lt; size of the chained list*/</span>
<a name="l00093"></a>00093
<a name="l00094"></a>00094 } <a class="code" href="structptr__lst.html">ptr_lst</a> ;
<a name="l00095"></a>00095
<a name="l00096"></a>00096
<a name="l00097"></a><a class="code" href="memhandler_8c.html#10361581b824a5c1822de8d1844fad79">00097</a> <span class="keyword">static</span> <a class="code" href="structptr__lst.html">ptr_lst</a> *<a class="code" href="memhandler_8c.html#10361581b824a5c1822de8d1844fad79">ST_lst_alloc</a> = NULL ;<span class="comment">/* A list containing all the allocated pointers. */</span>
<a name="l00098"></a>00098 <span class="preprocessor">#ifdef M_MEM_DEBUG</span>
<a name="l00099"></a>00099 <span class="preprocessor"></span><span class="keyword">static</span> FILE *ST_fdebug = NULL ;
<a name="l00100"></a>00100 <span class="preprocessor">#endif</span>
<a name="l00101"></a>00101 <span class="preprocessor"></span>
<a name="l00102"></a>00102 <span class="keyword">static</span> <a class="code" href="structptr__node.html">ptr_node</a>* <a class="code" href="memhandler_8c.html#cfc06ff6ba710b8b04cc7c559bc13c30">ptr_node_alloc</a>(<span class="keywordtype">void</span> *<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) ;
<a name="l00103"></a>00103 <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">add_bloc</a>(<span class="keywordtype">void</span> *bloc) ;
<a name="l00104"></a>00104 <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#f840f1b8e7e96f68cc4e424e6d7b1643">remove_bloc</a>(<span class="keywordtype">void</span> *bloc) ;
<a name="l00105"></a>00105
<a name="l00106"></a>00106 <span class="comment"></span>
<a name="l00107"></a>00107 <span class="comment">/**</span>
<a name="l00108"></a>00108 <span class="comment"> ## FUNCTION: </span>
<a name="l00109"></a>00109 <span class="comment"> my_malloc</span>
<a name="l00110"></a>00110 <span class="comment"> </span>
<a name="l00111"></a>00111 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00112"></a>00112 <span class="comment"> Allocate memory for a bloc of size s.</span>
<a name="l00113"></a>00113 <span class="comment"> </span>
<a name="l00114"></a>00114 <span class="comment"> ## PARAMETRES:</span>
<a name="l00115"></a>00115 <span class="comment"> @ size_t s : Size of the bloc to allocate</span>
<a name="l00116"></a>00116 <span class="comment"> </span>
<a name="l00117"></a>00117 <span class="comment"> ## RETURN:</span>
<a name="l00118"></a>00118 <span class="comment"> void *: Pointer to the allocated bloc</span>
<a name="l00119"></a>00119 <span class="comment"> </span>
<a name="l00120"></a>00120 <span class="comment">*/</span>
<a name="l00121"></a><a class="code" href="memhandler_8h.html#de7308a1600115ffc6537f7875cf935c">00121</a> <span class="keywordtype">void</span>* <a class="code" href="memhandler_8c.html#52d7260a38c396cb2dd1dd7abcfd61cb">my_malloc</a>(<span class="keywordtype">size_t</span> s)
<a name="l00122"></a>00122 {
<a name="l00123"></a>00123 <span class="keywordtype">void</span> *bloc = malloc(s) ;
<a name="l00124"></a>00124
<a name="l00125"></a>00125 <span class="keywordflow">if</span>(bloc == NULL) {
<a name="l00126"></a>00126 fprintf(stderr, <span class="stringliteral">"! malloc failed in my_bloc_malloc. Programm will exit, as demanded.\n"</span>) ;
<a name="l00127"></a>00127 <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>() ;
<a name="l00128"></a>00128 }
<a name="l00129"></a>00129
<a name="l00130"></a>00130 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00131"></a>00131 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; (M)Allocation success at: &lt;%p&gt;\n"</span>, bloc) ;
<a name="l00132"></a>00132 <span class="preprocessor"> #endif</span>
<a name="l00133"></a>00133 <span class="preprocessor"></span> <a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">add_bloc</a>(bloc) ;
<a name="l00134"></a>00134
<a name="l00135"></a>00135 <span class="keywordflow">return</span> bloc ;
<a name="l00136"></a>00136 }
<a name="l00137"></a>00137 <span class="comment"></span>
<a name="l00138"></a>00138 <span class="comment">/**</span>
<a name="l00139"></a>00139 <span class="comment"> ## FUNCTION: </span>
<a name="l00140"></a>00140 <span class="comment"> my_calloc</span>
<a name="l00141"></a>00141 <span class="comment"> </span>
<a name="l00142"></a>00142 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00143"></a>00143 <span class="comment"> Allocate memory for nb bloc of size s using calloc standart function.</span>
<a name="l00144"></a>00144 <span class="comment"> </span>
<a name="l00145"></a>00145 <span class="comment"> ## PARAMETRES:</span>
<a name="l00146"></a>00146 <span class="comment"> @ size_t nb : Number of bloc to allocate</span>
<a name="l00147"></a>00147 <span class="comment"> @ size_t s : Size of the bloc to allocate</span>
<a name="l00148"></a>00148 <span class="comment"> </span>
<a name="l00149"></a>00149 <span class="comment"> ## RETURN:</span>
<a name="l00150"></a>00150 <span class="comment"> void *: Pointer to the allocated bloc</span>
<a name="l00151"></a>00151 <span class="comment"> </span>
<a name="l00152"></a>00152 <span class="comment">*/</span>
<a name="l00153"></a><a class="code" href="memhandler_8h.html#e1a54755aeeb11b927875d686a5248c7">00153</a> <span class="keywordtype">void</span>* <a class="code" href="memhandler_8c.html#e1a54755aeeb11b927875d686a5248c7">my_calloc</a>(<span class="keywordtype">size_t</span> nb, <span class="keywordtype">size_t</span> s)
<a name="l00154"></a>00154 {
<a name="l00155"></a>00155 <span class="keywordtype">void</span> *bloc = calloc(nb, s) ;
<a name="l00156"></a>00156
<a name="l00157"></a>00157 <span class="keywordflow">if</span>(bloc == NULL){
<a name="l00158"></a>00158 fprintf(stderr, <span class="stringliteral">"! malloc failed in my_bloc_malloc. Programm will exit, as demanded.\n"</span>) ;
<a name="l00159"></a>00159 <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>() ;
<a name="l00160"></a>00160 }
<a name="l00161"></a>00161 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00162"></a>00162 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; (C)Allocation success at: &lt;%p&gt;\n"</span>, bloc) ;
<a name="l00163"></a>00163 <span class="preprocessor"> #endif</span>
<a name="l00164"></a>00164 <span class="preprocessor"></span> <a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">add_bloc</a>(bloc) ;
<a name="l00165"></a>00165
<a name="l00166"></a>00166 <span class="keywordflow">return</span> bloc ;
<a name="l00167"></a>00167 }
<a name="l00168"></a>00168 <span class="comment"></span>
<a name="l00169"></a>00169 <span class="comment">/**</span>
<a name="l00170"></a>00170 <span class="comment"> ## FUNCTION: </span>
<a name="l00171"></a>00171 <span class="comment"> my_realloc</span>
<a name="l00172"></a>00172 <span class="comment"> </span>
<a name="l00173"></a>00173 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00174"></a>00174 <span class="comment"> Allocate memory for a bloc of size s using calloc standart function.</span>
<a name="l00175"></a>00175 <span class="comment"> </span>
<a name="l00176"></a>00176 <span class="comment"> ## PARAMETRES:</span>
<a name="l00177"></a>00177 <span class="comment"> @ size_t s : Size of the bloc to allocate</span>
<a name="l00178"></a>00178 <span class="comment"> @ int exit : Whether we exit the programm if malloc fails.</span>
<a name="l00179"></a>00179 <span class="comment"> </span>
<a name="l00180"></a>00180 <span class="comment"> ## RETURN:</span>
<a name="l00181"></a>00181 <span class="comment"> void *: Pointer to the allocated bloc</span>
<a name="l00182"></a>00182 <span class="comment"> </span>
<a name="l00183"></a>00183 <span class="comment">*/</span>
<a name="l00184"></a><a class="code" href="memhandler_8h.html#6c39f36183b8d5badfcab534c965621e">00184</a> <span class="keywordtype">void</span>* <a class="code" href="memhandler_8c.html#ede15d67c845c05e9b2bfb59b8ab6cf7">my_realloc</a>(<span class="keywordtype">void</span> *<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>, <span class="keywordtype">size_t</span> s)
<a name="l00185"></a>00185 {
<a name="l00186"></a>00186 <span class="keywordtype">void</span> *tmp = ptr ;
<a name="l00187"></a>00187 ptr = realloc(ptr, s) ;
<a name="l00188"></a>00188
<a name="l00189"></a>00189 <span class="keywordflow">if</span>(ptr == NULL){
<a name="l00190"></a>00190 fprintf(stderr, <span class="stringliteral">"! malloc failed in my_bloc_malloc. Programm will exit, as demanded.\n"</span>) ;
<a name="l00191"></a>00191 <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>() ;
<a name="l00192"></a>00192 }
<a name="l00193"></a>00193 <span class="keywordflow">else</span> {
<a name="l00194"></a>00194 <span class="keywordflow">if</span>(tmp &amp;&amp; tmp != ptr) {
<a name="l00195"></a>00195 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00196"></a>00196 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; Realloc generates a new pointer: &lt;%p&gt; newly allocated at %p. \n"</span>, tmp, ptr) ;
<a name="l00197"></a>00197 <span class="preprocessor"> #endif</span>
<a name="l00198"></a>00198 <span class="preprocessor"></span>
<a name="l00199"></a>00199 <span class="comment">/* If the newly allocated pointer is different from previou s</span>
<a name="l00200"></a>00200 <span class="comment"> one, remove previous from the list and add new one. Else, </span>
<a name="l00201"></a>00201 <span class="comment"> ptr doesn't need to be added. */</span>
<a name="l00202"></a>00202 <a class="code" href="memhandler_8c.html#f840f1b8e7e96f68cc4e424e6d7b1643">remove_bloc</a>(tmp) ;
<a name="l00203"></a>00203 <a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">add_bloc</a>(ptr) ;
<a name="l00204"></a>00204 }
<a name="l00205"></a>00205 }
<a name="l00206"></a>00206
<a name="l00207"></a>00207 <span class="keywordflow">return</span> ptr ;
<a name="l00208"></a>00208 }
<a name="l00209"></a>00209
<a name="l00210"></a>00210 <span class="comment"></span>
<a name="l00211"></a>00211 <span class="comment">/**</span>
<a name="l00212"></a>00212 <span class="comment"> ## FONCTION: </span>
<a name="l00213"></a>00213 <span class="comment"> ptr_node_alloc</span>
<a name="l00214"></a>00214 <span class="comment"> </span>
<a name="l00215"></a>00215 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00216"></a>00216 <span class="comment"> Allocate a simple chained node.</span>
<a name="l00217"></a>00217 <span class="comment"> </span>
<a name="l00218"></a>00218 <span class="comment"> ## PARAMETRES:</span>
<a name="l00219"></a>00219 <span class="comment"> @ void *ptr: Pointer</span>
<a name="l00220"></a>00220 <span class="comment"> </span>
<a name="l00221"></a>00221 <span class="comment"> ## RETURN:</span>
<a name="l00222"></a>00222 <span class="comment"> ptr_node*</span>
<a name="l00223"></a>00223 <span class="comment"> </span>
<a name="l00224"></a>00224 <span class="comment">*/</span>
<a name="l00225"></a><a class="code" href="memhandler_8c.html#cfc06ff6ba710b8b04cc7c559bc13c30">00225</a> <span class="keyword">static</span> <a class="code" href="structptr__node.html">ptr_node</a>* <a class="code" href="memhandler_8c.html#cfc06ff6ba710b8b04cc7c559bc13c30">ptr_node_alloc</a>(<span class="keywordtype">void</span> *<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>)
<a name="l00226"></a>00226 {
<a name="l00227"></a>00227 <a class="code" href="structptr__node.html">ptr_node</a> *node = (<a class="code" href="structptr__node.html">ptr_node</a> *) malloc(<span class="keyword">sizeof</span>(<a class="code" href="structptr__node.html">ptr_node</a>)) ;
<a name="l00228"></a>00228
<a name="l00229"></a>00229 <span class="keywordflow">if</span>(node) {
<a name="l00230"></a>00230 node-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a> = ptr ;
<a name="l00231"></a>00231 node-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = NULL ;
<a name="l00232"></a>00232 }
<a name="l00233"></a>00233 <span class="keywordflow">else</span> {
<a name="l00234"></a>00234 fprintf(stderr, <span class="stringliteral">"! malloc failed in my_bloc_malloc. Programm will exit, as demanded.\n"</span>) ;
<a name="l00235"></a>00235 <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>() ;
<a name="l00236"></a>00236 }
<a name="l00237"></a>00237
<a name="l00238"></a>00238 <span class="keywordflow">return</span> node ;
<a name="l00239"></a>00239 }
<a name="l00240"></a>00240
<a name="l00241"></a>00241 <span class="comment"></span>
<a name="l00242"></a>00242 <span class="comment">/**</span>
<a name="l00243"></a>00243 <span class="comment"> ## FUNCTION: </span>
<a name="l00244"></a>00244 <span class="comment"> my_free</span>
<a name="l00245"></a>00245 <span class="comment"> </span>
<a name="l00246"></a>00246 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00247"></a>00247 <span class="comment"> Free memory for the given bloc, and remove this pointer from the list.</span>
<a name="l00248"></a>00248 <span class="comment"> </span>
<a name="l00249"></a>00249 <span class="comment"> ## PARAMETRES:</span>
<a name="l00250"></a>00250 <span class="comment"> @ void *bloc: Pointer to free.</span>
<a name="l00251"></a>00251 <span class="comment"> </span>
<a name="l00252"></a>00252 <span class="comment"> ## RETURN:</span>
<a name="l00253"></a>00253 <span class="comment"> </span>
<a name="l00254"></a>00254 <span class="comment">*/</span>
<a name="l00255"></a><a class="code" href="memhandler_8h.html#a49400242a007d208c641f79856ea4c6">00255</a> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#a49400242a007d208c641f79856ea4c6">my_free</a>(<span class="keywordtype">void</span> *bloc)
<a name="l00256"></a>00256 {
<a name="l00257"></a>00257 <span class="keywordflow">if</span>(bloc) {
<a name="l00258"></a>00258 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00259"></a>00259 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; (my_free) Freeing bloc &lt;%p&gt;!\n"</span>, bloc) ;
<a name="l00260"></a>00260 fflush(ST_fdebug) ;
<a name="l00261"></a>00261 <span class="preprocessor"> #endif</span>
<a name="l00262"></a>00262 <span class="preprocessor"></span> <a class="code" href="memhandler_8c.html#f840f1b8e7e96f68cc4e424e6d7b1643">remove_bloc</a>(bloc) ;
<a name="l00263"></a>00263 free(bloc) ;
<a name="l00264"></a>00264 }
<a name="l00265"></a>00265 <span class="keywordflow">else</span> {
<a name="l00266"></a>00266 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00267"></a>00267 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"! Cannot free a NULL variable!\n"</span>) ;
<a name="l00268"></a>00268 <span class="preprocessor"> #endif</span>
<a name="l00269"></a>00269 <span class="preprocessor"></span> }
<a name="l00270"></a>00270
<a name="l00271"></a>00271 }
<a name="l00272"></a>00272 <span class="comment"></span>
<a name="l00273"></a>00273 <span class="comment">/**</span>
<a name="l00274"></a>00274 <span class="comment"> ## FUNCTION: </span>
<a name="l00275"></a>00275 <span class="comment"> static add_bloc</span>
<a name="l00276"></a>00276 <span class="comment"> </span>
<a name="l00277"></a>00277 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00278"></a>00278 <span class="comment"> Add an allocated pointer (bloc) to the list ST_lst_alloc. </span>
<a name="l00279"></a>00279 <span class="comment"></span>
<a name="l00280"></a>00280 <span class="comment"> This function is supposed to be called by my_malloc, my_calloc or my_realloc </span>
<a name="l00281"></a>00281 <span class="comment"> functions only.</span>
<a name="l00282"></a>00282 <span class="comment"> </span>
<a name="l00283"></a>00283 <span class="comment"> ## PARAMETRES:</span>
<a name="l00284"></a>00284 <span class="comment"> @ void *bloc: The pointer to remove</span>
<a name="l00285"></a>00285 <span class="comment"> </span>
<a name="l00286"></a>00286 <span class="comment"> ## RETURN:</span>
<a name="l00287"></a>00287 <span class="comment"> </span>
<a name="l00288"></a>00288 <span class="comment">*/</span>
<a name="l00289"></a><a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">00289</a> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#a71f76a5140b2027627c0a665edfb3cd">add_bloc</a>(<span class="keywordtype">void</span> *bloc)
<a name="l00290"></a>00290 {
<a name="l00291"></a>00291 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00292"></a>00292 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; Adding bloc %p\n"</span>, bloc) ;
<a name="l00293"></a>00293 <span class="preprocessor"> #endif</span>
<a name="l00294"></a>00294 <span class="preprocessor"></span>
<a name="l00295"></a>00295 <span class="comment">/* First check if the list exists, if not create it. */</span>
<a name="l00296"></a>00296 <span class="keywordflow">if</span>(!ST_lst_alloc) {
<a name="l00297"></a>00297
<a name="l00298"></a>00298 ST_lst_alloc = (<a class="code" href="structptr__lst.html">ptr_lst</a>*) malloc(<span class="keyword">sizeof</span>(<a class="code" href="structptr__lst.html">ptr_lst</a>)) ;
<a name="l00299"></a>00299 <span class="keywordflow">if</span>(!ST_lst_alloc) {
<a name="l00300"></a>00300 fprintf(stderr, <span class="stringliteral">"! malloc failed in add_bloc while creating the list. Programm will exit.\n"</span>) ;
<a name="l00301"></a>00301 <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>() ;
<a name="l00302"></a>00302 }
<a name="l00303"></a>00303 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00304"></a>00304 <span class="preprocessor"></span> ST_fdebug = fopen(<span class="stringliteral">"memory_debug.tmp"</span>, <span class="stringliteral">"w"</span>) ;
<a name="l00305"></a>00305 <span class="preprocessor"> #endif</span>
<a name="l00306"></a>00306 <span class="preprocessor"></span>
<a name="l00307"></a>00307 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> = NULL ;
<a name="l00308"></a>00308 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">last</a> = NULL ;
<a name="l00309"></a>00309 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a> = 0 ;
<a name="l00310"></a>00310 }
<a name="l00311"></a>00311
<a name="l00312"></a>00312 <span class="comment">/* Now add the bloc to the chained list */</span>
<a name="l00313"></a>00313
<a name="l00314"></a>00314 <a class="code" href="structptr__node.html">ptr_node</a> *newn = <a class="code" href="memhandler_8c.html#cfc06ff6ba710b8b04cc7c559bc13c30">ptr_node_alloc</a>(bloc) ;
<a name="l00315"></a>00315 <span class="keywordflow">if</span>(ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a>) {
<a name="l00316"></a>00316 newn-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> ;
<a name="l00317"></a>00317 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> = newn ;
<a name="l00318"></a>00318 }
<a name="l00319"></a>00319 <span class="keywordflow">else</span> {
<a name="l00320"></a>00320 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> = newn ;
<a name="l00321"></a>00321 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">last</a> = newn ;
<a name="l00322"></a>00322 }
<a name="l00323"></a>00323
<a name="l00324"></a>00324 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a> += 1 ;
<a name="l00325"></a>00325 }
<a name="l00326"></a>00326 <span class="comment"></span>
<a name="l00327"></a>00327 <span class="comment">/**</span>
<a name="l00328"></a>00328 <span class="comment"> ## FUNCTION: </span>
<a name="l00329"></a>00329 <span class="comment"> static remove_bloc</span>
<a name="l00330"></a>00330 <span class="comment"> </span>
<a name="l00331"></a>00331 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00332"></a>00332 <span class="comment"> Remove the given pointer (node) from the list ST_lst_alloc. Donc free the</span>
<a name="l00333"></a>00333 <span class="comment"> memory.</span>
<a name="l00334"></a>00334 <span class="comment"></span>
<a name="l00335"></a>00335 <span class="comment"> This function is supposed to be called by my_free function and not another.</span>
<a name="l00336"></a>00336 <span class="comment"> </span>
<a name="l00337"></a>00337 <span class="comment"> ## PARAMETRES:</span>
<a name="l00338"></a>00338 <span class="comment"> @ void *bloc: The pointer to remove.</span>
<a name="l00339"></a>00339 <span class="comment"> </span>
<a name="l00340"></a>00340 <span class="comment"> ## RETURN: void</span>
<a name="l00341"></a>00341 <span class="comment"> </span>
<a name="l00342"></a>00342 <span class="comment">*/</span>
<a name="l00343"></a><a class="code" href="memhandler_8c.html#f840f1b8e7e96f68cc4e424e6d7b1643">00343</a> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#f840f1b8e7e96f68cc4e424e6d7b1643">remove_bloc</a>(<span class="keywordtype">void</span> *bloc)
<a name="l00344"></a>00344 {
<a name="l00345"></a>00345 <span class="preprocessor">#ifdef M_MEM_DEBUG</span>
<a name="l00346"></a>00346 <span class="preprocessor"></span> <span class="keywordtype">size_t</span> i = 0 ;
<a name="l00347"></a>00347 <span class="preprocessor">#endif</span>
<a name="l00348"></a>00348 <span class="preprocessor"></span> <span class="comment">/* First check if the list exists, if not create it. */</span>
<a name="l00349"></a>00349
<a name="l00350"></a>00350 <span class="keywordflow">if</span>(ST_lst_alloc) {
<a name="l00351"></a>00351
<a name="l00352"></a>00352 <a class="code" href="structptr__node.html">ptr_node</a> *cur = ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a>,
<a name="l00353"></a>00353 *prev = cur ;
<a name="l00354"></a>00354 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00355"></a>00355 <span class="preprocessor"></span> <span class="keywordflow">if</span>(!cur &amp;&amp; ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; No element in the list, so cannot remove &lt;%p&gt;...\n"</span>, bloc) ;
<a name="l00356"></a>00356 <span class="keywordtype">size_t</span> prev_s = ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a> ;
<a name="l00357"></a>00357 <span class="preprocessor"> #endif</span>
<a name="l00358"></a>00358 <span class="preprocessor"></span> <span class="keywordflow">while</span>(cur) {
<a name="l00359"></a>00359 <span class="keywordflow">if</span>(cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a> == bloc) {
<a name="l00360"></a>00360 <span class="comment">/* Remove bloc */</span>
<a name="l00361"></a>00361 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00362"></a>00362 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; Removing &lt;%p&gt;...\n"</span>, cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) ;
<a name="l00363"></a>00363 <span class="preprocessor"> #endif</span>
<a name="l00364"></a>00364 <span class="preprocessor"></span> <span class="keywordflow">if</span>(cur == ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a>) {
<a name="l00365"></a>00365 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> = cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ;
<a name="l00366"></a>00366 }
<a name="l00367"></a>00367 <span class="keywordflow">else</span> <span class="keywordflow">if</span>(cur == ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">last</a>) {
<a name="l00368"></a>00368 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">last</a> = prev ;
<a name="l00369"></a>00369 prev-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = NULL ;
<a name="l00370"></a>00370 }
<a name="l00371"></a>00371 <span class="keywordflow">else</span> {
<a name="l00372"></a>00372 prev-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ;
<a name="l00373"></a>00373 }
<a name="l00374"></a>00374
<a name="l00375"></a>00375 cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = NULL ;
<a name="l00376"></a>00376 free(cur) ;
<a name="l00377"></a>00377 ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a> -= 1 ;
<a name="l00378"></a>00378
<a name="l00379"></a>00379 break ;
<a name="l00380"></a>00380 }
<a name="l00381"></a>00381 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00382"></a>00382 <span class="preprocessor"></span> i++ ;
<a name="l00383"></a>00383 <span class="preprocessor"> #endif</span>
<a name="l00384"></a>00384 <span class="preprocessor"></span>
<a name="l00385"></a>00385 prev = cur ;
<a name="l00386"></a>00386 cur = cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ;
<a name="l00387"></a>00387 }
<a name="l00388"></a>00388 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00389"></a>00389 <span class="preprocessor"></span> <span class="keywordflow">if</span>(i == prev_s &amp;&amp; ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"Memhandler: &lt;%p&gt; not found!\n"</span>, bloc) ;
<a name="l00390"></a>00390 <span class="preprocessor"> #endif</span>
<a name="l00391"></a>00391 <span class="preprocessor"></span> }
<a name="l00392"></a>00392
<a name="l00393"></a>00393 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00394"></a>00394 <span class="preprocessor"></span> <span class="keywordflow">else</span> {
<a name="l00395"></a>00395 <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"! No bloc allocated -&gt; cannot remove given argument from an empty list.\n"</span>) ;
<a name="l00396"></a>00396 }
<a name="l00397"></a>00397 <span class="preprocessor"> #endif</span>
<a name="l00398"></a>00398 <span class="preprocessor"></span>}
<a name="l00399"></a>00399
<a name="l00400"></a>00400
<a name="l00401"></a><a class="code" href="memhandler_8c.html#6cb2371e8725750009747bd211a5d527">00401</a> <span class="keywordtype">int</span> <a class="code" href="memhandler_8c.html#6cb2371e8725750009747bd211a5d527">get_number_of_objects_in_memory</a>(<span class="keywordtype">void</span>){
<a name="l00402"></a>00402 <span class="keywordflow">if</span>(ST_lst_alloc) {
<a name="l00403"></a>00403 <span class="keywordflow">return</span>(ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a>);
<a name="l00404"></a>00404 }
<a name="l00405"></a>00405 <span class="keywordflow">return</span>(0);
<a name="l00406"></a>00406 }
<a name="l00407"></a>00407
<a name="l00408"></a><a class="code" href="memhandler_8h.html#1f6dcf997eec81b90449165a0cfbcc8f">00408</a> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#1f6dcf997eec81b90449165a0cfbcc8f">print_number_of_objects_in_memory</a>(<span class="keywordtype">void</span>){
<a name="l00409"></a>00409 <span class="keywordflow">if</span>(ST_lst_alloc) {
<a name="l00410"></a>00410 printf(<span class="stringliteral">"\nHaving %d objects in memory\n"</span>,ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a>);
<a name="l00411"></a>00411 }
<a name="l00412"></a>00412 }
<a name="l00413"></a>00413 <span class="comment"></span>
<a name="l00414"></a>00414 <span class="comment">/**</span>
<a name="l00415"></a>00415 <span class="comment"> ## FUNCTION: </span>
<a name="l00416"></a>00416 <span class="comment"> free_all </span>
<a name="l00417"></a>00417 <span class="comment"> </span>
<a name="l00418"></a>00418 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00419"></a>00419 <span class="comment"> Free all pointers allocated and present in the list ST_lst_alloc. If a</span>
<a name="l00420"></a>00420 <span class="comment"> NULL pointer is found, ignore it.</span>
<a name="l00421"></a>00421 <span class="comment"> </span>
<a name="l00422"></a>00422 <span class="comment"> ## PARAMETRES: void</span>
<a name="l00423"></a>00423 <span class="comment"> </span>
<a name="l00424"></a>00424 <span class="comment"> ## RETURN: void</span>
<a name="l00425"></a>00425 <span class="comment"> </span>
<a name="l00426"></a>00426 <span class="comment">*/</span>
<a name="l00427"></a><a class="code" href="memhandler_8h.html#506df742641c3db2e00869a5c2f4dcd9">00427</a> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#506df742641c3db2e00869a5c2f4dcd9">free_all</a>(<span class="keywordtype">void</span>)
<a name="l00428"></a>00428 {
<a name="l00429"></a>00429 <span class="keywordflow">if</span>(ST_lst_alloc) {
<a name="l00430"></a>00430
<a name="l00431"></a>00431 <a class="code" href="structptr__node.html">ptr_node</a> *cur = ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a>,
<a name="l00432"></a>00432 *tmp = cur ;
<a name="l00433"></a>00433 <span class="keywordflow">while</span>(cur) {
<a name="l00434"></a>00434 <span class="keywordflow">if</span>(cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) {
<a name="l00435"></a>00435 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00436"></a>00436 <span class="preprocessor"></span> <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"&gt; Freeing &lt;%p&gt;.\n"</span>, cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) ;
<a name="l00437"></a>00437 <span class="preprocessor"> #endif</span>
<a name="l00438"></a>00438 <span class="preprocessor"></span> free(cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) ;
<a name="l00439"></a>00439 cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a> = NULL ;
<a name="l00440"></a>00440 }
<a name="l00441"></a>00441 <span class="preprocessor"> #ifdef M_MEM_DEBUG</span>
<a name="l00442"></a>00442 <span class="preprocessor"></span> <span class="keywordflow">else</span> {
<a name="l00443"></a>00443 <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"! A NULL bloc has been found in free_all!! Ignoring this bloc...\n"</span>) ;
<a name="l00444"></a>00444 }
<a name="l00445"></a>00445 <span class="preprocessor"> #endif</span>
<a name="l00446"></a>00446 <span class="preprocessor"></span>
<a name="l00447"></a>00447 tmp = cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ;
<a name="l00448"></a>00448 cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> = NULL ;
<a name="l00449"></a>00449 free(cur) ;
<a name="l00450"></a>00450
<a name="l00451"></a>00451 cur = tmp ;
<a name="l00452"></a>00452 }
<a name="l00453"></a>00453
<a name="l00454"></a>00454 free(ST_lst_alloc) ;
<a name="l00455"></a>00455 ST_lst_alloc = NULL ;
<a name="l00456"></a>00456
<a name="l00457"></a>00457 }
<a name="l00458"></a>00458 <span class="preprocessor">#ifdef M_MEM_DEBUG</span>
<a name="l00459"></a>00459 <span class="preprocessor"></span> <span class="keywordflow">else</span> {
<a name="l00460"></a>00460 <span class="keywordflow">if</span>(ST_fdebug) fprintf(ST_fdebug, <span class="stringliteral">"! No bloc allocated -&gt; cannot free memory...\n"</span>) ;
<a name="l00461"></a>00461 }
<a name="l00462"></a>00462 <span class="preprocessor">#endif</span>
<a name="l00463"></a>00463 <span class="preprocessor"></span>}
<a name="l00464"></a>00464 <span class="comment"></span>
<a name="l00465"></a>00465 <span class="comment">/**</span>
<a name="l00466"></a>00466 <span class="comment"> ## FUNCTION: </span>
<a name="l00467"></a>00467 <span class="comment"> my_exit</span>
<a name="l00468"></a>00468 <span class="comment"> </span>
<a name="l00469"></a>00469 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00470"></a>00470 <span class="comment"> Before exiting the programm, just free all allocated pointers (if any). This</span>
<a name="l00471"></a>00471 <span class="comment"> allows to exit the programme whenever one wants during the execution without</span>
<a name="l00472"></a>00472 <span class="comment"> dealing with memory allocation/desallocation.</span>
<a name="l00473"></a>00473 <span class="comment"></span>
<a name="l00474"></a>00474 <span class="comment"> This implies to use my_malloc and my_free functions instead of standart</span>
<a name="l00475"></a>00475 <span class="comment"> functions. Only memory blocs allocated with those functions will be freed</span>
<a name="l00476"></a>00476 <span class="comment"> when my_exit is called.</span>
<a name="l00477"></a>00477 <span class="comment"> </span>
<a name="l00478"></a>00478 <span class="comment"> ## PARAMETRES: void</span>
<a name="l00479"></a>00479 <span class="comment"> </span>
<a name="l00480"></a>00480 <span class="comment"> ## RETURN: void</span>
<a name="l00481"></a>00481 <span class="comment"> </span>
<a name="l00482"></a>00482 <span class="comment">*/</span>
<a name="l00483"></a><a class="code" href="memhandler_8h.html#43e8f90500abd74cfb3c2902915b0b33">00483</a> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#43e8f90500abd74cfb3c2902915b0b33">my_exit</a>(<span class="keywordtype">void</span>)
<a name="l00484"></a>00484 {
<a name="l00485"></a>00485 <a class="code" href="memhandler_8c.html#506df742641c3db2e00869a5c2f4dcd9">free_all</a>() ;
<a name="l00486"></a>00486
<a name="l00487"></a>00487 exit(1) ;
<a name="l00488"></a>00488 }
<a name="l00489"></a>00489 <span class="comment"></span>
<a name="l00490"></a>00490 <span class="comment">/**</span>
<a name="l00491"></a>00491 <span class="comment"> ## FUNCTION: </span>
<a name="l00492"></a>00492 <span class="comment"> print_ptr_lst </span>
<a name="l00493"></a>00493 <span class="comment"> </span>
<a name="l00494"></a>00494 <span class="comment"> ## SPECIFICATION: </span>
<a name="l00495"></a>00495 <span class="comment"> Print allocated pointers stored in ST_lst_alloc for debugging purpose.</span>
<a name="l00496"></a>00496 <span class="comment"> </span>
<a name="l00497"></a>00497 <span class="comment"> ## PARAMETRES: void</span>
<a name="l00498"></a>00498 <span class="comment"> </span>
<a name="l00499"></a>00499 <span class="comment"> ## RETURN: void</span>
<a name="l00500"></a>00500 <span class="comment"> </span>
<a name="l00501"></a>00501 <span class="comment">*/</span>
<a name="l00502"></a><a class="code" href="memhandler_8h.html#a766572a8cc9a5223991ea29f4086cb5">00502</a> <span class="keywordtype">void</span> <a class="code" href="memhandler_8c.html#a766572a8cc9a5223991ea29f4086cb5">print_ptr_lst</a>(<span class="keywordtype">void</span>)
<a name="l00503"></a>00503 {
<a name="l00504"></a>00504 <span class="keywordflow">if</span>(ST_lst_alloc &amp;&amp; ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a> &gt; 0) {
<a name="l00505"></a>00505 <span class="keywordtype">int</span> i = 0 ;
<a name="l00506"></a>00506 <a class="code" href="structptr__node.html">ptr_node</a> *cur = ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a> ;
<a name="l00507"></a>00507 fprintf(stdout, <span class="stringliteral">"\t==============\n\tLst of %d allocated ptr: \n"</span>, (<span class="keywordtype">int</span>) ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#d9352af5c811f1b59e7706a1dbdc672b">n_ptr</a>) ;
<a name="l00508"></a>00508 fprintf(stdout, <span class="stringliteral">"\tFirst: &lt;%p&gt; - Last: &lt;%p&gt;\n"</span>, ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#539453cc2c8aa194070c998ae4c0d3bd">first</a>-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>, ST_lst_alloc-&gt;<a class="code" href="structptr__lst.html#11b468c69baf674880cd3440a63819d3">last</a>-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) ;
<a name="l00509"></a>00509
<a name="l00510"></a>00510 <span class="keywordflow">while</span>(cur) {
<a name="l00511"></a>00511 <span class="keywordflow">if</span>(cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>) {
<a name="l00512"></a>00512 fprintf(stdout, <span class="stringliteral">"\t&lt;%p&gt; &lt;%d&gt;\n"</span>, cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>, (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(cur-&gt;<a class="code" href="structptr__node.html#cd388f7d69011add91232e01caeb6a44">ptr</a>)) ;
<a name="l00513"></a>00513 }
<a name="l00514"></a>00514 <span class="keywordflow">else</span> {
<a name="l00515"></a>00515 fprintf(stdout, <span class="stringliteral">"\t! A NULL bloc has been found in position %d.\n"</span>, i) ;
<a name="l00516"></a>00516 }
<a name="l00517"></a>00517
<a name="l00518"></a>00518 cur = cur-&gt;<a class="code" href="structptr__node.html#ff3a76cac5d9052a20ddeceed0e9b1cf">next</a> ;
<a name="l00519"></a>00519 }
<a name="l00520"></a>00520 }
<a name="l00521"></a>00521 <span class="keywordflow">else</span> {
<a name="l00522"></a>00522 fprintf(stdout, <span class="stringliteral">"\t! No bloc allocated yet...\n"</span>) ;
<a name="l00523"></a>00523 }
<a name="l00524"></a>00524 }
<a name="l00525"></a>00525
</pre></div></div>
<hr size="1"><address style="text-align: right;"><small>Generated on Mon Jun 7 16:44:23 2010 for fpocket by&nbsp;
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.5.6 </small></address>
</body>
</html>