1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214
|
<?xml version='1.0' encoding='utf-8'?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html><head>
<meta http-equiv="Content-Type" content="application/xhtml+xml; charset=UTF-8" />
<meta http-equiv="Content-Script-Type" content="text/javascript"/>
<title>
File: alog-logger.ads
</title>
<link rel='stylesheet' href='support/docgen.css' type='text/css'/>
<script src='support/docgen.js' type='text/javascript' charset='utf-8'></script>
</head>
<body onload="onloadDoc();">
<div id='leftSide'>
<div id='leftSideInside'>
<div id='header'>
<h2 class="button">Documentation</h2>
<a href='index.html'><div class="button2">Table of Contents</div></a>
<a href='tree.html'><div class="button2">Class Inheritance Tree</div></a>
</div>
</div>
</div> <!-- leftSide -->
<div class='subprograms'>
<div class='details'><ol><li id="l1"><pre><span class="comment">--</span> </pre></li>
<li id="l2"><pre><span class="comment">-- Copyright (c) 2008,</span> </pre></li>
<li id="l3"><pre><span class="comment">-- Reto Buerki, Adrian-Ken Rueegsegger</span> </pre></li>
<li id="l4"><pre><span class="comment">-- secunet SwissIT AG</span> </pre></li>
<li id="l5"><pre><span class="comment">--</span> </pre></li>
<li id="l6"><pre><span class="comment">-- This file is part of Alog.</span> </pre></li>
<li id="l7"><pre><span class="comment">--</span> </pre></li>
<li id="l8"><pre><span class="comment">-- Alog is free software; you can redistribute it and/or modify</span> </pre></li>
<li id="l9"><pre><span class="comment">-- it under the terms of the GNU Lesser General Public License as published</span> </pre></li>
<li id="l10"><pre><span class="comment">-- by the Free Software Foundation; either version 2.1 of the License, or</span> </pre></li>
<li id="l11"><pre><span class="comment">-- (at your option) any later version.</span> </pre></li>
<li id="l12"><pre><span class="comment">--</span> </pre></li>
<li id="l13"><pre><span class="comment">-- Alog is distributed in the hope that it will be useful,</span> </pre></li>
<li id="l14"><pre><span class="comment">-- but WITHOUT ANY WARRANTY; without even the implied warranty of</span> </pre></li>
<li id="l15"><pre><span class="comment">-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</span> </pre></li>
<li id="l16"><pre><span class="comment">-- GNU Lesser General Public License for more details.</span> </pre></li>
<li id="l17"><pre><span class="comment">--</span> </pre></li>
<li id="l18"><pre><span class="comment">-- You should have received a copy of the GNU Lesser General Public License</span> </pre></li>
<li id="l19"><pre><span class="comment">-- along with Alog; if not, write to the Free Software</span> </pre></li>
<li id="l20"><pre><span class="comment">-- Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,</span> </pre></li>
<li id="l21"><pre><span class="comment">-- MA 02110-1301 USA</span> </pre></li>
<li id="l22"><pre><span class="comment">--</span> </pre></li>
<li id="l23"><pre> </pre></li>
<li id="l24"><pre><span class="keyword">with</span> Ada.Finalization; </pre></li>
<li id="l25"><pre><span class="keyword">with</span> Ada.Unchecked_Deallocation; </pre></li>
<li id="l26"><pre><span class="keyword">with</span> Ada.Strings.Unbounded; </pre></li>
<li id="l27"><pre> </pre></li>
<li id="l28"><pre><span class="keyword">with</span> <span class="droplink">Alog.Facilities<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:33:14" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l33" title="To spec">To spec</a></li><li><a href="src_alog-facilities.adb.html#l30" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l29"><pre><span class="keyword">with</span> <span class="droplink">Alog.Transforms<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:27:14" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l27" title="To spec">To spec</a></li><li><a href="src_alog-transforms.adb.html#l24" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l30"><pre><span class="keyword">with</span> <span class="droplink">Alog.Controlled_Map<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:38:14" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l38" title="To spec">To spec</a></li><li><a href="src_alog-controlled_map.adb.html#l26" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l31"><pre> </pre></li>
<li id="l32"><pre><span class="comment">-- Logger instance. Facilities can be attached to a logger instance in order to</span> </pre></li>
<li id="l33"><pre><span class="comment">-- log to different targets simultaneously. A logger provides different helper</span> </pre></li>
<li id="l34"><pre><span class="comment">-- functions for logging facilities configuration.</span> </pre></li>
<li id="l35"><pre><span class="keyword">package</span> <span class="droplink">Alog.Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:35:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l35" title="To spec">To spec</a></li><li><a href="src_alog-logger.adb.html#l28" title="To body">To body</a></li></ul></span> <span class="keyword">is</span> </pre></li>
<li id="l36"><pre> </pre></li>
<li id="l37"><pre> <span class="keyword">type</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span> (Init : Boolean) <span class="keyword">is</span> <span class="keyword">tagged</span> <span class="keyword">limited</span> <span class="keyword">private</span>; </pre></li>
<li id="l38"><pre> <span class="comment">-- Logger instance. The Init discriminant defines whether or not a default</span> </pre></li>
<li id="l39"><pre> <span class="comment">-- 'stdout' (FD facility without logfile set) is attached automatically. Set</span> </pre></li>
<li id="l40"><pre> <span class="comment">-- Init to 'True' if you want to make sure minimal stdout logging is</span> </pre></li>
<li id="l41"><pre> <span class="comment">-- possible as soon as a new logger is instantiated.</span> </pre></li>
<li id="l42"><pre> </pre></li>
<li id="l43"><pre> <span class="keyword">type</span> <a href="alog-logger.ads.html#alog-logger.ads:43:9" title="defined at alog-logger.ads:43:9">Handle</a> <span class="keyword">is</span> <span class="keyword">access</span> <span class="keyword">all</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l44"><pre> <span class="comment">-- Handle to logger type.</span> </pre></li>
<li id="l45"><pre> </pre></li>
<li id="l46"><pre> <span class="keyword">procedure</span> <span class="droplink">Attach_Facility<ul><li><a href="alog-logger.ads.html#alog-logger.ads:46:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l51" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l47"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:47:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l52" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l48"><pre> <a href="alog-logger.ads.html#alog-logger.ads:48:7" title="defined at alog-logger.ads:48:7">Facility</a> : <span class="droplink">Facilities.Handle<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:44:9" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l44" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l49"><pre> <span class="comment">-- Attach a facility to logger instance.</span> </pre></li>
<li id="l50"><pre> </pre></li>
<li id="l51"><pre> <span class="keyword">procedure</span> <span class="droplink">Attach_Default_Facility<ul><li><a href="alog-logger.ads.html#alog-logger.ads:51:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l32" title="To body">To body</a></li></ul></span> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:51:39" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l32" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>); </pre></li>
<li id="l52"><pre> <span class="comment">-- Attach default facility with name Default_Facility_Name to logger</span> </pre></li>
<li id="l53"><pre> <span class="comment">-- instance. If the default facility is already attached do nothing.</span> </pre></li>
<li id="l54"><pre> </pre></li>
<li id="l55"><pre> <span class="keyword">procedure</span> <span class="droplink">Detach_Facility<ul><li><a href="alog-logger.ads.html#alog-logger.ads:55:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l130" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l56"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:56:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l131" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l57"><pre> <a href="alog-logger.ads.html#alog-logger.ads:57:7" title="defined at alog-logger.ads:57:7">Name</a> : String); </pre></li>
<li id="l58"><pre> <span class="comment">-- Detach a facility with name 'Name' from logger instance. If the facility</span> </pre></li>
<li id="l59"><pre> <span class="comment">-- is not found a Facility_Not_Found exception is raised.</span> </pre></li>
<li id="l60"><pre> </pre></li>
<li id="l61"><pre> <span class="keyword">procedure</span> <span class="droplink">Detach_Default_Facility<ul><li><a href="alog-logger.ads.html#alog-logger.ads:61:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l119" title="To body">To body</a></li></ul></span> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:61:39" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l119" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>); </pre></li>
<li id="l62"><pre> <span class="comment">-- Detach default facility with name Default_Facility_Name from logger</span> </pre></li>
<li id="l63"><pre> <span class="comment">-- instance. If the default facility is not attached do nothing.</span> </pre></li>
<li id="l64"><pre> </pre></li>
<li id="l65"><pre> <span class="keyword">function</span> <span class="droplink">Facility_Count<ul><li><a href="alog-logger.ads.html#alog-logger.ads:65:13" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l162" title="To body">To body</a></li></ul></span> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:65:29" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l162" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>) <span class="keyword">return</span> Natural; </pre></li>
<li id="l66"><pre> <span class="comment">-- Return number of attached facilites.</span> </pre></li>
<li id="l67"><pre> </pre></li>
<li id="l68"><pre> <span class="keyword">procedure</span> <span class="droplink">Update<ul><li><a href="alog-logger.ads.html#alog-logger.ads:68:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l258" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l69"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:69:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l259" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l70"><pre> <a href="alog-logger.ads.html#alog-logger.ads:70:7" title="defined at alog-logger.ads:70:7">Name</a> : String; </pre></li>
<li id="l71"><pre> <a href="alog-logger.ads.html#alog-logger.ads:71:7" title="defined at alog-logger.ads:71:7">Process</a> : <span class="keyword">not</span> <span class="keyword">null</span> <span class="keyword">access</span> </pre></li>
<li id="l72"><pre> <span class="keyword">procedure</span> (Facility_Handle : <span class="droplink">Facilities.Handle<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:44:9" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l44" title="To spec">To spec</a></li></ul></span>)); </pre></li>
<li id="l73"><pre> <span class="comment">-- Update a specific Facility identified by 'Name'. Call the 'Process'</span> </pre></li>
<li id="l74"><pre> <span class="comment">-- procedure to perform the update operation.</span> </pre></li>
<li id="l75"><pre> </pre></li>
<li id="l76"><pre> <span class="keyword">procedure</span> <span class="droplink">Iterate<ul><li><a href="alog-logger.ads.html#alog-logger.ads:76:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l185" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l77"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:77:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l186" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l78"><pre> <a href="alog-logger.ads.html#alog-logger.ads:78:7" title="defined at alog-logger.ads:78:7">Process</a> : <span class="keyword">not</span> <span class="keyword">null</span> <span class="keyword">access</span> </pre></li>
<li id="l79"><pre> <span class="keyword">procedure</span> (Facility_Handle : <span class="droplink">Facilities.Handle<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:44:9" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l44" title="To spec">To spec</a></li></ul></span>)); </pre></li>
<li id="l80"><pre> <span class="comment">-- Call 'Process' for all attached facilities.</span> </pre></li>
<li id="l81"><pre> </pre></li>
<li id="l82"><pre> <span class="keyword">procedure</span> <span class="droplink">Attach_Transform<ul><li><a href="alog-logger.ads.html#alog-logger.ads:82:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l71" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l83"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:83:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l72" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l84"><pre> <a href="alog-logger.ads.html#alog-logger.ads:84:7" title="defined at alog-logger.ads:84:7">Transform</a> : <span class="droplink">Transforms.Handle<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l37" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l85"><pre> <span class="comment">-- Attach a transform to logger instance.</span> </pre></li>
<li id="l86"><pre> </pre></li>
<li id="l87"><pre> <span class="keyword">procedure</span> <span class="droplink">Detach_Transform<ul><li><a href="alog-logger.ads.html#alog-logger.ads:87:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l146" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l88"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:88:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l147" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l89"><pre> <a href="alog-logger.ads.html#alog-logger.ads:89:7" title="defined at alog-logger.ads:89:7">Name</a> : String); </pre></li>
<li id="l90"><pre> <span class="comment">-- Detach a transform with name 'Name' from logger instance. If the</span> </pre></li>
<li id="l91"><pre> <span class="comment">-- transform is not found a Transform_Not_Found exception is raised.</span> </pre></li>
<li id="l92"><pre> </pre></li>
<li id="l93"><pre> <span class="keyword">function</span> <span class="droplink">Transform_Count<ul><li><a href="alog-logger.ads.html#alog-logger.ads:93:13" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l251" title="To body">To body</a></li></ul></span> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:93:30" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l251" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>) <span class="keyword">return</span> Natural; </pre></li>
<li id="l94"><pre> <span class="comment">-- Return number of attached transforms.</span> </pre></li>
<li id="l95"><pre> </pre></li>
<li id="l96"><pre> <span class="keyword">procedure</span> <span class="droplink">Update<ul><li><a href="alog-logger.ads.html#alog-logger.ads:96:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l280" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l97"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:97:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l281" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l98"><pre> <a href="alog-logger.ads.html#alog-logger.ads:98:7" title="defined at alog-logger.ads:98:7">Name</a> : String; </pre></li>
<li id="l99"><pre> <a href="alog-logger.ads.html#alog-logger.ads:99:7" title="defined at alog-logger.ads:99:7">Process</a> : <span class="keyword">not</span> <span class="keyword">null</span> <span class="keyword">access</span> </pre></li>
<li id="l100"><pre> <span class="keyword">procedure</span> (Transform_Handle : <span class="droplink">Transforms.Handle<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l37" title="To spec">To spec</a></li></ul></span>)); </pre></li>
<li id="l101"><pre> <span class="comment">-- Update a specific Transform identified by 'Name'. Call the 'Process'</span> </pre></li>
<li id="l102"><pre> <span class="comment">-- procedure to perform the update operation.</span> </pre></li>
<li id="l103"><pre> </pre></li>
<li id="l104"><pre> <span class="keyword">procedure</span> <span class="droplink">Iterate<ul><li><a href="alog-logger.ads.html#alog-logger.ads:104:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l196" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l105"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:105:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l197" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l106"><pre> <a href="alog-logger.ads.html#alog-logger.ads:106:7" title="defined at alog-logger.ads:106:7">Process</a> : <span class="keyword">not</span> <span class="keyword">null</span> <span class="keyword">access</span> </pre></li>
<li id="l107"><pre> <span class="keyword">procedure</span> (Transform_Handle : <span class="droplink">Transforms.Handle<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l37" title="To spec">To spec</a></li></ul></span>)); </pre></li>
<li id="l108"><pre> <span class="comment">-- Call 'Process' for all attached transforms.</span> </pre></li>
<li id="l109"><pre> </pre></li>
<li id="l110"><pre> <span class="keyword">procedure</span> <span class="droplink">Clear<ul><li><a href="alog-logger.ads.html#alog-logger.ads:110:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l91" title="To body">To body</a></li></ul></span> (<span class="droplink">L<ul><li><a href="alog-logger.ads.html#alog-logger.ads:110:21" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l91" title="To body">To body</a></li></ul></span> : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>); </pre></li>
<li id="l111"><pre> <span class="comment">-- Clear logger instance. Detach and teardown all attached facilities and</span> </pre></li>
<li id="l112"><pre> <span class="comment">-- transforms.</span> </pre></li>
<li id="l113"><pre> </pre></li>
<li id="l114"><pre> <span class="keyword">procedure</span> <span class="droplink">Log_Message<ul><li><a href="alog-logger.ads.html#alog-logger.ads:114:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l207" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l115"><pre> (<span class="droplink">Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:115:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l208" title="To body">To body</a></li></ul></span> : <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l116"><pre> <a href="alog-logger.ads.html#alog-logger.ads:116:7" title="defined at alog-logger.ads:116:7">Source</a> : String := <span class="string">""</span>; </pre></li>
<li id="l117"><pre> <span class="droplink">Level<ul><li><a href="alog-logger.ads.html#alog-logger.ads:117:7" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.adb.html#l210" title="To body">To body</a></li></ul></span> : <span class="droplink">Log_Level<ul><li><a href="alog.ads.html#alog.ads:32:9" title="To API doc">To API doc</a></li><li><a href="src_alog.ads.html#l32" title="To spec">To spec</a></li></ul></span>; </pre></li>
<li id="l118"><pre> <a href="alog-logger.ads.html#alog-logger.ads:118:7" title="defined at alog-logger.ads:118:7">Msg</a> : String); </pre></li>
<li id="l119"><pre> <span class="comment">-- Log a message. The Write_Message() procedure of all attached facilities</span> </pre></li>
<li id="l120"><pre> <span class="comment">-- is called. Depending on the Log-Threshold set, the message is logged to</span> </pre></li>
<li id="l121"><pre> <span class="comment">-- different targets (depending on the facilites) automatically.</span> </pre></li>
<li id="l122"><pre> <span class="comment">--</span> </pre></li>
<li id="l123"><pre> <span class="comment">-- Prior to actually processing the given log message the policy database is</span> </pre></li>
<li id="l124"><pre> <span class="comment">-- inquired if the log message with given source and level should be logged.</span> </pre></li>
<li id="l125"><pre> </pre></li>
<li id="l126"><pre> <span class="keyword">procedure</span> <a href="alog-logger.ads.html#alog-logger.ads:126:14" title="defined at alog-logger.ads:126:14">Free</a> <span class="keyword">is</span> <span class="keyword">new</span> Ada.Unchecked_Deallocation </pre></li>
<li id="l127"><pre> (Object => <span class="droplink">Facilities.Class<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:42:12" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l42" title="To spec">To spec</a></li></ul></span>, </pre></li>
<li id="l128"><pre> Name => <span class="droplink">Facilities.Handle<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:44:9" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l44" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l129"><pre> <span class="comment">-- Free memory allocated by a facility.</span> </pre></li>
<li id="l130"><pre> </pre></li>
<li id="l131"><pre> <span class="keyword">procedure</span> <a href="alog-logger.ads.html#alog-logger.ads:131:14" title="defined at alog-logger.ads:131:14">Free</a> <span class="keyword">is</span> <span class="keyword">new</span> Ada.Unchecked_Deallocation </pre></li>
<li id="l132"><pre> (Object => <span class="droplink">Transforms.Class<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:35:12" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l35" title="To spec">To spec</a></li></ul></span>, </pre></li>
<li id="l133"><pre> Name => <span class="droplink">Transforms.Handle<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l37" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l134"><pre> <span class="comment">-- Free memory allocated by a transform.</span> </pre></li>
<li id="l135"><pre> </pre></li>
<li id="l136"><pre> <a href="alog-logger.ads.html#alog-logger.ads:136:4" title="defined at alog-logger.ads:136:4">Facility_Not_Found</a> : <span class="keyword">exception</span>; </pre></li>
<li id="l137"><pre> <span class="comment">-- Will be raised if a requested facility is not found.</span> </pre></li>
<li id="l138"><pre> <a href="alog-logger.ads.html#alog-logger.ads:138:4" title="defined at alog-logger.ads:138:4">Facility_Already_Present</a> : <span class="keyword">exception</span>; </pre></li>
<li id="l139"><pre> <span class="comment">-- Will be raised if a facility is already present.</span> </pre></li>
<li id="l140"><pre> <a href="alog-logger.ads.html#alog-logger.ads:140:4" title="defined at alog-logger.ads:140:4">Transform_Not_Found</a> : <span class="keyword">exception</span>; </pre></li>
<li id="l141"><pre> <span class="comment">-- Will be raised if a requested transform is not found.</span> </pre></li>
<li id="l142"><pre> <a href="alog-logger.ads.html#alog-logger.ads:142:4" title="defined at alog-logger.ads:142:4">Transform_Already_Present</a> : <span class="keyword">exception</span>; </pre></li>
<li id="l143"><pre> <span class="comment">-- Will be raised if a facility is already present. .</span> </pre></li>
<li id="l144"><pre> </pre></li>
<li id="l145"><pre> <a href="alog-logger.ads.html#alog-logger.ads:145:4" title="defined at alog-logger.ads:145:4">Default_Facility_Name</a> : <span class="keyword">constant</span> String := <span class="string">"__Default_Facility"</span>; </pre></li>
<li id="l146"><pre> </pre></li>
<li id="l147"><pre><span class="keyword">private</span> </pre></li>
<li id="l148"><pre> </pre></li>
<li id="l149"><pre> <span class="keyword">use</span> Ada.Strings.Unbounded; </pre></li>
<li id="l150"><pre> <span class="keyword">use</span> <span class="droplink">Alog.Facilities<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:33:14" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l33" title="To spec">To spec</a></li><li><a href="src_alog-facilities.adb.html#l30" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l151"><pre> <span class="keyword">use</span> <span class="droplink">Alog.Transforms<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:27:14" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l27" title="To spec">To spec</a></li><li><a href="src_alog-transforms.adb.html#l24" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l152"><pre> </pre></li>
<li id="l153"><pre> <span class="keyword">procedure</span> Initialize (Logger : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>); </pre></li>
<li id="l154"><pre> <span class="comment">-- Initialize the logger instance.</span> </pre></li>
<li id="l155"><pre> </pre></li>
<li id="l156"><pre> <span class="keyword">procedure</span> Finalize (Logger : <span class="keyword">in</span> <span class="keyword">out</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li><li><a href="src_alog-logger.ads.html#l173" title="To body">To body</a></li></ul></span>); </pre></li>
<li id="l157"><pre> <span class="comment">-- Finalize procedure used to cleanup.</span> </pre></li>
<li id="l158"><pre> </pre></li>
<li id="l159"><pre> <span class="keyword">package</span> Map_Of_Transforms_Package <span class="keyword">is</span> <span class="keyword">new</span> <span class="droplink">Alog.Controlled_Map<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:38:14" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l38" title="To spec">To spec</a></li><li><a href="src_alog-controlled_map.adb.html#l26" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l160"><pre> (<span class="droplink">Key_Type<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:28:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l28" title="To spec">To spec</a></li></ul></span> => Unbounded_String, </pre></li>
<li id="l161"><pre> <span class="droplink">Element_Type<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:29:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l29" title="To spec">To spec</a></li></ul></span> => <span class="droplink">Transforms.Class<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:35:12" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l35" title="To spec">To spec</a></li></ul></span>, </pre></li>
<li id="l162"><pre> <span class="droplink">Element_Handle<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:30:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l30" title="To spec">To spec</a></li></ul></span> => <span class="droplink">Transforms.Handle<ul><li><a href="alog-transforms.ads.html#alog-transforms.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-transforms.ads.html#l37" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l163"><pre> </pre></li>
<li id="l164"><pre> <span class="keyword">package</span> MOTP <span class="keyword">renames</span> Map_Of_Transforms_Package; </pre></li>
<li id="l165"><pre> </pre></li>
<li id="l166"><pre> <span class="keyword">package</span> Map_Of_Facilities_Package <span class="keyword">is</span> <span class="keyword">new</span> <span class="droplink">Alog.Controlled_Map<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:38:14" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l38" title="To spec">To spec</a></li><li><a href="src_alog-controlled_map.adb.html#l26" title="To body">To body</a></li></ul></span> </pre></li>
<li id="l167"><pre> (<span class="droplink">Key_Type<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:28:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l28" title="To spec">To spec</a></li></ul></span> => Unbounded_String, </pre></li>
<li id="l168"><pre> <span class="droplink">Element_Type<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:29:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l29" title="To spec">To spec</a></li></ul></span> => <span class="droplink">Facilities.Class<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:42:12" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l42" title="To spec">To spec</a></li></ul></span>, </pre></li>
<li id="l169"><pre> <span class="droplink">Element_Handle<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:30:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l30" title="To spec">To spec</a></li></ul></span> => <span class="droplink">Facilities.Handle<ul><li><a href="alog-facilities.ads.html#alog-facilities.ads:44:9" title="To API doc">To API doc</a></li><li><a href="src_alog-facilities.ads.html#l44" title="To spec">To spec</a></li></ul></span>); </pre></li>
<li id="l170"><pre> </pre></li>
<li id="l171"><pre> <span class="keyword">package</span> MOFP <span class="keyword">renames</span> Map_Of_Facilities_Package; </pre></li>
<li id="l172"><pre> </pre></li>
<li id="l173"><pre> <span class="keyword">type</span> <span class="droplink">Instance<ul><li><a href="alog-logger.ads.html#alog-logger.ads:37:9" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l37" title="To spec">To spec</a></li></ul></span> (Init : Boolean) <span class="keyword">is</span> <span class="keyword">new</span> </pre></li>
<li id="l174"><pre> Ada.Finalization.Limited_Controlled <span class="keyword">with</span> <span class="keyword">record</span> </pre></li>
<li id="l175"><pre> Facilities : <span class="droplink">MOFP.Map<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:42:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l42" title="To spec">To spec</a></li><li><a href="src_alog-controlled_map.ads.html#l98" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l176"><pre> <span class="comment">-- Attached facilities.</span> </pre></li>
<li id="l177"><pre> </pre></li>
<li id="l178"><pre> Transforms : <span class="droplink">MOTP.Map<ul><li><a href="alog-controlled_map.ads.html#alog-controlled_map.ads:42:9" title="To API doc">To API doc</a></li><li><a href="src_alog-controlled_map.ads.html#l42" title="To spec">To spec</a></li><li><a href="src_alog-controlled_map.ads.html#l98" title="To body">To body</a></li></ul></span>; </pre></li>
<li id="l179"><pre> <span class="comment">-- Attached transforms.</span> </pre></li>
<li id="l180"><pre> <span class="keyword">end</span> <span class="keyword">record</span>; </pre></li>
<li id="l181"><pre> </pre></li>
<li id="l182"><pre><span class="keyword">end</span> <span class="droplink">Alog.Logger<ul><li><a href="alog-logger.ads.html#alog-logger.ads:35:14" title="To API doc">To API doc</a></li><li><a href="src_alog-logger.ads.html#l35" title="To spec">To spec</a></li><li><a href="src_alog-logger.adb.html#l28" title="To body">To body</a></li></ul></span>; </pre></li>
</ol></div>
</div>
</body>
</html>
|