blob: 32e4d4a116eb3ee8ebba7f35e8cc0d644d6118d3 [file] [log] [blame]
Forest Bond5449c682009-04-25 10:30:44 -04001/*
2 * Copyright (c) 1996, 2003 VIA Networking Technologies, Inc.
3 * All rights reserved.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * File: datarate.c
20 *
21 * Purpose: Handles the auto fallback & data rates functions
22 *
23 * Author: Lyndon Chen
24 *
25 * Date: July 17, 2002
26 *
27 * Functions:
28 * RATEvParseMaxRate - Parsing the highest basic & support rate in rate field of frame
29 * RATEvTxRateFallBack - Rate fallback Algorithm Implementaion
30 * RATEuSetIE- Set rate IE field.
31 *
32 * Revision History:
33 *
34 */
35
Forest Bond5449c682009-04-25 10:30:44 -040036#include "ttype.h"
Forest Bond5449c682009-04-25 10:30:44 -040037#include "tmacro.h"
Forest Bond5449c682009-04-25 10:30:44 -040038#include "mac.h"
Forest Bond5449c682009-04-25 10:30:44 -040039#include "80211mgr.h"
Forest Bond5449c682009-04-25 10:30:44 -040040#include "bssdb.h"
Forest Bond5449c682009-04-25 10:30:44 -040041#include "datarate.h"
Forest Bond5449c682009-04-25 10:30:44 -040042#include "card.h"
Forest Bond5449c682009-04-25 10:30:44 -040043#include "baseband.h"
Forest Bond5449c682009-04-25 10:30:44 -040044#include "srom.h"
Forest Bond5449c682009-04-25 10:30:44 -040045
46/*--------------------- Static Definitions -------------------------*/
47
48
49
50
51/*--------------------- Static Classes ----------------------------*/
52
53
Joe Perchesb8314cf2013-03-18 10:44:43 -070054extern unsigned short TxRate_iwconfig; //2008-5-8 <add> by chester
Forest Bond5449c682009-04-25 10:30:44 -040055/*--------------------- Static Variables --------------------------*/
56//static int msglevel =MSG_LEVEL_DEBUG;
Joe Perchesb8314cf2013-03-18 10:44:43 -070057static int msglevel = MSG_LEVEL_INFO;
Charles Clément3fc9b582010-06-24 11:02:27 -070058const unsigned char acbyIERate[MAX_RATE] =
Forest Bond5449c682009-04-25 10:30:44 -040059{0x02, 0x04, 0x0B, 0x16, 0x0C, 0x12, 0x18, 0x24, 0x30, 0x48, 0x60, 0x6C};
60
61#define AUTORATE_TXOK_CNT 0x0400
62#define AUTORATE_TXFAIL_CNT 0x0064
63#define AUTORATE_TIMEOUT 10
64
65/*--------------------- Static Functions --------------------------*/
66
Joe Perchesb8314cf2013-03-18 10:44:43 -070067void s_vResetCounter(
68 PKnownNodeDB psNodeDBTable
69);
Forest Bond5449c682009-04-25 10:30:44 -040070
71
72
Charles Clément6b35b7b2010-05-07 12:30:19 -070073void
Joe Perchesb8314cf2013-03-18 10:44:43 -070074s_vResetCounter(
75 PKnownNodeDB psNodeDBTable
76)
Forest Bond5449c682009-04-25 10:30:44 -040077{
Joe Perchesb8314cf2013-03-18 10:44:43 -070078 unsigned char ii;
Forest Bond5449c682009-04-25 10:30:44 -040079
Joe Perchesb8314cf2013-03-18 10:44:43 -070080 // clear statistic counter for auto_rate
81 for (ii = 0; ii <= MAX_RATE; ii++) {
82 psNodeDBTable->uTxOk[ii] = 0;
83 psNodeDBTable->uTxFail[ii] = 0;
84 }
Forest Bond5449c682009-04-25 10:30:44 -040085}
86
87/*--------------------- Export Variables --------------------------*/
88
89
90/*--------------------- Export Functions --------------------------*/
91
92
93/*+
94 *
95 * Description:
96 * Get RateIdx from the value in SuppRates IE or ExtSuppRates IE
97 *
98 * Parameters:
99 * In:
Charles Clément3fc9b582010-06-24 11:02:27 -0700100 * unsigned char - Rate value in SuppRates IE or ExtSuppRates IE
Forest Bond5449c682009-04-25 10:30:44 -0400101 * Out:
102 * none
103 *
104 * Return Value: RateIdx
105 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700106 -*/
Charles Clément3fc9b582010-06-24 11:02:27 -0700107unsigned char
Joe Perchesb8314cf2013-03-18 10:44:43 -0700108DATARATEbyGetRateIdx(
109 unsigned char byRate
110)
Forest Bond5449c682009-04-25 10:30:44 -0400111{
Joe Perchesb8314cf2013-03-18 10:44:43 -0700112 unsigned char ii;
Forest Bond5449c682009-04-25 10:30:44 -0400113
Joe Perchesb8314cf2013-03-18 10:44:43 -0700114 //Erase basicRate flag.
115 byRate = byRate & 0x7F;//0111 1111
Forest Bond5449c682009-04-25 10:30:44 -0400116
Joe Perchesb8314cf2013-03-18 10:44:43 -0700117 for (ii = 0; ii < MAX_RATE; ii++) {
118 if (acbyIERate[ii] == byRate)
119 return ii;
120 }
121 return 0;
Forest Bond5449c682009-04-25 10:30:44 -0400122}
123
124
125
126/*+
127 *
128 * Routine Description:
Justin P. Mattock789d1ae2012-08-20 08:43:13 -0700129 * Rate fallback Algorithm Implementation
Forest Bond5449c682009-04-25 10:30:44 -0400130 *
131 * Parameters:
132 * In:
133 * pDevice - Pointer to the adapter
134 * psNodeDBTable - Pointer to Node Data Base
135 * Out:
136 * none
137 *
138 * Return Value: none
139 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700140 -*/
Forest Bond5449c682009-04-25 10:30:44 -0400141#define AUTORATE_TXCNT_THRESHOLD 20
142#define AUTORATE_INC_THRESHOLD 30
143
144
145
146
147/*+
148 *
149 * Description:
150 * Get RateIdx from the value in SuppRates IE or ExtSuppRates IE
151 *
152 * Parameters:
153 * In:
Charles Clément3fc9b582010-06-24 11:02:27 -0700154 * unsigned char - Rate value in SuppRates IE or ExtSuppRates IE
Forest Bond5449c682009-04-25 10:30:44 -0400155 * Out:
156 * none
157 *
158 * Return Value: RateIdx
159 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700160 -*/
Charles Clément2986db52010-06-24 11:02:26 -0700161unsigned short
Forest Bond5449c682009-04-25 10:30:44 -0400162wGetRateIdx(
Joe Perchesb8314cf2013-03-18 10:44:43 -0700163 unsigned char byRate
164)
Forest Bond5449c682009-04-25 10:30:44 -0400165{
Joe Perchesb8314cf2013-03-18 10:44:43 -0700166 unsigned short ii;
Forest Bond5449c682009-04-25 10:30:44 -0400167
Joe Perchesb8314cf2013-03-18 10:44:43 -0700168 //Erase basicRate flag.
169 byRate = byRate & 0x7F;//0111 1111
Forest Bond5449c682009-04-25 10:30:44 -0400170
Joe Perchesb8314cf2013-03-18 10:44:43 -0700171 for (ii = 0; ii < MAX_RATE; ii++) {
172 if (acbyIERate[ii] == byRate)
173 return ii;
174 }
175 return 0;
Forest Bond5449c682009-04-25 10:30:44 -0400176}
177
178/*+
179 *
180 * Description:
181 * Parsing the highest basic & support rate in rate field of frame.
182 *
183 * Parameters:
184 * In:
185 * pDevice - Pointer to the adapter
186 * pItemRates - Pointer to Rate field defined in 802.11 spec.
187 * pItemExtRates - Pointer to Extended Rate field defined in 802.11 spec.
188 * Out:
189 * pwMaxBasicRate - Maximum Basic Rate
190 * pwMaxSuppRate - Maximum Supported Rate
191 * pbyTopCCKRate - Maximum Basic Rate in CCK mode
192 * pbyTopOFDMRate - Maximum Basic Rate in OFDM mode
193 *
194 * Return Value: none
195 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700196 -*/
Charles Clément6b35b7b2010-05-07 12:30:19 -0700197void
Joe Perchesb8314cf2013-03-18 10:44:43 -0700198RATEvParseMaxRate(
199 void *pDeviceHandler,
200 PWLAN_IE_SUPP_RATES pItemRates,
201 PWLAN_IE_SUPP_RATES pItemExtRates,
202 bool bUpdateBasicRate,
203 unsigned short *pwMaxBasicRate,
204 unsigned short *pwMaxSuppRate,
205 unsigned short *pwSuppRate,
206 unsigned char *pbyTopCCKRate,
207 unsigned char *pbyTopOFDMRate
208)
Forest Bond5449c682009-04-25 10:30:44 -0400209{
Joe Perchesb8314cf2013-03-18 10:44:43 -0700210 PSDevice pDevice = (PSDevice) pDeviceHandler;
211 unsigned int ii;
212 unsigned char byHighSuppRate = 0;
213 unsigned char byRate = 0;
214 unsigned short wOldBasicRate = pDevice->wBasicRate;
215 unsigned int uRateLen;
Forest Bond5449c682009-04-25 10:30:44 -0400216
217
Joe Perchesb8314cf2013-03-18 10:44:43 -0700218 if (pItemRates == NULL)
219 return;
Forest Bond5449c682009-04-25 10:30:44 -0400220
Joe Perchesb8314cf2013-03-18 10:44:43 -0700221 *pwSuppRate = 0;
222 uRateLen = pItemRates->len;
Forest Bond5449c682009-04-25 10:30:44 -0400223
Joe Perchesb8314cf2013-03-18 10:44:43 -0700224 DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "ParseMaxRate Len: %d\n", uRateLen);
225 if (pDevice->eCurrentPHYType != PHY_TYPE_11B) {
226 if (uRateLen > WLAN_RATES_MAXLEN)
227 uRateLen = WLAN_RATES_MAXLEN;
228 } else {
229 if (uRateLen > WLAN_RATES_MAXLEN_11B)
230 uRateLen = WLAN_RATES_MAXLEN_11B;
231 }
Forest Bond5449c682009-04-25 10:30:44 -0400232
Joe Perchesb8314cf2013-03-18 10:44:43 -0700233 for (ii = 0; ii < uRateLen; ii++) {
234 byRate = (unsigned char)(pItemRates->abyRates[ii]);
235 if (WLAN_MGMT_IS_BASICRATE(byRate) &&
236 (bUpdateBasicRate == true)) {
237 // Add to basic rate set, update pDevice->byTopCCKBasicRate and pDevice->byTopOFDMBasicRate
238 CARDbAddBasicRate((void *)pDevice, wGetRateIdx(byRate));
239 DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "ParseMaxRate AddBasicRate: %d\n", wGetRateIdx(byRate));
240 }
241 byRate = (unsigned char)(pItemRates->abyRates[ii]&0x7F);
242 if (byHighSuppRate == 0)
243 byHighSuppRate = byRate;
244 if (byRate > byHighSuppRate)
245 byHighSuppRate = byRate;
246 *pwSuppRate |= (1<<wGetRateIdx(byRate));
247 }
248 if ((pItemExtRates != NULL) && (pItemExtRates->byElementID == WLAN_EID_EXTSUPP_RATES) &&
249 (pDevice->eCurrentPHYType != PHY_TYPE_11B)) {
Forest Bond5449c682009-04-25 10:30:44 -0400250
Joe Perchesb8314cf2013-03-18 10:44:43 -0700251 unsigned int uExtRateLen = pItemExtRates->len;
Forest Bond5449c682009-04-25 10:30:44 -0400252
Joe Perchesb8314cf2013-03-18 10:44:43 -0700253 if (uExtRateLen > WLAN_RATES_MAXLEN)
254 uExtRateLen = WLAN_RATES_MAXLEN;
Forest Bond5449c682009-04-25 10:30:44 -0400255
Joe Perchesb8314cf2013-03-18 10:44:43 -0700256 for (ii = 0; ii < uExtRateLen; ii++) {
257 byRate = (unsigned char)(pItemExtRates->abyRates[ii]);
258 // select highest basic rate
259 if (WLAN_MGMT_IS_BASICRATE(pItemExtRates->abyRates[ii])) {
260 // Add to basic rate set, update pDevice->byTopCCKBasicRate and pDevice->byTopOFDMBasicRate
261 CARDbAddBasicRate((void *)pDevice, wGetRateIdx(byRate));
262 DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "ParseMaxRate AddBasicRate: %d\n", wGetRateIdx(byRate));
263 }
264 byRate = (unsigned char)(pItemExtRates->abyRates[ii]&0x7F);
265 if (byHighSuppRate == 0)
266 byHighSuppRate = byRate;
267 if (byRate > byHighSuppRate)
268 byHighSuppRate = byRate;
269 *pwSuppRate |= (1<<wGetRateIdx(byRate));
270 //DBG_PRN_GRP09(("ParseMaxRate : HighSuppRate: %d, %X\n", wGetRateIdx(byRate), byRate));
271 }
272 } //if (pItemExtRates != NULL)
Forest Bond5449c682009-04-25 10:30:44 -0400273
Joe Perchesb8314cf2013-03-18 10:44:43 -0700274 if ((pDevice->byPacketType == PK_TYPE_11GB) && CARDbIsOFDMinBasicRate((void *)pDevice)) {
275 pDevice->byPacketType = PK_TYPE_11GA;
276 }
Forest Bond5449c682009-04-25 10:30:44 -0400277
Joe Perchesb8314cf2013-03-18 10:44:43 -0700278 *pbyTopCCKRate = pDevice->byTopCCKBasicRate;
279 *pbyTopOFDMRate = pDevice->byTopOFDMBasicRate;
280 *pwMaxSuppRate = wGetRateIdx(byHighSuppRate);
281 if ((pDevice->byPacketType == PK_TYPE_11B) || (pDevice->byPacketType == PK_TYPE_11GB))
282 *pwMaxBasicRate = pDevice->byTopCCKBasicRate;
283 else
284 *pwMaxBasicRate = pDevice->byTopOFDMBasicRate;
285 if (wOldBasicRate != pDevice->wBasicRate)
286 CARDvSetRSPINF((void *)pDevice, pDevice->eCurrentPHYType);
Forest Bond5449c682009-04-25 10:30:44 -0400287
Joe Perchesb8314cf2013-03-18 10:44:43 -0700288 DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "Exit ParseMaxRate\n");
Forest Bond5449c682009-04-25 10:30:44 -0400289}
290
291
292/*+
293 *
294 * Routine Description:
295 * Rate fallback Algorithm Implementaion
296 *
297 * Parameters:
298 * In:
299 * pDevice - Pointer to the adapter
300 * psNodeDBTable - Pointer to Node Data Base
301 * Out:
302 * none
303 *
304 * Return Value: none
305 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700306 -*/
Forest Bond5449c682009-04-25 10:30:44 -0400307#define AUTORATE_TXCNT_THRESHOLD 20
308#define AUTORATE_INC_THRESHOLD 30
309
Charles Clément6b35b7b2010-05-07 12:30:19 -0700310void
Joe Perchesb8314cf2013-03-18 10:44:43 -0700311RATEvTxRateFallBack(
312 void *pDeviceHandler,
313 PKnownNodeDB psNodeDBTable
314)
Forest Bond5449c682009-04-25 10:30:44 -0400315{
Joe Perchesb8314cf2013-03-18 10:44:43 -0700316 PSDevice pDevice = (PSDevice) pDeviceHandler;
317 unsigned short wIdxDownRate = 0;
318 unsigned int ii;
Charles Clément0f4c60d2010-06-24 11:02:25 -0700319//unsigned long dwRateTable[MAX_RATE] = {1, 2, 5, 11, 6, 9, 12, 18, 24, 36, 48, 54};
Joe Perchesb8314cf2013-03-18 10:44:43 -0700320 bool bAutoRate[MAX_RATE] = {true, true, true, true, false, false, true, true, true, true, true, true};
Charles Clément0f4c60d2010-06-24 11:02:25 -0700321 unsigned long dwThroughputTbl[MAX_RATE] = {10, 20, 55, 110, 60, 90, 120, 180, 240, 360, 480, 540};
322 unsigned long dwThroughput = 0;
Charles Clément2986db52010-06-24 11:02:26 -0700323 unsigned short wIdxUpRate = 0;
Charles Clément0f4c60d2010-06-24 11:02:25 -0700324 unsigned long dwTxDiff = 0;
Forest Bond5449c682009-04-25 10:30:44 -0400325
Joe Perchesb8314cf2013-03-18 10:44:43 -0700326 if (pDevice->pMgmt->eScanState != WMAC_NO_SCANNING) {
327 // Don't do Fallback when scanning Channel
328 return;
329 }
Forest Bond5449c682009-04-25 10:30:44 -0400330
Joe Perchesb8314cf2013-03-18 10:44:43 -0700331 psNodeDBTable->uTimeCount++;
Forest Bond5449c682009-04-25 10:30:44 -0400332
Joe Perchesb8314cf2013-03-18 10:44:43 -0700333 if (psNodeDBTable->uTxFail[MAX_RATE] > psNodeDBTable->uTxOk[MAX_RATE])
334 dwTxDiff = psNodeDBTable->uTxFail[MAX_RATE] - psNodeDBTable->uTxOk[MAX_RATE];
Forest Bond5449c682009-04-25 10:30:44 -0400335
Joe Perchesb8314cf2013-03-18 10:44:43 -0700336 if ((psNodeDBTable->uTxOk[MAX_RATE] < AUTORATE_TXOK_CNT) &&
337 (dwTxDiff < AUTORATE_TXFAIL_CNT) &&
338 (psNodeDBTable->uTimeCount < AUTORATE_TIMEOUT)) {
339 return;
340 }
Forest Bond5449c682009-04-25 10:30:44 -0400341
Joe Perchesb8314cf2013-03-18 10:44:43 -0700342 if (psNodeDBTable->uTimeCount >= AUTORATE_TIMEOUT) {
343 psNodeDBTable->uTimeCount = 0;
344 }
Forest Bond5449c682009-04-25 10:30:44 -0400345
346
Joe Perchesb8314cf2013-03-18 10:44:43 -0700347 for (ii = 0; ii < MAX_RATE; ii++) {
348 if (psNodeDBTable->wSuppRate & (0x0001<<ii)) {
349 if (bAutoRate[ii] == true) {
350 wIdxUpRate = (unsigned short) ii;
351 }
352 } else {
353 bAutoRate[ii] = false;
354 }
355 }
Forest Bond5449c682009-04-25 10:30:44 -0400356
Joe Perchesb8314cf2013-03-18 10:44:43 -0700357 for (ii = 0; ii <= psNodeDBTable->wTxDataRate; ii++) {
358 if ((psNodeDBTable->uTxOk[ii] != 0) ||
359 (psNodeDBTable->uTxFail[ii] != 0)) {
360 dwThroughputTbl[ii] *= psNodeDBTable->uTxOk[ii];
361 if (ii < RATE_11M) {
362 psNodeDBTable->uTxFail[ii] *= 4;
363 }
364 dwThroughputTbl[ii] /= (psNodeDBTable->uTxOk[ii] + psNodeDBTable->uTxFail[ii]);
365 }
366// DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "Rate %d,Ok: %d, Fail:%d, Throughput:%d\n",
Forest Bond5449c682009-04-25 10:30:44 -0400367// ii, psNodeDBTable->uTxOk[ii], psNodeDBTable->uTxFail[ii], dwThroughputTbl[ii]);
Joe Perchesb8314cf2013-03-18 10:44:43 -0700368 }
369 dwThroughput = dwThroughputTbl[psNodeDBTable->wTxDataRate];
Forest Bond5449c682009-04-25 10:30:44 -0400370
Joe Perchesb8314cf2013-03-18 10:44:43 -0700371 wIdxDownRate = psNodeDBTable->wTxDataRate;
372 for (ii = psNodeDBTable->wTxDataRate; ii > 0;) {
373 ii--;
374 if ((dwThroughputTbl[ii] > dwThroughput) &&
375 (bAutoRate[ii] == true)) {
376 dwThroughput = dwThroughputTbl[ii];
377 wIdxDownRate = (unsigned short) ii;
378 }
379 }
380 psNodeDBTable->wTxDataRate = wIdxDownRate;
381 if (psNodeDBTable->uTxOk[MAX_RATE]) {
382 if (psNodeDBTable->uTxOk[MAX_RATE] >
383 (psNodeDBTable->uTxFail[MAX_RATE] * 4)) {
384 psNodeDBTable->wTxDataRate = wIdxUpRate;
385 }
386 } else { // adhoc, if uTxOk =0 & uTxFail = 0
387 if (psNodeDBTable->uTxFail[MAX_RATE] == 0)
388 psNodeDBTable->wTxDataRate = wIdxUpRate;
389 }
Forest Bond5449c682009-04-25 10:30:44 -0400390//2008-5-8 <add> by chester
Joe Perchesb8314cf2013-03-18 10:44:43 -0700391 TxRate_iwconfig = psNodeDBTable->wTxDataRate;
392 s_vResetCounter(psNodeDBTable);
393// DBG_PRT(MSG_LEVEL_DEBUG, KERN_INFO "Rate: %d, U:%d, D:%d\n", psNodeDBTable->wTxDataRate, wIdxUpRate, wIdxDownRate);
Forest Bond5449c682009-04-25 10:30:44 -0400394
Joe Perchesb8314cf2013-03-18 10:44:43 -0700395 return;
Forest Bond5449c682009-04-25 10:30:44 -0400396
397}
398
399/*+
400 *
401 * Description:
402 * This routine is used to assemble available Rate IE.
403 *
404 * Parameters:
405 * In:
406 * pDevice
407 * Out:
408 *
409 * Return Value: None
410 *
Joe Perchesb8314cf2013-03-18 10:44:43 -0700411 -*/
Charles Clément3fc9b582010-06-24 11:02:27 -0700412unsigned char
Joe Perchesb8314cf2013-03-18 10:44:43 -0700413RATEuSetIE(
414 PWLAN_IE_SUPP_RATES pSrcRates,
415 PWLAN_IE_SUPP_RATES pDstRates,
416 unsigned int uRateLen
417)
Forest Bond5449c682009-04-25 10:30:44 -0400418{
Joe Perchesb8314cf2013-03-18 10:44:43 -0700419 unsigned int ii, uu, uRateCnt = 0;
Forest Bond5449c682009-04-25 10:30:44 -0400420
Joe Perchesb8314cf2013-03-18 10:44:43 -0700421 if ((pSrcRates == NULL) || (pDstRates == NULL))
422 return 0;
Forest Bond5449c682009-04-25 10:30:44 -0400423
Joe Perchesb8314cf2013-03-18 10:44:43 -0700424 if (pSrcRates->len == 0)
425 return 0;
Forest Bond5449c682009-04-25 10:30:44 -0400426
Joe Perchesb8314cf2013-03-18 10:44:43 -0700427 for (ii = 0; ii < uRateLen; ii++) {
428 for (uu = 0; uu < pSrcRates->len; uu++) {
429 if ((pSrcRates->abyRates[uu] & 0x7F) == acbyIERate[ii]) {
430 pDstRates->abyRates[uRateCnt++] = pSrcRates->abyRates[uu];
431 break;
432 }
433 }
434 }
435 return (unsigned char)uRateCnt;
Forest Bond5449c682009-04-25 10:30:44 -0400436}
437