]> Pileus Git - ~andy/linux/blob - drivers/staging/wlags49_h2/hcf.c
Merge git://git.kernel.org/pub/scm/linux/kernel/git/pkl/squashfs-linus
[~andy/linux] / drivers / staging / wlags49_h2 / hcf.c
1 //   vim:tw=110:ts=4:
2 /************************************************************************************************************
3 *
4 * FILE   :      HCF.C
5 *
6 * DATE    :     $Date: 2004/08/05 11:47:10 $   $Revision: 1.10 $
7 * Original:     2004/06/02 10:22:22    Revision: 1.85      Tag: hcf7_t20040602_01
8 * Original:     2004/04/15 09:24:41    Revision: 1.63      Tag: hcf7_t7_20040415_01
9 * Original:     2004/04/13 14:22:44    Revision: 1.62      Tag: t7_20040413_01
10 * Original:     2004/04/01 15:32:55    Revision: 1.59      Tag: t7_20040401_01
11 * Original:     2004/03/10 15:39:27    Revision: 1.55      Tag: t20040310_01
12 * Original:     2004/03/04 11:03:37    Revision: 1.53      Tag: t20040304_01
13 * Original:     2004/03/02 14:51:21    Revision: 1.50      Tag: t20040302_03
14 * Original:     2004/02/24 13:00:27    Revision: 1.43      Tag: t20040224_01
15 * Original:     2004/02/19 10:57:25    Revision: 1.39      Tag: t20040219_01
16 *
17 * AUTHOR :      Nico Valster
18 *
19 * SPECIFICATION: ........
20 *
21 * DESCRIPTION : HCF Routines for Hermes-II (callable via the Wireless Connection I/F or WCI)
22 *                               Local Support Routines for above procedures
23 *
24 *                       Customizable via HCFCFG.H, which is included by HCF.H
25 *
26 *************************************************************************************************************
27 *
28 *
29 * SOFTWARE LICENSE
30 *
31 * This software is provided subject to the following terms and conditions,
32 * which you should read carefully before using the software.  Using this
33 * software indicates your acceptance of these terms and conditions.  If you do
34 * not agree with these terms and conditions, do not use the software.
35 *
36 * COPYRIGHT © 1994 - 1995       by AT&T.                                All Rights Reserved
37 * COPYRIGHT © 1996 - 2000 by Lucent Technologies.       All Rights Reserved
38 * COPYRIGHT © 2001 - 2004       by Agere Systems Inc.   All Rights Reserved
39 * All rights reserved.
40 *
41 * Redistribution and use in source or binary forms, with or without
42 * modifications, are permitted provided that the following conditions are met:
43 *
44 * . Redistributions of source code must retain the above copyright notice, this
45 *    list of conditions and the following Disclaimer as comments in the code as
46 *    well as in the documentation and/or other materials provided with the
47 *    distribution.
48 *
49 * . Redistributions in binary form must reproduce the above copyright notice,
50 *    this list of conditions and the following Disclaimer in the documentation
51 *    and/or other materials provided with the distribution.
52 *
53 * . Neither the name of Agere Systems Inc. nor the names of the contributors
54 *    may be used to endorse or promote products derived from this software
55 *    without specific prior written permission.
56 *
57 * Disclaimer
58 *
59 * THIS SOFTWARE IS PROVIDED "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
60 * INCLUDING, BUT NOT LIMITED TO, INFRINGEMENT AND THE IMPLIED WARRANTIES OF
61 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  ANY
62 * USE, MODIFICATION OR DISTRIBUTION OF THIS SOFTWARE IS SOLELY AT THE USERS OWN
63 * RISK. IN NO EVENT SHALL AGERE SYSTEMS INC. OR CONTRIBUTORS BE LIABLE FOR ANY
64 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
65 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
66 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
67 * ON ANY THEORY OF LIABILITY, INCLUDING, BUT NOT LIMITED TO, CONTRACT, STRICT
68 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
69 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH
70 * DAMAGE.
71 *
72 *
73 ************************************************************************************************************/
74
75
76 /************************************************************************************************************
77 **
78 ** Implementation Notes
79 **
80 * -     a leading marker of //! is used. The purpose of such a sequence is to help to understand the flow
81 *       An example is:  //!rc = HCF_SUCCESS;
82 *       if this is superfluous because rc is already guaranteed to be 0 but it shows to the (maintenance)
83 *       programmer it is an intentional omission at the place where someone could consider it most appropriate at
84 *       first glance
85 * -     using near pointers in a model where ss!=ds is an invitation for disaster, so be aware of how you specify
86 *       your model and how you define variables which are used at interrupt time
87 * -     remember that sign extension on 32 bit platforms may cause problems unless code is carefully constructed,
88 *       e.g. use "(hcf_16)~foo" rather than "~foo"
89 *
90 ************************************************************************************************************/
91
92 #include "hcf.h"                                // HCF and MSF common include file
93 #include "hcfdef.h"                             // HCF specific include file
94 #include "mmd.h"                                // MoreModularDriver common include file
95
96 #if ! defined offsetof
97 #define offsetof(s,m)   ((unsigned int)&(((s *)0)->m))
98 #endif // offsetof
99
100
101 /***********************************************************************************************************/
102 /***************************************  PROTOTYPES  ******************************************************/
103 /***********************************************************************************************************/
104 HCF_STATIC int                  cmd_exe( IFBP ifbp, hcf_16 cmd_code, hcf_16 par_0 );
105 HCF_STATIC int                  init( IFBP ifbp );
106 HCF_STATIC int                  put_info( IFBP ifbp, LTVP ltvp );
107 #if (HCF_EXT) & HCF_EXT_MB
108 HCF_STATIC int                  put_info_mb( IFBP ifbp, CFG_MB_INFO_STRCT FAR * ltvp );
109 #endif // HCF_EXT_MB
110 #if (HCF_TYPE) & HCF_TYPE_WPA
111 HCF_STATIC void                 calc_mic( hcf_32* p, hcf_32 M );
112 void                                    calc_mic_rx_frag( IFBP ifbp, wci_bufp p, int len );
113 void                                    calc_mic_tx_frag( IFBP ifbp, wci_bufp p, int len );
114 HCF_STATIC int                  check_mic( IFBP ifbp );
115 #endif // HCF_TYPE_WPA
116
117 HCF_STATIC void                 calibrate( IFBP ifbp );
118 HCF_STATIC int                  cmd_cmpl( IFBP ifbp );
119 HCF_STATIC hcf_16               get_fid( IFBP ifbp );
120 HCF_STATIC void                 isr_info( IFBP ifbp );
121 #if HCF_DMA
122 HCF_STATIC DESC_STRCT*  get_frame_lst(IFBP ifbp, int tx_rx_flag);
123 #endif // HCF_DMA
124 HCF_STATIC void                 get_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) );   //char*, byte count (usually even)
125 #if HCF_DMA
126 HCF_STATIC void                 put_frame_lst( IFBP ifbp, DESC_STRCT *descp, int tx_rx_flag );
127 #endif // HCF_DMA
128 HCF_STATIC void                 put_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) );
129 HCF_STATIC void                 put_frag_finalize( IFBP ifbp );
130 HCF_STATIC int                  setup_bap( IFBP ifbp, hcf_16 fid, int offset, int type );
131 #if (HCF_ASSERT) & HCF_ASSERT_PRINTF
132 static int fw_printf(IFBP ifbp, CFG_FW_PRINTF_STRCT FAR *ltvp);
133 #endif // HCF_ASSERT_PRINTF
134
135 HCF_STATIC int                  download( IFBP ifbp, CFG_PROG_STRCT FAR *ltvp );
136 #if (HCF_ENCAP) & HCF_ENC
137 HCF_STATIC hcf_8                hcf_encap( wci_bufp type );
138 #endif // HCF_ENCAP
139 HCF_STATIC hcf_8                null_addr[4] = { 0, 0, 0, 0 };
140 #if ! defined IN_PORT_WORD                      //replace I/O Macros with logging facility
141 extern FILE *log_file;
142
143 #define IN_PORT_WORD(port)                      in_port_word( (hcf_io)(port) )
144
145 static hcf_16 in_port_word( hcf_io port ) {
146 hcf_16 i = (hcf_16)_inpw( port );
147         if ( log_file ) {
148                 fprintf( log_file, "\nR %2.2x %4.4x", (port)&0xFF, i);
149         }
150         return i;
151 } // in_port_word
152
153 #define OUT_PORT_WORD(port, value)      out_port_word( (hcf_io)(port), (hcf_16)(value) )
154
155 static void out_port_word( hcf_io port, hcf_16 value ) {
156         _outpw( port, value );
157         if ( log_file ) {
158                 fprintf( log_file, "\nW %2.02x %4.04x", (port)&0xFF, value );
159         }
160 }
161
162 void IN_PORT_STRING_32( hcf_io prt, hcf_32 FAR * dst, int n)    {
163         int i = 0;
164         hcf_16 FAR * p;
165         if ( log_file ) {
166                 fprintf( log_file, "\nread string_32 length %04x (%04d) at port %02.2x to addr %lp",
167                                  (hcf_16)n, (hcf_16)n, (hcf_16)(prt)&0xFF, dst);
168         }
169         while ( n-- ) {
170                 p = (hcf_16 FAR *)dst;
171                 *p++ = (hcf_16)_inpw( prt );
172                 *p   = (hcf_16)_inpw( prt );
173                 if ( log_file ) {
174                         fprintf( log_file, "%s%08lx ", i++ % 0x08 ? " " : "\n", *dst);
175                 }
176                 dst++;
177         }
178 } // IN_PORT_STRING_32
179
180 void IN_PORT_STRING_8_16( hcf_io prt, hcf_8 FAR * dst, int n) { //also handles byte alignment problems
181         hcf_16 FAR * p = (hcf_16 FAR *)dst;                                                     //this needs more elaborate code in non-x86 platforms
182         int i = 0;
183         if ( log_file ) {
184                 fprintf( log_file, "\nread string_16 length %04x (%04d) at port %02.2x to addr %lp",
185                                  (hcf_16)n, (hcf_16)n, (hcf_16)(prt)&0xFF, dst );
186         }
187         while ( n-- ) {
188                 *p =(hcf_16)_inpw( prt);
189                 if ( log_file ) {
190                         if ( i++ % 0x10 ) {
191                                 fprintf( log_file, "%04x ", *p);
192                         } else {
193                                 fprintf( log_file, "\n%04x ", *p);
194                         }
195                 }
196                 p++;
197         }
198 } // IN_PORT_STRING_8_16
199
200 void OUT_PORT_STRING_32( hcf_io prt, hcf_32 FAR * src, int n)   {
201         int i = 0;
202         hcf_16 FAR * p;
203         if ( log_file ) {
204                 fprintf( log_file, "\nwrite string_32 length %04x (%04d) at port %02.2x",
205                                  (hcf_16)n, (hcf_16)n, (hcf_16)(prt)&0xFF);
206         }
207         while ( n-- ) {
208                 p = (hcf_16 FAR *)src;
209                 _outpw( prt, *p++ );
210                 _outpw( prt, *p   );
211                 if ( log_file ) {
212                         fprintf( log_file, "%s%08lx ", i++ % 0x08 ? " " : "\n", *src);
213                 }
214                 src++;
215         }
216 } // OUT_PORT_STRING_32
217
218 void OUT_PORT_STRING_8_16( hcf_io prt, hcf_8 FAR * src, int n)  {       //also handles byte alignment problems
219         hcf_16 FAR * p = (hcf_16 FAR *)src;                                                             //this needs more elaborate code in non-x86 platforms
220         int i = 0;
221         if ( log_file ) {
222                 fprintf( log_file, "\nwrite string_16 length %04x (%04d) at port %04x", n, n, (hcf_16)prt);
223         }
224         while ( n-- ) {
225                 (void)_outpw( prt, *p);
226                 if ( log_file ) {
227                         if ( i++ % 0x10 ) {
228                                 fprintf( log_file, "%04x ", *p);
229                         } else {
230                                 fprintf( log_file, "\n%04x ", *p);
231                         }
232                 }
233                 p++;
234         }
235 } // OUT_PORT_STRING_8_16
236
237 #endif // IN_PORT_WORD
238
239 /************************************************************************************************************
240 ******************************* D A T A    D E F I N I T I O N S ********************************************
241 ************************************************************************************************************/
242
243 #if HCF_ASSERT
244 IFBP BASED assert_ifbp = NULL;                  //to make asserts easily work under MMD and DHF
245 #endif // HCF_ASSERT
246
247 #if HCF_ENCAP
248 /* SNAP header to be inserted in Ethernet-II frames */
249 HCF_STATIC  hcf_8 BASED snap_header[] = { 0xAA, 0xAA, 0x03, 0x00, 0x00, //5 bytes signature +
250                                                                                   0 };                                                  //1 byte protocol identifier
251 #endif // HCF_ENCAP
252
253 #if (HCF_TYPE) & HCF_TYPE_WPA
254 HCF_STATIC hcf_8 BASED mic_pad[8] = { 0x5A, 0, 0, 0, 0, 0, 0, 0 };              //MIC padding of message
255 #endif // HCF_TYPE_WPA
256
257 #if defined MSF_COMPONENT_ID
258 CFG_IDENTITY_STRCT BASED cfg_drv_identity = {
259         sizeof(cfg_drv_identity)/sizeof(hcf_16) - 1,    //length of RID
260         CFG_DRV_IDENTITY,                       // (0x0826)
261         MSF_COMPONENT_ID,
262         MSF_COMPONENT_VAR,
263         MSF_COMPONENT_MAJOR_VER,
264         MSF_COMPONENT_MINOR_VER
265 } ;
266
267 CFG_RANGES_STRCT BASED cfg_drv_sup_range = {
268         sizeof(cfg_drv_sup_range)/sizeof(hcf_16) - 1,   //length of RID
269         CFG_DRV_SUP_RANGE,                      // (0x0827)
270
271         COMP_ROLE_SUPL,
272         COMP_ID_DUI,
273         {{      DUI_COMPAT_VAR,
274                 DUI_COMPAT_BOT,
275                 DUI_COMPAT_TOP
276         }}
277 } ;
278
279 struct CFG_RANGE3_STRCT BASED cfg_drv_act_ranges_pri = {
280         sizeof(cfg_drv_act_ranges_pri)/sizeof(hcf_16) - 1,      //length of RID
281         CFG_DRV_ACT_RANGES_PRI,         // (0x0828)
282
283         COMP_ROLE_ACT,
284         COMP_ID_PRI,
285         {
286          { 0, 0, 0 },                                                   // HCF_PRI_VAR_1 not supported by HCF 7
287          { 0, 0, 0 },                                                   // HCF_PRI_VAR_2 not supported by HCF 7
288          {      3,                                                                      //var_rec[2] - Variant number
289                 CFG_DRV_ACT_RANGES_PRI_3_BOTTOM,                //               - Bottom Compatibility
290                 CFG_DRV_ACT_RANGES_PRI_3_TOP                    //               - Top Compatibility
291          }
292         }
293 } ;
294
295
296 struct CFG_RANGE4_STRCT BASED cfg_drv_act_ranges_sta = {
297         sizeof(cfg_drv_act_ranges_sta)/sizeof(hcf_16) - 1,      //length of RID
298         CFG_DRV_ACT_RANGES_STA,         // (0x0829)
299
300         COMP_ROLE_ACT,
301         COMP_ID_STA,
302         {
303 #if defined HCF_STA_VAR_1
304          {      1,                                                                      //var_rec[1] - Variant number
305                 CFG_DRV_ACT_RANGES_STA_1_BOTTOM,                //               - Bottom Compatibility
306                 CFG_DRV_ACT_RANGES_STA_1_TOP                    //               - Top Compatibility
307          },
308 #else
309          { 0, 0, 0 },
310 #endif // HCF_STA_VAR_1
311 #if defined HCF_STA_VAR_2
312          {      2,                                                                      //var_rec[1] - Variant number
313                 CFG_DRV_ACT_RANGES_STA_2_BOTTOM,                //               - Bottom Compatibility
314                 CFG_DRV_ACT_RANGES_STA_2_TOP                    //               - Top Compatibility
315          },
316 #else
317          { 0, 0, 0 },
318 #endif // HCF_STA_VAR_2
319 // For Native_USB (Not used!)
320 #if defined HCF_STA_VAR_3
321          {      3,                                                                      //var_rec[1] - Variant number
322                 CFG_DRV_ACT_RANGES_STA_3_BOTTOM,                //               - Bottom Compatibility
323                 CFG_DRV_ACT_RANGES_STA_3_TOP                    //               - Top Compatibility
324          },
325 #else
326          { 0, 0, 0 },
327 #endif // HCF_STA_VAR_3
328 // Warp
329 #if defined HCF_STA_VAR_4
330          {      4,                                                                      //var_rec[1] - Variant number
331                 CFG_DRV_ACT_RANGES_STA_4_BOTTOM,                //           - Bottom Compatibility
332                 CFG_DRV_ACT_RANGES_STA_4_TOP                    //           - Top Compatibility
333          }
334 #else
335          { 0, 0, 0 }
336 #endif // HCF_STA_VAR_4
337         }
338 } ;
339
340
341 struct CFG_RANGE6_STRCT BASED cfg_drv_act_ranges_hsi = {
342         sizeof(cfg_drv_act_ranges_hsi)/sizeof(hcf_16) - 1,      //length of RID
343         CFG_DRV_ACT_RANGES_HSI,         // (0x082A)
344         COMP_ROLE_ACT,
345         COMP_ID_HSI,
346         {
347 #if defined HCF_HSI_VAR_0                                       // Controlled deployment
348          {      0,                                                                      // var_rec[1] - Variant number
349                 CFG_DRV_ACT_RANGES_HSI_0_BOTTOM,                //           - Bottom Compatibility
350                 CFG_DRV_ACT_RANGES_HSI_0_TOP                    //           - Top Compatibility
351          },
352 #else
353          { 0, 0, 0 },
354 #endif // HCF_HSI_VAR_0
355          { 0, 0, 0 },                                                   // HCF_HSI_VAR_1 not supported by HCF 7
356          { 0, 0, 0 },                                                   // HCF_HSI_VAR_2 not supported by HCF 7
357          { 0, 0, 0 },                                                   // HCF_HSI_VAR_3 not supported by HCF 7
358 #if defined HCF_HSI_VAR_4                                       // Hermes-II all types
359          {      4,                                                                      // var_rec[1] - Variant number
360                 CFG_DRV_ACT_RANGES_HSI_4_BOTTOM,                //           - Bottom Compatibility
361                 CFG_DRV_ACT_RANGES_HSI_4_TOP                    //           - Top Compatibility
362          },
363 #else
364          { 0, 0, 0 },
365 #endif // HCF_HSI_VAR_4
366 #if defined HCF_HSI_VAR_5                                       // WARP Hermes-2.5
367          {      5,                                                                      // var_rec[1] - Variant number
368                 CFG_DRV_ACT_RANGES_HSI_5_BOTTOM,                //           - Bottom Compatibility
369                 CFG_DRV_ACT_RANGES_HSI_5_TOP                    //           - Top Compatibility
370          }
371 #else
372          { 0, 0, 0 }
373 #endif // HCF_HSI_VAR_5
374         }
375 } ;
376
377
378 CFG_RANGE4_STRCT BASED cfg_drv_act_ranges_apf = {
379         sizeof(cfg_drv_act_ranges_apf)/sizeof(hcf_16) - 1,      //length of RID
380         CFG_DRV_ACT_RANGES_APF,         // (0x082B)
381
382         COMP_ROLE_ACT,
383         COMP_ID_APF,
384         {
385 #if defined HCF_APF_VAR_1                               //(Fake) Hermes-I
386          {      1,                                                                      //var_rec[1] - Variant number
387                 CFG_DRV_ACT_RANGES_APF_1_BOTTOM,                //           - Bottom Compatibility
388                 CFG_DRV_ACT_RANGES_APF_1_TOP                    //           - Top Compatibility
389          },
390 #else
391          { 0, 0, 0 },
392 #endif // HCF_APF_VAR_1
393 #if defined HCF_APF_VAR_2                               //Hermes-II
394          {      2,                                                                      // var_rec[1] - Variant number
395                 CFG_DRV_ACT_RANGES_APF_2_BOTTOM,                //           - Bottom Compatibility
396                 CFG_DRV_ACT_RANGES_APF_2_TOP                    //           - Top Compatibility
397          },
398 #else
399          { 0, 0, 0 },
400 #endif // HCF_APF_VAR_2
401 #if defined HCF_APF_VAR_3                                               // Native_USB
402          {      3,                                                                              // var_rec[1] - Variant number
403                 CFG_DRV_ACT_RANGES_APF_3_BOTTOM,                //           - Bottom Compatibility     !!!!!see note below!!!!!!!
404                 CFG_DRV_ACT_RANGES_APF_3_TOP                    //           - Top Compatibility
405          },
406 #else
407          { 0, 0, 0 },
408 #endif // HCF_APF_VAR_3
409 #if defined HCF_APF_VAR_4                                               // WARP Hermes 2.5
410          {      4,                                                                              // var_rec[1] - Variant number
411                 CFG_DRV_ACT_RANGES_APF_4_BOTTOM,                //           - Bottom Compatibility     !!!!!see note below!!!!!!!
412                 CFG_DRV_ACT_RANGES_APF_4_TOP                    //           - Top Compatibility
413          }
414 #else
415          { 0, 0, 0 }
416 #endif // HCF_APF_VAR_4
417         }
418 } ;
419 #define HCF_VERSION  TEXT( "HCF$Revision: 1.10 $" )
420
421 static struct /*CFG_HCF_OPT_STRCT*/ {
422         hcf_16  len;                                    //length of cfg_hcf_opt struct
423         hcf_16  typ;                                    //type 0x082C
424         hcf_16   v0;                                            //offset HCF_VERSION
425         hcf_16   v1;                                            // MSF_COMPONENT_ID
426         hcf_16   v2;                                            // HCF_ALIGN
427         hcf_16   v3;                                            // HCF_ASSERT
428         hcf_16   v4;                                            // HCF_BIG_ENDIAN
429         hcf_16   v5;                                            // /* HCF_DLV | HCF_DLNV */
430         hcf_16   v6;                                            // HCF_DMA
431         hcf_16   v7;                                            // HCF_ENCAP
432         hcf_16   v8;                                            // HCF_EXT
433         hcf_16   v9;                                            // HCF_INT_ON
434         hcf_16  v10;                                            // HCF_IO
435         hcf_16  v11;                                            // HCF_LEGACY
436         hcf_16  v12;                                            // HCF_MAX_LTV
437         hcf_16  v13;                                            // HCF_PROT_TIME
438         hcf_16  v14;                                            // HCF_SLEEP
439         hcf_16  v15;                                            // HCF_TALLIES
440         hcf_16  v16;                                            // HCF_TYPE
441         hcf_16  v17;                                            // HCF_NIC_TAL_CNT
442         hcf_16  v18;                                            // HCF_HCF_TAL_CNT
443         hcf_16  v19;                                            // offset tallies
444         TCHAR   val[sizeof(HCF_VERSION)];
445 } BASED cfg_hcf_opt = {
446         sizeof(cfg_hcf_opt)/sizeof(hcf_16) -1,
447         CFG_HCF_OPT,                            // (0x082C)
448         ( sizeof(cfg_hcf_opt) - sizeof(HCF_VERSION) - 4 )/sizeof(hcf_16),
449 #if defined MSF_COMPONENT_ID
450         MSF_COMPONENT_ID,
451 #else
452         0,
453 #endif // MSF_COMPONENT_ID
454         HCF_ALIGN,
455         HCF_ASSERT,
456         HCF_BIG_ENDIAN,
457         0,                                                                      // /* HCF_DLV | HCF_DLNV*/,
458         HCF_DMA,
459         HCF_ENCAP,
460         HCF_EXT,
461         HCF_INT_ON,
462         HCF_IO,
463         HCF_LEGACY,
464         HCF_MAX_LTV,
465         HCF_PROT_TIME,
466         HCF_SLEEP,
467         HCF_TALLIES,
468         HCF_TYPE,
469 #if (HCF_TALLIES) & ( HCF_TALLIES_NIC | HCF_TALLIES_HCF )
470         HCF_NIC_TAL_CNT,
471         HCF_HCF_TAL_CNT,
472         offsetof(IFB_STRCT, IFB_TallyLen ),
473 #else
474         0, 0, 0,
475 #endif // HCF_TALLIES_NIC / HCF_TALLIES_HCF
476         HCF_VERSION
477 }; // cfg_hcf_opt
478 #endif // MSF_COMPONENT_ID
479
480 #if defined HCF_TALLIES_EXTRA
481         replaced by HCF_EXT_TALLIES_FW ;
482 #endif // HCF_TALLIES_EXTRA
483
484 #if defined MSF_COMPONENT_ID || (HCF_EXT) & HCF_EXT_MB
485 #if (HCF_EXT) & HCF_EXT_MB
486 HCF_STATIC LTV_STRCT BASED cfg_null = { 1, CFG_NULL, {0} };
487 #endif // HCF_EXT_MB
488 HCF_STATIC hcf_16* BASED xxxx[ ] = {
489 #if (HCF_EXT) & HCF_EXT_MB
490         &cfg_null.len,                                                  //CFG_NULL                                              0x0820
491 #endif // HCF_EXT_MB
492 #if defined MSF_COMPONENT_ID
493         &cfg_drv_identity.len,                                  //CFG_DRV_IDENTITY              0x0826
494         &cfg_drv_sup_range.len,                                 //CFG_DRV_SUP_RANGE             0x0827
495         &cfg_drv_act_ranges_pri.len,                    //CFG_DRV_ACT_RANGES_PRI        0x0828
496         &cfg_drv_act_ranges_sta.len,                    //CFG_DRV_ACT_RANGES_STA                0x0829
497         &cfg_drv_act_ranges_hsi.len,                    //CFG_DRV_ACT_RANGES_HSI                0x082A
498         &cfg_drv_act_ranges_apf.len,                    //CFG_DRV_ACT_RANGES_APF                0x082B
499         &cfg_hcf_opt.len,                                               //CFG_HCF_OPT                                   0x082C
500         NULL,                                                                   //IFB_PRIIdentity placeholder   0xFD02
501         NULL,                                                                   //IFB_PRISup placeholder                0xFD03
502 #endif // MSF_COMPONENT_ID
503         NULL                                                                    //endsentinel
504   };
505 #define xxxx_PRI_IDENTITY_OFFSET        (sizeof(xxxx)/sizeof(xxxx[0]) - 3)
506
507 #endif // MSF_COMPONENT_ID / HCF_EXT_MB
508
509
510 /************************************************************************************************************
511 ************************** T O P   L E V E L   H C F   R O U T I N E S **************************************
512 ************************************************************************************************************/
513
514 #if (HCF_DL_ONLY) == 0
515 /************************************************************************************************************
516 *
517 *.MODULE                int hcf_action( IFBP ifbp, hcf_16 action )
518 *.PURPOSE               Changes the run-time Card behavior.
519 *                               Performs Miscellanuous actions.
520 *
521 *.ARGUMENTS
522 *       ifbp                                    address of the Interface Block
523 *       action                                  number identifying the type of change
524 *        - HCF_ACT_CCX_OFF              disable CKIP
525 *        - HCF_ACT_CCX_ON               enable CKIP
526 *        - HCF_ACT_INT_FORCE_ON enable interrupt generation by WaveLAN NIC
527 *        - HCF_ACT_INT_OFF              disable interrupt generation by WaveLAN NIC
528 *        - HCF_ACT_INT_ON               compensate 1 HCF_ACT_INT_OFF, enable interrupt generation if balance reached
529 *        - HCF_ACT_PRS_SCAN             Hermes Probe Respons Scan (F102) command
530 *        - HCF_ACT_RX_ACK               acknowledge non-DMA receiver to Hermes
531 *        - HCF_ACT_SCAN                 Hermes Inquire Scan (F101) command (non-WARP only)
532 *        - HCF_ACT_SLEEP                DDS Sleep request
533 *        - HCF_ACT_TALLIES              Hermes Inquire Tallies (F100) command
534 *
535 *.RETURNS
536 *       HCF_SUCCESS                             all (including invalid)
537 *       HCF_INT_PENDING                 HCF_ACT_INT_OFF, interrupt pending
538 *       HCF_ERR_NO_NIC                  HCF_ACT_INT_OFF, NIC presence check fails
539 *
540 *.CONDITIONS
541 * Except for hcf_action with HCF_ACT_INT_FORCE_ON or HCF_ACT_INT_OFF as parameter or hcf_connect with an I/O
542 * address (i.e. not HCF_DISCONNECT), all hcf-function calls MUST be preceeded by a call of hcf_action with
543 * HCF_ACT_INT_OFF as parameter.
544 * Note that hcf_connect defaults to NIC interrupt disabled mode, i.e. as if hcf_action( HCF_ACT_INT_OFF )
545 * was called.
546 *
547 *.DESCRIPTION
548 * hcf_action supports the following mode changing action-code pairs that are antonyms
549 *        - HCF_ACT_CCX_OFF / HCF_ACT_CCX_ON
550 *        - HCF_ACT_INT_[FORCE_]ON / HCF_ACT_INT_OFF
551 *
552 * Additionally hcf_action can start the following actions in the NIC:
553 *        - HCF_ACT_PRS_SCAN
554 *        - HCF_ACT_RX_ACK
555 *        - HCF_ACT_SCAN
556 *        - HCF_ACT_SLEEP
557 *        - HCF_ACT_TALLIES
558 *
559 * o HCF_ACT_INT_OFF: Sets NIC Interrupts mode Disabled.
560 * This command, and the associated [Force] Enable NIC interrupts command, are only available if the HCF_INT_ON
561 * compile time option is not set at 0x0000.
562 *
563 * o HCF_ACT_INT_ON: Sets NIC Interrupts mode Enabled.
564 * Enable NIC Interrupts, depending on the number of preceding Disable NIC Interrupt calls.
565 *
566 * o HCF_ACT_INT_FORCE_ON: Force NIC Interrupts mode Enabled.
567 * Sets NIC Interrupts mode Enabled, regardless off the number of preceding Disable NIC Interrupt calls.
568 *
569 * The disabling and enabling of interrupts are antonyms.
570 * These actions must be balanced.
571 * For each "disable interrupts" there must be a matching "enable interrupts".
572 * The disable interrupts may be executed multiple times in a row without intervening enable interrupts, in
573 * other words, the disable interrupts may be nested.
574 * The interrupt generation mechanism is disabled at the first call with HCF_ACT_INT_OFF.
575 * The interrupt generation mechanism is re-enabled when the number of calls with HCF_ACT_INT_ON matches the
576 * number of calls with INT_OFF.
577 *
578 * It is not allowed to have more Enable NIC Interrupts calls than Disable NIC Interrupts calls.
579 * The interrupt generation mechanism is initially (i.e. after hcf_connect) disabled.
580 * An MSF based on a interrupt strategy must call hcf_action with INT_ON in its initialization logic.
581 *
582 *!      The INT_OFF/INT_ON housekeeping is initialized at 0x0000 by hcf_connect, causing the interrupt generation
583 *       mechanism to be disabled at first. This suits MSF implementation based on a polling strategy.
584 *
585 * o HCF_ACT_CCX_OFF / HCF_ACT_CCX_ON
586 *!! This can use some more explanation;?
587 * Disables and Enables support in the HCF runtime code for the CCX feature. Each time one of these action
588 * codes is used, the effects of the preceding use cease.
589 *
590 * o HCF_ACT_SLEEP: Initiates the Disconnected DeepSleep process
591 * This command is only available if the HCF_DDS compile time option is set. It triggers the F/W to start the
592 * sleep handshaking. Regardless whether the Host initiates a Disconnected DeepSleep (DDS) or the F/W initiates
593 * a Connected DeepSleep (CDS), the Host-F/W sleep handshaking is completed when the NIC Interrupts mode is
594 * enabled (by means of the balancing HCF_ACT_INT_ON), i.e. at that moment the F/W really goes into sleep mode.
595 * The F/W is wokenup by the HCF when the NIC Interrupts mode are disabled, i.e. at the first HCF_ACT_INT_OFF
596 * after going into sleep.
597 *
598 * The following Miscellanuous actions are defined:
599 *
600 * o HCF_ACT_RX_ACK: Receiver Acknowledgement (non-DMA, non-USB mode only)
601 * Acking the receiver, frees the NIC memory used to hold the Rx frame and allows the F/W to
602 * report the existence of the next Rx frame.
603 * If the MSF does not need access (any longer) to the current frame, e.g. because it is rejected based on the
604 * look ahead or copied to another buffer, the receiver may be acked. Acking earlier is assumed to have the
605 * potential of improving the performance.
606 * If the MSF does not explitly ack te receiver, the acking is done implicitly if:
607 * - the received frame fits in the look ahead buffer, by the hcf_service_nic call that reported the Rx frame
608 * - if not in the above step, by hcf_rcv_msg (assuming hcf_rcv_msg is called)
609 * - if neither of the above implicit acks nor an explicit ack by the MSF, by the first hcf_service_nic after
610 *       the hcf_service_nic that reported the Rx frame.
611 * Note: If an Rx frame is already acked, an explicit ACK by the MSF acts as a NoOperation.
612 *
613 * o HCF_ACT_TALLIES: Inquire Tallies command
614 * This command is only operational if the F/W is enabled.
615 * The Inquire Tallies command requests the F/W to provide its current set of tallies.
616 * See also hcf_get_info with CFG_TALLIES as parameter.
617 *
618 * o HCF_ACT_PRS_SCAN: Inquire Probe Respons Scan command
619 * This command is only operational if the F/W is enabled.
620 * The Probe Respons Scan command starts a scan sequence.
621 * The HCF puts the result of this action in an MSF defined buffer (see CFG_RID_LOG_STRCT).
622 *
623 * o HCF_ACT_SCAN: Inquire Scan command
624 * This command is only supported for HII F/W (i.e. pre-WARP) and it is operational if the F/W is enabled.
625 * The Inquire Scan command starts a scan sequence.
626 * The HCF puts the result of this action in an MSF defined buffer (see CFG_RID_LOG_STRCT).
627 *
628 * Assert fails if
629 * - ifbp has a recognizable out-of-range value.
630 * - NIC interrupts are not disabled while required by parameter action.
631 * - an invalid code is specified in parameter action.
632 * - HCF_ACT_INT_ON commands outnumber the HCF_ACT_INT_OFF commands.
633 * - reentrancy, may be  caused by calling hcf_functions without adequate protection against NIC interrupts or
634 *       multi-threading
635 *
636 * - Since the HCF does not maintain status information relative to the F/W enabled state, it is not asserted
637 *       whether HCF_ACT_SCAN, HCF_ACT_PRS_SCAN or HCF_ACT_TALLIES are only used while F/W is enabled.
638 *
639 *.DIAGRAM
640 * 0: The assert embedded in HCFLOGENTRY checks against re-entrancy. Re-entrancy could be caused by a MSF logic
641 *       at task-level calling hcf_functions without shielding with HCF_ACT_ON/_OFF. However the HCF_ACT_INT_OFF
642 *       action itself can per definition not be protected this way. Based on code inspection, it can be concluded,
643 *       that there is no re-entrancy PROBLEM in this particular flow. It does not seem worth the trouble to
644 *       explicitly check for this condition (although there was a report of an MSF which ran into this assert.
645 * 2:IFB_IntOffCnt is used to balance the INT_OFF and INT_ON calls.  Disabling of the interrupts is achieved by
646 *       writing a zero to the Hermes IntEn register.  In a shared interrupt environment (e.g. the mini-PCI NDIS
647 *       driver) it is considered more correct to return the status HCF_INT_PENDING if and only if, the current
648 *       invocation of hcf_service_nic is (apparently) called in the ISR when the ISR was activated as result of a
649 *       change in HREG_EV_STAT matching a bit in HREG_INT_EN, i.e. not if invoked as result of another device
650 *       generating an interrupt on the shared interrupt line.
651 *       Note 1: it has been observed that under certain adverse conditions on certain platforms the writing of
652 *       HREG_INT_EN can apparently fail, therefor it is paramount that HREG_INT_EN is written again with 0 for
653 *       each and every call to HCF_ACT_INT_OFF.
654 *       Note 2: it has been observed that under certain H/W & S/W architectures this logic is called when there is
655 *       no NIC at all. To cater for this, the value of HREG_INT_EN is validated. If the unused bit 0x0100 is set,
656 *       it is assumed there is no NIC.
657 *       Note 3: During the download process, some versions of the F/W reset HREG_SW_0, hence checking this
658 *       register for HCF_MAGIC (the classical NIC presence test) when HCF_ACT_INT_OFF is called due to another
659 *       card interrupting via a shared IRQ during a download, fails.
660 *4:     The construction "if ( ifbp->IFB_IntOffCnt-- == 0 )" is optimal (in the sense of shortest/quickest
661 *       path in error free flows) but NOT fail safe in case of too many INT_ON invocations compared to INT_OFF).
662 *       Enabling of the interrupts is achieved by writing the Hermes IntEn register.
663 *        - If the HCF is in Defunct mode, the interrupts stay disabled.
664 *        - Under "normal" conditions, the HCF is only interested in Info Events, Rx Events and Notify Events.
665 *        - When the HCF is out of Tx/Notify resources, the HCF is also interested in Alloc Events.
666 *        - via HCF_EXT, the MSF programmer can also request HREG_EV_TICK and/or HREG_EV_TX_EXC interrupts.
667 *       For DMA operation, the DMA hardware handles the alloc events. The DMA engine will generate a 'TxDmaDone'
668 *       event as soon as it has pumped a frame from host ram into NIC-RAM (note that the frame does not have to be
669 *       transmitted then), and a 'RxDmaDone' event as soon as a received frame has been pumped from NIC-RAM into
670 *       host ram.  Note that the 'alloc' event has been removed from the event-mask, because the DMA engine will
671 *       react to and acknowledge this event.
672 *6:     ack the "old" Rx-event. See "Rx Buffer free strategy" in hcf_service_nic above for more explanation.
673 *       IFB_RxFID and IFB_RxLen must be cleared to bring both the internal HCF house keeping and the information
674 *       supplied to the MSF in the state "no frame received".
675 *8:     The HCF_ACT_SCAN, HCF_ACT_PRS_SCAN and HCF_ACT_TALLIES activity are merged by "clever" algebraic
676 *       manipulations of the RID-values and action codes, so foregoing robustness against migration problems for
677 *       ease of implementation. The assumptions about numerical relationships between CFG_TALLIES etc and
678 *       HCF_ACT_TALLIES etc are checked by the "#if" statements just prior to the body of this routine, resulting
679 *       in: err "maintenance" during compilation if the assumptions are no longer met. The writing of HREG_PARAM_1
680 *       with 0x3FFF in case of an PRS scan, is a kludge to get around lack of specification, hence different
681 *       implementation in F/W and Host.
682 *       When there is no NIC RAM available, some versions of the Hermes F/W do report 0x7F00 as error in the
683 *       Result field of the Status register and some F/W versions don't. To mask this difference to the MSF all
684 *       return codes of the Hermes are ignored ("best" and "most simple" solution to these types of analomies with
685 *       an acceptable loss due to ignoring all error situations as well).
686 *       The "No inquire space" is reported via the Hermes tallies.
687 *30: do not HCFASSERT( rc, rc ) since rc == HCF_INT_PENDING is no error
688 *
689 *.ENDDOC                                END DOCUMENTATION
690 *
691 ************************************************************************************************************/
692 #if ( (HCF_TYPE) & HCF_TYPE_HII5 ) == 0
693 #if CFG_SCAN != CFG_TALLIES - HCF_ACT_TALLIES + HCF_ACT_SCAN
694 err: "maintenance" apparently inviolated the underlying assumption about the numerical values of these macros
695 #endif
696 #endif // HCF_TYPE_HII5
697 #if CFG_PRS_SCAN != CFG_TALLIES - HCF_ACT_TALLIES + HCF_ACT_PRS_SCAN
698 err: "maintenance" apparently inviolated the underlying assumption about the numerical values of these macros
699 #endif
700 int
701 hcf_action( IFBP ifbp, hcf_16 action )
702 {
703 int     rc = HCF_SUCCESS;
704
705         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
706 #if HCF_INT_ON
707         HCFLOGENTRY( action == HCF_ACT_INT_FORCE_ON ? HCF_TRACE_ACTION_KLUDGE : HCF_TRACE_ACTION, action )                                                                                                              /* 0 */
708 #if (HCF_SLEEP)
709         HCFASSERT( ifbp->IFB_IntOffCnt != 0xFFFE || action == HCF_ACT_INT_OFF,
710                            MERGE_2( action, ifbp->IFB_IntOffCnt ) )
711 #else
712         HCFASSERT( ifbp->IFB_IntOffCnt != 0xFFFE, action )
713 #endif // HCF_SLEEP
714         HCFASSERT( ifbp->IFB_IntOffCnt != 0xFFFF ||
715                            action == HCF_ACT_INT_OFF || action == HCF_ACT_INT_FORCE_ON,  action )
716         HCFASSERT( ifbp->IFB_IntOffCnt <= 16 || ifbp->IFB_IntOffCnt >= 0xFFFE,
717                            MERGE_2( action, ifbp->IFB_IntOffCnt ) )     //nesting more than 16 deep seems unreasonable
718 #endif // HCF_INT_ON
719
720         switch (action) {
721 #if HCF_INT_ON
722 hcf_16  i;
723           case HCF_ACT_INT_OFF:                                         // Disable Interrupt generation
724 #if HCF_SLEEP
725                 if ( ifbp->IFB_IntOffCnt == 0xFFFE ) {  // WakeUp test  ;?tie this to the "new" super-LinkStat
726                         ifbp->IFB_IntOffCnt++;                                          // restore conventional I/F
727                         OPW(HREG_IO, HREG_IO_WAKEUP_ASYNC );            // set wakeup bit
728                         OPW(HREG_IO, HREG_IO_WAKEUP_ASYNC );            // set wakeup bit to counteract the clearing by F/W
729                         // 800 us latency before FW switches to high power
730                         MSF_WAIT(800);                                                          // MSF-defined function to wait n microseconds.
731 //OOR           if ( ifbp->IFB_DSLinkStat & CFG_LINK_STAT_DS_OOR ) { // OutOfRange
732 //                              printk( "<5>ACT_INT_OFF: Deepsleep phase terminated, enable and go to AwaitConnection\n" );             //;?remove me 1 day
733 //                              hcf_cntl( ifbp, HCF_CNTL_ENABLE );
734 //                      }
735 //                      ifbp->IFB_DSLinkStat &= ~( CFG_LINK_STAT_DS_IR | CFG_LINK_STAT_DS_OOR); //clear IR/OOR state
736                 }
737 #endif // HCF_SLEEP
738 /*2*/   ifbp->IFB_IntOffCnt++;
739 //!     rc = 0;
740                 i = IPW( HREG_INT_EN );
741                 OPW( HREG_INT_EN, 0 );
742                 if ( i & 0x1000 ) {
743                         rc = HCF_ERR_NO_NIC;
744                 } else {
745                         if ( i & IPW( HREG_EV_STAT ) ) {
746                                 rc = HCF_INT_PENDING;
747                         }
748                 }
749                 break;
750
751           case HCF_ACT_INT_FORCE_ON:                            // Enforce Enable Interrupt generation
752                 ifbp->IFB_IntOffCnt = 0;
753                 //Fall through in HCF_ACT_INT_ON
754
755           case HCF_ACT_INT_ON:                                          // Enable Interrupt generation
756 /*4*/   if ( ifbp->IFB_IntOffCnt-- == 0 && ifbp->IFB_CardStat == 0 ) {
757                                                                                                 //determine Interrupt Event mask
758 #if HCF_DMA
759                         if ( ifbp->IFB_CntlOpt & USE_DMA ) {
760                                 i = HREG_EV_INFO | HREG_EV_RDMAD | HREG_EV_TDMAD | HREG_EV_TX_EXT;      //mask when DMA active
761                         } else
762 #endif // HCF_DMA
763                         {
764                                 i = HREG_EV_INFO | HREG_EV_RX | HREG_EV_TX_EXT;                                         //mask when DMA not active
765                                 if ( ifbp->IFB_RscInd == 0 ) {
766                                         i |= HREG_EV_ALLOC;                                                                                             //mask when no TxFID available
767                                 }
768                         }
769 #if HCF_SLEEP
770                         if ( ( IPW(HREG_EV_STAT) & ( i | HREG_EV_SLEEP_REQ ) ) == HREG_EV_SLEEP_REQ ) {
771                                 // firmware indicates it would like to go into sleep modus
772                                 // only acknowledge this request if no other events that can cause an interrupt are pending
773                                 ifbp->IFB_IntOffCnt--;                  //becomes 0xFFFE
774                 OPW( HREG_INT_EN, i | HREG_EV_TICK );
775                                 OPW( HREG_EV_ACK, HREG_EV_SLEEP_REQ | HREG_EV_TICK | HREG_EV_ACK_REG_READY );
776                         } else
777 #endif // HCF_SLEEP
778                         {
779                 OPW( HREG_INT_EN, i | HREG_EV_SLEEP_REQ );
780                         }
781                 }
782                 break;
783 #endif // HCF_INT_ON
784
785 #if (HCF_SLEEP) & HCF_DDS
786           case HCF_ACT_SLEEP:                                           // DDS Sleep request
787                 hcf_cntl( ifbp, HCF_CNTL_DISABLE );
788                 cmd_exe( ifbp, HCMD_SLEEP, 0 );
789                 break;
790 //        case HCF_ACT_WAKEUP:                                          // DDS Wakeup request
791 //              HCFASSERT( ifbp->IFB_IntOffCnt == 0xFFFE, ifbp->IFB_IntOffCnt )
792 //              ifbp->IFB_IntOffCnt++;                                  // restore conventional I/F
793 //              OPW( HREG_IO, HREG_IO_WAKEUP_ASYNC );
794 //              MSF_WAIT(800);                                                  // MSF-defined function to wait n microseconds.
795 //              rc = hcf_action( ifbp, HCF_ACT_INT_OFF );       /*bogus, IFB_IntOffCnt == 0xFFFF, so if you carefully look
796 //                                                                                                       *at the #if HCF_DDS statements, HCF_ACT_INT_OFF is empty
797 //                                                                                                       *for DDS. "Much" better would be to merge the flows for
798 //                                                                                                       *DDS and DEEP_SLEEP
799 //                                                                                                       */
800 //              break;
801 #endif // HCF_DDS
802
803 #if (HCF_TYPE) & HCF_TYPE_CCX
804           case HCF_ACT_CCX_ON:                                          // enable CKIP
805           case HCF_ACT_CCX_OFF:                                         // disable CKIP
806                 ifbp->IFB_CKIPStat = action;
807                 break;
808 #endif // HCF_TYPE_CCX
809
810           case HCF_ACT_RX_ACK:                                          //Receiver ACK
811 /*6*/   if ( ifbp->IFB_RxFID ) {
812                         DAWA_ACK( HREG_EV_RX );
813                 }
814                 ifbp->IFB_RxFID = ifbp->IFB_RxLen = 0;
815                 break;
816
817 /*8*/ case      HCF_ACT_PRS_SCAN:                                       // Hermes PRS Scan (F102)
818                 OPW( HREG_PARAM_1, 0x3FFF );
819                         //Fall through in HCF_ACT_TALLIES
820           case HCF_ACT_TALLIES:                                         // Hermes Inquire Tallies (F100)
821 #if ( (HCF_TYPE) & HCF_TYPE_HII5 ) == 0
822           case HCF_ACT_SCAN:                                            // Hermes Inquire Scan (F101)
823 #endif // HCF_TYPE_HII5
824                 /*!! the assumptions about numerical relationships between CFG_TALLIES etc and HCF_ACT_TALLIES etc
825                  *   are checked by #if statements just prior to this routine resulting in: err "maintenance"   */
826                 cmd_exe( ifbp, HCMD_INQUIRE, action - HCF_ACT_TALLIES + CFG_TALLIES );
827                 break;
828
829           default:
830                 HCFASSERT( DO_ASSERT, action )
831                 break;
832         }
833         //! do not HCFASSERT( rc == HCF_SUCCESS, rc )                                                                                                           /* 30*/
834         HCFLOGEXIT( HCF_TRACE_ACTION )
835         return rc;
836 } // hcf_action
837 #endif // HCF_DL_ONLY
838
839
840 /************************************************************************************************************
841 *
842 *.MODULE                int hcf_cntl( IFBP ifbp, hcf_16 cmd )
843 *.PURPOSE               Connect or disconnect a specific port to a specific network.
844 *!!  ;???????????????? continue needs more explanation
845 *                               recovers by means of "continue" when the connect proces in CCX mode fails
846 *                               Enables or disables data transmission and reception for the NIC.
847 *                               Activates static NIC configuration for a specific port at connect.
848 *                               Activates static configuration for all ports at enable.
849 *
850 *.ARGUMENTS
851 *       ifbp            address of the Interface Block
852 *       cmd                     0x001F: Hermes command (disable, enable, connect, disconnect, continue)
853 *                                       HCF_CNTL_ENABLE         Enable
854 *                                       HCF_CNTL_DISABLE    Disable
855 *                                       HCF_CNTL_CONTINUE       Continue
856 *                                       HCF_CNTL_CONNECT    Connect
857 *                                       HCF_CNTL_DISCONNECT Disconnect
858 *                               0x0100: command qualifier (continue)
859 *                                       HCMD_RETRY                      retry flag
860 *                               0x0700:  port number (connect/disconnect)
861 *                                       HCF_PORT_0          MAC Port 0
862 *                                       HCF_PORT_1          MAC Port 1
863 *                                       HCF_PORT_2          MAC Port 2
864 *                                       HCF_PORT_3          MAC Port 3
865 *                                       HCF_PORT_4          MAC Port 4
866 *                                       HCF_PORT_5          MAC Port 5
867 *                                       HCF_PORT_6          MAC Port 6
868 *
869 *.RETURNS
870 *       HCF_SUCCESS
871 *!!     via cmd_exe
872 *       HCF_ERR_NO_NIC
873 *       HCF_ERR_DEFUNCT_...
874 *       HCF_ERR_TIME_OUT
875 *
876 *.DESCRIPTION
877 * The parameter cmd contains a number of subfields.
878 * The actual value for cmd is created by logical or-ing the appropriate mnemonics for the subfields.
879 * The field 0x001F contains the command code
880 *  - HCF_CNTL_ENABLE
881 *  - HCF_CNTL_DISABLE
882 *  - HCF_CNTL_CONNECT
883 *  - HCF_CNTL_DISCONNECT
884 *  - HCF_CNTL_CONTINUE
885 *
886 * For HCF_CNTL_CONTINUE, the field 0x0100 contains the retry flag HCMD_RETRY.
887 * For HCF_CNTL_CONNECT and HCF_CNTL_DISCONNECT, the field 0x0700 contains the port number as HCF_PORT_#.
888 * For Station as well as AccessPoint F/W, MAC Port 0 is the "normal" communication channel.
889 * For AccessPoint F/W, MAC Port 1 through 6 control the WDS links.
890 *
891 * Note that despite the names HCF_CNTL_DISABLE and HCF_CNTL_ENABLE, hcf_cntl does not influence the NIC
892 * Interrupts mode.
893 *
894 * The Connect is used by the MSF to bring a particular port in an inactive state as far as data transmission
895 * and reception are concerned.
896 * When a particular port is disconnected:
897 * - the F/W disables the receiver for that port.
898 * - the F/W ignores send commands for that port.
899 * - all frames (Receive as well as pending Transmit) for that port on the NIC are discarded.
900 *
901 * When the NIC is disabled, above list applies to all ports, i.e. the result is like all ports are
902 * disconnected.
903 *
904 * When a particular port is connected:
905 * - the F/W effectuates the static configuration for that port.
906 * - enables the receiver for that port.
907 * - accepts send commands for that port.
908 *
909 * Enabling has the following effects:
910 * - the F/W effectuates the static configuration for all ports.
911 *       The F/W only updates its static configuration at a transition from disabled to enabled or from
912 *       disconnected to connected.
913 *       In order to enforce the static configuration, the MSF must assure that such a transition takes place.
914 *       Due to such a disable/enable or disconnect/connect sequence, Rx/Tx frames may be lost, in other words,
915 *       configuration may impact communication.
916 * - The DMA Engine (if applicable) is enabled.
917 * Note that the Enable Function by itself only enables data transmission and reception, it
918 * does not enable the Interrupt Generation mechanism. This is done by hcf_action.
919 *
920 * Disabling has the following effects:
921 *!!  ;?????is the following statement really true
922 * - it acts as a disconnect on all ports.
923 * - The DMA Engine (if applicable) is disabled.
924 *
925 * For impact of the disable command on the behavior of hcf_dma_tx/rx_get see the appropriate sections.
926 *
927 * Although the Enable/Disable and Connect/Disconnect are antonyms, there is no restriction on their sequencing,
928 * in other words, they may be called multiple times in arbitrary sequence without being paired or balanced.
929 * Each time one of these functions is called, the effects of the preceding calls cease.
930 *
931 * Assert fails if
932 * - ifbp has a recognizable out-of-range value.
933 * - NIC interrupts are not disabled.
934 * - A command other than Continue, Enable, Disable, Connect or Disconnect is given.
935 * - An invalid combination of the subfields is given or a bit outside the subfields is given.
936 * - any return code besides HCF_SUCCESS.
937 * - reentrancy, may be  caused by calling a hcf_function without adequate protection against NIC interrupts or
938 *       multi-threading
939 *
940 *.DIAGRAM
941 *       hcf_cntl takes successively the following actions:
942 *2:     If the HCF is in Defunct mode or incompatible with the Primary or Station Supplier in the Hermes,
943 *       hcf_cntl() returns immediately with HCF_ERR_NO_NIC;? as status.
944 *8:     when the port is disabled, the DMA engine needs to be de-activated, so the host can safely reclaim tx
945 *       packets from the tx descriptor chain.
946 *
947 *.ENDDOC                                END DOCUMENTATION
948 *
949 ************************************************************************************************************/
950 int
951 hcf_cntl( IFBP ifbp, hcf_16 cmd )
952 {
953 int     rc = HCF_ERR_INCOMP_FW;
954 #if HCF_ASSERT
955 {       int x = cmd & HCMD_CMD_CODE;
956         if ( x == HCF_CNTL_CONTINUE ) x &= ~HCMD_RETRY;
957         else if ( (x == HCMD_DISABLE || x == HCMD_ENABLE) && ifbp->IFB_FWIdentity.comp_id == COMP_ID_FW_AP ) {
958                 x &= ~HFS_TX_CNTL_PORT;
959         }
960         HCFASSERT( x==HCF_CNTL_ENABLE  || x==HCF_CNTL_DISABLE    || HCF_CNTL_CONTINUE ||
961                            x==HCF_CNTL_CONNECT || x==HCF_CNTL_DISCONNECT, cmd )
962 }
963 #endif // HCF_ASSERT
964 // #if (HCF_SLEEP) & HCF_DDS
965 //      HCFASSERT( ifbp->IFB_IntOffCnt != 0xFFFE, cmd )
966 // #endif // HCF_DDS
967         HCFLOGENTRY( HCF_TRACE_CNTL, cmd )
968         if ( ifbp->IFB_CardStat == 0 ) {                                                                                                                                 /*2*/
969 /*6*/   rc = cmd_exe( ifbp, cmd, 0 );
970 #if (HCF_SLEEP) & HCF_DDS
971                 ifbp->IFB_TickCnt = 0;                          //start 2 second period (with 1 tick uncertanty)
972 #endif // HCF_DDS
973         }
974 #if HCF_DMA
975         //!rlav : note that this piece of code is always executed, regardless of the DEFUNCT bit in IFB_CardStat.
976         // The reason behind this is that the MSF should be able to get all its DMA resources back from the HCF,
977         // even if the hardware is disfunctional. Practical example under Windows : surprise removal.
978         if ( ifbp->IFB_CntlOpt & USE_DMA ) {
979                 hcf_io io_port = ifbp->IFB_IOBase;
980                 DESC_STRCT *p;
981                 if ( cmd == HCF_CNTL_DISABLE || cmd == HCF_CNTL_ENABLE ) {
982                         OUT_PORT_DWORD( (io_port + HREG_DMA_CTRL), DMA_CTRLSTAT_RESET);                                         /*8*/
983                         ifbp->IFB_CntlOpt &= ~DMA_ENABLED;
984                 }
985                 if ( cmd == HCF_CNTL_ENABLE ) {
986                         OUT_PORT_DWORD( (io_port + HREG_DMA_CTRL), DMA_CTRLSTAT_GO);
987                         /* ;? by rewriting hcf_dma_rx_put you can probably just call hcf_dma_rx_put( ifbp->IFB_FirstDesc[DMA_RX] )
988                          * as additional beneficiary side effect, the SOP and EOP bits will also be cleared
989                          */
990                         ifbp->IFB_CntlOpt |= DMA_ENABLED;
991                         HCFASSERT( NT_ASSERT, NEVER_TESTED )
992                         // make the entire rx descriptor chain DMA-owned, so the DMA engine can (re-)use it.
993                         p = ifbp->IFB_FirstDesc[DMA_RX];
994                         if (p != NULL) {   //;? Think this over again in the light of the new chaining strategy
995                                 if ( 1 )        { //begin alternative
996                                         HCFASSERT( NT_ASSERT, NEVER_TESTED )
997                                         put_frame_lst( ifbp, ifbp->IFB_FirstDesc[DMA_RX], DMA_RX );
998                                         if ( ifbp->IFB_FirstDesc[DMA_RX] ) {
999                                                 put_frame_lst( ifbp, ifbp->IFB_FirstDesc[DMA_RX]->next_desc_addr, DMA_RX );
1000                                         }
1001                                 } else {
1002                                         while ( p ) {
1003                                                 //p->buf_cntl.cntl_stat |= DESC_DMA_OWNED;
1004                                                 p->BUF_CNT |= DESC_DMA_OWNED;
1005                                                 p = p->next_desc_addr;
1006                                         }
1007                                         // a rx chain is available so hand it over to the DMA engine
1008                                         p = ifbp->IFB_FirstDesc[DMA_RX];
1009                                         OUT_PORT_DWORD( (io_port + HREG_RXDMA_PTR32), p->desc_phys_addr);
1010                                 }  //end alternative
1011                         }
1012                 }
1013         }
1014 #endif // HCF_DMA
1015         HCFASSERT( rc == HCF_SUCCESS, rc )
1016         HCFLOGEXIT( HCF_TRACE_CNTL )
1017         return rc;
1018 } // hcf_cntl
1019
1020
1021 /************************************************************************************************************
1022 *
1023 *.MODULE                int hcf_connect( IFBP ifbp, hcf_io io_base )
1024 *.PURPOSE               Grants access right for the HCF to the IFB.
1025 *                               Initializes Card and HCF housekeeping.
1026 *
1027 *.ARGUMENTS
1028 *       ifbp            (near) address of the Interface Block
1029 *       io_base         non-USB: I/O Base address of the NIC (connect)
1030 *                               non-USB: HCF_DISCONNECT
1031 *                               USB:     HCF_CONNECT, HCF_DISCONNECT
1032 *
1033 *.RETURNS
1034 *       HCF_SUCCESS
1035 *       HCF_ERR_INCOMP_PRI
1036 *       HCF_ERR_INCOMP_FW
1037 *       HCF_ERR_DEFUNCT_CMD_SEQ
1038 *!!     HCF_ERR_NO_NIC really returned ;?
1039 *       HCF_ERR_NO_NIC
1040 *       HCF_ERR_TIME_OUT
1041 *
1042 *       MSF-accessible fields of Result Block:
1043 *       IFB_IOBase                              entry parameter io_base
1044 *       IFB_IORange                             HREG_IO_RANGE (0x40/0x80)
1045 *       IFB_Version                             version of the IFB layout
1046 *       IFB_FWIdentity                  CFG_FW_IDENTITY_STRCT, specifies the identity of the
1047 *                                                       "running" F/W, i.e. tertiary F/W under normal conditions
1048 *       IFB_FWSup                               CFG_SUP_RANGE_STRCT, specifies the supplier range of
1049 *                                                       the "running" F/W, i.e. tertiary F/W under normal conditions
1050 *       IFB_HSISup                              CFG_SUP_RANGE_STRCT, specifies the HW/SW I/F range of the NIC
1051 *       IFB_PRIIdentity                 CFG_PRI_IDENTITY_STRCT, specifies the Identity of the Primary F/W
1052 *       IFB_PRISup                              CFG_SUP_RANGE_STRCT, specifies the supplier range of the Primary F/W
1053 *       all other                               all MSF accessible fields, which are not specified above, are zero-filled
1054 *
1055 *.CONDITIONS
1056 * It is the responsibility of the MSF to assure the correctness of the I/O Base address.
1057 *
1058 * Note: hcf_connect defaults to NIC interrupt disabled mode, i.e. as if hcf_action( HCF_ACT_INT_OFF )
1059 * was called.
1060 *
1061 *.DESCRIPTION
1062 * hcf_connect passes the MSF-defined location of the IFB to the HCF and grants or revokes access right for the
1063 * HCF to the IFB. Revoking is done by specifying HCF_DISCONNECT rather than an I/O address for the parameter
1064 * io_base.  Every call of hcf_connect in "connect" mode, must eventually be followed by a call of hcf_connect
1065 * in "disconnect" mode. Clalling hcf_connect in "connect"/"disconnect" mode can not be nested.
1066 * The IFB address must be used as a handle with all subsequent HCF-function calls and the HCF uses the IFB
1067 * address as a handle when it performs a call(back) of an MSF-function (i.e. msf_assert).
1068 *
1069 * Note that not only the MSF accessible fields are cleared, but also all internal housekeeping
1070 * information is re-initialized.
1071 * This implies that all settings which are done via hcf_action and hcf_put_info (e.g. CFG_MB_ASSERT, CFG_REG_MB,
1072 * CFG_REG_INFO_LOG) must be done again. The only field which is not cleared, is IFB_MSFSup.
1073 *
1074 * If HCF_INT_ON is selected as compile option, NIC interrupts are disabled.
1075 *
1076 * Assert fails if
1077 * - ifbp is not properly aligned ( ref chapter HCF_ALIGN in 4.1.1)
1078 * - I/O Base Address is not a multiple of 0x40 (note: 0x0000 is explicitly allowed).
1079 *
1080 *.DIAGRAM
1081 *
1082 *0:     Throughout hcf_connect you need to distinguish the connect from the disconnect case, which requires
1083 *       some attention about what to use as "I/O" address when for which purpose.
1084 *2:
1085 *2a: Reset H-II by toggling reset bit in IO-register on and off.
1086 *       The HCF_TYPE_PRELOADED caters for the DOS environment where H-II is loaded by a separate program to
1087 *       overcome the 64k size limit posed on DOS drivers.
1088 *       The macro OPW is not yet useable because the IFB_IOBase field is not set.
1089 *       Note 1: hopefully the clearing and initializing of the IFB (see below) acts as a delay which meets the
1090 *       specification for S/W reset
1091 *       Note 2: it turns out that on some H/W constellations, the clock to access the EEProm is not lowered
1092 *       to an appropriate frequency by HREG_IO_SRESET. By giving an HCMD_INI first, this problem is worked around.
1093 *2b: Experimentally it is determined over a wide range of F/W versions that waiting for the for Cmd bit in
1094 *       Ev register gives a workable strategy. The available documentation does not give much clues.
1095 *4:     clear and initialize the IFB
1096 *       The HCF house keeping info is designed such that zero is the appropriate initial value for as much as
1097 *       feasible IFB-items.
1098 *       The readable fields mentioned in the description section and some HCF specific fields are given their
1099 *       actual value.
1100 *       IFB_TickIni is initialized at best guess before calibration
1101 *       Hcf_connect defaults to "no interrupt generation" (implicitly achieved by the zero-filling).
1102 *6:     Register compile-time linked MSF Routine and set default filter level
1103 *       cast needed to get around the "near" problem in DOS COM model
1104 *       er C2446: no conversion from void (__near __cdecl *)(unsigned char __far *,unsigned int,unsigned short,int)
1105 *                                                       to   void (__far  __cdecl *)(unsigned char __far *,unsigned int,unsigned short,int)
1106 *8:     If a command is apparently still active (as indicated by the Busy bit in Cmd register) this may indicate a
1107 *       blocked cmd pipe line.  To unblock the following actions are done:
1108 *        - Ack everything
1109 *        - Wait for Busy bit drop  in Cmd register
1110 *        - Wait for Cmd  bit raise in Ev  register
1111 *       The two waits are combined in a single HCF_WAIT_WHILE to optimize memory size. If either of these waits
1112 *       fail (prot_cnt becomes 0), then something is serious wrong. Rather than PANICK, the assumption is that the
1113 *       next cmd_exe will fail, causing the HCF to go into DEFUNCT mode
1114 *10:    Ack everything to unblock a (possibly blocked) cmd pipe line
1115 *       Note 1: it is very likely that an Alloc event is pending and very well possible that a (Send) Cmd event is
1116 *       pending on non-initial calls
1117 *       Note 2: it is assumed that this strategy takes away the need to ack every conceivable event after an
1118 *       Hermes Initialize
1119 *12:    Only H-II NEEDS the Hermes Initialize command. Due to the different semantics for H-I and H-II
1120 *       Initialize command, init() does not (and can not, since it is called e.g. after a download) execute the
1121 *       Hermes Initialize command. Executing the Hermes Initialize command for H-I would not harm but not do
1122 *       anything useful either, so it is skipped.
1123 *       The return status of cmd_exe is ignored. It is assumed that if cmd_exe fails, init fails too
1124 *14:    use io_base as a flag to merge hcf_connect and hcf_disconnect into 1 routine
1125 *       the call to init and its subsequent call of cmd_exe will return HCF_ERR_NO_NIC if appropriate. This status
1126 *       is (badly) needed by some legacy combination of NT4 and card services which do not yield an I/O address in
1127 *       time.
1128 *
1129 *.NOTICE
1130 *       On platforms where the NULL-pointer is not a bit-pattern of all zeros, the zero-filling of the IFB results
1131 *       in an incorrect initialization of pointers.
1132 *       The implementation of the MailBox manipulation in put_mb_info protects against the absence of a MailBox
1133 *       based on IFB_MBSize, IFB_MBWp and ifbp->IFB_MBRp. This has ramifications on the initialization of the
1134 *       MailBox via hcf_put_info with the CFG_REG_MB type, but it prevents dependency on the "NULL-"ness of
1135 *       IFB_MBp.
1136 *
1137 *.NOTICE
1138 *       There are a number of problems when asserting and logging hcf_connect, e.g.
1139 *        - Asserting on re-entrancy of hcf_connect by means of
1140 *        "HCFASSERT( (ifbp->IFB_AssertTrace & HCF_ASSERT_CONNECT) == 0, 0 )" is not useful because IFB contents
1141 *        are undefined
1142 *        - Asserting before the IFB is cleared will cause mdd_assert() to interpret the garbage in IFB_AssertRtn
1143 *        as a routine address
1144 *       Therefore HCFTRACE nor HCFLOGENTRY is called by hcf_connect.
1145 *.ENDDOC                                END DOCUMENTATION
1146 *
1147 ************************************************************************************************************/
1148 int
1149 hcf_connect( IFBP ifbp, hcf_io io_base )
1150 {
1151 int                     rc = HCF_SUCCESS;
1152 hcf_io          io_addr;
1153 hcf_32          prot_cnt;
1154 hcf_8           *q;
1155 LTV_STRCT       x;
1156 #if HCF_ASSERT
1157         hcf_16 xa = ifbp->IFB_FWIdentity.typ;
1158         /* is assumed to cause an assert later on if hcf_connect is called without intervening hcf_disconnect.
1159          * xa == CFG_FW_IDENTITY in subsequent calls without preceding hcf_disconnect,
1160          * xa == 0 in subsequent calls with preceding hcf_disconnect,
1161          * xa == "garbage" (any value except CFG_FW_IDENTITY is acceptable) in the initial call
1162          */
1163 #endif // HCF_ASSERT
1164
1165         if ( io_base == HCF_DISCONNECT ) {                                      //disconnect
1166                 io_addr = ifbp->IFB_IOBase;
1167                 OPW( HREG_INT_EN, 0 );          //;?workaround against dying F/W on subsequent hcf_connect calls
1168         } else {                                                                                        //connect                                                               /* 0 */
1169                 io_addr = io_base;
1170         }
1171
1172 #if 0 //;? if a subsequent hcf_connect is preceeded by an hcf_disconnect the wakeup is not needed !!
1173 #if HCF_SLEEP
1174     OUT_PORT_WORD( .....+HREG_IO, HREG_IO_WAKEUP_ASYNC );           //OPW not yet useable
1175         MSF_WAIT(800);                                                          // MSF-defined function to wait n microseconds.
1176         note that MSF_WAIT uses not yet defined!!!! IFB_IOBase and IFB_TickIni (via PROT_CNT_INI)
1177         so be carefull if this code is restored
1178 #endif // HCF_SLEEP
1179 #endif // 0
1180
1181 #if ( (HCF_TYPE) & HCF_TYPE_PRELOADED ) == 0    //switch clock back for SEEPROM access  !!!
1182         OUT_PORT_WORD( io_addr + HREG_CMD, HCMD_INI );              //OPW not yet useable
1183         prot_cnt = INI_TICK_INI;
1184         HCF_WAIT_WHILE( (IN_PORT_WORD( io_addr +  HREG_EV_STAT) & HREG_EV_CMD) == 0 );
1185         OUT_PORT_WORD( (io_addr + HREG_IO), HREG_IO_SRESET );   //OPW not yet useable                                   /* 2a*/
1186 #endif // HCF_TYPE_PRELOADED
1187         for ( q = (hcf_8*)(&ifbp->IFB_Magic); q > (hcf_8*)ifbp; *--q = 0 ) /*NOP*/;                                             /* 4 */
1188         ifbp->IFB_Magic         = HCF_MAGIC;
1189         ifbp->IFB_Version       = IFB_VERSION;
1190 #if defined MSF_COMPONENT_ID //a new IFB demonstrates how dirty the solution is
1191         xxxx[xxxx_PRI_IDENTITY_OFFSET] = NULL;          //IFB_PRIIdentity placeholder   0xFD02
1192         xxxx[xxxx_PRI_IDENTITY_OFFSET+1] = NULL;        //IFB_PRISup placeholder                0xFD03
1193 #endif // MSF_COMPONENT_ID
1194 #if (HCF_TALLIES) & ( HCF_TALLIES_NIC | HCF_TALLIES_HCF )
1195         ifbp->IFB_TallyLen = 1 + 2 * (HCF_NIC_TAL_CNT + HCF_HCF_TAL_CNT);       //convert # of Tallies to L value for LTV
1196         ifbp->IFB_TallyTyp = CFG_TALLIES;                       //IFB_TallyTyp: set T value
1197 #endif // HCF_TALLIES_NIC / HCF_TALLIES_HCF
1198         ifbp->IFB_IOBase        = io_addr;                              //set IO_Base asap, so asserts via HREG_SW_2 don't harm
1199         ifbp->IFB_IORange       = HREG_IO_RANGE;
1200         ifbp->IFB_CntlOpt       = USE_16BIT;
1201 #if HCF_ASSERT
1202         assert_ifbp = ifbp;
1203         ifbp->IFB_AssertLvl = 1;
1204 #if (HCF_ASSERT) & HCF_ASSERT_LNK_MSF_RTN
1205         if ( io_base != HCF_DISCONNECT ) {
1206                 ifbp->IFB_AssertRtn = (MSF_ASSERT_RTNP)msf_assert;                                                                                      /* 6 */
1207         }
1208 #endif // HCF_ASSERT_LNK_MSF_RTN
1209 #if (HCF_ASSERT) & HCF_ASSERT_MB                                //build the structure to pass the assert info to hcf_put_info
1210         ifbp->IFB_AssertStrct.len = sizeof(ifbp->IFB_AssertStrct)/sizeof(hcf_16) - 1;
1211         ifbp->IFB_AssertStrct.typ = CFG_MB_INFO;
1212         ifbp->IFB_AssertStrct.base_typ = CFG_MB_ASSERT;
1213         ifbp->IFB_AssertStrct.frag_cnt = 1;
1214         ifbp->IFB_AssertStrct.frag_buf[0].frag_len =
1215                 ( offsetof(IFB_STRCT, IFB_AssertLvl) - offsetof(IFB_STRCT, IFB_AssertLine) ) / sizeof(hcf_16);
1216         ifbp->IFB_AssertStrct.frag_buf[0].frag_addr = &ifbp->IFB_AssertLine;
1217 #endif // HCF_ASSERT_MB
1218 #endif // HCF_ASSERT
1219         IF_PROT_TIME( prot_cnt = ifbp->IFB_TickIni = INI_TICK_INI; )
1220 #if ( (HCF_TYPE) & HCF_TYPE_PRELOADED ) == 0
1221         //!! No asserts before Reset-bit in HREG_IO is cleared
1222         OPW( HREG_IO, 0x0000 );                                         //OPW useable                                                                           /* 2b*/
1223         HCF_WAIT_WHILE( (IPW( HREG_EV_STAT) & HREG_EV_CMD) == 0 );
1224         IF_PROT_TIME( HCFASSERT( prot_cnt, IPW( HREG_EV_STAT) ) )
1225         IF_PROT_TIME( if ( prot_cnt ) prot_cnt = ifbp->IFB_TickIni; )
1226 #endif // HCF_TYPE_PRELOADED
1227         //!! No asserts before Reset-bit in HREG_IO is cleared
1228         HCFASSERT( DO_ASSERT, MERGE_2( HCF_ASSERT, 0xCAF0 )     ) //just to proof that the complete assert machinery is working
1229         HCFASSERT( xa != CFG_FW_IDENTITY, 0 )           // assert if hcf_connect is called without intervening hcf_disconnect.
1230         HCFASSERT( ((hcf_32)(void*)ifbp & (HCF_ALIGN-1) ) == 0, (hcf_32)(void*)ifbp )
1231         HCFASSERT( (io_addr & 0x003F) == 0, io_addr )
1232                                                                                                 //if Busy bit in Cmd register
1233         if (IPW( HREG_CMD ) & HCMD_BUSY ) {                                                                                                                             /* 8 */
1234                                                                                                 //.  Ack all to unblock a (possibly) blocked cmd pipe line
1235                 OPW( HREG_EV_ACK, ~HREG_EV_SLEEP_REQ );
1236                                                                                                 //.  Wait for Busy bit drop  in Cmd register
1237                                                                                                 //.  Wait for Cmd  bit raise in Ev  register
1238                 HCF_WAIT_WHILE( ( IPW( HREG_CMD ) & HCMD_BUSY ) && (IPW( HREG_EV_STAT) & HREG_EV_CMD) == 0 );
1239                 IF_PROT_TIME( HCFASSERT( prot_cnt, IPW( HREG_EV_STAT) ) ) /* if prot_cnt == 0, cmd_exe will fail, causing DEFUNCT */
1240         }
1241         OPW( HREG_EV_ACK, ~HREG_EV_SLEEP_REQ );
1242 #if ( (HCF_TYPE) & HCF_TYPE_PRELOADED ) == 0                                                                                                            /*12*/
1243         (void)cmd_exe( ifbp, HCMD_INI, 0 );
1244 #endif // HCF_TYPE_PRELOADED
1245 if ( io_base != HCF_DISCONNECT ) {
1246                 rc = init( ifbp );                                                                                                                                                      /*14*/
1247                 if ( rc == HCF_SUCCESS ) {
1248                         x.len = 2;
1249                         x.typ = CFG_NIC_BUS_TYPE;
1250                         (void)hcf_get_info( ifbp, &x );
1251                         ifbp->IFB_BusType = x.val[0];
1252                         //CFG_NIC_BUS_TYPE not supported -> default 32 bits/DMA, MSF has to overrule via CFG_CNTL_OPT
1253                         if ( x.len == 0 || x.val[0] == 0x0002 || x.val[0] == 0x0003 ) {
1254 #if (HCF_IO) & HCF_IO_32BITS
1255                                 ifbp->IFB_CntlOpt &= ~USE_16BIT;                        //reset USE_16BIT
1256 #endif // HCF_IO_32BITS
1257 #if HCF_DMA
1258                                 ifbp->IFB_CntlOpt |= USE_DMA;                           //SET DMA
1259 #else
1260                                 ifbp->IFB_IORange = 0x40 /*i.s.o. HREG_IO_RANGE*/;
1261 #endif // HCF_DMA
1262                         }
1263                 }
1264         } else HCFASSERT(  ( ifbp->IFB_Magic ^= HCF_MAGIC ) == 0, ifbp->IFB_Magic ) /*NOP*/;
1265         /* of above HCFASSERT only the side effect is needed, NOP in case HCFASSERT is dummy */
1266         ifbp->IFB_IOBase = io_base;                                                                                                                                             /* 0*/
1267         return rc;
1268 } // hcf_connect
1269
1270 #if HCF_DMA
1271 /************************************************************************************************************
1272 * Function get_frame_lst
1273 *  - resolve the "last host-owned descriptor" problems when a descriptor list is reclaimed by the MSF.
1274 *
1275 * The FrameList to be reclaimed as well as the DescriptorList always start in IFB_FirstDesc[tx_rx_flag]
1276 * and this is always the "current" DELWA Descriptor.
1277 *
1278 * If a FrameList is available, the last descriptor of the FrameList to turned into a new DELWA Descriptor:
1279 *  - a copy is made from the information in the last descriptor of the FrameList into the current
1280 *        DELWA Descriptor
1281 *  - the remainder of the DescriptorList is detached from the copy by setting the next_desc_addr at NULL
1282 *  - the DMA control bits of the copy are cleared to do not confuse the MSF
1283 *  - the copy of the last descriptor (i.e. the "old" DELWA Descriptor) is chained to the prev Descriptor
1284 *        of the FrameList, thus replacing the original last Descriptor of the FrameList.
1285 *  - IFB_FirstDesc is changed to the address of that replaced (original) last descriptor of the FrameList,
1286 *        i.e. the "new" DELWA Descriptor.
1287 *
1288 * This function makes a copy of that last host-owned descriptor, so the MSF will get a copy of the descriptor.
1289 * On top of that, it adjusts DMA related fields in the IFB structure.
1290         // perform a copying-scheme to circumvent the 'last host owned descriptor cannot be reclaimed' limitation imposed by H2.5's DMA hardware design
1291         // a 'reclaim descriptor' should be available in the HCF:
1292 *
1293 * Returns: address of the first descriptor of the FrameList
1294 *
1295  8: Be careful once you start re-ordering the steps in the copy process, that it still works for cases
1296 *       of FrameLists of 1, 2 and more than 2 descriptors
1297 *
1298 * Input parameters:
1299 * tx_rx_flag      : specifies 'transmit' or 'receive' descriptor.
1300 *
1301 ************************************************************************************************************/
1302 HCF_STATIC DESC_STRCT*
1303 get_frame_lst( IFBP ifbp, int tx_rx_flag )
1304 {
1305
1306 DESC_STRCT *head = ifbp->IFB_FirstDesc[tx_rx_flag];
1307 DESC_STRCT *copy, *p, *prev;
1308
1309         HCFASSERT( tx_rx_flag == DMA_RX || tx_rx_flag == DMA_TX, tx_rx_flag )
1310                                                                 //if FrameList
1311         if ( head ) {
1312                                                                 //.  search for last descriptor of first FrameList
1313                 p = prev = head;
1314                 while ( ( p->BUF_SIZE & DESC_EOP ) == 0 && p->next_desc_addr ) {
1315                         if ( ( ifbp->IFB_CntlOpt & DMA_ENABLED ) == 0 ) {       //clear control bits when disabled
1316                                 p->BUF_CNT &= DESC_CNT_MASK;
1317                         }
1318                         prev = p;
1319                         p = p->next_desc_addr;
1320                 }
1321                                                                 //.  if DMA enabled
1322                 if ( ifbp->IFB_CntlOpt & DMA_ENABLED ) {
1323                                                                 //.  .  if last descriptor of FrameList is DMA owned
1324                                                                 //.  .  or if FrameList is single (DELWA) Descriptor
1325                         if ( p->BUF_CNT & DESC_DMA_OWNED || head->next_desc_addr == NULL ) {
1326                                                                 //.  .  .  refuse to return FrameList to caller
1327                                 head = NULL;
1328                         }
1329                 }
1330         }
1331                                                                 //if returnable FrameList found
1332         if ( head ) {
1333                                                                 //.  if FrameList is single (DELWA) Descriptor (implies DMA disabled)
1334                 if ( head->next_desc_addr == NULL ) {
1335                                                                 //.  .  clear DescriptorList
1336                         /*;?ifbp->IFB_LastDesc[tx_rx_flag] =*/ ifbp->IFB_FirstDesc[tx_rx_flag] = NULL;
1337                                                                 //.  else
1338                 } else {
1339                                                                 //.  .  strip hardware-related bits from last descriptor
1340                                                                 //.  .  remove DELWA Descriptor from head of DescriptorList
1341                         copy = head;
1342                         head = head->next_desc_addr;
1343                                                                 //.   .  exchange first (Confined) and last (possibly imprisoned) Descriptor
1344                         copy->buf_phys_addr = p->buf_phys_addr;
1345                         copy->buf_addr = p->buf_addr;
1346                         copy->BUF_SIZE = p->BUF_SIZE &= DESC_CNT_MASK;  //get rid of DESC_EOP and possibly DESC_SOP
1347                         copy->BUF_CNT = p->BUF_CNT &= DESC_CNT_MASK;    //get rid of DESC_DMA_OWNED
1348 #if (HCF_EXT) & HCF_DESC_STRCT_EXT
1349                         copy->DESC_MSFSup = p->DESC_MSFSup;
1350 #endif // HCF_DESC_STRCT_EXT
1351                                                                 //.  .  turn into a DELWA Descriptor
1352                         p->buf_addr = NULL;
1353                                                                 //.  .  chain copy to prev                                                                                      /* 8*/
1354                         prev->next_desc_addr = copy;
1355                                                                 //.  .  detach remainder of the DescriptorList from FrameList
1356                         copy->next_desc_addr = NULL;
1357                         copy->next_desc_phys_addr = 0xDEAD0000; //! just to be nice, not really needed
1358                                                                 //.  .  save the new start (i.e. DELWA Descriptor) in IFB_FirstDesc
1359                         ifbp->IFB_FirstDesc[tx_rx_flag] = p;
1360                 }
1361                                                                 //.  strip DESC_SOP from first descriptor
1362                 head->BUF_SIZE &= DESC_CNT_MASK;
1363                 //head->BUF_CNT &= DESC_CNT_MASK;  get rid of DESC_DMA_OWNED
1364                 head->next_desc_phys_addr = 0xDEAD0000; //! just to be nice, not really needed
1365         }
1366                                                                 //return the just detached FrameList (if any)
1367         return head;
1368 } // get_frame_lst
1369
1370
1371 /************************************************************************************************************
1372 * Function put_frame_lst
1373 *
1374 * This function
1375 *
1376 * Returns: address of the first descriptor of the FrameList
1377 *
1378 * Input parameters:
1379 * tx_rx_flag      : specifies 'transmit' or 'receive' descriptor.
1380 *
1381 * The following list should be kept in sync with hcf_dma_tx/rx_put, in order to get them in the WCI-spec !!!!
1382 * Assert fails if
1383 * -     DMA is not enabled
1384 * -     descriptor list is NULL
1385 * -     a descriptor in the descriptor list is not double word aligned
1386 * -     a count of size field of a descriptor contains control bits, i.e. bits in the high order nibble.
1387 * -     the DELWA descriptor is not a "singleton" DescriptorList.
1388 * -     the DELWA descriptor is not the first Descriptor supplied
1389 * -     a non_DMA descriptor is supplied before the DELWA Descriptor is supplied
1390 * -     Possibly more checks could be added !!!!!!!!!!!!!
1391
1392 *.NOTICE
1393 * The asserts marked with *sc* are really sanity checks for the HCF, they can (supposedly) not be influenced
1394 * by incorrect MSF behavior
1395
1396                 // The MSF is required to supply the HCF with a single descriptor for MSF tx reclaim purposes.
1397                 // This 'reclaim descriptor' can be recognized by the fact that its buf_addr field is zero.
1398         *********************************************************************************************
1399         * Although not required from a hardware perspective:
1400         * - make each descriptor in this rx-chain DMA-owned.
1401         * - Also set the count to zero. EOP and SOP bits are also cleared.
1402         *********************************************************************************************/
1403 HCF_STATIC void
1404 put_frame_lst( IFBP ifbp, DESC_STRCT *descp, int tx_rx_flag )
1405 {
1406         DESC_STRCT      *p = descp;
1407         hcf_16 port;
1408
1409         HCFASSERT( ifbp->IFB_CntlOpt & USE_DMA, ifbp->IFB_CntlOpt) //only hcf_dma_tx_put must also be DMA_ENABLED
1410         HCFASSERT( tx_rx_flag == DMA_RX || tx_rx_flag == DMA_TX, tx_rx_flag )
1411         HCFASSERT( p , 0 )
1412
1413         while ( p ) {
1414                 HCFASSERT( ((hcf_32)p & 3 ) == 0, (hcf_32)p )
1415                 HCFASSERT( (p->BUF_CNT & ~DESC_CNT_MASK) == 0, p->BUF_CNT )
1416                 HCFASSERT( (p->BUF_SIZE & ~DESC_CNT_MASK) == 0, p->BUF_SIZE )
1417                 p->BUF_SIZE &= DESC_CNT_MASK;                                   //!!this SHOULD be superfluous in case of correct MSF
1418                 p->BUF_CNT &= tx_rx_flag == DMA_RX ? 0 : DESC_CNT_MASK; //!!this SHOULD be superfluous in case of correct MSF
1419                 p->BUF_CNT |= DESC_DMA_OWNED;
1420                 if ( p->next_desc_addr ) {
1421 //                      HCFASSERT( p->buf_addr && p->buf_phys_addr  && p->BUF_SIZE && +/- p->BUF_SIZE, ... )
1422                         HCFASSERT( p->next_desc_addr->desc_phys_addr, (hcf_32)p->next_desc_addr )
1423                         p->next_desc_phys_addr = p->next_desc_addr->desc_phys_addr;
1424                 } else {                                                                        //
1425                         p->next_desc_phys_addr = 0;
1426                         if ( p->buf_addr == NULL ) {                    // DELWA Descriptor
1427                                 HCFASSERT( descp == p, (hcf_32)descp )  //singleton DescriptorList
1428                                 HCFASSERT( ifbp->IFB_FirstDesc[tx_rx_flag] == NULL, (hcf_32)ifbp->IFB_FirstDesc[tx_rx_flag])
1429                                 HCFASSERT( ifbp->IFB_LastDesc[tx_rx_flag] == NULL, (hcf_32)ifbp->IFB_LastDesc[tx_rx_flag])
1430                                 descp->BUF_CNT = 0; //&= ~DESC_DMA_OWNED;
1431                                 ifbp->IFB_FirstDesc[tx_rx_flag] = descp;
1432 // part of alternative ifbp->IFB_LastDesc[tx_rx_flag] = ifbp->IFB_FirstDesc[tx_rx_flag] = descp;
1433                                                                                                         // if "recycling" a FrameList
1434                                                                                                         // (e.g. called from hcf_cntl( HCF_CNTL_ENABLE )
1435                                                                                                         // .  prepare for activation DMA controller
1436 // part of alternative descp = descp->next_desc_addr;
1437                         } else {                                                                //a "real" FrameList, hand it over to the DMA engine
1438                                 HCFASSERT( ifbp->IFB_FirstDesc[tx_rx_flag], (hcf_32)descp )
1439                                 HCFASSERT( ifbp->IFB_LastDesc[tx_rx_flag], (hcf_32)descp )
1440                                 HCFASSERT( ifbp->IFB_LastDesc[tx_rx_flag]->next_desc_addr == NULL,
1441                                                    (hcf_32)ifbp->IFB_LastDesc[tx_rx_flag]->next_desc_addr)
1442 //                              p->buf_cntl.cntl_stat |= DESC_DMA_OWNED;
1443                                 ifbp->IFB_LastDesc[tx_rx_flag]->next_desc_addr = descp;
1444                                 ifbp->IFB_LastDesc[tx_rx_flag]->next_desc_phys_addr = descp->desc_phys_addr;
1445                                 port = HREG_RXDMA_PTR32;
1446                                 if ( tx_rx_flag ) {
1447                                         p->BUF_SIZE |= DESC_EOP;        // p points at the last descriptor in the caller-supplied descriptor chain
1448                                         descp->BUF_SIZE |= DESC_SOP;
1449                                         port = HREG_TXDMA_PTR32;
1450                                 }
1451                                 OUT_PORT_DWORD( (ifbp->IFB_IOBase + port), descp->desc_phys_addr );
1452                         }
1453                         ifbp->IFB_LastDesc[tx_rx_flag] = p;
1454                 }
1455                 p = p->next_desc_addr;
1456         }
1457 } // put_frame_lst
1458
1459
1460 /************************************************************************************************************
1461 *
1462 *.MODULE                DESC_STRCT* hcf_dma_rx_get( IFBP ifbp )
1463 *.PURPOSE               decapsulate a message and provides that message to the MSF.
1464 *                               reclaim all descriptors in the rx descriptor chain.
1465 *
1466 *.ARGUMENTS
1467 *       ifbp            address of the Interface Block
1468 *
1469 *.RETURNS
1470 *       pointer to a FrameList
1471 *
1472 *.DESCRIPTION
1473 * hcf_dma_rx_get is intended to  return a received frame when such a frame is deposited in Host memory by the
1474 * DMA engine. In addition hcf_dma_rx_get can be used to reclaim all descriptors in the rx descriptor chain
1475 * when the DMA Engine is disabled, e.g. as part of a driver unloading strategy.
1476 * hcf_dma_rx_get must be called repeatedly by the MSF when hcf_service_nic signals availability of a rx frame
1477 * through the HREG_EV_RDMAD flag of IFB_DmaPackets. The calling must stop when a NULL pointer is returned, at
1478 * which time the HREG_EV_RDMAD flag is also cleared by the HCF to arm the mechanism for the next frame
1479 * reception.
1480 * Regardless whether the DMA Engine is currently enabled (as controlled via hcf_cntl), if the DMA controller
1481 * deposited an Rx-frame in the Rx-DescriptorList, this frame is detached from the Rx-DescriptorList,
1482 * transformed into a FrameList (i.e.  updating the housekeeping fields in the descriptors) and returned to the
1483 * caller.
1484 * If no such Rx-frame is available in the Rx-DescriptorList, the behavior of hcf_dma_rx_get depends on the
1485 * status of the DMA Engine.
1486 * If the DMA Engine is enabled, a NULL pointer is returned.
1487 * If the DMA Engine is disabled, the following strategy is used:
1488 * - the complete Rx-DescriptorList is returned. The DELWA Descriptor is not part of the Rx-DescriptorList.
1489 * - If there is no Rx-DescriptorList, the DELWA Descriptor is returned.
1490 * - If there is no DELWA Descriptor, a NULL pointer is returned.
1491 *
1492 * If the MSF performs an disable/enable sequence without exhausting the Rx-DescriptorList as described above,
1493 * the enable command will reset all house keeping information, i.e. already received but not yet by the MSF
1494 * retrieved frames are lost and the next frame will be received starting with the oldest descriptor.
1495 *
1496 * The HCF can be used in 2 fashions: with and without decapsulation for data transfer.
1497 * This is controlled at compile time by the HCF_ENC bit of the HCF_ENCAP system constant.
1498 * If appropriate, decapsulation is done by moving some data inside the buffers and updating the descriptors
1499 * accordingly.
1500 *!! ;?????where did I describe why a simple manipulation with the count values does not suffice?
1501 *
1502 *.DIAGRAM
1503 *
1504 *.ENDDOC                                END DOCUMENTATION
1505 *
1506 ************************************************************************************************************/
1507
1508 DESC_STRCT*
1509 hcf_dma_rx_get (IFBP ifbp)
1510 {
1511 DESC_STRCT *descp;      // pointer to start of FrameList
1512
1513         descp = get_frame_lst( ifbp, DMA_RX );
1514         if ( descp && descp->buf_addr )  //!be aware of the missing curly bracket
1515
1516                                                                                         //skip decapsulation at confined descriptor
1517 #if (HCF_ENCAP) == HCF_ENC
1518 #if (HCF_TYPE) & HCF_TYPE_CCX
1519         if ( ifbp->IFB_CKIPStat == HCF_ACT_CCX_OFF )
1520 #endif // HCF_TYPE_CCX
1521     {
1522 int i;
1523 DESC_STRCT *p = descp->next_desc_addr;  //pointer to 2nd descriptor of frame
1524                 HCFASSERT(p, 0)
1525                 // The 2nd descriptor contains (maybe) a SNAP header plus part or whole of the payload.
1526                 //determine decapsulation sub-flag in RxFS
1527                 i = *(wci_recordp)&descp->buf_addr[HFS_STAT] & ( HFS_STAT_MSG_TYPE | HFS_STAT_ERR );
1528                 if ( i == HFS_STAT_TUNNEL ||
1529                          ( i == HFS_STAT_1042 && hcf_encap( (wci_bufp)&p->buf_addr[HCF_DASA_SIZE] ) != ENC_TUNNEL )) {
1530                         // The 2nd descriptor contains a SNAP header plus part or whole of the payload.
1531                         HCFASSERT( p->BUF_CNT == (p->buf_addr[5] + (p->buf_addr[4]<<8) + 2*6 + 2 - 8), p->BUF_CNT )
1532                         // perform decapsulation
1533                         HCFASSERT(p->BUF_SIZE >=8, p->BUF_SIZE)
1534                         // move SA[2:5] in the second buffer to replace part of the SNAP header
1535                         for ( i=3; i >= 0; i--) p->buf_addr[i+8] = p->buf_addr[i];
1536                         // copy DA[0:5], SA[0:1] from first buffer to second buffer
1537                         for ( i=0; i<8; i++) p->buf_addr[i] = descp->buf_addr[HFS_ADDR_DEST + i];
1538                         // make first buffer shorter in count
1539                         descp->BUF_CNT = HFS_ADDR_DEST;
1540                 }
1541         }
1542 #endif // HCF_ENC
1543         if ( descp == NULL ) ifbp->IFB_DmaPackets &= (hcf_16)~HREG_EV_RDMAD;  //;?could be integrated into get_frame_lst
1544         HCFLOGEXIT( HCF_TRACE_DMA_RX_GET )
1545         return descp;
1546 } // hcf_dma_rx_get
1547
1548
1549 /************************************************************************************************************
1550 *
1551 *.MODULE                void hcf_dma_rx_put( IFBP ifbp, DESC_STRCT *descp )
1552 *.PURPOSE               supply buffers for receive purposes.
1553 *                               supply the Rx-DELWA descriptor.
1554 *
1555 *.ARGUMENTS
1556 *       ifbp            address of the Interface Block
1557 *       descp           address of a DescriptorList
1558 *
1559 *.RETURNS               N.A.
1560 *
1561 *.DESCRIPTION
1562 * This function is called by the MSF to supply the HCF with new/more buffers for receive purposes.
1563 * The HCF can be used in 2 fashions: with and without encapsulation for data transfer.
1564 * This is controlled at compile time by the HCF_ENC bit of the HCF_ENCAP system constant.
1565 * As a consequence, some additional constaints apply to the number of descriptor and the buffers associated
1566 * with the first 2 descriptors. Independent of the encapsulation feature, the COUNT fields are ignored.
1567 * A special case is the supplying of the DELWA descriptor, which must be supplied as the first descriptor.
1568 *
1569 * Assert fails if
1570 * - ifbp has a recognizable out-of-range value.
1571 * - NIC interrupts are not disabled while required by parameter action.
1572 * - in case decapsulation by the HCF is selected:
1573 *         -     The first databuffer does not have the exact size corresponding with the RxFS up to the 802.3 DestAddr
1574 *               field (== 29 words).
1575 *         -     The FrameList does not consists of at least 2 Descriptors.
1576 *         -     The second databuffer does not have the minimum size of 8 bytes.
1577 *!! The 2nd part of the list of asserts should be kept in sync with put_frame_lst, in order to get
1578 *!! them in the WCI-spec !!!!
1579 * - DMA is not enabled
1580 * - descriptor list is NULL
1581 * - a descriptor in the descriptor list is not double word aligned
1582 * - a count of size field of a descriptor contains control bits, i.e. bits in the high order nibble.
1583 * - the DELWA descriptor is not a "singleton" DescriptorList.
1584 * - the DELWA descriptor is not the first Descriptor supplied
1585 * - a non_DMA descriptor is supplied before the DELWA Descriptor is supplied
1586 *!! - Possibly more checks could be added !!!!!!!!!!!!!
1587 *
1588 *.DIAGRAM
1589 *
1590 *
1591 *.ENDDOC                                END DOCUMENTATION
1592 *
1593 ************************************************************************************************************/
1594 void
1595 hcf_dma_rx_put( IFBP ifbp, DESC_STRCT *descp )
1596 {
1597
1598         HCFLOGENTRY( HCF_TRACE_DMA_RX_PUT, 0xDA01 )
1599         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
1600         HCFASSERT_INT
1601
1602         put_frame_lst( ifbp, descp, DMA_RX );
1603 #if HCF_ASSERT && (HCF_ENCAP) == HCF_ENC
1604         if ( descp->buf_addr ) {
1605                 HCFASSERT( descp->BUF_SIZE == HCF_DMA_RX_BUF1_SIZE, descp->BUF_SIZE )
1606                 HCFASSERT( descp->next_desc_addr, 0 ) // first descriptor should be followed by another descriptor
1607                 // The second DB is for SNAP and payload purposes. It should be a minimum of 12 bytes in size.
1608                 HCFASSERT( descp->next_desc_addr->BUF_SIZE >= 12, descp->next_desc_addr->BUF_SIZE )
1609         }
1610 #endif // HCFASSERT / HCF_ENC
1611         HCFLOGEXIT( HCF_TRACE_DMA_RX_PUT )
1612 } // hcf_dma_rx_put
1613
1614
1615 /************************************************************************************************************
1616 *
1617 *.MODULE                DESC_STRCT* hcf_dma_tx_get( IFBP ifbp )
1618 *.PURPOSE               DMA mode: reclaims and decapsulates packets in the tx descriptor chain if:
1619 *                                - A Tx packet has been copied from host-RAM into NIC-RAM by the DMA engine
1620 *                                - The Hermes/DMAengine have been disabled
1621 *
1622 *.ARGUMENTS
1623 *       ifbp            address of the Interface Block
1624 *
1625 *.RETURNS
1626 *       pointer to a reclaimed Tx packet.
1627 *
1628 *.DESCRIPTION
1629 * impact of the disable command:
1630 * When a non-empty pool of Tx descriptors exists (created by means of hcf_dma_put_tx), the MSF
1631 * is supposed to empty that pool by means of hcf_dma_tx_get calls after the disable in an
1632 * disable/enable sequence.
1633 *
1634 *.DIAGRAM
1635 *
1636 *.NOTICE
1637 *
1638 *.ENDDOC                                END DOCUMENTATION
1639 *
1640 ************************************************************************************************************/
1641 DESC_STRCT*
1642 hcf_dma_tx_get( IFBP ifbp )
1643 {
1644 DESC_STRCT *descp;      // pointer to start of FrameList
1645
1646         descp = get_frame_lst( ifbp, DMA_TX );
1647         if ( descp && descp->buf_addr )  //!be aware of the missing curly bracket
1648                                                                                         //skip decapsulation at confined descriptor
1649 #if (HCF_ENCAP) == HCF_ENC
1650                 if ( ( descp->BUF_CNT == HFS_TYPE )
1651 #if (HCF_TYPE) & HCF_TYPE_CCX
1652                          || ( descp->BUF_CNT == HFS_DAT )
1653 #endif // HCF_TYPE_CCX
1654                 ) { // perform decapsulation if needed
1655                         descp->next_desc_addr->buf_phys_addr -= HCF_DASA_SIZE;
1656                         descp->next_desc_addr->BUF_CNT           += HCF_DASA_SIZE;
1657                 }
1658 #endif // HCF_ENC
1659         if ( descp == NULL ) {  //;?could be integrated into get_frame_lst
1660                 ifbp->IFB_DmaPackets &= (hcf_16)~HREG_EV_TDMAD;
1661         }
1662         HCFLOGEXIT( HCF_TRACE_DMA_TX_GET )
1663         return descp;
1664 } // hcf_dma_tx_get
1665
1666
1667 /************************************************************************************************************
1668 *
1669 *.MODULE                void hcf_dma_tx_put( IFBP ifbp, DESC_STRCT *descp, hcf_16 tx_cntl )
1670 *.PURPOSE               puts a packet in the Tx DMA queue in host ram and kicks off the TxDma engine.
1671 *                               supply the Tx-DELWA descriptor.
1672 *
1673 *.ARGUMENTS
1674 *       ifbp            address of the Interface Block
1675 *       descp           address of Tx Descriptor Chain (i.e. a single Tx frame)
1676 *       tx_cntl         indicates MAC-port and (Hermes) options
1677 *
1678 *.RETURNS               N.A.
1679 *
1680 *.DESCRIPTION
1681 * The HCF can be used in 2 fashions: with and without encapsulation for data transfer.
1682 * This is controlled at compile time by the HCF_ENC bit of the HCF_ENCAP system constant.
1683 *
1684 * Regardless of the HCF_ENCAP system constant, the descriptor list created to describe the frame to be
1685 * transmitted, must supply space to contain the 802.11 header, preceding the actual frame to be transmitted.
1686 * Basically, this only supplies working storage to the HCF which passes this on to the DMA engine.
1687 * As a consequence the contents of this space do not matter.
1688 * Nevertheless BUF_CNT must take in account this storage.
1689 * This working space to contain the 802.11 header may not be fragmented, the first buffer must be
1690 * sufficiently large to contain at least the 802.11 header, i.e. HFS_ADDR_DEST (29 words or 0x3A bytes).
1691 * This way, the HCF can simply, regardless whether or not the HCF encapsulates the frame, write the parameter
1692 * tx_cntl at offset 0x36 (HFS_TX_CNTL) in the first buffer.
1693 * Note that it is allowed to have part or all of the actual frame represented by the first descriptor as long
1694 * as the requirement for storage for the 802.11 header is met, i.e. the 802.3 frame starts at offset
1695 * HFS_ADDR_DEST.
1696 * Except for the Assert on the 1st buffer in case of Encapsualtion, the SIZE fields are ignored.
1697 *
1698 * In case the encapsulation feature is compiled in, there are the following additional requirements.
1699 * o The BUF_CNT of the first buffer changes from a minimum of 0x3A bytes to exactly 0x3A, i.e. the workspace
1700 *       to store the 802.11 header
1701 * o The BUF_SIZE of the first buffer is at least the space needed to store the
1702 *       - 802.11 header (29 words)
1703 *       - 802.3 header, i.e. 12 bytes addressing information and 2 bytes length field
1704 *       - 6 bytes SNAP-header
1705 *   This results in 39 words or 0x4E bytes or HFS_TYPE.
1706 *   Note that if the BUF_SIZE is larger than 0x4E, this surplus is not used.
1707 * o The actual frame begins in the 2nd descriptor (which is already implied by the BUF_CNT == 0x3A requirement) and the associated buffer contains at least the 802.3 header, i.e. the 14 bytes representing addressing information and length/type field
1708 *
1709 *   When the HCF does not encapsulates (i.e. length/type field <= 1500),  no changes are made to descriptors
1710 *   or buffers.
1711 *
1712 *   When the HCF actually encapsulates (i.e. length/type field > 1500), it successively writes, starting at
1713 *   offset HFS_ADDR_DEST (0x3A) in the first buffer:
1714 *     - the 802.3 addressing information, copied from the begin of the second buffer
1715 *     - the frame length, derived from the total length of the individual fragments, corrected for the SNAP
1716 *       header length and Type field and ignoring the Destination Address, Source Address and Length field
1717 *         - the appropriate snap header (Tunnel or 1042, depending on the value of the type field).
1718 *
1719 *        The information in the first two descriptors is adjusted accordingly:
1720 *         - the first descriptor count is changed from 0x3A to 0x4E (HFS_TYPE), which matches 0x3A + 12 + 2 + 6
1721 *         - the second descriptor count is decreased by 12, being the moved addressing information
1722 *         - the second descriptor (physical) buffer address is increased by 12.
1723 *
1724 * When the descriptors are returned by hcf_dma_tx_get, the transformation of the first two descriptors is
1725 * undone.
1726 *
1727 * Under any of the above scenarios, the assert BUF_CNT <= BUF_SIZE must be true for all descriptors
1728 * In case of encapsulation, BUF_SIZE of the 1st descriptor is asserted to be at least HFS_TYPE (0x4E), so it is NOT tested.
1729 *
1730 * Assert fails if
1731 * - ifbp has a recognizable out-of-range value.
1732 * - tx_cntl has a recognizable out-of-range value.
1733 * - NIC interrupts are not disabled while required by parameter action.
1734 * - in case encapsulation by the HCF is selected:
1735 *         -     The FrameList does not consists of at least 2 Descriptors.
1736 *         -     The first databuffer does not contain exactly the (space for) the 802.11 header (== 28 words)
1737 *         -     The first databuffer does not have a size to additionally accomodate the 802.3 header and the
1738 *               SNAP header of the frame after encapsulation (== 39 words).
1739 *         -     The second databuffer does not contain at least DA, SA and 'type/length' (==14 bytes or 7 words)
1740 *!! The 2nd part of the list of asserts should be kept in sync with put_frame_lst, in order to get
1741 *!! them in the WCI-spec !!!!
1742 * - DMA is not enabled
1743 * - descriptor list is NULL
1744 * - a descriptor in the descriptor list is not double word aligned
1745 * - a count of size field of a descriptor contains control bits, i.e. bits in the high order nibble.
1746 * - the DELWA descriptor is not a "singleton" DescriptorList.
1747 * - the DELWA descriptor is not the first Descriptor supplied
1748 * - a non_DMA descriptor is supplied before the DELWA Descriptor is supplied
1749 *!! - Possibly more checks could be added !!!!!!!!!!!!!
1750 *.DIAGRAM
1751 *
1752 *.NOTICE
1753 *
1754 *.ENDDOC                                END DOCUMENTATION
1755 *
1756 *
1757 *1:     Write tx_cntl parameter to HFS_TX_CNTL field into the Hermes-specific header in buffer 1
1758 *4:     determine whether encapsulation is needed and write the type (tunnel or 1042) already at the appropriate
1759 *       offset in the 1st buffer
1760 *6:     Build the encapsualtion enveloppe in the free space at the end of the 1st buffer
1761 *       - Copy DA/SA fields from the 2nd buffer
1762 *   - Calculate total length of the message (snap-header + type-field + the length of all buffer fragments
1763 *     associated with the 802.3 frame (i.e all descriptors except the first), but not the DestinationAddress,
1764 *     SourceAddress and lenght-field)
1765 *     Assert the message length
1766 *         Write length. Note that the message is in BE format, hence on LE platforms the length must be converted
1767 *         ;? THIS IS NOT WHAT CURRENTLY IS IMPLEMENTED
1768 *       - Write snap header. Note that the last byte of the snap header is NOT copied, that byte is already in
1769 *         place as result of the call to hcf_encap.
1770 *       Note that there are many ways to skin a cat. To express the offsets in the 1st buffer while writing
1771 *       the snap header, HFS_TYPE is choosen as a reference point to make it easier to grasp that the snap header
1772 *       and encapsualtion type are at least relative in the right.
1773 *8:     modify 1st descriptor to reflect moved part of the 802.3 header + Snap-header
1774 *       modify 2nd descriptor to skip the moved part of the 802.3 header (DA/SA
1775 *10: set each descriptor to 'DMA owned',  clear all other control bits.
1776 *       Set SOP bit on first descriptor. Set EOP bit on last descriptor.
1777 *12: Either append the current frame to an existing descriptor list or
1778 *14: create a list beginning with the current frame
1779 *16: remember the new end of the list
1780 *20: hand the frame over to the DMA engine
1781 ************************************************************************************************************/
1782 void
1783 hcf_dma_tx_put( IFBP ifbp, DESC_STRCT *descp, hcf_16 tx_cntl )
1784 {
1785 DESC_STRCT      *p = descp->next_desc_addr;
1786 int                     i;
1787
1788 #if HCF_ASSERT
1789         int x = ifbp->IFB_FWIdentity.comp_id == COMP_ID_FW_AP ? tx_cntl & ~HFS_TX_CNTL_PORT : tx_cntl;
1790         HCFASSERT( (x & ~HCF_TX_CNTL_MASK ) == 0, tx_cntl )
1791 #endif // HCF_ASSERT
1792         HCFLOGENTRY( HCF_TRACE_DMA_TX_PUT, 0xDA03 )
1793         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
1794         HCFASSERT_INT
1795         HCFASSERT( ( ifbp->IFB_CntlOpt & (USE_DMA|DMA_ENABLED) ) == (USE_DMA|DMA_ENABLED), ifbp->IFB_CntlOpt)
1796
1797         if ( descp->buf_addr ) {
1798                 *(hcf_16*)(descp->buf_addr + HFS_TX_CNTL) = tx_cntl;                                                                                    /*1*/
1799 #if (HCF_ENCAP) == HCF_ENC
1800                 HCFASSERT( descp->next_desc_addr, 0 )                                                                   //at least 2 descripors
1801                 HCFASSERT( descp->BUF_CNT == HFS_ADDR_DEST, descp->BUF_CNT )    //exact length required for 1st buffer
1802                 HCFASSERT( descp->BUF_SIZE >= HCF_DMA_TX_BUF1_SIZE, descp->BUF_SIZE )   //minimal storage for encapsulation
1803                 HCFASSERT( p->BUF_CNT >= 14, p->BUF_CNT );                                      //at least DA, SA and 'type' in 2nd buffer
1804
1805 #if (HCF_TYPE) & HCF_TYPE_CCX
1806                 /* if we are doing PPK +/- CMIC, or we are sending a DDP frame */
1807                 if ( ( ifbp->IFB_CKIPStat == HCF_ACT_CCX_ON ) ||
1808                          ( ( p->BUF_CNT >= 20 )          && ( ifbp->IFB_CKIPStat == HCF_ACT_CCX_OFF ) &&
1809                          ( p->buf_addr[12] == 0xAA ) && ( p->buf_addr[13] == 0xAA ) &&
1810                          ( p->buf_addr[14] == 0x03 ) && ( p->buf_addr[15] == 0x00 ) &&
1811                          ( p->buf_addr[16] == 0x40 ) && ( p->buf_addr[17] == 0x96 ) &&
1812                          ( p->buf_addr[18] == 0x00 ) && ( p->buf_addr[19] == 0x00 )))
1813                 {
1814                         /* copy the DA/SA to the first buffer */
1815                         for ( i = 0; i < HCF_DASA_SIZE; i++ ) {
1816                                 descp->buf_addr[i + HFS_ADDR_DEST] = p->buf_addr[i];
1817                         }
1818                         /* calculate the length of the second fragment only */
1819                         i = 0;
1820                         do { i += p->BUF_CNT; } while( p = p->next_desc_addr );
1821                         i -= HCF_DASA_SIZE ;
1822                         /* convert the length field to big endian, using the endian friendly macros */
1823                         i = CNV_SHORT_TO_BIG(i);                //!! this converts ONLY on LE platforms, how does that relate to the non-CCX code
1824                         *(hcf_16*)(&descp->buf_addr[HFS_LEN]) = (hcf_16)i;
1825                         descp->BUF_CNT = HFS_DAT;
1826                         // modify 2nd descriptor to skip the 'Da/Sa' fields
1827                         descp->next_desc_addr->buf_phys_addr += HCF_DASA_SIZE;
1828                         descp->next_desc_addr->BUF_CNT           -= HCF_DASA_SIZE;
1829                 }
1830                 else
1831 #endif // HCF_TYPE_CCX
1832                 {
1833                         descp->buf_addr[HFS_TYPE-1] = hcf_encap(&descp->next_desc_addr->buf_addr[HCF_DASA_SIZE]);               /*4*/
1834                         if ( descp->buf_addr[HFS_TYPE-1] != ENC_NONE ) {
1835                                 for ( i=0; i < HCF_DASA_SIZE; i++ ) {                                                                                                           /*6*/
1836                                         descp->buf_addr[i + HFS_ADDR_DEST] = descp->next_desc_addr->buf_addr[i];
1837                                 }
1838                                 i = sizeof(snap_header) + 2 - ( 2*6 + 2 );
1839                                 do { i += p->BUF_CNT; } while ( ( p = p->next_desc_addr ) != NULL );
1840                                 *(hcf_16*)(&descp->buf_addr[HFS_LEN]) = CNV_END_SHORT(i);       //!! this converts on ALL platforms, how does that relate to the CCX code
1841                                 for ( i=0; i < sizeof(snap_header) - 1; i++) {
1842                                         descp->buf_addr[HFS_TYPE - sizeof(snap_header) + i] = snap_header[i];
1843                                 }
1844                                 descp->BUF_CNT = HFS_TYPE;                                                                                                                                      /*8*/
1845                                 descp->next_desc_addr->buf_phys_addr    += HCF_DASA_SIZE;
1846                                 descp->next_desc_addr->BUF_CNT                  -= HCF_DASA_SIZE;
1847                         }
1848                 }
1849 #endif // HCF_ENC
1850     }
1851         put_frame_lst( ifbp, descp, DMA_TX );
1852         HCFLOGEXIT( HCF_TRACE_DMA_TX_PUT )
1853 } // hcf_dma_tx_put
1854
1855 #endif // HCF_DMA
1856
1857 #if (HCF_DL_ONLY) == 0
1858 /************************************************************************************************************
1859 *
1860 *.MODULE                hcf_8 hcf_encap( wci_bufp type )
1861 *.PURPOSE               test whether RFC1042 or Bridge-Tunnel encapsulation is needed.
1862 *
1863 *.ARGUMENTS
1864 *       type            (Far) pointer to the (Big Endian) Type/Length field in the message
1865 *
1866 *.RETURNS
1867 *       ENC_NONE                len/type is "len" ( (BIG_ENDIAN)type <= 1500 )
1868 *       ENC_TUNNEL              len/type is "type" and 0x80F3 or 0x8137
1869 *       ENC_1042                len/type is "type" but not 0x80F3 or 0x8137
1870 *
1871 *.CONDITIONS
1872 *       NIC Interrupts  d.c
1873 *
1874 *.DESCRIPTION
1875 * Type must point to the Len/Type field of the message, this is the 2-byte field immediately after the 6 byte
1876 * Destination Address and 6 byte Source Address.  The 2 successive bytes addressed by type are interpreted as
1877 * a Big Endian value.  If that value is less than or equal to 1500, the message is assumed to be in 802.3
1878 * format.  Otherwise the message is assumed to be in Ethernet-II format.  Depending on the value of Len/Typ,
1879 * Bridge Tunnel or RFC1042 encapsulation is needed.
1880 *
1881 *.DIAGRAM
1882 *
1883 *  1:   presume 802.3, hence preset return value at ENC_NONE
1884 *  2:   convert type from "network" Endian format to native Endian
1885 *  4:   the litmus test to distinguish type and len.
1886 *       The hard code "magic" value of 1500 is intentional and should NOT be replaced by a mnemonic because it is
1887 *       not related at all to the maximum frame size supported  by the Hermes.
1888 *  6:   check type against:
1889 *               0x80F3  //AppleTalk Address Resolution Protocol (AARP)
1890 *               0x8137  //IPX
1891 *       to determine the type of encapsulation
1892 *
1893 *.ENDDOC                                END DOCUMENTATION
1894 *
1895 ************************************************************************************************************/
1896 #if HCF_ENCAP   //i.e HCF_ENC or HCF_ENC_SUP
1897 #if ! ( (HCF_ENCAP) & HCF_ENC_SUP )
1898 HCF_STATIC
1899 #endif // HCF_ENCAP
1900 hcf_8
1901 hcf_encap( wci_bufp type )
1902 {
1903
1904 hcf_8   rc = ENC_NONE;                                                                                                                                                                  /* 1 */
1905 hcf_16  t = (hcf_16)(*type<<8) + *(type+1);                                                                                                                             /* 2 */
1906
1907         if ( t > 1500 ) {                                                                                                                                                                       /* 4 */
1908                 if ( t == 0x8137 || t == 0x80F3 ) {
1909                         rc = ENC_TUNNEL;                                                                                                                                                        /* 6 */
1910                 } else {
1911                         rc = ENC_1042;
1912                 }
1913         }
1914         return rc;
1915 } // hcf_encap
1916 #endif // HCF_ENCAP
1917 #endif // HCF_DL_ONLY
1918
1919
1920 /************************************************************************************************************
1921 *
1922 *.MODULE                int hcf_get_info( IFBP ifbp, LTVP ltvp )
1923 *.PURPOSE               Obtains transient and persistent configuration information from the Card and from the HCF.
1924 *
1925 *.ARGUMENTS
1926 *       ifbp            address of the Interface Block
1927 *       ltvp            address of LengthTypeValue structure specifying the "what" and the "how much" of the
1928 *                               information to be collected from the HCF or from the Hermes
1929 *
1930 *.RETURNS
1931 *       HCF_ERR_LEN                     The provided buffer was too small
1932 *       HCF_SUCCESS                     Success
1933 *!!     via cmd_exe ( type >= CFG_RID_FW_MIN )
1934 *       HCF_ERR_NO_NIC          NIC removed during retrieval
1935 *       HCF_ERR_TIME_OUT        Expected Hermes event did not occure in expected time
1936 *!!     via cmd_exe and setup_bap (type >= CFG_RID_FW_MIN )
1937 *       HCF_ERR_DEFUNCT_...     HCF is in defunct mode (bits 0x7F reflect cause)
1938 *
1939 *.DESCRIPTION
1940 * The T-field of the LTV-record (provided by the MSF in parameter ltvp) specifies the RID wanted. The RID
1941 * information identified by the T-field is copied into the V-field.
1942 * On entry, the L-field specifies the size of the buffer, also called the "Initial DataLength". The L-value
1943 * includes the size of the T-field, but not the size of the L-field itself.
1944 * On return, the L-field indicates the number of words actually contained by the Type and Value fields.
1945 * As the size of the Type field in the LTV-record is included in the "Initial DataLength" of the record, the
1946 * V-field can contain at most "Initial DataLength" - 1 words of data.
1947 * Copying stops if either the complete Information is copied or if the number of words indicated by the
1948 * "Initial DataLength" were copied.  The "Initial DataLength" acts as a safe guard against Configuration
1949 * Information blocks that have different sizes for different F/W versions, e.g. when later versions support
1950 * more tallies than earlier versions.
1951 * If the size of Value field of the RID exceeds the size of the "Initial DataLength" -1, as much data
1952 * as fits is copied, and an error status of HCF_ERR_LEN is returned.
1953 *
1954 * It is the responsibility of the MSF to detect card removal and re-insertion and not call the HCF when the
1955 * NIC is absent. The MSF cannot, however, timely detect a Card removal if the Card is removed while
1956 * hcf_get_info is in progress.  Therefore, the HCF performs its own check on Card presence after the read
1957 * operation of the NIC data.  If the Card is not present or removed during the execution of hcf_get_info,
1958 * HCF_ERR_NO_NIC is returned and the content of the Data Buffer is unpredictable. This check is not performed
1959 * in case of the "HCF embedded" pseudo RIDs like CFG_TALLIES.
1960 *
1961 * Assert fails if
1962 * - ifbp has a recognizable out-of-range value.
1963 * - reentrancy, may be  caused by calling hcf_functions without adequate protection
1964 *       against NIC interrupts or multi-threading.
1965 * - ltvp is a NULL pointer.
1966 * - length field of the LTV-record at entry is 0 or 1 or has an excessive value (i.e. exceeds HCF_MAX_LTV).
1967 * - type field of the LTV-record is invalid.
1968 *
1969 *.DIAGRAM
1970 *       Hcf_get_mb_info copies the contents of the oldest MailBox Info block in the MailBox to PC RAM. If len is
1971 *       less than the size of the MailBox Info block, only as much as fits in the PC RAM buffer is copied. After
1972 *       the copying the MailBox Read pointer is updated to point to the next MailBox Info block, hence the
1973 *       remainder of an "oversized" MailBox Info block is lost. The truncation of the MailBox Info block is NOT
1974 *       reflected in the return status. Note that hcf_get_info guarantees the length of the PC RAM buffer meets
1975 *       the minimum requirements of at least 2, so no PC RAM buffer overrun.
1976 *
1977 *       Calling hcf_get_mb_info when their is no MailBox Info block available or when there is no MailBox at all,
1978 *       results in a "NULL" MailBox Info block.
1979 *
1980 *12:    see NOTICE
1981 *17: The return status of cmd_wait and the first hcfio_in_string can be ignored, because when one fails, the
1982 *       other fails via the IFB_DefunctStat mechanism
1983 *20: "HCFASSERT( rc == HCF_SUCCESS, rc )" is not suitable because this will always trigger as side effect of
1984 *       the HCFASSERT in hcf_put_info which calls hcf_get_info to figure out whether the RID exists at all.
1985
1986 *.NOTICE
1987 *
1988 *       "HCF embedded" pseudo RIDs:
1989 *       CFG_MB_INFO, CFG_TALLIES, CFG_DRV_IDENTITY, CFG_DRV_SUP_RANGE, CFG_DRV_ACT_RANGES_PRI,
1990 *       CFG_DRV_ACT_RANGES_STA, CFG_DRV_ACT_RANGES_HSI
1991 *       Note the HCF_ERR_LEN is NOT adequately set, when L >= 2 but less than needed
1992 *
1993 *       Remarks: Transfers operation information and transient and persistent configuration information from the
1994 *       Card and from the HCF to the MSF.
1995 *       The exact layout of the provided data structure depends on the action code. Copying stops if either the
1996 *       complete Configuration Information is copied or if the number of bytes indicated by len is copied.  Len
1997 *       acts as a safe guard against Configuration Information blocks which have different sizes for different
1998 *       Hermes versions, e.g. when later versions support more tallies than earlier versions. It is a conscious
1999 *       decision that unused parts of the PC RAM buffer are not cleared.
2000 *
2001 *       Remarks: The only error against which is protected is the "Read error" as result of Card removal. Only the
2002 *       last hcf_io_string need to be protected because if the first fails the second will fail as well. Checking
2003 *       for cmd_exe errors is supposed superfluous because problems in cmd_exe are already caught or will be
2004 *       caught by hcf_enable.
2005 *
2006 *       CFG_MB_INFO: copy the oldest MailBox Info Block or the "null" block if none available.
2007 *
2008 *       The mechanism to HCF_ASSERT on invalid typ-codes in the LTV record is based on the following strategy:
2009 *         - during the pseudo-asynchronous Hermes commands (diagnose, download) only CFG_MB_INFO is acceptable
2010 *         -     some codes (e.g. CFG_TALLIES) are explicitly handled by the HCF which implies that these codes
2011 *               are valid
2012 *         - all other codes in the range 0xFC00 through 0xFFFF are passed to the Hermes.  The Hermes returns an
2013 *               LTV record with a zero value in the L-field for all Typ-codes it does not recognize. This is
2014 *               defined and intended behavior, so HCF_ASSERT does not catch on this phenomena.
2015 *         -     all remaining codes are invalid and cause an ASSERT.
2016 *
2017 *.CONDITIONS
2018 * In case of USB, HCF_MAX_MSG ;?USED;? to limit the amount of data that can be retrieved via hcf_get_info.
2019 *
2020 *
2021 *.ENDDOC                                END DOCUMENTATION
2022 *
2023 ************************************************************************************************************/
2024 int
2025 hcf_get_info( IFBP ifbp, LTVP ltvp )
2026 {
2027
2028 int                     rc = HCF_SUCCESS;
2029 hcf_16          len = ltvp->len;
2030 hcf_16          type = ltvp->typ;
2031 wci_recordp     p = &ltvp->len;         //destination word pointer (in LTV record)
2032 hcf_16          *q = NULL;                              /* source word pointer  Note!! DOS COM can't cope with FAR
2033                                                                          * as a consequence MailBox must be near which is usually true anyway
2034                                                                          */
2035 int                     i;
2036
2037         HCFLOGENTRY( HCF_TRACE_GET_INFO, ltvp->typ )
2038         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
2039         HCFASSERT_INT
2040         HCFASSERT( ltvp, 0 )
2041         HCFASSERT( 1 < ltvp->len && ltvp->len <= HCF_MAX_LTV + 1, MERGE_2( ltvp->typ, ltvp->len ) )
2042
2043         ltvp->len = 0;                                                          //default to: No Info Available
2044 #if defined MSF_COMPONENT_ID || (HCF_EXT) & HCF_EXT_MB //filter out all specials
2045         for ( i = 0; ( q = xxxx[i] ) != NULL && q[1] != type; i++ ) /*NOP*/;
2046 #endif // MSF_COMPONENT_ID / HCF_EXT_MB
2047 #if HCF_TALLIES
2048         if ( type == CFG_TALLIES ) {                                                                                                    /*3*/
2049                 (void)hcf_action( ifbp, HCF_ACT_TALLIES );
2050                 q = (hcf_16*)&ifbp->IFB_TallyLen;
2051         }
2052 #endif // HCF_TALLIES
2053 #if (HCF_EXT) & HCF_EXT_MB
2054         if ( type == CFG_MB_INFO ) {
2055                 if ( ifbp->IFB_MBInfoLen ) {
2056                         if ( ifbp->IFB_MBp[ifbp->IFB_MBRp] == 0xFFFF ) {
2057                                 ifbp->IFB_MBRp = 0; //;?Probably superfluous
2058                         }
2059                         q = &ifbp->IFB_MBp[ifbp->IFB_MBRp];
2060                         ifbp->IFB_MBRp += *q + 1;       //update read pointer
2061                         if ( ifbp->IFB_MBp[ifbp->IFB_MBRp] == 0xFFFF ) {
2062                                 ifbp->IFB_MBRp = 0;
2063                         }
2064                         ifbp->IFB_MBInfoLen = ifbp->IFB_MBp[ifbp->IFB_MBRp];
2065                 }
2066         }
2067 #endif // HCF_EXT_MB
2068         if ( q != NULL ) {                                              //a special or CFG_TALLIES or CFG_MB_INFO
2069                 i = min( len, *q ) + 1;                         //total size of destination (including T-field)
2070                 while ( i-- ) {
2071                         *p++ = *q;
2072 #if (HCF_TALLIES) & HCF_TALLIES_RESET
2073                         if ( q > &ifbp->IFB_TallyTyp && type == CFG_TALLIES ) {
2074                                 *q = 0;
2075                         }
2076 #endif // HCF_TALLIES_RESET
2077                         q++;
2078                 }
2079         } else {                                                                // not a special nor CFG_TALLIES nor CFG_MB_INFO
2080                 if ( type == CFG_CNTL_OPT ) {                                                                           //read back effective options
2081                         ltvp->len = 2;
2082                         ltvp->val[0] = ifbp->IFB_CntlOpt;
2083 #if (HCF_EXT) & HCF_EXT_NIC_ACCESS
2084                 } else if ( type == CFG_PROD_DATA ) {  //only needed for some test tool on top of H-II NDIS driver
2085 hcf_io          io_port;
2086 wci_bufp        pt;                                     //pointer with the "right" type, just to help ease writing macros with embedded assembly
2087                         OPW( HREG_AUX_PAGE, (hcf_16)(PLUG_DATA_OFFSET >> 7) );
2088                         OPW( HREG_AUX_OFFSET, (hcf_16)(PLUG_DATA_OFFSET & 0x7E) );
2089                         io_port = ifbp->IFB_IOBase + HREG_AUX_DATA;             //to prevent side effects of the MSF-defined macro
2090                         p = ltvp->val;                                  //destination char pointer (in LTV record)
2091                         i = len - 1;
2092                         if (i > 0 ) {
2093                                 pt = (wci_bufp)p;       //just to help ease writing macros with embedded assembly
2094                                 IN_PORT_STRING_8_16( io_port, pt, i ); //space used by T: -1
2095                         }
2096                 } else if ( type == CFG_CMD_HCF ) {
2097 #define P ((CFG_CMD_HCF_STRCT FAR *)ltvp)
2098                         HCFASSERT( P->cmd == CFG_CMD_HCF_REG_ACCESS, P->cmd )           //only Hermes register access supported
2099                         if ( P->cmd == CFG_CMD_HCF_REG_ACCESS ) {
2100                                 HCFASSERT( P->mode < ifbp->IFB_IOBase, P->mode )                //Check Register space
2101                                 ltvp->len = min( len, 4 );                                                              //RESTORE ltv length
2102                                 P->add_info = IPW( P->mode );
2103                         }
2104 #undef P
2105 #endif // HCF_EXT_NIC_ACCESS
2106 #if (HCF_ASSERT) & HCF_ASSERT_PRINTF
2107         } else if (type == CFG_FW_PRINTF) {
2108            rc = fw_printf(ifbp, (CFG_FW_PRINTF_STRCT*)ltvp);
2109 #endif // HCF_ASSERT_PRINTF
2110                 } else if ( type >= CFG_RID_FW_MIN ) {
2111 //;? by using HCMD_BUSY option when calling cmd_exe, using a get_frag with length 0 just to set up the
2112 //;? BAP and calling cmd_cmpl, you could merge the 2 Busy waits. Whether this really helps (and what
2113 //;? would be the optimal sequence in cmd_exe and get_frag) would have to be MEASURED
2114 /*17*/          if ( ( rc = cmd_exe( ifbp, HCMD_ACCESS, type ) ) == HCF_SUCCESS &&
2115                                  ( rc = setup_bap( ifbp, type, 0, IO_IN ) ) == HCF_SUCCESS ) {
2116                                 get_frag( ifbp, (wci_bufp)&ltvp->len, 2*len+2 BE_PAR(2) );
2117                                 if ( IPW( HREG_STAT ) == 0xFFFF ) {                                     //NIC removal test
2118                                         ltvp->len = 0;
2119                                         HCFASSERT( DO_ASSERT, type )
2120                                 }
2121                         }
2122 /*12*/  } else HCFASSERT( DO_ASSERT, type ) /*NOP*/; //NOP in case HCFASSERT is dummy
2123         }
2124         if ( len < ltvp->len ) {
2125                 ltvp->len = len;
2126                 if ( rc == HCF_SUCCESS ) {
2127                         rc = HCF_ERR_LEN;
2128                 }
2129         }
2130         HCFASSERT( rc == HCF_SUCCESS || ( rc == HCF_ERR_LEN && ifbp->IFB_AssertTrace & 1<<HCF_TRACE_PUT_INFO ),
2131                            MERGE_2( type, rc ) )                                                                                                                                /*20*/
2132         HCFLOGEXIT( HCF_TRACE_GET_INFO )
2133         return rc;
2134 } // hcf_get_info
2135
2136
2137 /************************************************************************************************************
2138 *
2139 *.MODULE                int hcf_put_info( IFBP ifbp, LTVP ltvp )
2140 *.PURPOSE               Transfers operation and configuration information to the Card and to the HCF.
2141 *
2142 *.ARGUMENTS
2143 *       ifbp            address of the Interface Block
2144 *       ltvp            specifies the RID (as defined by Hermes I/F) or pseudo-RID (as defined by WCI)
2145 *
2146 *.RETURNS
2147 *       HCF_SUCCESS
2148 *!!     via cmd_exe
2149 *       HCF_ERR_NO_NIC          NIC removed during data retrieval
2150 *       HCF_ERR_TIME_OUT        Expected F/W event did not occur in time
2151 *       HCF_ERR_DEFUNCT_...
2152 *!!     via download                            CFG_DLNV_START <= type <= CFG_DL_STOP
2153 *!!     via put_info                            CFG_RID_CFG_MIN <= type <= CFG_RID_CFG_MAX
2154 *!!     via put_frag
2155 *
2156 *.DESCRIPTION
2157 * The L-field of the LTV-record (provided by the MSF in parameter ltvp) specifies the size of the buffer.
2158 * The L-value includes the size of the T-field, but not the size of the L-field.
2159 * The T- field specifies the RID placed in the V-field by the MSF.
2160 *
2161 * Not all CFG-codes can be used for hcf_put_info.  The following CFG-codes are valid for hcf_put_info:
2162 * o One of the CFG-codes in the group "Network Parameters, Static Configuration Entities"
2163 * Changes made by hcf_put_info to CFG_codes in this group will not affect the F/W
2164 * and HCF behavior until hcf_cntl_port( HCF_PORT_ENABLE) is called.
2165 * o One of the CFG-codes in the group "Network Parameters, Dynamic Configuration Entities"
2166 * Changes made by hcf_put_info to CFG_codes will affect the F/W and HCF behavior immediately.
2167 * o CFG_PROG.
2168 * This code is used to initiate and terminate the process to download data either to
2169 * volatile or to non-volatile RAM on the NIC as well as for the actual download.
2170 * o CFG-codes related to the HCF behavior.
2171 * The related CFG-codes are:
2172 *  - CFG_REG_MB
2173 *  - CFG_REG_ASSERT_RTNP
2174 *  - CFG_REG_INFO_LOG
2175 *  - CFG_CMD_NIC
2176 *  - CFG_CMD_DONGLE
2177 *  - CFG_CMD_HCF
2178 *  - CFG_NOTIFY
2179 *
2180 * All LTV-records "unknown" to the HCF are forwarded to the F/W.
2181 *
2182 * Assert fails if
2183 * - ifbp has a recognizable out-of-range value.
2184 * - ltvp is a NULL pointer.
2185 * - hcf_put_info was called without prior call to hcf_connect
2186 * - type field of the LTV-record is invalid, i.e. neither HCF nor F/W can handle the value.
2187 * - length field of the LTV-record at entry is less than 1 or exceeds MAX_LTV_SIZE.
2188 * - registering a MailBox with size less than 60 or a non-aligned buffer address is used.
2189 * - reentrancy, may be  caused by calling hcf_functions without adequate protection against
2190 *       NIC interrupts or multi-threading.
2191 *
2192 *.DIAGRAM
2193 *
2194 *.NOTICE
2195 *       Remarks:  In case of Hermes Configuration LTVs, the codes for the type are "cleverly" chosen to be
2196 *       identical to the RID. Hermes Configuration information is copied from the provided data structure into the
2197 *       Card.
2198 *       In case of HCF Configuration LTVs, the type values are chosen in a range which does not overlap the
2199 *       RID-range.
2200 *
2201 *20:
2202 *
2203 *.ENDDOC                                END DOCUMENTATION
2204 *
2205 ************************************************************************************************************/
2206
2207 int
2208 hcf_put_info( IFBP ifbp, LTVP ltvp )
2209 {
2210 int rc = HCF_SUCCESS;
2211
2212         HCFLOGENTRY( HCF_TRACE_PUT_INFO, ltvp->typ )
2213         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
2214         HCFASSERT_INT
2215         HCFASSERT( ltvp, 0 )
2216         HCFASSERT( 1 < ltvp->len && ltvp->len <= HCF_MAX_LTV + 1, ltvp->len )
2217
2218                                                                                         //all codes between 0xFA00 and 0xFCFF are passed to Hermes
2219 #if (HCF_TYPE) & HCF_TYPE_WPA
2220  {      hcf_16 i;
2221         hcf_32 FAR * key_p;
2222
2223         if ( ltvp->typ == CFG_ADD_TKIP_DEFAULT_KEY || ltvp->typ == CFG_ADD_TKIP_MAPPED_KEY ) {
2224                 key_p = (hcf_32*)((CFG_ADD_TKIP_MAPPED_KEY_STRCT FAR *)ltvp)->tx_mic_key;
2225                 i = TX_KEY;             //i.e. TxKeyIndicator == 1, KeyID == 0
2226                 if ( ltvp->typ == CFG_ADD_TKIP_DEFAULT_KEY ) {
2227                         key_p = (hcf_32*)((CFG_ADD_TKIP_DEFAULT_KEY_STRCT FAR *)ltvp)->tx_mic_key;
2228                         i = CNV_LITTLE_TO_SHORT(((CFG_ADD_TKIP_DEFAULT_KEY_STRCT FAR *)ltvp)->tkip_key_id_info);
2229                 }
2230                 if ( i & TX_KEY ) {     /* TxKeyIndicator == 1
2231                                                            (either really set by MSF in case of DEFAULT or faked by HCF in case of MAPPED ) */
2232                         ifbp->IFB_MICTxCntl = (hcf_16)( HFS_TX_CNTL_MIC | (i & KEY_ID )<<8 );
2233                         ifbp->IFB_MICTxKey[0] = CNV_LONGP_TO_LITTLE( key_p );
2234                         ifbp->IFB_MICTxKey[1] = CNV_LONGP_TO_LITTLE( (key_p+1) );
2235                 }
2236                 i = ( i & KEY_ID ) * 2;
2237                 ifbp->IFB_MICRxKey[i]   = CNV_LONGP_TO_LITTLE( (key_p+2) );
2238                 ifbp->IFB_MICRxKey[i+1] = CNV_LONGP_TO_LITTLE( (key_p+3) );
2239         }
2240 #define P ((CFG_REMOVE_TKIP_DEFAULT_KEY_STRCT FAR *)ltvp)
2241         if ( ( ltvp->typ == CFG_REMOVE_TKIP_MAPPED_KEY )        ||
2242                  ( ltvp->typ == CFG_REMOVE_TKIP_DEFAULT_KEY &&
2243                    ( (ifbp->IFB_MICTxCntl >> 8) & KEY_ID ) == CNV_SHORT_TO_LITTLE(P->tkip_key_id )
2244                  )
2245                 ) { ifbp->IFB_MICTxCntl = 0; }          //disable MIC-engine
2246 #undef P
2247  }
2248 #endif // HCF_TYPE_WPA
2249
2250         if ( ltvp->typ == CFG_PROG ) {
2251                 rc = download( ifbp, (CFG_PROG_STRCT FAR *)ltvp );
2252         } else switch (ltvp->typ) {
2253 #if (HCF_ASSERT) & HCF_ASSERT_RT_MSF_RTN
2254           case CFG_REG_ASSERT_RTNP:                                                                                     //Register MSF Routines
2255 #define P ((CFG_REG_ASSERT_RTNP_STRCT FAR *)ltvp)
2256                 ifbp->IFB_AssertRtn = P->rtnp;
2257 //              ifbp->IFB_AssertLvl = P->lvl;           //TODO not yet supported so default is set in hcf_connect
2258                 HCFASSERT( DO_ASSERT, MERGE_2( HCF_ASSERT, 0xCAF1 ) )   //just to proof that the complete assert machinery is working
2259 #undef P
2260                 break;
2261 #endif // HCF_ASSERT_RT_MSF_RTN
2262 #if (HCF_EXT) & HCF_EXT_INFO_LOG
2263           case CFG_REG_INFO_LOG:                                                                                        //Register Log filter
2264                 ifbp->IFB_RIDLogp = ((CFG_RID_LOG_STRCT FAR*)ltvp)->recordp;
2265                 break;
2266 #endif // HCF_EXT_INFO_LOG
2267           case CFG_CNTL_OPT:                                                                                            //overrule option
2268                 HCFASSERT( ( ltvp->val[0] & ~(USE_DMA | USE_16BIT) ) == 0, ltvp->val[0] )
2269                 if ( ( ltvp->val[0] & USE_DMA ) == 0 ) ifbp->IFB_CntlOpt &= ~USE_DMA;
2270                 ifbp->IFB_CntlOpt |=  ltvp->val[0] & USE_16BIT;
2271                 break;
2272 #if (HCF_EXT) & HCF_EXT_MB
2273           case CFG_REG_MB:                                                                                                      //Register MailBox
2274 #define P ((CFG_REG_MB_STRCT FAR *)ltvp)
2275                 HCFASSERT( ( (hcf_32)P->mb_addr & 0x0001 ) == 0, (hcf_32)P->mb_addr )
2276                 HCFASSERT( (P)->mb_size >= 60, (P)->mb_size )
2277                 ifbp->IFB_MBp = P->mb_addr;
2278                 /* if no MB present, size must be 0 for ;?the old;? put_info_mb to work correctly */
2279                 ifbp->IFB_MBSize = ifbp->IFB_MBp == NULL ? 0 : P->mb_size;
2280                 ifbp->IFB_MBWp = ifbp->IFB_MBRp = 0;
2281                 ifbp->IFB_MBp[0] = 0;                                                                                   //flag the MailBox as empty
2282                 ifbp->IFB_MBInfoLen = 0;
2283                 HCFASSERT( ifbp->IFB_MBSize >= 60 || ifbp->IFB_MBp == NULL, ifbp->IFB_MBSize )
2284 #undef P
2285                 break;
2286           case CFG_MB_INFO:                                                                                                     //store MailBoxInfoBlock
2287                 rc = put_info_mb( ifbp, (CFG_MB_INFO_STRCT FAR *)ltvp );
2288                 break;
2289 #endif // HCF_EXT_MB
2290
2291 #if (HCF_EXT) & HCF_EXT_NIC_ACCESS
2292           case CFG_CMD_NIC:
2293 #define P ((CFG_CMD_NIC_STRCT FAR *)ltvp)
2294                 OPW( HREG_PARAM_2, P->parm2 );
2295                 OPW( HREG_PARAM_1, P->parm1 );
2296                 rc = cmd_exe( ifbp, P->cmd, P->parm0 );
2297                 P->hcf_stat = (hcf_16)rc;
2298                 P->stat = IPW( HREG_STAT );
2299                 P->resp0 = IPW( HREG_RESP_0 );
2300                 P->resp1 = IPW( HREG_RESP_1 );
2301                 P->resp2 = IPW( HREG_RESP_2 );
2302                 P->ifb_err_cmd = ifbp->IFB_ErrCmd;
2303                 P->ifb_err_qualifier = ifbp->IFB_ErrQualifier;
2304 #undef P
2305                 break;
2306           case CFG_CMD_HCF:
2307 #define P ((CFG_CMD_HCF_STRCT FAR *)ltvp)
2308                 HCFASSERT( P->cmd == CFG_CMD_HCF_REG_ACCESS, P->cmd )           //only Hermes register access supported
2309                 if ( P->cmd == CFG_CMD_HCF_REG_ACCESS ) {
2310                         HCFASSERT( P->mode < ifbp->IFB_IOBase, P->mode )                //Check Register space
2311                         OPW( P->mode, P->add_info);
2312                 }
2313 #undef P
2314                 break;
2315 #endif // HCF_EXT_NIC_ACCESS
2316
2317 #if (HCF_ASSERT) & HCF_ASSERT_PRINTF
2318       case CFG_FW_PRINTF_BUFFER_LOCATION:
2319         ifbp->IFB_FwPfBuff = *(CFG_FW_PRINTF_BUFFER_LOCATION_STRCT*)ltvp;
2320         break;
2321 #endif // HCF_ASSERT_PRINTF
2322
2323           default:                                              //pass everything unknown above the "FID" range to the Hermes or Dongle
2324                 rc = put_info( ifbp, ltvp );
2325         }
2326         //DO NOT !!! HCFASSERT( rc == HCF_SUCCESS, rc )                                                                                         /* 20 */
2327         HCFLOGEXIT( HCF_TRACE_PUT_INFO )
2328         return rc;
2329 } // hcf_put_info
2330
2331
2332 #if (HCF_DL_ONLY) == 0
2333 /************************************************************************************************************
2334 *
2335 *.MODULE                int hcf_rcv_msg( IFBP ifbp, DESC_STRCT *descp, unsigned int offset )
2336 *.PURPOSE               All: decapsulate a message.
2337 *                               pre-HermesII.5: verify MIC.
2338 *                               non-USB, non-DMA mode: Transfer a message from the NIC to the Host and acknowledge reception.
2339 *                               USB: Transform a message from proprietary USB format to 802.3 format
2340 *
2341 *.ARGUMENTS
2342 *       ifbp            address of the Interface Block
2343 *       descp           Pointer to the Descriptor List location.
2344 *       offset          USB: not used
2345 *                               non-USB: specifies the beginning of the data to be obtained (0 corresponds with DestAddr field
2346 *                               of frame).
2347 *
2348 *.RETURNS
2349 *       HCF_SUCCESS                     No SSN error ( or HCF_ERR_MIC already reported by hcf_service_nic)
2350 *       HCF_ERR_MIC                     message contains an erroneous MIC ( HCF_SUCCESS is reported if HCF_ERR_MIC is already
2351 *                                               reported by hcf_service_nic)
2352 *       HCF_ERR_NO_NIC          NIC removed during data retrieval
2353 *       HCF_ERR_DEFUNCT...
2354 *
2355 *.DESCRIPTION
2356 * The Receive Message Function can be executed by the MSF to obtain the Data Info fields of the message that
2357 * is reported to be available by the Service NIC Function.
2358 *
2359 * The Receive Message Function copies the message data available in the Card memory into a buffer structure
2360 * provided by the MSF.
2361 * Only data of the message indicated by the Service NIC Function can be obtained.
2362 * Execution of the Service NIC function may result in the availability of a new message, but it definitely
2363 * makes the message reported by the preceding Service NIC function, unavailable.
2364 *
2365 * in non-USB/non-DMA mode, hcf_rcv_msg starts the copy process at the (non-negative) offset requested by the
2366 * parameter offset, relative to HFS_ADDR_DEST, e.g offset 0 starts copying from the Destination Address, the
2367 * very begin of the 802.3 frame message. Offset must either lay within the part of the 802.3 frame as stored
2368 * by hcf_service_nic in the lookahead buffer or be just behind it, i.e. the first byte not yet read.
2369 * When offset is within lookahead, data is copied from lookahead.
2370 * When offset is beyond lookahead, data is read directly from RxFS in NIC with disregard of the actual value
2371 * of offset
2372 *
2373 *.NOTICE:
2374 * o at entry: look ahead buffer as passed with hcf_service_nic is still accessible and unchanged
2375 * o at exit: Receive Frame in NIC memory is released
2376 *
2377 * Description:
2378 * Starting at the byte indicated by the Offset value, the bytes are copied from the Data Info
2379 * Part of the current Receive Frame Structure to the Host memory data buffer structure
2380 * identified by descp.
2381 * The maximum value for Offset is the number of characters of the 802.3 frame read into the
2382 * look ahead buffer by hcf_service_nic (i.e. the look ahead buffer size minus
2383 * Control and 802.11 fields)
2384 * If Offset is less than the maximum value, copying starts from the look ahead buffer till the
2385 * end of that buffer is reached
2386 * Then (or if the maximum value is specified for Offset), the
2387 * message is directly copied from NIC memory to Host memory.
2388 * If an invalid (i.e. too large) offset is specified, an assert catches but the buffer contents are
2389 * undefined.
2390 * Copying stops if either:
2391 * o the end of the 802.3 frame is reached
2392 * o the Descriptor with a NULL pointer in the next_desc_addr field is reached
2393 *
2394 * When the copying stops, the receiver is ack'ed, thus freeing the NIC memory where the frame is stored
2395 * As a consequence, hcf_rcv_msg can only be called once for any particular Rx frame.
2396 *
2397 * For the time being (PCI Bus mastering not yet supported), only the following fields of each
2398 * of the descriptors in the descriptor list must be set by the MSF:
2399 * o buf_cntl.buf_dim[1]
2400 * o *next_desc_addr
2401 * o *buf_addr
2402 * At return from hcf_rcv_msg, the field buf_cntl.buf_dim[0] of the used Descriptors reflects
2403 * the number of bytes in the buffer corresponding with the Descriptor.
2404 * On the last used Descriptor, buf_cntl.buf_dim[0] is less or equal to buf_cntl.buf_dim[1].
2405 * On all preceding Descriptors buf_cntl.buf_dim[0] is equal to buf_cntl.buf_dim[1].
2406 * On all succeeding (unused) Descriptors, buf_cntl.buf_dim[0] is zero.
2407 * Note: this I/F is based on the assumptions how the I/F needed for PCI Bus mastering will
2408 * be, so it may change.
2409 *
2410 * The most likely handling of HCF_ERR_NO_NIC by the MSF is to drop the already copied
2411 * data as elegantly as possible under the constraints and requirements posed by the (N)OS.
2412 * If no received Frame Structure is pending, "Success" rather than "Read error" is returned.
2413 * This error constitutes a logic flaw in the MSF
2414 * The HCF can only catch a minority of this
2415 * type of errors
2416 * Based on consistency ideas, the HCF catches none of these errors.
2417 *
2418 * Assert fails if
2419 * - ifbp has a recognizable out-of-range value
2420 * - there is no unacknowledged Rx-message available
2421 * - offset is out of range (outside look ahead buffer)
2422 * - descp is a NULL pointer
2423 * - any of the descriptors is not double word aligned
2424 * - reentrancy, may be  caused by calling hcf_functions without adequate protection
2425 *       against NIC interrupts or multi-threading.
2426 * - Interrupts are enabled.
2427 *
2428 *.DIAGRAM
2429 *
2430 *.NOTICE
2431 * - by using unsigned int as type for offset, no need to worry about negative offsets
2432 * - Asserting on being enabled/present is superfluous, since a non-zero IFB_lal implies that hcf_service_nic
2433 *   was called and detected a Rx-message. A zero IFB_lal will set the BUF_CNT field of at least the first
2434 *   descriptor to zero.
2435 *
2436 *.ENDDOC                                END DOCUMENTATION
2437 *
2438 ************************************************************************************************************/
2439 int
2440 hcf_rcv_msg( IFBP ifbp, DESC_STRCT *descp, unsigned int offset )
2441 {
2442 int                     rc = HCF_SUCCESS;
2443 wci_bufp        cp;                                                                             //char oriented working pointer
2444 hcf_16          i;
2445 int                     tot_len = ifbp->IFB_RxLen - offset;             //total length
2446 wci_bufp        lap = ifbp->IFB_lap + offset;                   //start address in LookAhead Buffer
2447 hcf_16          lal = ifbp->IFB_lal - offset;                   //available data within LookAhead Buffer
2448 hcf_16          j;
2449
2450         HCFLOGENTRY( HCF_TRACE_RCV_MSG, offset )
2451         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
2452         HCFASSERT_INT
2453         HCFASSERT( descp, HCF_TRACE_RCV_MSG )
2454         HCFASSERT( ifbp->IFB_RxLen, HCF_TRACE_RCV_MSG )
2455         HCFASSERT( ifbp->IFB_RxLen >= offset, MERGE_2( offset, ifbp->IFB_RxLen ) )
2456         HCFASSERT( ifbp->IFB_lal >= offset, offset )
2457         HCFASSERT( (ifbp->IFB_CntlOpt & USE_DMA) == 0, 0xDADA )
2458
2459         if ( tot_len < 0 ) {
2460                 lal = 0; tot_len = 0;                           //suppress all copying activity in the do--while loop
2461         }
2462         do {                                                                    //loop over all available fragments
2463                 // obnoxious hcf.c(1480) : warning C4769: conversion of near pointer to long integer
2464                 HCFASSERT( ((hcf_32)descp & 3 ) == 0, (hcf_32)descp )
2465                 cp = descp->buf_addr;
2466                 j = min( (hcf_16)tot_len, descp->BUF_SIZE );    //minimum of "what's` available" and fragment size
2467                 descp->BUF_CNT = j;
2468                 tot_len -= j;                                           //adjust length still to go
2469                 if ( lal ) {                                            //if lookahead Buffer not yet completely copied
2470                         i = min( lal, j );                              //minimum of "what's available" in LookAhead and fragment size
2471                         lal -= i;                                               //adjust length still available in LookAhead
2472                         j -= i;                                                 //adjust length still available in current fragment
2473                         /*;? while loop could be improved by moving words but that is complicated on platforms with
2474                          * alignment requirements*/
2475                         while ( i-- ) *cp++ = *lap++;
2476                 }
2477                 if ( j ) {      //if LookAhead Buffer exhausted but still space in fragment, copy directly from NIC RAM
2478                         get_frag( ifbp, cp, j BE_PAR(0) );
2479                         CALC_RX_MIC( cp, j );
2480                 }
2481         } while ( ( descp = descp->next_desc_addr ) != NULL );
2482 #if (HCF_TYPE) & HCF_TYPE_WPA
2483         if ( ifbp->IFB_RxFID ) {
2484                 rc = check_mic( ifbp );                         //prevents MIC error report if hcf_service_nic already consumed all
2485         }
2486 #endif // HCF_TYPE_WPA
2487         (void)hcf_action( ifbp, HCF_ACT_RX_ACK );               //only 1 shot to get the data, so free the resources in the NIC
2488         HCFASSERT( rc == HCF_SUCCESS, rc )
2489         HCFLOGEXIT( HCF_TRACE_RCV_MSG )
2490         return rc;
2491 } // hcf_rcv_msg
2492 #endif // HCF_DL_ONLY
2493
2494
2495 #if (HCF_DL_ONLY) == 0
2496 /************************************************************************************************************
2497 *
2498 *.MODULE                int hcf_send_msg( IFBP ifbp, DESC_STRCT *descp, hcf_16 tx_cntl )
2499 *.PURPOSE               Encapsulate a message and append padding and MIC.
2500 *                               non-USB: Transfers the resulting message from Host to NIC and initiates transmission.
2501 *                               USB: Transfer resulting message into a flat buffer.
2502 *
2503 *.ARGUMENTS
2504 *       ifbp            address of the Interface Block
2505 *       descp           pointer to the DescriptorList or NULL
2506 *       tx_cntl         indicates MAC-port and (Hermes) options
2507 *                                       HFS_TX_CNTL_SPECTRALINK
2508 *                                       HFS_TX_CNTL_PRIO
2509 *                                       HFS_TX_CNTL_TX_OK
2510 *                                       HFS_TX_CNTL_TX_EX
2511 *                                       HFS_TX_CNTL_TX_DELAY
2512 *                                       HFS_TX_CNTL_TX_CONT
2513 *                                       HCF_PORT_0                               MAC Port 0 (default)
2514 *                                       HCF_PORT_1 (AP only)     MAC Port 1
2515 *                                       HCF_PORT_2 (AP only)     MAC Port 2
2516 *                                       HCF_PORT_3 (AP only)     MAC Port 3
2517 *                                       HCF_PORT_4 (AP only)     MAC Port 4
2518 *                                       HCF_PORT_5 (AP only)     MAC Port 5
2519 *                                       HCF_PORT_6 (AP only)     MAC Port 6
2520 *
2521 *.RETURNS
2522 *       HCF_SUCCESS
2523 *       HCF_ERR_DEFUNCT_..
2524 *       HCF_ERR_TIME_OUT
2525 *
2526 *.DESCRIPTION:
2527 * The Send Message Function embodies 2 functions:
2528 * o transfers a message (including MAC header) from the provided buffer structure in Host memory to the Transmit
2529 * Frame Structure (TxFS) in NIC memory.
2530 * o Issue a send command to the F/W to actually transmit the contents of the TxFS.
2531 *
2532 * Control is based on the Resource Indicator IFB_RscInd.
2533 * The Resource Indicator is maintained by the HCF and should only be interpreted but not changed by the MSF.
2534 * The MSF must check IFB_RscInd to be non-zero before executing the call to the Send Message Function.
2535 * When no resources are available, the MSF must handle the queuing of the Transmit frame and check the
2536 * Resource Indicator periodically after calling hcf_service_nic.
2537 *
2538 * The Send Message Functions transfers a message to NIC memory when it is called with a non-NULL descp.
2539 * Before the Send Message Function is invoked this way, the Resource Indicator (IFB_RscInd) must be checked.
2540 * If the Resource is not available, Send Message Function execution must be postponed until after processing of
2541 * a next hcf_service_nic it appears that the Resource has become available.
2542 * The message is copied from the buffer structure identified by descp to the NIC.
2543 * Copying stops if a NULL pointer in the next_desc_addr field is reached.
2544 * Hcf_send_msg does not check for transmit buffer overflow, because the F/W does this protection.
2545 * In case of a transmit buffer overflow, the surplus which does not fit in the buffer is simply dropped.
2546 *
2547 * The Send Message Function activates the F/W to actually send the message to the medium when the
2548 * HFS_TX_CNTL_TX_DELAY bit of the tx_cntl parameter is not set.
2549 * If the descp parameter of the current call is non-NULL, the message as represented by descp is send.
2550 * If the descp parameter of the current call is NULL, and if the preceding call of the Send Message Function had
2551 * a non-NULL descp and the preceding call had the HFS_TX_CNTL_TX_DELAY bit of tx_cntl set, then the message as
2552 * represented by the descp of the preceding call is send.
2553 *
2554 * Hcf_send_msg supports encapsulation (see HCF_ENCAP) of Ethernet-II frames.
2555 * An Ethernet-II frame is transferred to the Transmit Frame structure as an 802.3 frame.
2556 * Hcf_send_msg distinguishes between an 802.3 and an Ethernet-II frame by looking at the data length/type field
2557 * of the frame. If this field contains a value larger than 1514, the frame is considered to be an Ethernet-II
2558 * frame, otherwise it is treated as an 802.3 frame.
2559 * To ease implementation of the HCF, this type/type field must be located in the first descriptor structure,
2560 * i.e. the 1st fragment must have a size of at least 14 (to contain DestAddr, SrcAddr and Len/Type field).
2561 * An Ethernet-II frame is encapsulated by inserting a SNAP header between the addressing information and the
2562 * type field.  This insertion is transparent for the MSF.
2563 * The HCF contains a fixed table that stores a number of types. If the value specified by the type/type field
2564 * occurs in this table, Bridge Tunnel Encapsulation is used, otherwise RFC1042 encapsulation is used.
2565 * Bridge Tunnel uses    AA AA 03 00 00 F8 as SNAP header,
2566 * RFC1042 uses  AA AA 03 00 00 00 as SNAP header.
2567 * The table currently contains:
2568 * 0 0x80F3      AppleTalk Address Resolution Protocol (AARP)
2569 * 0 0x8137      IPX
2570 *
2571 * The algorithm to distinguish between 802.3 and Ethernet-II frames limits the maximum length for frames of
2572 * 802.3 frames to 1514 bytes.
2573 * Encapsulation can be suppressed by means of the system constant HCF_ENCAP, e.g. to support proprietary
2574 * protocols with 802.3 like frames with a size larger than 1514 bytes.
2575 *
2576 * In case the HCF encapsulates the frame, the number of bytes that is actually transmitted is determined by the
2577 * cumulative value of the buf_cntl.buf_dim[0] fields.
2578 * In case the HCF does not encapsulate the frame, the number of bytes that is actually transmitted is not
2579 * determined by the cumulative value of the buf_cntl.buf_dim[DESC_CNTL_CNT] fields of the desc_strct's but by
2580 * the Length field of the 802.3 frame.
2581 * If there is a conflict between the cumulative value of the buf_cntl.buf_dim[0] fields and the
2582 * 802.3 Length field the 802.3 Length field determines the number of bytes actually transmitted by the NIC while
2583 * the cumulative value of the buf_cntl.buf_dim[0] fields determines the position of the MIC, hence a mismatch
2584 * will result in MIC errors on the Receiving side.
2585 * Currently this problem is flagged on the Transmit side by an Assert.
2586 * The following fields of each of the descriptors in the descriptor list must be set by the MSF:
2587 * o buf_cntl.buf_dim[0]
2588 * o *next_desc_addr
2589 * o *buf_addr
2590 *
2591 * All bits of the tx_cntl parameter except HFS_TX_CNTL_TX_DELAY and the HCF_PORT# bits are passed to the F/W via
2592 * the HFS_TX_CNTL field of the TxFS.
2593 *
2594 * Note that hcf_send_msg does not detect NIC absence.  The MSF is supposed to have its own -platform dependent-
2595 * way to recognize card removal/insertion.
2596 * The total system must be robust against card removal and there is no principal difference between card removal
2597 * just after hcf_send_msg returns but before the actual transmission took place or sometime earlier.
2598 *
2599 * Assert fails if
2600 * - ifbp has a recognizable out-of-range value
2601 * - descp is a NULL pointer
2602 * - no resources for PIF available.
2603 * - Interrupts are enabled.
2604 * - reentrancy, may be  caused by calling hcf_functions without adequate protection
2605 *       against NIC interrupts or multi-threading.
2606 *
2607 *.DIAGRAM
2608 *4:     for the normal case (i.e. no HFS_TX_CNTL_TX_DELAY option active), a fid is acquired via the
2609 *       routine get_fid.  If no FID is acquired, the remainder is skipped without an error notification.  After
2610 *       all, the MSF is not supposed to call hcf_send_msg when no Resource is available.
2611 *7:     The ControlField of the TxFS is written.  Since put_frag can only return the fatal Defunct or "No NIC", the
2612 *       return status can be ignored because when it fails, cmd_wait will fail as well.  (see also the note on the
2613 *       need for a return code below).
2614 *       Note that HFS_TX_CNTL has different values for H-I, H-I/SSN and H-II and HFS_ADDR_DEST has different
2615 *       values for H-I (regardless of SSN) and H-II.
2616 *       By writing 17, 1 or 2 ( implying 16, 0 or 1 garbage word after HFS_TX_CNTL) the BAP just gets to
2617 *       HFS_ADDR_DEST for H-I, H-I/SSN and H-II respectively.
2618 *10: if neither encapsulation nor MIC calculation is needed, splitting the first fragment in two does not
2619 *       really help but it makes the flow easier to follow to do not optimize on this difference
2620 *
2621 *       hcf_send_msg checks whether the frame is an Ethernet-II rather than an "official" 802.3 frame.
2622 *       The E-II check is based on the length/type field in the MAC header. If this field has a value larger than
2623 *       1500, E-II is assumed. The implementation of this test fails if the length/type field is not in the first
2624 *       descriptor.  If E-II is recognized, a SNAP header is inserted. This SNAP header represents either RFC1042
2625 *       or Bridge-Tunnel encapsulation, depending on the return status of the support routine hcf_encap.
2626 *
2627 *.NOTICE
2628 *       hcf_send_msg leaves the responsibility to only send messages on enabled ports at the MSF level.
2629 *       This is considered the strategy which is sufficiently adequate for all "robust" MSFs, have the least
2630 *       processor utilization and being still acceptable robust at the WCI !!!!!
2631 *
2632 *       hcf_send_msg does not NEED a return value to report NIC absence or removal during the execution of
2633 *       hcf_send_msg(), because the MSF and higher layers must be able to cope anyway with the NIC being removed
2634 *       after a successful completion of hcf_send_msg() but before the actual transmission took place.
2635 *       To accommodate user expectations the current implementation does report NIC absence.
2636 *       Defunct blocks all NIC access and will (also) be reported on a number of other calls.
2637 *
2638 *       hcf_send_msg does not check for transmit buffer overflow because the Hermes does this protection.
2639 *       In case of a transmit buffer overflow, the surplus which does not fit in the buffer is simply dropped.
2640 *       Note that this possibly results in the transmission of incomplete frames.
2641 *
2642 *       After some deliberation with F/W team, it is decided that - being in the twilight zone of not knowing
2643 *       whether the problem at hand is an MSF bug, HCF buf, F/W bug, H/W malfunction or even something else - there
2644 *       is no "best thing to do" in case of a failing send, hence the HCF considers the TxFID ownership to be taken
2645 *       over by the F/W and hopes for an Allocate event in due time
2646 *
2647 *.ENDDOC                                END DOCUMENTATION
2648 *
2649 ************************************************************************************************************/
2650 int
2651 hcf_send_msg( IFBP ifbp, DESC_STRCT *descp, hcf_16 tx_cntl )
2652 {
2653 int                     rc = HCF_SUCCESS;
2654 DESC_STRCT      *p /* = descp*/;                //working pointer
2655 hcf_16          len;                                    // total byte count
2656 hcf_16          i;
2657
2658 hcf_16          fid = 0;
2659
2660         HCFASSERT( ifbp->IFB_RscInd || descp == NULL, ifbp->IFB_RscInd )
2661         HCFASSERT( (ifbp->IFB_CntlOpt & USE_DMA) == 0, 0xDADB )
2662
2663         HCFLOGENTRY( HCF_TRACE_SEND_MSG, tx_cntl )
2664         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
2665         HCFASSERT_INT
2666         /* obnoxious c:/hcf/hcf.c(1480) : warning C4769: conversion of near pointer to long integer,
2667          * so skip */
2668         HCFASSERT( ((hcf_32)descp & 3 ) == 0, (hcf_32)descp )
2669 #if HCF_ASSERT
2670 {       int x = ifbp->IFB_FWIdentity.comp_id == COMP_ID_FW_AP ? tx_cntl & ~HFS_TX_CNTL_PORT : tx_cntl;
2671         HCFASSERT( (x & ~HCF_TX_CNTL_MASK ) == 0, tx_cntl )
2672 }
2673 #endif // HCF_ASSERT
2674
2675         if ( descp ) ifbp->IFB_TxFID = 0;                               //cancel a pre-put message
2676
2677 #if (HCF_EXT) & HCF_EXT_TX_CONT                         // Continuous transmit test
2678         if ( tx_cntl == HFS_TX_CNTL_TX_CONT ) {
2679                 fid = get_fid(ifbp);
2680                 if (fid != 0 ) {
2681                                                                                         //setup BAP to begin of TxFS
2682                         (void)setup_bap( ifbp, fid, 0, IO_OUT );
2683                                                                                         //copy all the fragments in a transparent fashion
2684                         for ( p = descp; p; p = p->next_desc_addr ) {
2685                         /* obnoxious warning C4769: conversion of near pointer to long integer */
2686                                 HCFASSERT( ((hcf_32)p & 3 ) == 0, (hcf_32)p )
2687                                 put_frag( ifbp, p->buf_addr, p->BUF_CNT BE_PAR(0) );
2688                         }
2689                         rc = cmd_exe( ifbp, HCMD_THESEUS | HCMD_BUSY | HCMD_STARTPREAMBLE, fid );
2690                         if ( ifbp->IFB_RscInd == 0 ) {
2691                                 ifbp->IFB_RscInd = get_fid( ifbp );
2692                         }
2693                 }
2694                                                                                         // een slecht voorbeeld doet goed volgen ;?
2695                 HCFLOGEXIT( HCF_TRACE_SEND_MSG )
2696                 return rc;
2697         }
2698 #endif // HCF_EXT_TX_CONT
2699                                                                         /* the following initialization code is redundant for a pre-put message
2700                                                                          * but moving it inside the "if fid" logic makes the merging with the
2701                                                                          * USB flow awkward
2702                                                                          */
2703 #if (HCF_TYPE) & HCF_TYPE_WPA
2704         tx_cntl |= ifbp->IFB_MICTxCntl;
2705 #endif // HCF_TYPE_WPA
2706         fid = ifbp->IFB_TxFID;
2707         if (fid == 0 && ( fid = get_fid( ifbp ) ) != 0 )                /* 4 */
2708                         /* skip the next compound statement if:
2709                            - pre-put message or
2710                            - no fid available (which should never occur if the MSF adheres to the WCI)
2711                          */
2712         {               // to match the closing curly bracket of above "if" in case of HCF_TYPE_USB
2713                                                                                         //calculate total length ;? superfluous unless CCX or Encapsulation
2714                 len = 0;
2715                 p = descp;
2716                 do len += p->BUF_CNT; while ( ( p = p->next_desc_addr ) != NULL );
2717                 p = descp;
2718 //;?    HCFASSERT( len <= HCF_MAX_MSG, len )
2719 /*7*/   (void)setup_bap( ifbp, fid, HFS_TX_CNTL, IO_OUT );
2720 #if (HCF_TYPE) & HCF_TYPE_TX_DELAY
2721                 HCFASSERT( ( descp != NULL ) ^ ( tx_cntl & HFS_TX_CNTL_TX_DELAY ), tx_cntl )
2722                 if ( tx_cntl & HFS_TX_CNTL_TX_DELAY ) {
2723                         tx_cntl &= ~HFS_TX_CNTL_TX_DELAY;               //!!HFS_TX_CNTL_TX_DELAY no longer available
2724                         ifbp->IFB_TxFID = fid;
2725                         fid = 0;                                                                //!!fid no longer available, be careful when modifying code
2726                 }
2727 #endif // HCF_TYPE_TX_DELAY
2728                 OPW( HREG_DATA_1, tx_cntl ) ;
2729                 OPW( HREG_DATA_1, 0 );
2730 #if ! ( (HCF_TYPE) & HCF_TYPE_CCX )
2731                 HCFASSERT( p->BUF_CNT >= 14, p->BUF_CNT )
2732                                                                                         /* assume DestAddr/SrcAddr/Len/Type ALWAYS contained in 1st fragment
2733                                                                                          * otherwise life gets too cumbersome for MIC and Encapsulation !!!!!!!!
2734                 if ( p->BUF_CNT >= 14 ) {       alternatively: add a safety escape !!!!!!!!!!!! }       */
2735 #endif // HCF_TYPE_CCX
2736                 CALC_TX_MIC( NULL, -1 );                //initialize MIC
2737 /*10*/  put_frag( ifbp, p->buf_addr, HCF_DASA_SIZE BE_PAR(0) ); //write DA, SA with MIC calculation
2738                 CALC_TX_MIC( p->buf_addr, HCF_DASA_SIZE );              //MIC over DA, SA
2739                 CALC_TX_MIC( null_addr, 4 );            //MIC over (virtual) priority field
2740 #if (HCF_TYPE) & HCF_TYPE_CCX
2741                 //!!be careful do not use positive test on HCF_ACT_CCX_OFF, because IFB_CKIPStat is initially 0
2742                 if(( ifbp->IFB_CKIPStat == HCF_ACT_CCX_ON ) ||
2743            ((GET_BUF_CNT(p) >= 20 )   && ( ifbp->IFB_CKIPStat == HCF_ACT_CCX_OFF ) &&
2744             (p->buf_addr[12] == 0xAA) && (p->buf_addr[13] == 0xAA) &&
2745             (p->buf_addr[14] == 0x03) && (p->buf_addr[15] == 0x00) &&
2746             (p->buf_addr[16] == 0x40) && (p->buf_addr[17] == 0x96) &&
2747             (p->buf_addr[18] == 0x00) && (p->buf_addr[19] == 0x00)))
2748         {
2749             i = HCF_DASA_SIZE;
2750
2751             OPW( HREG_DATA_1, CNV_SHORT_TO_BIG( len - i ));
2752
2753             /* need to send out the remainder of the fragment */
2754                         put_frag( ifbp, &p->buf_addr[i], GET_BUF_CNT(p) - i BE_PAR(0) );
2755         }
2756         else
2757 #endif // HCF_TYPE_CCX
2758                 {
2759                                                                                         //if encapsulation needed
2760 #if (HCF_ENCAP) == HCF_ENC
2761                                                                                         //write length (with SNAP-header,Type, without //DA,SA,Length ) no MIC calc.
2762                         if ( ( snap_header[sizeof(snap_header)-1] = hcf_encap( &p->buf_addr[HCF_DASA_SIZE] ) ) != ENC_NONE ) {
2763                                 OPW( HREG_DATA_1, CNV_END_SHORT( len + (sizeof(snap_header) + 2) - ( 2*6 + 2 ) ) );
2764                                                                                         //write splice with MIC calculation
2765                                 put_frag( ifbp, snap_header, sizeof(snap_header) BE_PAR(0) );
2766                                 CALC_TX_MIC( snap_header, sizeof(snap_header) );        //MIC over 6 byte SNAP
2767                                 i = HCF_DASA_SIZE;
2768                         } else
2769 #endif // HCF_ENC
2770                         {
2771                                 OPW( HREG_DATA_1, *(wci_recordp)&p->buf_addr[HCF_DASA_SIZE] );
2772                                 i = 14;
2773                         }
2774                                                                                         //complete 1st fragment starting with Type with MIC calculation
2775                         put_frag( ifbp, &p->buf_addr[i], p->BUF_CNT - i BE_PAR(0) );
2776                         CALC_TX_MIC( &p->buf_addr[i], p->BUF_CNT - i );
2777                 }
2778                                                                                         //do the remaining fragments with MIC calculation
2779                 while ( ( p = p->next_desc_addr ) != NULL ) {
2780                         /* obnoxious c:/hcf/hcf.c(1480) : warning C4769: conversion of near pointer to long integer,
2781                          * so skip */
2782                         HCFASSERT( ((hcf_32)p & 3 ) == 0, (hcf_32)p )
2783                         put_frag( ifbp, p->buf_addr, p->BUF_CNT BE_PAR(0) );
2784                         CALC_TX_MIC( p->buf_addr, p->BUF_CNT );
2785                 }
2786                                                                                         //pad message, finalize MIC calculation and write MIC to NIC
2787                 put_frag_finalize( ifbp );
2788         }
2789         if ( fid ) {
2790 /*16*/  rc = cmd_exe( ifbp, HCMD_BUSY | HCMD_TX | HCMD_RECL, fid );
2791                 ifbp->IFB_TxFID = 0;
2792                         /* probably this (i.e. no RscInd AND "HREG_EV_ALLOC") at this point in time occurs so infrequent,
2793                          * that it might just as well be acceptable to skip this
2794                          * "optimization" code and handle that additional interrupt once in a while
2795                          */
2796 // 180 degree error in logic ;? #if ALLOC_15
2797 /*20*/  if ( ifbp->IFB_RscInd == 0 ) {
2798                         ifbp->IFB_RscInd = get_fid( ifbp );
2799                 }
2800 // #endif // ALLOC_15
2801         }
2802 //      HCFASSERT( level::ifbp->IFB_RscInd, ifbp->IFB_RscInd )
2803         HCFLOGEXIT( HCF_TRACE_SEND_MSG )
2804         return rc;
2805 } // hcf_send_msg
2806 #endif // HCF_DL_ONLY
2807
2808
2809 #if (HCF_DL_ONLY) == 0
2810 /************************************************************************************************************
2811 *
2812 *.MODULE                int hcf_service_nic( IFBP ifbp, wci_bufp bufp, unsigned int len )
2813 *.PURPOSE               Services (most) NIC events.
2814 *                               Provides received message
2815 *                               Provides status information.
2816 *
2817 *.ARGUMENTS
2818 *       ifbp            address of the Interface Block
2819 *  In non-DMA mode:
2820 *       bufp            address of char buffer, sufficiently large to hold the first part of the RxFS up through HFS_TYPE
2821 *       len                     length in bytes of buffer specified by bufp
2822 *                               value between HFS_TYPE + 2 and HFS_ADDR_DEST + HCF_MAX_MSG
2823 *
2824 *.RETURNS
2825 *       HCF_SUCCESS
2826 *       HCF_ERR_MIC     message contains an erroneous MIC (only if frame fits completely in bufp)
2827 *
2828 *.DESCRIPTION
2829 *
2830 * MSF-accessible fields of Result Block
2831 * - IFB_RxLen                   0 or Frame size.
2832 * - IFB_MBInfoLen               0 or the L-field of the oldest MBIB.
2833 * - IFB_RscInd
2834 * - IFB_HCF_Tallies             updated if a corresponding event occurred.
2835 * - IFB_NIC_Tallies             updated if a Tally Info frame received from the NIC.
2836 * - IFB_DmaPackets
2837 * - IFB_TxFsStat
2838 * - IFB_TxFsSwSup
2839 * - IFB_LinkStat                reflects new link status or 0x0000 if no change relative to previous hcf_service_nic call.
2840 or
2841 * - IFB_LinkStat                link status, 0x8000 reflects change relative to previous hcf_service_nic call.
2842 *
2843 * When IFB_MBInfoLen is non-zero, at least one MBIB is available.
2844 *
2845 * IFB_RxLen     reflects the number of received bytes in 802.3 view (Including DestAddr, SrcAddr and Length,
2846 * excluding MIC-padding, MIC and sum check) of active Rx Frame Structure. If no Rx Data s available, IFB_RxLen
2847 * equals 0x0000.
2848 * Repeated execution causes the Service NIC Function to provide information about subsequently received
2849 * messages, irrespective whether a hcf_rcv_msg or hcf_action(HCF_ACT_RX) is performed in between.
2850 *
2851 * When IFB_RxLen is non-zero, a Received Frame Structure is available to be routed to the protocol stack.
2852 * When Monitor Mode is not active, this is guaranteed to be an error-free non-WMP frame.
2853 * In case of Monitor Mode, it may also be a frame with an error or a WMP frame.
2854 * Erroneous frames have a non-zero error-sub field in the HFS_STAT field in the look ahead buffer.
2855 *
2856 * If a Receive message is available in NIC RAM, the Receive Frame Structure is (partly) copied from the NIC to
2857 * the buffer identified by bufp.
2858 * Copying stops either after len bytes or when the complete 802.3 frame is copied.
2859 * During the copying the message is decapsulated (if appropriate).
2860 * If the frame is read completely by hcf_service_nic (i.e. the frame fits completely in the lookahead buffer),
2861 * the frame is automatically ACK'ed to the F/W and still available via the look ahead buffer and hcf_rcv_msg.
2862 * Only if the frame is read completely by hcf_service_nic, hcf_service_nic checks the MIC and sets the return
2863 * status accordingly.  In this case, hcf_rcv_msg does not check the MIC.
2864 *
2865 * The MIC calculation algorithm works more efficient if the length of the look ahead buffer is
2866 * such that it fits exactly 4 n bytes of the 802.3 frame, i.e. len == HFS_ADDR_DEST + 4*n.
2867 *
2868 * The Service NIC Function supports the NIC event service handling process.
2869 * It performs the appropriate actions to service the NIC, such that the event cause is eliminated and related
2870 * information is saved.
2871 * The Service NIC Function is executed by the MSF ISR or polling routine as first step to determine the event
2872 * cause(s).  It is the responsibility of the MSF to perform all not directly NIC related interrupt service
2873 * actions, e.g. in a PC environment this includes servicing the PIC, and managing the Processor Interrupt
2874 * Enabling/Disabling.
2875 * In case of a polled based system, the Service NIC Function must be executed "frequently".
2876 * The Service NIC Function may have side effects related to the Mailbox and Resource Indicator (IFB_RscInd).
2877 *
2878 * hcf_service_nic returns:
2879 * - The length of the data in the available MBIB (IFB_MBInfoLen)
2880 * - Changes in the link status (IFB_LinkStat)
2881 * - The length of the data in the available Receive Frame Structure (IFB_RxLen)
2882 * - updated IFB_RscInd
2883 * - Updated Tallies
2884 *
2885 * hcf_service_nic is presumed to neither interrupt other HCF-tasks nor to be interrupted by other HCF-tasks.
2886 * A way to achieve this is to precede hcf_service_nic as well as all other HCF-tasks with a call to
2887 * hcf_action to disable the card interrupts and, after all work is completed, with a call to hcf_action to
2888 * restore (which is not necessarily the same as enabling) the card interrupts.
2889 * In case of a polled environment, it is assumed that the MSF programmer is sufficiently familiar with the
2890 * specific requirements of that environment to translate the interrupt strategy to a polled strategy.
2891 *
2892 * hcf_service_nic services the following Hermes events:
2893 * - HREG_EV_INFO                Asynchronous Information Frame
2894 * - HREG_EV_INFO_DROP   WMAC did not have sufficient RAM to build Unsolicited Information Frame
2895 * - HREG_EV_TX_EXC              (if applicable, i.e. selected via HCF_EXT_INT_TX_EX bit of HCF_EXT)
2896 * - HREG_EV_SLEEP_REQ   (if applicable, i.e. selected via HCF_DDS/HCF_CDS bit of HCF_SLEEP)
2897 * ** in non_DMA mode
2898 * - HREG_EV_ALLOC               Asynchronous part of Allocation/Reclaim completed while out of resources at
2899 *                                               completion of hcf_send_msg/notify
2900 * - HREG_EV_RX                  the detection of the availability of received messages
2901 *                                               including WaveLAN Management Protocol (WMP) message processing
2902 * ** in DMA mode
2903 * - HREG_EV_RDMAD
2904 * - HREG_EV_TDMAD
2905 *!! hcf_service_nic does not service the following Hermes events:
2906 *!!     HREG_EV_TX                      (the "OK" Tx Event) is no longer supported by the WCI, if it occurs it is unclear
2907 *!!                                             what the cause is, so no meaningful strategy is available. Not acking the bit is
2908 *!!                                             probably the best help that can be given to the debugger.
2909 *!!     HREG_EV_CMD                     handled in cmd_wait.
2910 *!!     HREG_EV_FW_DMA          (i.e. HREG_EV_RXDMA, HREG_EV_TXDMA and_EV_LPESC) are either not used or used
2911 *!!                                             between the F/W and the DMA engine.
2912 *!!     HREG_EV_ACK_REG_READY is only applicable for H-II (i.e. not HII.5 and up, see DAWA)
2913 *
2914 *       If, in non-DMA mode, a Rx message is available, its length is reflected by the IFB_RxLen field of the IFB.
2915 *       This length reflects the data itself and the Destination Address, Source Address and DataLength/Type field
2916 *       but not the SNAP-header in case of decapsulation by the HCF.  If no message is available, IFB_RxLen is
2917 *       zero.  Former versions of the HCF handled WMP messages and supported a "monitor" mode in hcf_service_nic,
2918 *       which deposited certain or all Rx messages in the MailBox. The responsibility to handle these frames is
2919 *       moved to the MSF. The HCF offers as supports hcf_put_info with CFG_MB_INFO as parameter to emulate the old
2920 *       implementation under control of the MSF.
2921 *
2922 * **Rx Buffer free strategy
2923 *       When hcf_service_nic reports the availability of a non-DMA message, the MSF can access that message by
2924 *       means of hcf_rcv_msg. It must be prevented that the LAN Controller writes new data in the NIC buffer
2925 *       before the MSF is finished with the current message. The NIC buffer is returned to the LAN Controller
2926 *       when:
2927 *        - the complete frame fits in the lookahead buffer or
2928 *        - hcf_rcv_msg is called or
2929 *        - hcf_action with HCF_ACT_RX is called or
2930 *        - hcf_service_nic is called again
2931 *       It can be reasoned that hcf_action( INT_ON ) should not be given before the MSF has completely processed
2932 *       a reported Rx-frame. The reason is that the INT_ON action is guaranteed to cause a (Rx-)interrupt (the
2933 *       MSF is processing a Rx-frame, hence the Rx-event bit in the Hermes register must be active). This
2934 *       interrupt will cause hcf_service_nic to be called, which will cause the ack-ing of the "last" Rx-event
2935 *       to the Hermes, causing the Hermes to discard the associated NIC RAM buffer.
2936 * Assert fails if
2937 * - ifbp is zero or other recognizable out-of-range value.
2938 * - hcf_service_nic is called without a prior call to hcf_connect.
2939 * - interrupts are enabled.
2940 * - reentrancy, may be  caused by calling hcf_functions without adequate protection
2941 *       against NIC interrupts or multi-threading.
2942 *
2943 *
2944 *.DIAGRAM
2945 *1:     IFB_LinkStat is cleared, if a LinkStatus frame is received, IFB_LinkStat will be updated accordingly
2946 *       by isr_info.
2947 or
2948 *1:     IFB_LinkStat change indication is cleared. If a LinkStatus frame is received, IFB_LinkStat will be updated
2949 *       accordingly by isr_info.
2950 *2: IFB_RxLen must be cleared before the NIC presence check otherwise:
2951 *        -      this value may stay non-zero if the NIC is pulled out at an inconvenient moment.
2952 *        -      the RxAck on a zero-FID needs a zero-value for IFB_RxLen to work
2953 *        Note that as side-effect of the hcf_action call, the remainder of Rx related info is re-initialized as
2954 *        well.
2955 *4:     In case of Defunct mode, the information supplied by Hermes is unreliable, so the body of
2956 *       hcf_service_nic is skipped. Since hcf_cntl turns into a NOP if Primary or Station F/W is incompatible,
2957 *       hcf_service_nic is also skipped in those cases.
2958 *       To prevent that hcf_service_nic reports bogus information to the MSF with all - possibly difficult to
2959 *       debug - undesirable side effects, it is paramount to check the NIC presence. In former days the presence
2960 *       test was based on the Hermes register HREG_SW_0. Since in HCF_ACT_INT_OFF is choosen for strategy based on
2961 *       HREG_EV_STAT, this is now also used in hcf_service_nic. The motivation to change strategy is partly
2962 *       due to inconsistent F/W implementations with respect to HREG_SW_0 manipulation around reset and download.
2963 *       Note that in polled environments Card Removal is not detected by INT_OFF which makes the check in
2964 *       hcf_service_nic even more important.
2965 *8:     The event status register of the Hermes is sampled
2966 *       The assert checks for unexpected events ;?????????????????????????????????????.
2967 *        - HREG_EV_INFO_DROP is explicitly excluded from the acceptable HREG_EV_STAT bits because it indicates
2968 *          a too heavily loaded system.
2969 *        - HREG_EV_ACK_REG_READY is 0x0000 for H-I (and hopefully H-II.5)
2970 *
2971 *
2972 *       HREG_EV_TX_EXC is accepted (via HREG_EV_TX_EXT) if and only if HCF_EXT_INT_TX_EX set in the HCF_EXT
2973 *       definition at compile time.
2974 *       The following activities are handled:
2975 *        -      Alloc events are handled by hcf_send_msg (and notify). Only if there is no "spare" resource, the
2976 *               alloc event is superficially serviced by hcf_service_nic to create a pseudo-resource with value
2977 *               0x001. This value is recognized by get_fid (called by hcf_send_msg and notify) where the real
2978 *               TxFid is retrieved and the Hermes is acked and - hopefully - the "normal" case with a spare TxFid
2979 *               in IFB_RscInd is restored.
2980 *        -      Info drop events are handled by incrementing a tally
2981 *        -      LinkEvent (including solicited and unsolicited tallies) are handled by procedure isr_info.
2982 *       -       TxEx (if selected at compile time) is handled by copying the significant part of the TxFS
2983 *               into the IFB for further processing by the MSF.
2984 *               Note the complication of the zero-FID protection sub-scheme in DAWA.
2985 *       Note, the Ack of all of above events is handled at the end of hcf_service_nic
2986 *16: In case of  non-DMA ( either not compiled in or due to a run-time choice):
2987 *       If an Rx-frame is available, first the FID of that frame is read, including the complication of the
2988 *       zero-FID protection sub-scheme in DAWA. Note that such a zero-FID is acknowledged at the end of
2989 *       hcf_service_nic and that this depends on the IFB_RxLen initialization in the begin of hcf_service_nic.
2990 *       The Assert validates the HCF assumption about Hermes implementation upon which the range of
2991 *       Pseudo-RIDs is based.
2992 *       Then the control fields up to the start of the 802.3 frame are read from the NIC into the lookahead buffer.
2993 *       The status field is converted to native Endianess.
2994 *       The length is, after implicit Endianess conversion if needed, and adjustment for the 14 bytes of the
2995 *       802.3 MAC header, stored in IFB_RxLen.
2996 *       In MAC Monitor mode, 802.11 control frames with a TOTAL length of 14 are received, so without this
2997 *       length adjustment, IFB_RxLen could not be used to distinguish these frames from "no frame".
2998 *       No MIC calculation processes are associated with the reading of these Control fields.
2999 *26: This length test feels like superfluous robustness against malformed frames, but it turned out to be
3000 *       needed in the real (hostile) world.
3001 *       The decapsulation check needs sufficient data to represent DA, SA, L, SNAP and Type which amounts to
3002 *       22 bytes. In MAC Monitor mode, 802.11 control frames with a smaller length are received. To prevent
3003 *       that the implementation goes haywire, a check on the length is needed.
3004 *       The actual decapsulation takes place on the fly in the copying process by overwriting the SNAP header.
3005 *       Note that in case of decapsulation the SNAP header is not passed to the MSF, hence IFB_RxLen must be
3006 *       compensated for the SNAP header length.
3007 *       The 22 bytes needed for decapsulation are (more than) sufficient for the exceptional handling of the
3008 *       MIC algorithm of the L-field (replacing the 2 byte L-field with 4 0x00 bytes).
3009 *30: The 12 in the no-SSN branch corresponds with the get_frag, the 2 with the IPW of the SSN branch
3010 *32: If Hermes reported MIC-presence, than the MIC engine is initialized with the non-dummy MIC calculation
3011 *       routine address and appropriate key.
3012 *34: The 8 bytes after the DA, SA, L are read and it is checked whether decapsulation is needed i.e.:
3013 *         - the Hermes reported Tunnel encapsulation or
3014 *         - the Hermes reported 1042 Encapsulation and hcf_encap reports that the HCF would not have used
3015 *               1042 as the encapsulation mechanism
3016 *       Note that the first field of the RxFS in bufp has Native Endianess due to the conversion done by the
3017 *       BE_PAR in get_frag.
3018 *36: The Type field is the only word kept (after moving) of the just read 8 bytes, it is moved to the
3019 *       L-field.  The original L-field and 6 byte SNAP header are discarded, so IFB_RxLen and buf_addr must
3020 *       be adjusted by 8.
3021 *40: Determine how much of the frame (starting with DA) fits in the Lookahead buffer, then read the not-yet
3022 *       read data into the lookahead buffer.
3023 *       If the lookahead buffer contains the complete message, check the MIC. The majority considered this
3024 *       I/F more appropriate then have the MSF call hcf_get_data only to check the MIC.
3025 *44: Since the complete message is copied from NIC RAM to PC RAM, the Rx can be acknowledged to the Hermes
3026 *       to optimize the flow ( a better chance to get new Rx data in the next pass through hcf_service_nic ).
3027 *       This acknowledgement can not be done via hcf_action( HCF_ACT_RX_ACK ) because this also clears
3028 *       IFB_RxLEN thus corrupting the I/F to the MSF.
3029 *;?: In case of DMA (compiled in and activated):
3030
3031
3032 *54: Limiting the number of places where the F/W is acked (e.g. the merging of the Rx-ACK with the other
3033 *       ACKs), is supposed to diminish the potential of race conditions in the F/W.
3034 *       Note 1: The CMD event is acknowledged in cmd_cmpl
3035 *       Note 2: HREG_EV_ACK_REG_READY is 0x0000 for H-I (and hopefully H-II.5)
3036 *       Note 3: The ALLOC event is acknowledged in get_fid (except for the initialization flow)
3037 *
3038 *.NOTICE
3039 * The Non-DMA HREG_EV_RX is handled different compared with the other F/W events.
3040 * The HREG_EV_RX event is acknowledged by the first hcf_service_nic call after the
3041 * hcf_service_nic call that reported the occurrence of this event.
3042 * This acknowledgment
3043 * makes the next Receive Frame Structure (if any) available.
3044 * An updated IFB_RxLen
3045 * field reflects this availability.
3046 *
3047 *.NOTICE
3048 * The minimum size for Len must supply space for:
3049 * -     an F/W dependent number of bytes of Control Info field including the 802.11 Header field
3050 * -     Destination Address
3051 * -     Source Address
3052 * -     Length field
3053 * -     [ SNAP Header]
3054 * -     [ Ethernet-II Type]
3055 * This results in 68 for Hermes-I and 80 for Hermes-II
3056 * This way the minimum amount of information is available needed by the HCF to determine whether the frame
3057 * must be decapsulated.
3058 *.ENDDOC                                END DOCUMENTATION
3059 *
3060 ************************************************************************************************************/
3061 int
3062 hcf_service_nic( IFBP ifbp, wci_bufp bufp, unsigned int len )
3063 {
3064
3065 int                     rc = HCF_SUCCESS;
3066 hcf_16          stat;
3067 wci_bufp        buf_addr;
3068 hcf_16          i;
3069
3070         HCFLOGENTRY( HCF_TRACE_SERVICE_NIC, ifbp->IFB_IntOffCnt )
3071         HCFASSERT( ifbp->IFB_Magic == HCF_MAGIC, ifbp->IFB_Magic )
3072         HCFASSERT_INT
3073
3074         ifbp->IFB_LinkStat = 0; // ;? to be obsoleted ASAP                                                                                              /* 1*/
3075         ifbp->IFB_DSLinkStat &= ~CFG_LINK_STAT_CHANGE;                                                                                                  /* 1*/
3076         (void)hcf_action( ifbp, HCF_ACT_RX_ACK );                                                                                                               /* 2*/
3077         if ( ifbp->IFB_CardStat == 0 && ( stat = IPW( HREG_EV_STAT ) ) != 0xFFFF ) {                                    /* 4*/
3078 /*              IF_NOT_DMA( HCFASSERT( !( stat & ~HREG_EV_BASIC_MASK, stat ) )
3079  *              IF_NOT_USE_DMA( HCFASSERT( !( stat & ~HREG_EV_BASIC_MASK, stat ) )
3080  *              IF_USE_DMA( HCFASSERT( !( stat & ~( HREG_EV_BASIC_MASK ^ ( HREG_EV_...DMA.... ), stat ) )
3081  */
3082                                                                                                                                                                                                         /* 8*/
3083                 if ( ifbp->IFB_RscInd == 0 && stat & HREG_EV_ALLOC ) { //Note: IFB_RscInd is ALWAYS 1 for DMA
3084                         ifbp->IFB_RscInd = 1;
3085                 }
3086                 IF_TALLY( if ( stat & HREG_EV_INFO_DROP ) ifbp->IFB_HCF_Tallies.NoBufInfo++; )
3087 #if (HCF_EXT) & HCF_EXT_INT_TICK
3088                 if ( stat & HREG_EV_TICK ) {
3089                         ifbp->IFB_TickCnt++;
3090                 }
3091 #if 0 // (HCF_SLEEP) & HCF_DDS
3092                 if ( ifbp->IFB_TickCnt == 3 && ( ifbp->IFB_DSLinkStat & CFG_LINK_STAT_CONNECTED ) == 0 ) {
3093 CFG_DDS_TICK_TIME_STRCT ltv;
3094                         // 2 second period (with 1 tick uncertanty) in not-connected mode -->go into DS_OOR
3095                         hcf_action( ifbp, HCF_ACT_SLEEP );
3096                         ifbp->IFB_DSLinkStat |= CFG_LINK_STAT_DS_OOR; //set OutOfRange
3097                         ltv.len = 2;
3098                         ltv.typ = CFG_DDS_TICK_TIME;
3099                         ltv.tick_time = ( ( ifbp->IFB_DSLinkStat & CFG_LINK_STAT_TIMER ) + 0x10 ) *64; //78 is more right
3100                         hcf_put_info( ifbp, (LTVP)&ltv );
3101                         printk( "<5>Preparing for sleep, link_status: %04X, timer : %d\n",
3102                                         ifbp->IFB_DSLinkStat, ltv.tick_time );//;?remove me 1 day
3103                         ifbp->IFB_TickCnt++; //;?just to make sure we do not keep on printing above message
3104                         if ( ltv.tick_time < 300 * 125 ) ifbp->IFB_DSLinkStat += 0x0010;
3105
3106                 }
3107 #endif // HCF_DDS
3108 #endif // HCF_EXT_INT_TICK
3109                 if ( stat & HREG_EV_INFO ) {
3110                         isr_info( ifbp );
3111                 }
3112 #if (HCF_EXT) & HCF_EXT_INT_TX_EX
3113                 if ( stat & HREG_EV_TX_EXT && ( i = IPW( HREG_TX_COMPL_FID ) ) != 0 /*DAWA*/ ) {
3114                         DAWA_ZERO_FID( HREG_TX_COMPL_FID )
3115                         (void)setup_bap( ifbp, i, 0, IO_IN );
3116                         get_frag( ifbp, &ifbp->IFB_TxFsStat, HFS_SWSUP BE_PAR(1) );
3117                 }
3118 #endif // HCF_EXT_INT_TX_EX
3119 //!rlav DMA engine will handle the rx event, not the driver
3120 #if HCF_DMA
3121                 if ( !( ifbp->IFB_CntlOpt & USE_DMA ) ) //!! be aware of the logical indentations
3122 #endif // HCF_DMA
3123 /*16*/    if ( stat & HREG_EV_RX && ( ifbp->IFB_RxFID = IPW( HREG_RX_FID ) ) != 0 ) { //if 0 then DAWA_ACK
3124                         HCFASSERT( bufp, len )
3125                         HCFASSERT( len >= HFS_DAT + 2, len )
3126                         DAWA_ZERO_FID( HREG_RX_FID )
3127                         HCFASSERT( ifbp->IFB_RxFID < CFG_PROD_DATA, ifbp->IFB_RxFID)
3128                         (void)setup_bap( ifbp, ifbp->IFB_RxFID, 0, IO_IN );
3129                         get_frag( ifbp, bufp, HFS_ADDR_DEST BE_PAR(1) );
3130                         ifbp->IFB_lap = buf_addr = bufp + HFS_ADDR_DEST;
3131                         ifbp->IFB_RxLen = (hcf_16)(bufp[HFS_DAT_LEN] + (bufp[HFS_DAT_LEN+1]<<8) + 2*6 + 2);
3132 /*26*/          if ( ifbp->IFB_RxLen >= 22 ) {          // convenient for MIC calculation (5 DWs + 1 "skipped" W)
3133                                                                                                 //.  get DA,SA,Len/Type and (SNAP,Type or 8 data bytes)
3134 /*30*/                  get_frag( ifbp, buf_addr, 22 BE_PAR(0) );
3135 /*32*/                  CALC_RX_MIC( bufp, -1 );                //.  initialize MIC
3136                                 CALC_RX_MIC( buf_addr, HCF_DASA_SIZE ); //.  MIC over DA, SA
3137                                 CALC_RX_MIC( null_addr, 4 );    //.  MIC over (virtual) priority field
3138                                 CALC_RX_MIC( buf_addr+14, 8 );  //.  skip Len, MIC over SNAP,Type or 8 data bytes)
3139                                 buf_addr += 22;
3140 #if (HCF_TYPE) & HCF_TYPE_CCX
3141 //!!be careful do not use positive test on HCF_ACT_CCX_OFF, because IFB_CKIPStat is initially 0
3142                                 if( ifbp->IFB_CKIPStat != HCF_ACT_CCX_ON  )
3143 #endif // HCF_TYPE_CCX
3144                                 {
3145 #if (HCF_ENCAP) == HCF_ENC
3146                                         HCFASSERT( len >= HFS_DAT + 2 + sizeof(snap_header), len )
3147 /*34*/                          i = *(wci_recordp)&bufp[HFS_STAT] & ( HFS_STAT_MSG_TYPE | HFS_STAT_ERR );
3148                                         if ( i == HFS_STAT_TUNNEL ||
3149                                                  ( i == HFS_STAT_1042 && hcf_encap( (wci_bufp)&bufp[HFS_TYPE] ) != ENC_TUNNEL ) ) {
3150                                                                                                 //.  copy E-II Type to 802.3 LEN field
3151 /*36*/                                  bufp[HFS_LEN  ] = bufp[HFS_TYPE  ];
3152                                                 bufp[HFS_LEN+1] = bufp[HFS_TYPE+1];
3153                                                                                                 //.  discard Snap by overwriting with data
3154                                                 ifbp->IFB_RxLen -= (HFS_TYPE - HFS_LEN);
3155                                                 buf_addr -= ( HFS_TYPE - HFS_LEN ); // this happens to bring us at a DW boundary of 36
3156                                         }
3157 #endif // HCF_ENC
3158                                 }
3159                         }
3160 /*40*/          ifbp->IFB_lal = min( (hcf_16)(len - HFS_ADDR_DEST), ifbp->IFB_RxLen );
3161                         i = ifbp->IFB_lal - ( buf_addr - ( bufp + HFS_ADDR_DEST ) );
3162                         get_frag( ifbp, buf_addr, i BE_PAR(0) );
3163                         CALC_RX_MIC( buf_addr, i );
3164 #if (HCF_TYPE) & HCF_TYPE_WPA
3165                         if ( ifbp->IFB_lal == ifbp->IFB_RxLen ) {
3166                                 rc = check_mic( ifbp );
3167                         }
3168 #endif // HCF_TYPE_WPA
3169 /*44*/          if ( len - HFS_ADDR_DEST >= ifbp->IFB_RxLen ) {
3170                                 ifbp->IFB_RxFID = 0;
3171                         } else { /* IFB_RxFID is cleared, so  you do not get another Rx_Ack at next entry of hcf_service_nic */
3172                                 stat &= (hcf_16)~HREG_EV_RX;    //don't ack Rx if processing not yet completed
3173                         }
3174                 }
3175                 // in case of DMA: signal availability of rx and/or tx packets to MSF
3176                 IF_USE_DMA( ifbp->IFB_DmaPackets |= stat & ( HREG_EV_RDMAD | HREG_EV_TDMAD ); )
3177                 // rlav : pending HREG_EV_RDMAD or HREG_EV_TDMAD events get acknowledged here.
3178 /*54*/  stat &= (hcf_16)~( HREG_EV_SLEEP_REQ | HREG_EV_CMD | HREG_EV_ACK_REG_READY | HREG_EV_ALLOC | HREG_EV_FW_DMA );
3179 //a positive mask would be easier to understand /*54*/  stat &= (hcf_16)~( HREG_EV_SLEEP_REQ | HREG_EV_CMD | HREG_EV_ACK_REG_READY | HREG_EV_ALLOC | HREG_EV_FW_DMA );
3180                 IF_USE_DMA( stat &= (hcf_16)~HREG_EV_RX; )
3181                 if ( stat ) {
3182                         DAWA_ACK( stat );       /*DAWA*/
3183                 }
3184         }
3185         HCFLOGEXIT( HCF_TRACE_SERVICE_NIC )
3186         return rc;
3187 } // hcf_service_nic
3188 #endif // HCF_DL_ONLY
3189
3190
3191 /************************************************************************************************************
3192 ************************** H C F   S U P P O R T   R O U T I N E S ******************************************
3193 ************************************************************************************************************/
3194
3195
3196 /************************************************************************************************************
3197 *
3198 *.SUBMODULE             void calc_mic( hcf_32* p, hcf_32 m )
3199 *.PURPOSE               calculate MIC on a quad byte.
3200 *
3201 *.ARGUMENTS
3202 *       p                       address of the MIC
3203 *       m                       32 bit value to be processed by the MIC calculation engine
3204 *
3205 *.RETURNS               N.A.
3206 *
3207 *.DESCRIPTION
3208 * calc_mic is the implementation of the MIC algorithm. It is a monkey-see monkey-do copy of
3209 * Michael::appendByte()
3210 * of Appendix C of ..........
3211 *
3212 *
3213 *.DIAGRAM
3214 *
3215 *.NOTICE
3216 *.ENDDOC                                END DOCUMENTATION
3217 *
3218 ************************************************************************************************************/
3219
3220 #if (HCF_TYPE) & HCF_TYPE_WPA
3221
3222 #define ROL32( A, n ) ( ((A) << (n)) | ( ((A)>>(32-(n)))  & ( (1UL << (n)) - 1 ) ) )
3223 #define ROR32( A, n ) ROL32( (A), 32-(n) )
3224
3225 #define L       *p
3226 #define R       *(p+1)
3227
3228 void
3229 calc_mic( hcf_32* p, hcf_32 m )
3230 {
3231 #if HCF_BIG_ENDIAN
3232         m = (m >> 16) | (m << 16);
3233 #endif // HCF_BIG_ENDIAN
3234         L ^= m;
3235         R ^= ROL32( L, 17 );
3236         L += R;
3237         R ^= ((L & 0xff00ff00) >> 8) | ((L & 0x00ff00ff) << 8);
3238         L += R;
3239         R ^= ROL32( L, 3 );
3240         L += R;
3241         R ^= ROR32( L, 2 );
3242         L += R;
3243 } // calc_mic
3244 #undef R
3245 #undef L
3246 #endif // HCF_TYPE_WPA
3247
3248
3249
3250 #if (HCF_TYPE) & HCF_TYPE_WPA
3251 /************************************************************************************************************
3252 *
3253 *.SUBMODULE             void calc_mic_rx_frag( IFBP ifbp, wci_bufp p, int len )
3254 *.PURPOSE               calculate MIC on a single fragment.
3255 *
3256 *.ARGUMENTS
3257 *       ifbp            address of the Interface Block
3258 *       bufp            (byte) address of buffer
3259 *       len                     length in bytes of buffer specified by bufp
3260 *
3261 *.RETURNS               N.A.
3262 *
3263 *.DESCRIPTION
3264 * calc_mic_rx_frag ........
3265 *
3266 * The MIC is located in the IFB.
3267 * The MIC is separate for Tx and Rx, thus allowing hcf_send_msg to occur between hcf_service_nic and
3268 * hcf_rcv_msg.
3269 *
3270 *
3271 *.DIAGRAM
3272 *
3273 *.NOTICE
3274 *.ENDDOC                                END DOCUMENTATION
3275 *
3276 ************************************************************************************************************/
3277 void
3278 calc_mic_rx_frag( IFBP ifbp, wci_bufp p, int len )
3279 {
3280 static union { hcf_32 x32; hcf_16 x16[2]; hcf_8 x8[4]; } x;     //* area to accumulate 4 bytes input for MIC engine
3281 int i;
3282
3283         if ( len == -1 ) {                                                              //initialize MIC housekeeping
3284                 i = *(wci_recordp)&p[HFS_STAT];
3285                 /* i = CNV_SHORTP_TO_LITTLE(&p[HFS_STAT]); should not be neede to prevent alignment poroblems
3286                  * since len == -1 if and only if p is lookahaead buffer which MUST be word aligned
3287                  * to be re-investigated by NvR
3288                  */
3289
3290                 if ( ( i & HFS_STAT_MIC ) == 0 ) {
3291                         ifbp->IFB_MICRxCarry = 0xFFFF;                  //suppress MIC calculation
3292                 } else {
3293                         ifbp->IFB_MICRxCarry = 0;
3294 //*     Note that "coincidentally" the bit positions used in HFS_STAT
3295 //*     correspond with the offset of the key in IFB_MICKey
3296                         i = ( i & HFS_STAT_MIC_KEY_ID ) >> 10;  /* coincidentally no shift needed for i itself */
3297                         ifbp->IFB_MICRx[0] = CNV_LONG_TO_LITTLE(ifbp->IFB_MICRxKey[i  ]);
3298                         ifbp->IFB_MICRx[1] = CNV_LONG_TO_LITTLE(ifbp->IFB_MICRxKey[i+1]);
3299                 }
3300         } else {
3301                 if ( ifbp->IFB_MICRxCarry == 0 ) {
3302                         x.x32 = CNV_LONGP_TO_LITTLE(p);
3303                         p += 4;
3304                         if ( len < 4 ) {
3305                                 ifbp->IFB_MICRxCarry = (hcf_16)len;
3306                         } else {
3307                                 ifbp->IFB_MICRxCarry = 4;
3308                                 len -= 4;
3309                         }
3310                 } else while ( ifbp->IFB_MICRxCarry < 4 && len ) {              //note for hcf_16 applies: 0xFFFF > 4
3311                         x.x8[ifbp->IFB_MICRxCarry++] = *p++;
3312                         len--;
3313                 }
3314                 while ( ifbp->IFB_MICRxCarry == 4 ) {   //contrived so we have only 1 call to calc_mic so we could bring it in-line
3315                         calc_mic( ifbp->IFB_MICRx, x.x32 );
3316                         x.x32 = CNV_LONGP_TO_LITTLE(p);
3317                         p += 4;
3318                         if ( len < 4 ) {
3319                                 ifbp->IFB_MICRxCarry = (hcf_16)len;
3320                         }
3321                         len -= 4;
3322                 }
3323         }
3324 } // calc_mic_rx_frag
3325 #endif // HCF_TYPE_WPA
3326
3327
3328 #if (HCF_TYPE) & HCF_TYPE_WPA
3329 /************************************************************************************************************
3330 *
3331 *.SUBMODULE             void calc_mic_tx_frag( IFBP ifbp, wci_bufp p, int len )
3332 *.PURPOSE               calculate MIC on a single fragment.
3333 *
3334 *.ARGUMENTS
3335 *       ifbp            address of the Interface Block
3336 *       bufp            (byte) address of buffer
3337 *       len                     length in bytes of buffer specified by bufp
3338 *
3339 *.RETURNS               N.A.
3340 *
3341 *.DESCRIPTION
3342 * calc_mic_tx_frag ........
3343 *
3344 * The MIC is located in the IFB.
3345 * The MIC is separate for Tx and Rx, thus allowing hcf_send_msg to occur between hcf_service_nic and
3346 * hcf_rcv_msg.
3347 *
3348 *
3349 *.DIAGRAM
3350 *
3351 *.NOTICE
3352 *.ENDDOC                                END DOCUMENTATION
3353 *
3354 ************************************************************************************************************/
3355 void
3356 calc_mic_tx_frag( IFBP ifbp, wci_bufp p, int len )
3357 {
3358 static union { hcf_32 x32; hcf_16 x16[2]; hcf_8 x8[4]; } x;     //* area to accumulate 4 bytes input for MIC engine
3359
3360                                                                                                                 //if initialization request
3361         if ( len == -1 ) {
3362                                                                                                                 //.  presume MIC calculation disabled
3363                 ifbp->IFB_MICTxCarry = 0xFFFF;
3364                                                                                                                 //.  if MIC calculation enabled
3365                 if ( ifbp->IFB_MICTxCntl ) {
3366                                                                                                                 //.  .  clear MIC carry
3367                         ifbp->IFB_MICTxCarry = 0;
3368                                                                                                                 //.  .  initialize MIC-engine
3369                         ifbp->IFB_MICTx[0] = CNV_LONG_TO_LITTLE(ifbp->IFB_MICTxKey[0]); /*Tx always uses Key 0 */
3370                         ifbp->IFB_MICTx[1] = CNV_LONG_TO_LITTLE(ifbp->IFB_MICTxKey[1]);
3371                 }
3372                                                                                                                 //else
3373         } else {
3374                                                                                                                 //.  if MIC enabled (Tx) / if MIC present (Rx)
3375                                                                                                                 //.  and no carry from previous calc_mic_frag
3376                 if ( ifbp->IFB_MICTxCarry == 0 ) {
3377                                                                                                                 //.  .  preset accu with 4 bytes from buffer
3378                         x.x32 = CNV_LONGP_TO_LITTLE(p);
3379                                                                                                                 //.  .  adjust pointer accordingly
3380                         p += 4;
3381                                                                                                                 //.  .  if buffer contained less then 4 bytes
3382                         if ( len < 4 ) {
3383                                                                                                                 //.  .  .  promote valid bytes in accu to carry
3384                                                                                                                 //.  .  .  flag accu to contain incomplete double word
3385                                 ifbp->IFB_MICTxCarry = (hcf_16)len;
3386                                                                                                                 //.  .  else
3387                         } else {
3388                                                                                                                 //.  .  .  flag accu to contain complete double word
3389                                 ifbp->IFB_MICTxCarry = 4;
3390                                                                                                                 //.  .  adjust remaining buffer length
3391                                 len -= 4;
3392                         }
3393                                                                                                                 //.  else if MIC enabled
3394                                                                                                                 //.  and if carry bytes from previous calc_mic_tx_frag
3395                                                                                                                 //.  .  move (1-3) bytes from carry into accu
3396                 } else while ( ifbp->IFB_MICTxCarry < 4 && len ) {              /* note for hcf_16 applies: 0xFFFF > 4 */
3397                         x.x8[ifbp->IFB_MICTxCarry++] = *p++;
3398                         len--;
3399                 }
3400                                                                                                                 //.  while accu contains complete double word
3401                                                                                                                 //.  and MIC enabled
3402                 while ( ifbp->IFB_MICTxCarry == 4 ) {
3403                                                                                                                 //.  .  pass accu to MIC engine
3404                         calc_mic( ifbp->IFB_MICTx, x.x32 );
3405                                                                                                                 //.  .  copy next 4 bytes from buffer to accu
3406                         x.x32 = CNV_LONGP_TO_LITTLE(p);
3407                                                                                                                 //.  .  adjust buffer pointer
3408                         p += 4;
3409                                                                                                                 //.  .  if buffer contained less then 4 bytes
3410                                                                                                                 //.  .  .  promote valid bytes in accu to carry
3411                                                                                                                 //.  .  .  flag accu to contain incomplete double word
3412                         if ( len < 4 ) {
3413                                 ifbp->IFB_MICTxCarry = (hcf_16)len;
3414                         }
3415                                                                                                                 //.  .  adjust remaining buffer length
3416                         len -= 4;
3417                 }
3418         }
3419 } // calc_mic_tx_frag
3420 #endif // HCF_TYPE_WPA
3421
3422
3423 #if HCF_PROT_TIME
3424 /************************************************************************************************************
3425 *
3426 *.SUBMODULE             void calibrate( IFBP ifbp )
3427 *.PURPOSE               calibrates the S/W protection counter against the Hermes Timer tick.
3428 *
3429 *.ARGUMENTS
3430 *       ifbp            address of the Interface Block
3431 *
3432 *.RETURNS               N.A.
3433 *
3434 *.DESCRIPTION
3435 * calibrates the S/W protection counter against the Hermes Timer tick
3436 * IFB_TickIni is the value used to initialize the S/W protection counter such that the expiration period
3437 * more or less independent of the processor speed. If IFB_TickIni is not yet calibrated, it is done now.
3438 * This calibration is "reasonably" accurate because the Hermes is in a quiet state as a result of the
3439 * Initialize command.
3440 *
3441 *
3442 *.DIAGRAM
3443 *
3444 *1:     IFB_TickIni is initialized at INI_TICK_INI by hcf_connect. If calibrate succeeds, IFB_TickIni is
3445 *       guaranteed to be changed. As a consequence there will be only 1 shot at calibration (regardless of the
3446 *       number of init calls) under normal circumstances.
3447 *2:     Calibration is done HCF_PROT_TIME_CNT times. This diminish the effects of jitter and interference,
3448 *       especially in a pre-emptive environment. HCF_PROT_TIME_CNT is in the range of 16 through 32 and derived
3449 *       from the HCF_PROT_TIME specified by the MSF programmer. The divisor needed to scale HCF_PROT_TIME into the
3450 *       16-32 range, is used as a multiplicator after the calibration, to scale the found value back to the
3451 *       requested range. This way a compromise is achieved between accuracy and duration of the calibration
3452 *       process.
3453 *3:     Acknowledge the Timer Tick Event.
3454 *       Each cycle is limited to at most INI_TICK_INI samples of the TimerTick status of the Hermes.
3455 *       Since the start of calibrate is unrelated to the Hermes Internal Timer, the first interval may last from 0
3456 *       to the normal interval, all subsequent intervals should be the full length of the Hermes Tick interval.
3457 *       The Hermes Timer Tick is not reprogrammed by the HCF, hence it is running at the default of 10 k
3458 *       microseconds.
3459 *4:     If the Timer Tick Event is continuously up (prot_cnt still has the value INI_TICK_INI) or no Timer Tick
3460 *       Event occurred before the protection counter expired, reset IFB_TickIni to INI_TICK_INI,
3461 *       set the defunct bit of IFB_CardStat (thus rendering the Hermes inoperable) and exit the calibrate routine.
3462 *8:     ifbp->IFB_TickIni is multiplied to scale the found value back to the requested range as explained under 2.
3463 *
3464 *.NOTICE
3465 * o Although there are a number of viewpoints possible, calibrate() uses as error strategy that a single
3466 *       failure of the Hermes TimerTick is considered fatal.
3467 * o There is no hard and concrete time-out value defined for Hermes activities. The default 1 seconds is
3468 *       believed to be sufficiently "relaxed" for real life and to be sufficiently short to be still useful in an
3469 *       environment with humans.
3470 * o Note that via IFB_DefunctStat time outs in cmd_wait and in hcfio_string block all Hermes access till the
3471 *       next init so functions which call a mix of cmd_wait and hcfio_string only need to check the return status
3472 *       of the last call
3473 * o The return code is preset at Time out.
3474 *       The additional complication that no calibrated value for the protection count can be assumed since
3475 *       calibrate() does not yet have determined a calibrated value (a catch 22), is handled by setting the
3476 *       initial value at INI_TICK_INI (by hcf_connect). This approach is considered safe, because:
3477 *         - the HCF does not use the pipeline mechanism of Hermes commands.
3478 *         - the likelihood of failure (the only time when protection count is relevant) is small.
3479 *         - the time will be sufficiently large on a fast machine (busy bit drops on good NIC before counter
3480 *               expires)
3481 *         - the time will be sufficiently small on a slow machine (counter expires on bad NIC before the end user
3482 *               switches the power off in despair
3483 *       The time needed to wrap a 32 bit counter around is longer than many humans want to wait, hence the more or
3484 *       less arbitrary value of 0x40000L is chosen, assuming it does not take too long on an XT and is not too
3485 *       short on a scream-machine.
3486 *
3487 *.ENDDOC                                END DOCUMENTATION
3488 *
3489 ************************************************************************************************************/
3490 HCF_STATIC void
3491 calibrate( IFBP ifbp )
3492 {
3493 int             cnt = HCF_PROT_TIME_CNT;
3494 hcf_32  prot_cnt;
3495
3496         HCFTRACE( ifbp, HCF_TRACE_CALIBRATE );
3497         if ( ifbp->IFB_TickIni == INI_TICK_INI ) {                                                                                                      /*1*/
3498                 ifbp->IFB_TickIni = 0;                                                                                                                                  /*2*/
3499                         while ( cnt-- ) {
3500                                 prot_cnt = INI_TICK_INI;
3501                                 OPW( HREG_EV_ACK, HREG_EV_TICK );                                                                                               /*3*/
3502                                 while ( (IPW( HREG_EV_STAT ) & HREG_EV_TICK) == 0 && --prot_cnt ) {
3503                                         ifbp->IFB_TickIni++;
3504                                 }
3505                                 if ( prot_cnt == 0 || prot_cnt == INI_TICK_INI ) {                                                              /*4*/
3506                                         ifbp->IFB_TickIni = INI_TICK_INI;
3507                                         ifbp->IFB_DefunctStat = HCF_ERR_DEFUNCT_TIMER;
3508                                         ifbp->IFB_CardStat |= CARD_STAT_DEFUNCT;
3509                                         HCFASSERT( DO_ASSERT, prot_cnt )
3510                                 }
3511                         }
3512                 ifbp->IFB_TickIni <<= HCF_PROT_TIME_SHFT;                                                                                               /*8*/
3513         }
3514         HCFTRACE( ifbp, HCF_TRACE_CALIBRATE | HCF_TRACE_EXIT );
3515 } // calibrate
3516 #endif // HCF_PROT_TIME
3517
3518
3519 #if (HCF_DL_ONLY) == 0
3520 #if (HCF_TYPE) & HCF_TYPE_WPA
3521 /************************************************************************************************************
3522 *
3523 *.SUBMODULE             int check_mic( IFBP ifbp )
3524 *.PURPOSE               verifies the MIC of a received non-USB frame.
3525 *
3526 *.ARGUMENTS
3527 *       ifbp            address of the Interface Block
3528 *
3529 *.RETURNS
3530 *       HCF_SUCCESS
3531 *       HCF_ERR_MIC
3532 *
3533 *.DESCRIPTION
3534 *
3535 *
3536 *.DIAGRAM
3537 *
3538 *4:     test whether or not a MIC is reported by the Hermes
3539 *14: the calculated MIC and the received MIC are compared, the return status is set when there is a mismatch
3540 *
3541 *.NOTICE
3542 *.ENDDOC                                END DOCUMENTATION
3543 *
3544 ************************************************************************************************************/
3545 int
3546 check_mic( IFBP ifbp )
3547 {
3548 int             rc = HCF_SUCCESS;
3549 hcf_32 x32[2];                          //* area to save rcvd 8 bytes MIC
3550
3551                                                                                                         //if MIC present in RxFS
3552         if ( *(wci_recordp)&ifbp->IFB_lap[-HFS_ADDR_DEST] & HFS_STAT_MIC ) {
3553         //or if ( ifbp->IFB_MICRxCarry != 0xFFFF )
3554                 CALC_RX_MIC( mic_pad, 8 );                                      //.  process up to 3 remaining bytes of data and append 5 to 8 bytes of padding to MIC calculation
3555                 get_frag( ifbp, (wci_bufp)x32, 8 BE_PAR(0));//.  get 8 byte MIC from NIC
3556                                                                                                         //.  if calculated and received MIC do not match
3557                                                                                                         //.  .  set status at HCF_ERR_MIC
3558 /*14*/  if ( x32[0] != CNV_LITTLE_TO_LONG(ifbp->IFB_MICRx[0]) ||
3559                  x32[1] != CNV_LITTLE_TO_LONG(ifbp->IFB_MICRx[1])         ) {
3560                         rc = HCF_ERR_MIC;
3561                 }
3562         }
3563                                                                                                         //return status
3564         return rc;
3565 } // check_mic
3566 #endif // HCF_TYPE_WPA
3567 #endif // HCF_DL_ONLY
3568
3569
3570 /************************************************************************************************************
3571 *
3572 *.SUBMODULE             int cmd_cmpl( IFBP ifbp )
3573 *.PURPOSE               waits for Hermes Command Completion.
3574 *
3575 *.ARGUMENTS
3576 *       ifbp            address of the Interface Block
3577 *
3578 *.RETURNS
3579 *       IFB_DefunctStat
3580 *       HCF_ERR_TIME_OUT
3581 *       HCF_ERR_DEFUNCT_CMD_SEQ
3582 *       HCF_SUCCESS
3583 *
3584 *.DESCRIPTION
3585 *
3586 *
3587 *.DIAGRAM
3588 *
3589 *2:     Once cmd_cmpl is called, the Busy option bit in IFB_Cmd must be cleared
3590 *4:     If Status register and command code don't match either:
3591 *        - the Hermes and Host are out of sync ( a fatal error)
3592 *        - error bits are reported via the Status Register.
3593 *       Out of sync is considered fatal and brings the HCF in Defunct mode
3594 *       Errors reported via the Status Register should be caused by sequence violations in Hermes command
3595 *       sequences and hence these bugs should have been found during engineering testing. Since there is no
3596 *       strategy to cope with this problem, it might as well be ignored at run time. Note that for any particular
3597 *       situation where a strategy is formulated to handle the consequences of a particular bug causing a
3598 *       particular Error situation reported via the Status Register, the bug should be removed rather than adding
3599 *       logic to cope with the consequences of the bug.
3600 *       There have been HCF versions where an error report via the Status Register even brought the HCF in defunct
3601 *       mode (although it was not yet named like that at that time). This is particular undesirable behavior for a
3602 *       general library.
3603 *       Simply reporting the error (as "interesting") is debatable. There also have been HCF versions with this
3604 *       strategy using the "vague" HCF_FAILURE code.
3605 *       The error is reported via:
3606 *        - MiscErr tally of the HCF Tally set
3607 *        - the (informative) fields IFB_ErrCmd and IFB_ErrQualifier
3608 *        - the assert mechanism
3609 *8:     Here the Defunct case and the Status error are separately treated
3610 *
3611 *
3612 *.ENDDOC                                END DOCUMENTATION
3613 *
3614 ************************************************************************************************************/
3615 HCF_STATIC int
3616 cmd_cmpl( IFBP ifbp )
3617 {
3618
3619 PROT_CNT_INI
3620 int             rc = HCF_SUCCESS;
3621 hcf_16  stat;
3622
3623         HCFLOGENTRY( HCF_TRACE_CMD_CPL, ifbp->IFB_Cmd )
3624         ifbp->IFB_Cmd &= ~HCMD_BUSY;                                                                                            /* 2 */
3625         HCF_WAIT_WHILE( (IPW( HREG_EV_STAT) & HREG_EV_CMD) == 0 );                                      /* 4 */
3626         stat = IPW( HREG_STAT );
3627 #if HCF_PROT_TIME
3628         if ( prot_cnt == 0 ) {
3629                 IF_TALLY( ifbp->IFB_HCF_Tallies.MiscErr++; )
3630                 rc = HCF_ERR_TIME_OUT;
3631                 HCFASSERT( DO_ASSERT, ifbp->IFB_Cmd )
3632         } else
3633 #endif // HCF_PROT_TIME
3634         {
3635                 DAWA_ACK( HREG_EV_CMD );
3636 /*4*/   if ( stat != (ifbp->IFB_Cmd & HCMD_CMD_CODE) ) {
3637 /*8*/           if ( ( (stat ^ ifbp->IFB_Cmd ) & HCMD_CMD_CODE) != 0 ) {
3638                                 rc = ifbp->IFB_DefunctStat = HCF_ERR_DEFUNCT_CMD_SEQ;
3639                                 ifbp->IFB_CardStat |= CARD_STAT_DEFUNCT;
3640                         }
3641                         IF_TALLY( ifbp->IFB_HCF_Tallies.MiscErr++; )
3642                         ifbp->IFB_ErrCmd = stat;
3643                         ifbp->IFB_ErrQualifier = IPW( HREG_RESP_0 );
3644                         HCFASSERT( DO_ASSERT, MERGE_2( IPW( HREG_PARAM_0 ), ifbp->IFB_Cmd ) )
3645                         HCFASSERT( DO_ASSERT, MERGE_2( ifbp->IFB_ErrQualifier, ifbp->IFB_ErrCmd ) )
3646                 }
3647         }
3648         HCFASSERT( rc == HCF_SUCCESS, rc)
3649         HCFLOGEXIT( HCF_TRACE_CMD_CPL )
3650         return rc;
3651 } // cmd_cmpl
3652
3653
3654 /************************************************************************************************************
3655 *
3656 *.SUBMODULE             int cmd_exe( IFBP ifbp, int cmd_code, int par_0 )
3657 *.PURPOSE               Executes synchronous part of Hermes Command and - optionally - waits for Command Completion.
3658 *
3659 *.ARGUMENTS
3660 *       ifbp            address of the Interface Block
3661 *       cmd_code
3662 *       par_0
3663 *
3664 *.RETURNS
3665 *       IFB_DefunctStat
3666 *       HCF_ERR_DEFUNCT_CMD_SEQ
3667 *       HCF_SUCCESS
3668 *       HCF_ERR_TO_BE_ADDED     <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
3669 *
3670 *.DESCRIPTION
3671 * Executes synchronous Hermes Command and waits for Command Completion
3672 *
3673 * The general HCF strategy is to wait for command completion. As a consequence:
3674 * - the read of the busy bit before writing the command register is superfluous
3675 * - the Hermes requirement that no Inquiry command may be executed if there is still an unacknowledged
3676 *       Inquiry command outstanding, is automatically met.
3677 * The Tx command uses the "Busy" bit in the cmd_code parameter to deviate from this general HCF strategy.
3678 * The idea is that by not busy-waiting on completion of this frequently used command the processor
3679 * utilization is diminished while using the busy-wait on all other seldom used commands the flow is kept
3680 * simple.
3681 *
3682 *
3683 *
3684 *.DIAGRAM
3685 *
3686 *1:     skip the body of cmd_exe when in defunct mode or when - based on the S/W Support register write and
3687 *       read back test - there is apparently no NIC.
3688 *       Note: we gave up on the "old" strategy to write the S/W Support register at magic only when needed. Due to
3689 *       the intricateness of Hermes F/W varieties ( which behave differently as far as corruption of the S/W
3690 *       Support register is involved), the increasing number of Hermes commands which do an implicit initialize
3691 *       (thus modifying the S/W Support register) and the workarounds of some OS/Support S/W induced aspects (e.g.
3692 *       the System Soft library at WinNT which postpones the actual mapping of I/O space up to 30 seconds after
3693 *       giving the go-ahead), the "magic" strategy is now reduced to a simple write and read back. This means that
3694 *       problems like a bug tramping over the memory mapped Hermes registers will no longer be noticed as side
3695 *       effect of the S/W Support register check.
3696 *2:     check whether the preceding command skipped the busy wait and if so, check for command completion
3697 *
3698 *.NOTICE
3699 *.ENDDOC                                END DOCUMENTATION
3700 *
3701 ************************************************************************************************************/
3702
3703 HCF_STATIC int
3704 cmd_exe( IFBP ifbp, hcf_16 cmd_code, hcf_16 par_0 )     //if HCMD_BUSY of cmd_code set, then do NOT wait for completion
3705 {
3706 int rc;
3707
3708         HCFLOGENTRY( HCF_TRACE_CMD_EXE, cmd_code )
3709         HCFASSERT( (cmd_code & HCMD_CMD_CODE) != HCMD_TX || cmd_code & HCMD_BUSY, cmd_code ) //Tx must have Busy bit set
3710         OPW( HREG_SW_0, HCF_MAGIC );
3711         if ( IPW( HREG_SW_0 ) == HCF_MAGIC ) {                                                                                                          /* 1 */
3712                 rc = ifbp->IFB_DefunctStat;
3713         }
3714         else rc = HCF_ERR_NO_NIC;
3715         if ( rc == HCF_SUCCESS ) {
3716                 //;?is this a hot idea, better MEASURE performance impact
3717 /*2*/   if ( ifbp->IFB_Cmd & HCMD_BUSY ) {
3718                         rc = cmd_cmpl( ifbp );
3719                 }
3720                 OPW( HREG_PARAM_0, par_0 );
3721                 OPW( HREG_CMD, cmd_code &~HCMD_BUSY );
3722                 ifbp->IFB_Cmd = cmd_code;
3723                 if ( (cmd_code & HCMD_BUSY) == 0 ) {    //;?is this a hot idea, better MEASURE performance impact
3724                         rc = cmd_cmpl( ifbp );
3725                 }
3726         }
3727         HCFASSERT( rc == HCF_SUCCESS, MERGE_2( rc, cmd_code ) )
3728         HCFLOGEXIT( HCF_TRACE_CMD_EXE )
3729         return rc;
3730 } // cmd_exe
3731
3732
3733 /************************************************************************************************************
3734 *
3735 *.SUBMODULE             int download( IFBP ifbp, CFG_PROG_STRCT FAR *ltvp )
3736 *.PURPOSE               downloads F/W image into NIC and initiates execution of the downloaded F/W.
3737 *
3738 *.ARGUMENTS
3739 *       ifbp            address of the Interface Block
3740 *       ltvp            specifies the pseudo-RID (as defined by WCI)
3741 *
3742 *.RETURNS
3743 *
3744 *.DESCRIPTION
3745 *
3746 *
3747 *.DIAGRAM
3748 *1:     First, Ack everything to unblock a (possibly) blocked cmd pipe line
3749 *       Note 1: it is very likely that an Alloc event is pending and very well possible that a (Send) Cmd event is
3750 *       pending
3751 *       Note 2: it is assumed that this strategy takes away the need to ack every conceivable event after an
3752 *       Hermes Initialize
3753 *
3754 *
3755 *.ENDDOC                                END DOCUMENTATION
3756 *
3757 ************************************************************************************************************/
3758 HCF_STATIC int
3759 download( IFBP ifbp, CFG_PROG_STRCT FAR *ltvp )                                         //Hermes-II download (volatile only)
3760 {
3761 hcf_16                          i;
3762 int                                     rc = HCF_SUCCESS;
3763 wci_bufp                        cp;
3764 hcf_io                          io_port = ifbp->IFB_IOBase + HREG_AUX_DATA;
3765
3766         HCFLOGENTRY( HCF_TRACE_DL, ltvp->typ )
3767 #if (HCF_TYPE) & HCF_TYPE_PRELOADED
3768         HCFASSERT( DO_ASSERT, ltvp->mode )
3769 #else
3770                                                                                                         //if initial "program" LTV
3771         if ( ifbp->IFB_DLMode == CFG_PROG_STOP && ltvp->mode == CFG_PROG_VOLATILE) {
3772                                                                                                         //.  switch Hermes to initial mode
3773 /*1*/   OPW( HREG_EV_ACK, ~HREG_EV_SLEEP_REQ );
3774                 rc = cmd_exe( ifbp, HCMD_INI, 0 );      /* HCMD_INI can not be part of init() because that is called on
3775                                                                                          * other occasions as well */
3776                 rc = init( ifbp );
3777         }
3778                                                                                                         //if final "program" LTV
3779         if ( ltvp->mode == CFG_PROG_STOP && ifbp->IFB_DLMode == CFG_PROG_VOLATILE) {
3780                                                                                                         //.  start tertiary (or secondary)
3781                 OPW( HREG_PARAM_1, (hcf_16)(ltvp->nic_addr >> 16) );
3782                 rc = cmd_exe( ifbp, HCMD_EXECUTE, (hcf_16) ltvp->nic_addr );
3783                 if (rc == HCF_SUCCESS) {
3784                         rc = init( ifbp );      /*;? do we really want to skip init if cmd_exe failed, i.e.
3785                                                                  *       IFB_FW_Comp_Id is than possibly incorrect */
3786                 }
3787                                                                                                         //else (non-final)
3788         } else {
3789                                                                                                         //.  if mode == Readback SEEPROM
3790 #if 0   //;? as long as the next if contains a hard coded 0, might as well leave it out even more obvious
3791                 if ( 0 /*len is definitely not want we want;?*/ && ltvp->mode == CFG_PROG_SEEPROM_READBACK ) {
3792                         OPW( HREG_PARAM_1, (hcf_16)(ltvp->nic_addr >> 16) );
3793                         OPW( HREG_PARAM_2, MUL_BY_2(ltvp->len - 4));
3794                                                                                                         //.  .  perform Hermes prog cmd with appropriate mode bits
3795                         rc = cmd_exe( ifbp, HCMD_PROGRAM | ltvp->mode, (hcf_16)ltvp->nic_addr );
3796                                                                                                         //.  .  set up NIC RAM addressability according Resp0-1
3797                         OPW( HREG_AUX_PAGE,   IPW( HREG_RESP_1) );
3798                         OPW( HREG_AUX_OFFSET, IPW( HREG_RESP_0) );
3799                                                                                                         //.  .  set up L-field of LTV according Resp2
3800                         i = ( IPW( HREG_RESP_2 ) + 1 ) / 2;  // i contains max buffer size in words, a probably not very useful piece of information ;?
3801 /*Nico's code based on i is the "real amount of data available"
3802                         if ( ltvp->len - 4 < i ) rc = HCF_ERR_LEN;
3803                         else ltvp->len = i + 4;
3804 */
3805 /* Rolands code based on the idea that a MSF should not ask for more than is available
3806                         // check if number of bytes requested exceeds max buffer size
3807                         if ( ltvp->len - 4 > i ) {
3808                                 rc = HCF_ERR_LEN;
3809                                 ltvp->len = i + 4;
3810                         }
3811 */
3812                                                                                                         //.  .  copy data from NIC via AUX port to LTV
3813                         cp = (wci_bufp)ltvp->host_addr;                                         /*IN_PORT_STRING_8_16 macro may modify its parameters*/
3814                         i = ltvp->len - 4;
3815                         IN_PORT_STRING_8_16( io_port, cp, i );          //!!!WORD length, cp MUST be a char pointer     // $$ char
3816                                                                                                         //.  else (non-final programming)
3817                 } else
3818 #endif //;? as long as the above if contains a hard coded 0, might as well leave it out even more obvious
3819                 {                                                                                       //.  .  get number of words to program
3820                         HCFASSERT( ltvp->segment_size, *ltvp->host_addr )
3821                         i = ltvp->segment_size/2;
3822                                                                                                         //.  .  copy data (words) from LTV via AUX port to NIC
3823                         cp = (wci_bufp)ltvp->host_addr;                                         //OUT_PORT_STRING_8_16 macro may modify its parameters
3824                                                                                                         //.  .  if mode == volatile programming
3825                         if ( ltvp->mode == CFG_PROG_VOLATILE ) {
3826                                                                                                         //.  .  .  set up NIC RAM addressability via AUX port
3827                                 OPW( HREG_AUX_PAGE, (hcf_16)(ltvp->nic_addr >> 16 << 9 | (ltvp->nic_addr & 0xFFFF) >> 7 ) );
3828                                 OPW( HREG_AUX_OFFSET, (hcf_16)(ltvp->nic_addr & 0x007E) );
3829                                 OUT_PORT_STRING_8_16( io_port, cp, i );         //!!!WORD length, cp MUST be a char pointer
3830                         }
3831                 }
3832         }
3833         ifbp->IFB_DLMode = ltvp->mode;                                  //save state in IFB_DLMode
3834 #endif // HCF_TYPE_PRELOADED
3835         HCFASSERT( rc == HCF_SUCCESS, rc )
3836         HCFLOGEXIT( HCF_TRACE_DL )
3837         return rc;
3838 } // download
3839
3840
3841 #if (HCF_ASSERT) & HCF_ASSERT_PRINTF
3842 /**************************************************
3843 * Certain Hermes-II firmware versions can generate
3844 * debug information. This debug information is
3845 * contained in a buffer in nic-RAM, and can be read
3846 * via the aux port.
3847 **************************************************/
3848 HCF_STATIC int
3849 fw_printf(IFBP ifbp, CFG_FW_PRINTF_STRCT FAR *ltvp)
3850 {
3851     int rc = HCF_SUCCESS;
3852     hcf_16 fw_cnt;
3853 //    hcf_32 DbMsgBuffer = 0x29D2, DbMsgCount= 0x000029D0;
3854 //    hcf_16 DbMsgSize=0x00000080;
3855     hcf_32 DbMsgBuffer;
3856     CFG_FW_PRINTF_BUFFER_LOCATION_STRCT *p = &ifbp->IFB_FwPfBuff;
3857     ltvp->len = 1;
3858     if ( p->DbMsgSize != 0 ) {
3859         // first, check the counter in nic-RAM and compare it to the latest counter value of the HCF
3860         OPW( HREG_AUX_PAGE, (hcf_16)(p->DbMsgCount >> 7) );
3861         OPW( HREG_AUX_OFFSET, (hcf_16)(p->DbMsgCount & 0x7E) );
3862         fw_cnt = ((IPW( HREG_AUX_DATA) >>1 ) & ((hcf_16)p->DbMsgSize - 1));
3863         if ( fw_cnt != ifbp->IFB_DbgPrintF_Cnt ) {
3864 //    DbgPrint("fw_cnt=%d IFB_DbgPrintF_Cnt=%d\n", fw_cnt, ifbp->IFB_DbgPrintF_Cnt);
3865             DbMsgBuffer = p->DbMsgBuffer + ifbp->IFB_DbgPrintF_Cnt * 6; // each entry is 3 words
3866             OPW( HREG_AUX_PAGE, (hcf_16)(DbMsgBuffer >> 7) );
3867             OPW( HREG_AUX_OFFSET, (hcf_16)(DbMsgBuffer & 0x7E) );
3868             ltvp->msg_id     = IPW(HREG_AUX_DATA);
3869             ltvp->msg_par    = IPW(HREG_AUX_DATA);
3870             ltvp->msg_tstamp = IPW(HREG_AUX_DATA);
3871             ltvp->len = 4;
3872             ifbp->IFB_DbgPrintF_Cnt++;
3873             ifbp->IFB_DbgPrintF_Cnt &= (p->DbMsgSize - 1);
3874         }
3875     }
3876     return rc;
3877 };
3878 #endif // HCF_ASSERT_PRINTF
3879
3880
3881 #if (HCF_DL_ONLY) == 0
3882 /************************************************************************************************************
3883 *
3884 *.SUBMODULE             hcf_16 get_fid( IFBP ifbp )
3885 *.PURPOSE               get allocated FID for either transmit or notify.
3886 *
3887 *.ARGUMENTS
3888 *       ifbp            address of the Interface Block
3889 *
3890 *.RETURNS
3891 *       0       no FID available
3892 *       <>0     FID number
3893 *
3894 *.DESCRIPTION
3895 *
3896 *
3897 *.DIAGRAM
3898 *       The preference is to use a "pending" alloc. If no alloc is pending, then - if available - the "spare" FID
3899 *       is used.
3900 *       If the spare FID is used, IFB_RscInd (representing the spare FID) must be cleared
3901 *       If the pending alloc is used, the alloc event must be acknowledged to the Hermes.
3902 *       In case the spare FID was depleted and the IFB_RscInd has been "faked" as pseudo resource with a 0x0001
3903 *       value by hcf_service_nic, IFB_RscInd has to be "corrected" again to its 0x0000 value.
3904 *
3905 *       Note that due to the Hermes-II H/W problems which are intended to be worked around by DAWA, the Alloc bit
3906 *       in the Event register is no longer a reliable indication of the presence/absence of a FID. The "Clear FID"
3907 *       part of the DAWA logic, together with the choice of the definition of the return information from get_fid,
3908 *       handle this automatically, i.e. without additional code in get_fid.
3909 *.ENDDOC                                END DOCUMENTATION
3910 *
3911 ************************************************************************************************************/
3912 HCF_STATIC hcf_16
3913 get_fid( IFBP ifbp )
3914 {
3915
3916 hcf_16 fid = 0;
3917 #if ( (HCF_TYPE) & HCF_TYPE_HII5 ) == 0
3918 PROT_CNT_INI
3919 #endif // HCF_TYPE_HII5
3920
3921         IF_DMA( HCFASSERT(!(ifbp->IFB_CntlOpt & USE_DMA), ifbp->IFB_CntlOpt) )
3922
3923         if ( IPW( HREG_EV_STAT) & HREG_EV_ALLOC) {
3924                 fid = IPW( HREG_ALLOC_FID );
3925                 HCFASSERT( fid, ifbp->IFB_RscInd )
3926                 DAWA_ZERO_FID( HREG_ALLOC_FID )
3927 #if ( (HCF_TYPE) & HCF_TYPE_HII5 ) == 0
3928                 HCF_WAIT_WHILE( ( IPW( HREG_EV_STAT ) & HREG_EV_ACK_REG_READY ) == 0 );
3929                 HCFASSERT( prot_cnt, IPW( HREG_EV_STAT ) )
3930 #endif // HCF_TYPE_HII5
3931                 DAWA_ACK( HREG_EV_ALLOC );                      //!!note that HREG_EV_ALLOC is written only once
3932 // 180 degree error in logic ;? #if ALLOC_15
3933                 if ( ifbp->IFB_RscInd == 1 ) {
3934                         ifbp->IFB_RscInd = 0;
3935                 }
3936 //#endif // ALLOC_15
3937         } else {
3938 // 180 degree error in logic ;? #if ALLOC_15
3939                 fid = ifbp->IFB_RscInd;
3940 //#endif // ALLOC_15
3941                 ifbp->IFB_RscInd = 0;
3942         }
3943         return fid;
3944 } // get_fid
3945 #endif // HCF_DL_ONLY
3946
3947
3948 /************************************************************************************************************
3949 *
3950 *.SUBMODULE             void get_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) )
3951 *.PURPOSE               reads with 16/32 bit I/O via BAP1 port from NIC RAM to Host memory.
3952 *
3953 *.ARGUMENTS
3954 *       ifbp            address of the Interface Block
3955 *       bufp            (byte) address of buffer
3956 *       len                     length in bytes of buffer specified by bufp
3957 *       word_len        Big Endian only: number of leading bytes to swap in pairs
3958 *
3959 *.RETURNS               N.A.
3960 *
3961 *.DESCRIPTION
3962 * process the single byte (if applicable) read by the previous get_frag and copy len (or len-1) bytes from
3963 * NIC to bufp.
3964 * On a Big Endian platform, the parameter word_len controls the number of leading bytes whose endianess is
3965 * converted (i.e. byte swapped)
3966 *
3967 *
3968 *.DIAGRAM
3969 *10: The PCMCIA card can be removed in the middle of the transfer. By depositing a "magic number" in the
3970 *       HREG_SW_0 register of the Hermes at initialization time and by verifying this register, it can be
3971 *       determined whether the card is still present. The return status is set accordingly.
3972 *       Clearing the buffer is a (relative) cheap way to prevent that failing I/O results in run-away behavior
3973 *       because the garbage in the buffer is interpreted by the caller irrespective of the return status (e.g.
3974 *       hcf_service_nic has this behavior).
3975 *
3976 *.NOTICE
3977 *       It turns out DOS ODI uses zero length fragments. The HCF code can cope with it, but as a consequence, no
3978 *       Assert on len is possible
3979 *
3980 *.ENDDOC                                END DOCUMENTATION
3981 *
3982 ************************************************************************************************************/
3983 HCF_STATIC void
3984 get_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) )
3985 {
3986 hcf_io          io_port = ifbp->IFB_IOBase + HREG_DATA_1;       //BAP data register
3987 wci_bufp        p = bufp;                                                                       //working pointer
3988 int                     i;                                                                                      //prevent side effects from macro
3989 int                     j;
3990
3991         HCFASSERT( ((hcf_32)bufp & (HCF_ALIGN-1) ) == 0, (hcf_32)bufp )
3992
3993 /*1:    here recovery logic for intervening BAP access between hcf_service_nic and hcf_rcv_msg COULD be added
3994  *      if current access is RxInitial
3995  *      .  persistent_offset += len
3996  */
3997
3998         i = len;
3999                                                                                                         //if buffer length > 0 and carry from previous get_frag
4000         if ( i && ifbp->IFB_CarryIn ) {
4001                                                                                                         //.  move carry to buffer
4002                                                                                                         //.  adjust buffer length and pointer accordingly
4003                 *p++ = (hcf_8)(ifbp->IFB_CarryIn>>8);
4004                 i--;
4005                                                                                                         //.  clear carry flag
4006                 ifbp->IFB_CarryIn = 0;
4007         }
4008 #if (HCF_IO) & HCF_IO_32BITS
4009         //skip zero-length I/O, single byte I/O and I/O not worthwhile (i.e. less than 6 bytes)for DW logic
4010                                                                                                         //if buffer length >= 6 and 32 bits I/O support
4011         if ( !(ifbp->IFB_CntlOpt & USE_16BIT) && i >= 6 ) {
4012 hcf_32 FAR      *p4; //prevent side effects from macro
4013                 if ( ( (hcf_32)p & 0x1 ) == 0 ) {                       //.  if buffer at least word aligned
4014                         if ( (hcf_32)p & 0x2 ) {                                //.  .  if buffer not double word aligned
4015                                                                                                         //.  .  .  read single word to get double word aligned
4016                                 *(wci_recordp)p = IN_PORT_WORD( io_port );
4017                                                                                                         //.  .  .  adjust buffer length and pointer accordingly
4018                                 p += 2;
4019                                 i -= 2;
4020                         }
4021                                                                                                         //.  .  read as many double word as possible
4022                         p4 = (hcf_32 FAR *)p;
4023                         j = i/4;
4024                         IN_PORT_STRING_32( io_port, p4, j );
4025                                                                                                         //.  .  adjust buffer length and pointer accordingly
4026                         p += i & ~0x0003;
4027                         i &= 0x0003;
4028                 }
4029         }
4030 #endif // HCF_IO_32BITS
4031                                                                                                         //if no 32-bit support OR byte aligned OR 1-3 bytes left
4032         if ( i ) {
4033                                                                                                         //.  read as many word as possible in "alignment safe" way
4034                 j = i/2;
4035                 IN_PORT_STRING_8_16( io_port, p, j );
4036                                                                                                         //.  if 1 byte left
4037                 if ( i & 0x0001 ) {
4038                                                                                                         //.  .  read 1 word
4039                         ifbp->IFB_CarryIn = IN_PORT_WORD( io_port );
4040                                                                                                         //.  .  store LSB in last char of buffer
4041                         bufp[len-1] = (hcf_8)ifbp->IFB_CarryIn;
4042                                                                                                         //.  .  save MSB in carry, set carry flag
4043                         ifbp->IFB_CarryIn |= 0x1;
4044                 }
4045         }
4046 #if HCF_BIG_ENDIAN
4047         HCFASSERT( word_len == 0 || word_len == 2 || word_len == 4, word_len )
4048         HCFASSERT( word_len == 0 || ((hcf_32)bufp & 1 ) == 0, (hcf_32)bufp )
4049         HCFASSERT( word_len <= len, MERGE2( word_len, len ) )
4050         //see put_frag for an alternative implementation, but be carefull about what are int's and what are
4051         //hcf_16's
4052         if ( word_len ) {                                                               //.  if there is anything to convert
4053 hcf_8 c;
4054                 c = bufp[1];                                                            //.  .  convert the 1st hcf_16
4055                 bufp[1] = bufp[0];
4056                 bufp[0] = c;
4057                 if ( word_len > 1 ) {                                           //.  .  if there is to convert more than 1 word ( i.e 2 )
4058                         c = bufp[3];                                                    //.  .  .  convert the 2nd hcf_16
4059                         bufp[3] = bufp[2];
4060                         bufp[2] = c;
4061                 }
4062         }
4063 #endif // HCF_BIG_ENDIAN
4064 } // get_frag
4065
4066 /************************************************************************************************************
4067 *
4068 *.SUBMODULE             int init( IFBP ifbp )
4069 *.PURPOSE               Handles common initialization aspects (H-I init, calibration, config.mngmt, allocation).
4070 *
4071 *.ARGUMENTS
4072 *       ifbp            address of the Interface Block
4073 *
4074 *.RETURNS
4075 *       HCF_ERR_INCOMP_PRI
4076 *       HCF_ERR_INCOMP_FW
4077 *       HCF_ERR_TIME_OUT
4078 *       >>hcf_get_info
4079 *               HCF_ERR_NO_NIC
4080 *               HCF_ERR_LEN
4081 *
4082 *.DESCRIPTION
4083 * init will successively:
4084 * - in case of a (non-preloaded) H-I, initialize the NIC
4085 * - calibrate the S/W protection timer against the Hermes Timer
4086 * - collect HSI, "active" F/W Configuration Management Information
4087 * - in case active F/W is Primary F/W: collect Primary F/W Configuration Management Information
4088 * - check HSI and Primary F/W compatibility with the HCF
4089 * - in case active F/W is Station or AP F/W: check Station or AP F/W compatibility with the HCF
4090 * - in case active F/W is not Primary F/W: allocate FIDs to be used in transmit/notify process
4091 *
4092 *
4093 *.DIAGRAM
4094 *2:     drop all error status bits in IFB_CardStat since they are expected to be re-evaluated.
4095 *4:     Ack everything except HREG_EV_SLEEP_REQ. It is very likely that an Alloc event is pending and
4096 *       very well possible that a Send Cmd event is pending. Acking HREG_EV_SLEEP_REQ is handled by hcf_action(
4097 *       HCF_ACT_INT_ON ) !!!
4098 *10: Calibrate the S/W time-out protection mechanism by calling calibrate(). Note that possible errors
4099 *       in the calibration process are nor reported by init but will show up via the defunct mechanism in
4100 *       subsequent hcf-calls.
4101 *14: usb_check_comp() is called to have the minimal visual clutter for the legacy H-I USB dongle
4102 *       compatibility check.
4103 *16: The following configuration management related information is retrieved from the NIC:
4104 *        - HSI supplier
4105 *        - F/W Identity
4106 *        - F/W supplier
4107 *        if appropriate:
4108 *        - PRI Identity
4109 *        - PRI supplier
4110 *        appropriate means on H-I: always
4111 *        and on H-II if F/W supplier reflects a primary (i.e. only after an Hermes Reset or Init
4112 *        command).
4113 *        QUESTION ;? !!!!!! should, For each of the above RIDs the Endianess is converted to native Endianess.
4114 *        Only the return code of the first hcf_get_info is used. All hcf_get_info calls are made, regardless of
4115 *        the success or failure of the 1st hcf_get_info. The assumptions are:
4116 *         - if any call fails, they all fail, so remembering the result of the 1st call is adequate
4117 *         - a failing call will overwrite the L-field with a 0x0000 value, which services both as an
4118 *               error indication for the values cached in the IFB as making mmd_check_comp fail.
4119 *        In case of H-I, when getting the F/W identity fails, the F/W is assumed to be H-I AP F/W pre-dating
4120 *        version 9.0 and the F/W Identity and Supplier are faked accordingly.
4121 *        In case of H-II, the Primary, Station and AP Identity are merged into a single F/W Identity.
4122 *        The same applies to the Supplier information. As a consequence the PRI information can no longer be
4123 *        retrieved when a Tertiary runs. To accommodate MSFs and Utilities who depend on PRI information being
4124 *        available at any time, this information is cached in the IFB. In this cache the generic "F/W" value of
4125 *        the typ-fields is overwritten with the specific (legacy) "PRI" values. To actually re-route the (legacy)
4126 *        PRI request via hcf_get_info, the xxxx-table must be set.  In case of H-I, this caching, modifying and
4127 *        re-routing is not needed because PRI information is always available directly from the NIC. For
4128 *        consistency the caching fields in the IFB are filled with the PRI information anyway.
4129 *18: mdd_check_comp() is called to check the Supplier Variant and Range of the Host-S/W I/F (HSI) and the
4130 *       Primary Firmware Variant and Range against the Top and Bottom level supported by this HCF.  If either of
4131 *       these tests fails, the CARD_STAT_INCOMP_PRI bit of IFB_CardStat is set
4132 *       Note: There should always be a primary except during production, so this makes the HCF in its current form
4133 *       unsuitable for manufacturing test systems like the FTS. This can be remedied by an adding a test like
4134 *       ifbp->IFB_PRISup.id == COMP_ID_PRI
4135 *20: In case there is Tertiary F/W and this F/W is Station F/W, the Supplier Variant and Range of the Station
4136 *       Firmware function as retrieved from the Hermes is checked against the Top and Bottom level supported by
4137 *       this HCF.
4138 *       Note: ;? the tertiary F/W compatibility checks could be moved to the DHF, which already has checked the
4139 *       CFI and MFI compatibility of the image with the NIC before the image was downloaded.
4140 *28: In case of non-Primary F/W: allocates and acknowledge a (TX or Notify) FID and allocates without
4141 *       acknowledge another (TX or Notify) FID (the so-called 1.5 alloc scheme) with the following steps:
4142 *       - execute the allocate command by calling cmd_exe
4143 *       - wait till either the alloc event or a time-out occurs
4144 *       - regardless whether the alloc event occurs, call get_fid to
4145 *         - read the FID and save it in IFB_RscInd to be used as "spare FID"
4146 *         - acknowledge the alloc event
4147 *         - do another "half" allocate to complete the "1.5 Alloc scheme"
4148 *         Note that above 3 steps do not harm and thus give the "cheapest" acceptable strategy.
4149 *         If a time-out occurred, then report time out status (after all)
4150 *
4151 *.ENDDOC                                END DOCUMENTATION
4152 *
4153 ************************************************************************************************************/
4154 HCF_STATIC int
4155 init( IFBP ifbp )
4156 {
4157
4158 int     rc = HCF_SUCCESS;
4159
4160         HCFLOGENTRY( HCF_TRACE_INIT, 0 )
4161
4162         ifbp->IFB_CardStat = 0;                                                                                                                                                 /* 2*/
4163         OPW( HREG_EV_ACK, ~HREG_EV_SLEEP_REQ );                                                                                         /* 4*/
4164         IF_PROT_TIME( calibrate( ifbp ); )                                                                                                      /*10*/
4165 #if 0 // OOR
4166         ifbp->IFB_FWIdentity.len = 2;                                                   //misuse the IFB space for a put
4167         ifbp->IFB_FWIdentity.typ = CFG_TICK_TIME;
4168         ifbp->IFB_FWIdentity.comp_id = (1000*1000)/1024 + 1;    //roughly 1 second
4169         hcf_put_info( ifbp, (LTVP)&ifbp->IFB_FWIdentity.len );
4170 #endif // OOR
4171         ifbp->IFB_FWIdentity.len = sizeof(CFG_FW_IDENTITY_STRCT)/sizeof(hcf_16) - 1;
4172         ifbp->IFB_FWIdentity.typ = CFG_FW_IDENTITY;
4173         rc = hcf_get_info( ifbp, (LTVP)&ifbp->IFB_FWIdentity.len );
4174 /* ;? conversion should not be needed for mmd_check_comp */
4175 #if HCF_BIG_ENDIAN
4176         ifbp->IFB_FWIdentity.comp_id       = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWIdentity.comp_id );
4177         ifbp->IFB_FWIdentity.variant       = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWIdentity.variant );
4178         ifbp->IFB_FWIdentity.version_major = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWIdentity.version_major );
4179         ifbp->IFB_FWIdentity.version_minor = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWIdentity.version_minor );
4180 #endif // HCF_BIG_ENDIAN
4181 #if defined MSF_COMPONENT_ID                                                                                                                                            /*14*/
4182         if ( rc == HCF_SUCCESS ) {                                                                                                                                              /*16*/
4183                 ifbp->IFB_HSISup.len = sizeof(CFG_SUP_RANGE_STRCT)/sizeof(hcf_16) - 1;
4184                 ifbp->IFB_HSISup.typ = CFG_NIC_HSI_SUP_RANGE;
4185                 rc = hcf_get_info( ifbp, (LTVP)&ifbp->IFB_HSISup.len );
4186 /* ;? conversion should not be needed for mmd_check_comp , BUT according to a report of a BE-user it is
4187  * should be resolved in the WARP release
4188  * since some compilers make ugly but unnecessary code of these instructions even for LE,
4189  * it is conditionally compiled */
4190 #if HCF_BIG_ENDIAN
4191                 ifbp->IFB_HSISup.role    = CNV_LITTLE_TO_SHORT( ifbp->IFB_HSISup.role );
4192                 ifbp->IFB_HSISup.id      = CNV_LITTLE_TO_SHORT( ifbp->IFB_HSISup.id );
4193                 ifbp->IFB_HSISup.variant = CNV_LITTLE_TO_SHORT( ifbp->IFB_HSISup.variant );
4194                 ifbp->IFB_HSISup.bottom  = CNV_LITTLE_TO_SHORT( ifbp->IFB_HSISup.bottom );
4195                 ifbp->IFB_HSISup.top     = CNV_LITTLE_TO_SHORT( ifbp->IFB_HSISup.top );
4196 #endif // HCF_BIG_ENDIAN
4197                 ifbp->IFB_FWSup.len = sizeof(CFG_SUP_RANGE_STRCT)/sizeof(hcf_16) - 1;
4198                 ifbp->IFB_FWSup.typ = CFG_FW_SUP_RANGE;
4199                 (void)hcf_get_info( ifbp, (LTVP)&ifbp->IFB_FWSup.len );
4200 /* ;? conversion should not be needed for mmd_check_comp */
4201 #if HCF_BIG_ENDIAN
4202                 ifbp->IFB_FWSup.role    = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWSup.role );
4203                 ifbp->IFB_FWSup.id      = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWSup.id );
4204                 ifbp->IFB_FWSup.variant = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWSup.variant );
4205                 ifbp->IFB_FWSup.bottom  = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWSup.bottom );
4206                 ifbp->IFB_FWSup.top     = CNV_LITTLE_TO_SHORT( ifbp->IFB_FWSup.top );
4207 #endif // HCF_BIG_ENDIAN
4208
4209                 if ( ifbp->IFB_FWSup.id == COMP_ID_PRI ) {                                                                                              /* 20*/
4210 int i = sizeof( CFG_FW_IDENTITY_STRCT) + sizeof(CFG_SUP_RANGE_STRCT );
4211                         while ( i-- ) ((hcf_8*)(&ifbp->IFB_PRIIdentity))[i] = ((hcf_8*)(&ifbp->IFB_FWIdentity))[i];
4212                         ifbp->IFB_PRIIdentity.typ = CFG_PRI_IDENTITY;
4213                         ifbp->IFB_PRISup.typ = CFG_PRI_SUP_RANGE;
4214                         xxxx[xxxx_PRI_IDENTITY_OFFSET] = &ifbp->IFB_PRIIdentity.len;
4215                         xxxx[xxxx_PRI_IDENTITY_OFFSET+1] = &ifbp->IFB_PRISup.len;
4216                 }
4217                 if ( !mmd_check_comp( (void*)&cfg_drv_act_ranges_hsi, &ifbp->IFB_HSISup)                                 /* 22*/
4218 #if ( (HCF_TYPE) & HCF_TYPE_PRELOADED ) == 0
4219 //;? the PRI compatibility check is only relevant for DHF
4220                          || !mmd_check_comp( (void*)&cfg_drv_act_ranges_pri, &ifbp->IFB_PRISup)
4221 #endif // HCF_TYPE_PRELOADED
4222                    ) {
4223                         ifbp->IFB_CardStat = CARD_STAT_INCOMP_PRI;
4224                         rc = HCF_ERR_INCOMP_PRI;
4225                 }
4226                 if ( ( ifbp->IFB_FWSup.id == COMP_ID_STA &&     !mmd_check_comp( (void*)&cfg_drv_act_ranges_sta, &ifbp->IFB_FWSup) ) ||
4227                          ( ifbp->IFB_FWSup.id == COMP_ID_APF && !mmd_check_comp( (void*)&cfg_drv_act_ranges_apf, &ifbp->IFB_FWSup) )
4228                    ) {                                                                                                                                                                  /* 24 */
4229                         ifbp->IFB_CardStat |= CARD_STAT_INCOMP_FW;
4230                         rc = HCF_ERR_INCOMP_FW;
4231                 }
4232         }
4233 #endif // MSF_COMPONENT_ID
4234 #if (HCF_DL_ONLY) == 0                                                                                                                                                  /* 28 */
4235         if ( rc == HCF_SUCCESS && ifbp->IFB_FWIdentity.comp_id >= COMP_ID_FW_STA ) {
4236 PROT_CNT_INI
4237                 /**************************************************************************************
4238                 * rlav: the DMA engine needs the host to cause a 'hanging alloc event' for it to consume.
4239                 * not sure if this is the right spot in the HCF, thinking about hcf_enable...
4240                 **************************************************************************************/
4241                 rc = cmd_exe( ifbp, HCMD_ALLOC, 0 );
4242 // 180 degree error in logic ;? #if ALLOC_15
4243 //              ifbp->IFB_RscInd = 1;   //let's hope that by the time hcf_send_msg isa called, there will be a FID
4244 //#else
4245                 if ( rc == HCF_SUCCESS ) {
4246                         HCF_WAIT_WHILE( (IPW( HREG_EV_STAT ) & HREG_EV_ALLOC) == 0 );
4247                         IF_PROT_TIME( HCFASSERT(prot_cnt, IPW( HREG_EV_STAT ) ) /*NOP*/;)
4248 #if HCF_DMA
4249                         if ( ! ( ifbp->IFB_CntlOpt & USE_DMA ) )
4250 #endif // HCF_DMA
4251                         {
4252                                 ifbp->IFB_RscInd = get_fid( ifbp );
4253                                 HCFASSERT( ifbp->IFB_RscInd, 0 )
4254                                 cmd_exe( ifbp, HCMD_ALLOC, 0 );
4255                                 IF_PROT_TIME( if ( prot_cnt == 0 ) rc = HCF_ERR_TIME_OUT; )
4256                         }
4257                 }
4258 //#endif // ALLOC_15
4259         }
4260 #endif // HCF_DL_ONLY
4261         HCFASSERT( rc == HCF_SUCCESS, rc )
4262         HCFLOGEXIT( HCF_TRACE_INIT )
4263         return rc;
4264 } // init
4265
4266 #if (HCF_DL_ONLY) == 0
4267 /************************************************************************************************************
4268 *
4269 *.SUBMODULE             void isr_info( IFBP ifbp )
4270 *.PURPOSE               handles link events.
4271 *
4272 *.ARGUMENTS
4273 *       ifbp            address of the Interface Block
4274 *
4275 *.RETURNS               N.A.
4276 *
4277 *.DESCRIPTION
4278 *
4279 *
4280 *.DIAGRAM
4281 *1:     First the FID number corresponding with the InfoEvent is determined.
4282 *       Note the complication of the zero-FID protection sub-scheme in DAWA.
4283 *       Next the L-field and the T-field are fetched into scratch buffer info.
4284 *2:     In case of tallies, the 16 bits Hermes values are accumulated in the IFB into 32 bits values. Info[0]
4285 *       is (expected to be) HCF_NIC_TAL_CNT + 1. The contraption "while ( info[0]-- >1 )" rather than
4286 *       "while ( --info[0] )" is used because it is dangerous to determine the length of the Value field by
4287 *       decrementing info[0]. As a result of a bug in some version of the F/W, info[0] may be 0, resulting
4288 *       in a very long loop in the pre-decrement logic.
4289 *4:     In case of a link status frame, the information is copied to the IFB field IFB_linkStat
4290 *6:     All other than Tallies (including "unknown" ones) are checked against the selection set by the MSF
4291 *       via CFG_RID_LOG. If a match is found or the selection set has the wild-card type (i.e non-NULL buffer
4292 *       pointer at the terminating zero-type), the frame is copied to the (type-specific) log buffer.
4293 *       Note that to accumulate tallies into IFB AND to log them or to log a frame when a specific match occures
4294 *       AND based on the wild-card selection, you have to call setup_bap again after the 1st copy.
4295 *
4296 *.ENDDOC                                END DOCUMENTATION
4297 *
4298 ************************************************************************************************************/
4299 HCF_STATIC void
4300 isr_info( IFBP ifbp )
4301 {
4302 hcf_16  info[2], fid;
4303 #if (HCF_EXT) & HCF_EXT_INFO_LOG
4304 RID_LOGP        ridp = ifbp->IFB_RIDLogp;       //NULL or pointer to array of RID_LOG structures (terminated by zero typ)
4305 #endif // HCF_EXT_INFO_LOG
4306
4307         HCFTRACE( ifbp, HCF_TRACE_ISR_INFO );                                                                                                                           /* 1 */
4308         fid = IPW( HREG_INFO_FID );
4309         DAWA_ZERO_FID( HREG_INFO_FID )
4310         if ( fid ) {
4311                 (void)setup_bap( ifbp, fid, 0, IO_IN );
4312                 get_frag( ifbp, (wci_bufp)info, 4 BE_PAR(2) );
4313                 HCFASSERT( info[0] <= HCF_MAX_LTV + 1, MERGE_2( info[1], info[0] ) )  //;? a smaller value makes more sense
4314 #if (HCF_TALLIES) & HCF_TALLIES_NIC             //Hermes tally support
4315                 if ( info[1] == CFG_TALLIES ) {
4316 hcf_32  *p;
4317 /*2*/           if ( info[0] > HCF_NIC_TAL_CNT ) {
4318                                 info[0] = HCF_NIC_TAL_CNT + 1;
4319                         }
4320                         p = (hcf_32*)&ifbp->IFB_NIC_Tallies;
4321                         while ( info[0]-- >1 ) *p++ += IPW( HREG_DATA_1 );      //request may return zero length
4322                 }
4323                 else
4324 #endif // HCF_TALLIES_NIC
4325                 {
4326 /*4*/           if ( info[1] == CFG_LINK_STAT ) {
4327                                 ifbp->IFB_LinkStat = IPW( HREG_DATA_1 );
4328                         }
4329 #if (HCF_EXT) & HCF_EXT_INFO_LOG
4330 /*6*/           while ( 1 ) {
4331                                 if ( ridp->typ == 0 || ridp->typ == info[1] ) {
4332                                         if ( ridp->bufp ) {
4333                                                 HCFASSERT( ridp->len >= 2, ridp->typ )
4334                                                 ridp->bufp[0] = min((hcf_16)(ridp->len - 1), info[0] );         //save L
4335                                                 ridp->bufp[1] = info[1];                                                //save T
4336                                                 get_frag( ifbp, (wci_bufp)&ridp->bufp[2], (ridp->bufp[0] - 1)*2 BE_PAR(0) );
4337                                         }
4338                                         break;
4339                                 }
4340                                 ridp++;
4341                         }
4342 #endif // HCF_EXT_INFO_LOG
4343                 }
4344                 HCFTRACE( ifbp, HCF_TRACE_ISR_INFO | HCF_TRACE_EXIT );
4345         }
4346         return;
4347 } // isr_info
4348 #endif // HCF_DL_ONLY
4349
4350 //
4351 //
4352 // #endif // HCF_TALLIES_NIC
4353 // /*4*/        if ( info[1] == CFG_LINK_STAT ) {
4354 //                      ifbp->IFB_DSLinkStat = IPW( HREG_DATA_1 ) | CFG_LINK_STAT_CHANGE;       //corrupts BAP !! ;?
4355 //                      ifbp->IFB_LinkStat = ifbp->IFB_DSLinkStat & CFG_LINK_STAT_FW; //;? to be obsoleted
4356 //                      printk( "<4>linkstatus: %04x\n", ifbp->IFB_DSLinkStat );                //;?remove me 1 day
4357 // #if (HCF_SLEEP) & HCF_DDS
4358 //                      if ( ( ifbp->IFB_DSLinkStat & CFG_LINK_STAT_CONNECTED ) == 0 ) {        //even values are disconnected etc.
4359 //                              ifbp->IFB_TickCnt = 0;                          //start 2 second period (with 1 tick uncertanty)
4360 //                              printk( "<5>isr_info: AwaitConnection phase started, IFB_TickCnt = 0\n" );              //;?remove me 1 day
4361 //                      }
4362 // #endif // HCF_DDS
4363 //              }
4364 // #if (HCF_EXT) & HCF_EXT_INFO_LOG
4365 // /*6*/        while ( 1 ) {
4366 //                      if ( ridp->typ == 0 || ridp->typ == info[1] ) {
4367 //                              if ( ridp->bufp ) {
4368 //                                      HCFASSERT( ridp->len >= 2, ridp->typ )
4369 //                                      (void)setup_bap( ifbp, fid, 2, IO_IN );                 //restore BAP for tallies, linkstat and specific type followed by wild card
4370 //                                      ridp->bufp[0] = min( ridp->len - 1, info[0] );  //save L
4371 //                                      get_frag( ifbp, (wci_bufp)&ridp->bufp[1], ridp->bufp[0]*2 BE_PAR(0) );
4372 //                              }
4373 //                              break; //;?this break is no longer needed due to setup_bap but lets concentrate on DDS first
4374 //                      }
4375 //                      ridp++;
4376 //              }
4377 // #endif // HCF_EXT_INFO_LOG
4378 //      }
4379 //      HCFTRACE( ifbp, HCF_TRACE_ISR_INFO | HCF_TRACE_EXIT );
4380 //
4381 //
4382 //
4383 //
4384 //      return;
4385 //} // isr_info
4386 //#endif // HCF_DL_ONLY
4387
4388
4389 /************************************************************************************************************
4390 *
4391 *.SUBMODULE             void mdd_assert( IFBP ifbp, unsigned int line_number, hcf_32 q )
4392 *.PURPOSE               filters assert on level and interfaces to the MSF supplied msf_assert routine.
4393 *
4394 *.ARGUMENTS
4395 *       ifbp            address of the Interface Block
4396 *       line_number     line number of the line which caused the assert
4397 *       q                       qualifier, additional information which may give a clue about the problem
4398 *
4399 *.RETURNS               N.A.
4400 *
4401 *.DESCRIPTION
4402 *
4403 *
4404 *.DIAGRAM
4405 *
4406 *.NOTICE
4407 * mdd_assert has been through a turmoil, renaming hcf_assert to assert and hcf_assert again and supporting off
4408 * and on being called from the MSF level and other ( immature ) ModularDriverDevelopment modules like DHF and
4409 * MMD.
4410  * !!!! The assert routine is not an hcf_..... routine in the sense that it may be called by the MSF,
4411  *              however it is called from mmd.c and dhf.c, so it must be external.
4412  *              To prevent namespace pollution it needs a prefix, to prevent that MSF programmers think that
4413  *              they are allowed to call the assert logic, the prefix HCF can't be used, so MDD is selected!!!!
4414  *
4415 * When called from the DHF module the line number is incremented by DHF_FILE_NAME_OFFSET and when called from
4416 * the MMD module by MMD_FILE_NAME_OFFSET.
4417 *
4418 *.ENDDOC                                END DOCUMENTATION
4419 *
4420 ************************************************************************************************************/
4421 #if HCF_ASSERT
4422 void
4423 mdd_assert( IFBP ifbp, unsigned int line_number, hcf_32 q )
4424 {
4425 hcf_16  run_time_flag = ifbp->IFB_AssertLvl;
4426
4427         if ( run_time_flag /* > ;?????? */ ) { //prevent recursive behavior, later to be extended to level filtering
4428                 ifbp->IFB_AssertQualifier = q;
4429                 ifbp->IFB_AssertLine = (hcf_16)line_number;
4430 #if (HCF_ASSERT) & ( HCF_ASSERT_LNK_MSF_RTN | HCF_ASSERT_RT_MSF_RTN )
4431                 if ( ifbp->IFB_AssertRtn ) {
4432                         ifbp->IFB_AssertRtn( line_number, ifbp->IFB_AssertTrace, q );
4433                 }
4434 #endif // HCF_ASSERT_LNK_MSF_RTN / HCF_ASSERT_RT_MSF_RTN
4435 #if (HCF_ASSERT) & HCF_ASSERT_SW_SUP
4436                 OPW( HREG_SW_2, line_number );
4437                 OPW( HREG_SW_2, ifbp->IFB_AssertTrace );
4438                 OPW( HREG_SW_2, (hcf_16)q );
4439                 OPW( HREG_SW_2, (hcf_16)(q >> 16 ) );
4440 #endif // HCF_ASSERT_SW_SUP
4441
4442 #if (HCF_EXT) & HCF_EXT_MB && (HCF_ASSERT) & HCF_ASSERT_MB
4443                 ifbp->IFB_AssertLvl = 0;                                                                        // prevent recursive behavior
4444                 hcf_put_info( ifbp, (LTVP)&ifbp->IFB_AssertStrct );
4445                 ifbp->IFB_AssertLvl = run_time_flag;                                            // restore appropriate filter level
4446 #endif // HCF_EXT_MB / HCF_ASSERT_MB
4447         }
4448 } // mdd_assert
4449 #endif // HCF_ASSERT
4450
4451
4452 /************************************************************************************************************
4453 *
4454 *.SUBMODULE             void put_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) )
4455 *.PURPOSE               writes with 16/32 bit I/O via BAP1 port from Host memory to NIC RAM.
4456 *
4457 *.ARGUMENTS
4458 *       ifbp            address of the Interface Block
4459 *       bufp            (byte) address of buffer
4460 *       len                     length in bytes of buffer specified by bufp
4461 *       word_len        Big Endian only: number of leading bytes to swap in pairs
4462 *
4463 *.RETURNS               N.A.
4464 *
4465 *.DESCRIPTION
4466 * process the single byte (if applicable) not yet written by the previous put_frag and copy len
4467 * (or len-1) bytes from bufp to NIC.
4468 *
4469 *
4470 *.DIAGRAM
4471 *
4472 *.NOTICE
4473 *       It turns out DOS ODI uses zero length fragments. The HCF code can cope with it, but as a consequence, no
4474 *       Assert on len is possible
4475 *
4476 *.ENDDOC                                END DOCUMENTATION
4477 *
4478 ************************************************************************************************************/
4479 HCF_STATIC void
4480 put_frag( IFBP ifbp, wci_bufp bufp, int len BE_PAR( int word_len ) )
4481 {
4482 hcf_io          io_port = ifbp->IFB_IOBase + HREG_DATA_1;       //BAP data register
4483 int                     i;                                                                                      //prevent side effects from macro
4484 hcf_16          j;
4485         HCFASSERT( ((hcf_32)bufp & (HCF_ALIGN-1) ) == 0, (hcf_32)bufp )
4486 #if HCF_BIG_ENDIAN
4487         HCFASSERT( word_len == 0 || word_len == 2 || word_len == 4, word_len )
4488         HCFASSERT( word_len == 0 || ((hcf_32)bufp & 1 ) == 0, (hcf_32)bufp )
4489         HCFASSERT( word_len <= len, MERGE_2( word_len, len ) )
4490
4491         if ( word_len ) {                                                                       //if there is anything to convert
4492                                                                                                                 //.  convert and write the 1st hcf_16
4493                 j = bufp[1] | bufp[0]<<8;
4494                 OUT_PORT_WORD( io_port, j );
4495                                                                                                                 //.  update pointer and counter accordingly
4496                 len -= 2;
4497                 bufp += 2;
4498                 if ( word_len > 1 ) {                                                   //.  if there is to convert more than 1 word ( i.e 2 )
4499                                                                                                                 //.  .  convert and write the 2nd hcf_16
4500                         j = bufp[1] | bufp[0]<<8;       /*bufp is already incremented by 2*/
4501                         OUT_PORT_WORD( io_port, j );
4502                                                                                                                 //.  .  update pointer and counter accordingly
4503                         len -= 2;
4504                         bufp += 2;
4505                 }
4506         }
4507 #endif // HCF_BIG_ENDIAN
4508         i = len;
4509         if ( i && ifbp->IFB_CarryOut ) {                                        //skip zero-length
4510                 j = ((*bufp)<<8) + ( ifbp->IFB_CarryOut & 0xFF );
4511                 OUT_PORT_WORD( io_port, j );
4512                 bufp++; i--;
4513                 ifbp->IFB_CarryOut = 0;
4514         }
4515 #if (HCF_IO) & HCF_IO_32BITS
4516         //skip zero-length I/O, single byte I/O and I/O not worthwhile (i.e. less than 6 bytes)for DW logic
4517                                                                                                         //if buffer length >= 6 and 32 bits I/O support
4518         if ( !(ifbp->IFB_CntlOpt & USE_16BIT) && i >= 6 ) {
4519 hcf_32 FAR      *p4; //prevent side effects from macro
4520                 if ( ( (hcf_32)bufp & 0x1 ) == 0 ) {                    //.  if buffer at least word aligned
4521                         if ( (hcf_32)bufp & 0x2 ) {                             //.  .  if buffer not double word aligned
4522                                                         //.  .  .  write a single word to get double word aligned
4523                                 j = *(wci_recordp)bufp;         //just to help ease writing macros with embedded assembly
4524                                 OUT_PORT_WORD( io_port, j );
4525                                                                                                         //.  .  .  adjust buffer length and pointer accordingly
4526                                 bufp += 2; i -= 2;
4527                         }
4528                                                                                                         //.  .  write as many double word as possible
4529                         p4 = (hcf_32 FAR *)bufp;
4530                         j = (hcf_16)i/4;
4531                         OUT_PORT_STRING_32( io_port, p4, j );
4532                                                                                                         //.  .  adjust buffer length and pointer accordingly
4533                         bufp += i & ~0x0003;
4534                         i &= 0x0003;
4535                 }
4536         }
4537 #endif // HCF_IO_32BITS
4538                                                                                                         //if no 32-bit support OR byte aligned OR 1 word left
4539         if ( i ) {
4540                                                                                                         //.  if odd number of bytes left
4541                 if ( i & 0x0001 ) {
4542                                                                                                         //.  .  save left over byte (before bufp is corrupted) in carry, set carry flag
4543                         ifbp->IFB_CarryOut = (hcf_16)bufp[i-1] | 0x0100;        //note that i and bufp are always simultaneously modified, &bufp[i-1] is invariant
4544                 }
4545                                                                                                         //.  write as many word as possible in "alignment safe" way
4546                 j = (hcf_16)i/2;
4547                 OUT_PORT_STRING_8_16( io_port, bufp, j );
4548         }
4549 } // put_frag
4550
4551
4552 /************************************************************************************************************
4553 *
4554 *.SUBMODULE             void put_frag_finalize( IFBP ifbp )
4555 *.PURPOSE               cleanup after put_frag for trailing odd byte and MIC transfer to NIC.
4556 *
4557 *.ARGUMENTS
4558 *       ifbp            address of the Interface Block
4559 *
4560 *.RETURNS               N.A.
4561 *
4562 *.DESCRIPTION
4563 * finalize the MIC calculation with the padding pattern, output the last byte (if applicable)
4564 * of the message and the MIC to the TxFS
4565 *
4566 *
4567 *.DIAGRAM
4568 *2:     1 byte of the last put_frag may be still in IFB_CarryOut ( the put_frag carry holder ), so ........
4569 *       1 - 3 bytes of the last put_frag may be still in IFB_tx_32 ( the MIC engine carry holder ), so ........
4570 *       The call to the MIC calculation routine feeds these remaining bytes (if any) of put_frag and the
4571 *       just as many bytes of the padding as needed to the MIC calculation engine. Note that the "unneeded" pad
4572 *       bytes simply end up in the MIC engine carry holder and are never used.
4573 *8:     write the remainder of the MIC and possible some garbage to NIC RAM
4574 *       Note: i is always 4 (a loop-invariant of the while in point 2)
4575 *
4576 *.NOTICE
4577 *
4578 *.ENDDOC                                END DOCUMENTATION
4579 *
4580 ************************************************************************************************************/
4581 HCF_STATIC void
4582 put_frag_finalize( IFBP ifbp )
4583 {
4584 #if (HCF_TYPE) & HCF_TYPE_WPA
4585         if ( ifbp->IFB_MICTxCarry != 0xFFFF) {          //if MIC calculation active
4586                 CALC_TX_MIC( mic_pad, 8);                               //.  feed (up to 8 bytes of) virtual padding to MIC engine
4587                                                                                                 //.  write (possibly) trailing byte + (most of) MIC
4588                 put_frag( ifbp, (wci_bufp)ifbp->IFB_MICTx, 8 BE_PAR(0) );
4589         }
4590 #endif // HCF_TYPE_WPA
4591         put_frag( ifbp, null_addr, 1 BE_PAR(0) );       //write (possibly) trailing data or MIC byte
4592 } // put_frag_finalize
4593
4594
4595 /************************************************************************************************************
4596 *
4597 *.SUBMODULE             int put_info( IFBP ifbp, LTVP ltvp )
4598 *.PURPOSE               support routine to handle the "basic" task of hcf_put_info to pass RIDs to the NIC.
4599 *
4600 *.ARGUMENTS
4601 *       ifbp            address of the Interface Block
4602 *       ltvp            address in NIC RAM where LVT-records are located
4603 *
4604 *.RETURNS
4605 *       HCF_SUCCESS
4606 *       >>put_frag
4607 *       >>cmd_wait
4608 *
4609 *.DESCRIPTION
4610 *
4611 *
4612 *.DIAGRAM
4613 *20: do not write RIDs to NICs which have incompatible Firmware
4614 *24: If the RID does not exist, the L-field is set to zero.
4615 *       Note that some RIDs can not be read, e.g. the pseudo RIDs for direct Hermes commands and CFG_DEFAULT_KEYS
4616 *28: If the RID is written successful, pass it to the NIC by means of an Access Write command
4617 *
4618 *.NOTICE
4619 *       The mechanism to HCF_ASSERT on invalid typ-codes in the LTV record is based on the following strategy:
4620 *         -     some codes (e.g. CFG_REG_MB) are explicitly handled by the HCF which implies that these codes
4621 *               are valid. These codes are already consumed by hcf_put_info.
4622 *         - all other codes are passed to the Hermes. Before the put action is executed, hcf_get_info is called
4623 *               with an LTV record with a value of 1 in the L-field and the intended put action type in the Typ-code
4624 *               field. If the put action type is valid, it is also valid as a get action type code - except
4625 *               for CFG_DEFAULT_KEYS and CFG_ADD_TKIP_DEFAULT_KEY - so the HCF_ASSERT logic of hcf_get_info should
4626 *               not catch.
4627 *
4628 *.ENDDOC                                END DOCUMENTATION
4629 *
4630 ************************************************************************************************************/
4631 HCF_STATIC int
4632 put_info( IFBP ifbp, LTVP ltvp  )
4633 {
4634
4635 int rc = HCF_SUCCESS;
4636
4637         HCFASSERT( ifbp->IFB_CardStat == 0, MERGE_2( ltvp->typ, ifbp->IFB_CardStat ) )
4638         HCFASSERT( CFG_RID_CFG_MIN <= ltvp->typ && ltvp->typ <= CFG_RID_CFG_MAX, ltvp->typ )
4639
4640         if ( ifbp->IFB_CardStat == 0 &&                                                                                                                         /* 20*/
4641                  ( ( CFG_RID_CFG_MIN <= ltvp->typ    && ltvp->typ <= CFG_RID_CFG_MAX ) ||
4642                    ( CFG_RID_ENG_MIN <= ltvp->typ /* && ltvp->typ <= 0xFFFF */       )     ) ) {
4643 #if HCF_ASSERT //FCC8, FCB0, FCB4, FCB6, FCB7, FCB8, FCC0, FCC4, FCBC, FCBD, FCBE, FCBF
4644  {
4645  hcf_16         t = ltvp->typ;
4646  LTV_STRCT      x = { 2, t, {0} };                                                                                                                      /*24*/
4647         hcf_get_info( ifbp, (LTVP)&x );
4648         if ( x.len == 0 &&
4649                  ( t != CFG_DEFAULT_KEYS && t != CFG_ADD_TKIP_DEFAULT_KEY && t != CFG_REMOVE_TKIP_DEFAULT_KEY &&
4650                    t != CFG_ADD_TKIP_MAPPED_KEY && t != CFG_REMOVE_TKIP_MAPPED_KEY &&
4651                    t != CFG_HANDOVER_ADDR && t != CFG_DISASSOCIATE_ADDR &&
4652                    t != CFG_FCBC && t != CFG_FCBD && t != CFG_FCBE && t != CFG_FCBF &&
4653                    t != CFG_DEAUTHENTICATE_ADDR
4654                  )
4655                 ) {
4656                 HCFASSERT( DO_ASSERT, ltvp->typ )
4657                 }
4658  }
4659 #endif // HCF_ASSERT
4660
4661                 rc = setup_bap( ifbp, ltvp->typ, 0, IO_OUT );
4662                 put_frag( ifbp, (wci_bufp)ltvp, 2*ltvp->len + 2 BE_PAR(2) );
4663 /*28*/  if ( rc == HCF_SUCCESS ) {
4664                         rc = cmd_exe( ifbp, HCMD_ACCESS + HCMD_ACCESS_WRITE, ltvp->typ );
4665                 }
4666         }
4667         return rc;
4668 } // put_info
4669
4670
4671 #if (HCF_DL_ONLY) == 0
4672 /************************************************************************************************************
4673 *
4674 *.SUBMODULE             int put_info_mb( IFBP ifbp, CFG_MB_INFO_STRCT FAR * ltvp )
4675 *.PURPOSE               accumulates a ( series of) buffers into a single Info block into the MailBox.
4676 *
4677 *.ARGUMENTS
4678 *       ifbp            address of the Interface Block
4679 *       ltvp            address of structure specifying the "type" and the fragments of the information to be synthesized
4680 *                               as an LTV into the MailBox
4681 *
4682 *.RETURNS
4683 *
4684 *.DESCRIPTION
4685 * If the data does not fit (including no MailBox is available), the IFB_MBTally is incremented and an
4686 * error status is returned.
4687 * HCF_ASSERT does not catch.
4688 * Calling put_info_mb when their is no MailBox available, is considered a design error in the MSF.
4689 *
4690 * Note that there is always at least 1 word of unused space in the mail box.
4691 * As a consequence:
4692 * - no problem in pointer arithmetic (MB_RP == MB_WP means unambiguously mail box is completely empty
4693 * - There is always free space to write an L field with a value of zero after each MB_Info block.  This
4694 *   allows for an easy scan mechanism in the "get MB_Info block" logic.
4695 *
4696 *
4697 *.DIAGRAM
4698 *1:     Calculate L field of the MBIB, i.e. 1 for the T-field + the cumulative length of the fragments.
4699 *2:     The free space in the MailBox is calculated (2a: free part from Write Ptr to Read Ptr, 2b: free part
4700 *       turns out to wrap around) . If this space suffices to store the number of words reflected by len (T-field
4701 *       + Value-field) plus the additional MailBox Info L-field + a trailing 0 to act as the L-field of a trailing
4702 *       dummy or empty LTV record, then a MailBox Info block is build in the MailBox consisting of
4703 *         - the value len in the first word
4704 *         - type in the second word
4705 *         - a copy of the contents of the fragments in the second and higher word
4706 *
4707 *4:     Since put_info_mb() can more or less directly be called from the MSF level, the I/F must be robust
4708 *       against out-of-range variables. As failsafe coding, the MB update is skipped by changing tlen to 0 if
4709 *       len == 0; This will indirectly cause an assert as result of the violation of the next if clause.
4710 *6:     Check whether the free space in MailBox suffices (this covers the complete absence of the MailBox).
4711 *       Note that len is unsigned, so even MSF I/F violation works out O.K.
4712 *       The '2' in the expression "len+2" is used because 1 word is needed for L itself and 1 word is needed
4713 *       for the zero-sentinel
4714 *8:     update MailBox Info length report to MSF with "oldest" MB Info Block size. Be carefull here, if you get
4715 *       here before the MailBox is registered, you can't read from the buffer addressed by IFB_MBp (it is the
4716 *       Null buffer) so don't move this code till the end of this routine but keep it where there is garuanteed
4717 *       a buffer.
4718 *
4719 *.NOTICE
4720 *       boundary testing depends on the fact that IFB_MBSize is guaranteed to be zero if no MailBox is present,
4721 *       and to a lesser degree, that IFB_MBWp = IFB_MBRp = 0
4722 *
4723 *.ENDDOC                                END DOCUMENTATION
4724 *
4725 ************************************************************************************************************/
4726 #if (HCF_EXT) & HCF_EXT_MB
4727
4728 HCF_STATIC int
4729 put_info_mb( IFBP ifbp, CFG_MB_INFO_STRCT FAR * ltvp )
4730 {
4731
4732 int                     rc = HCF_SUCCESS;
4733 hcf_16          i;                                              //work counter
4734 hcf_16          *dp;                                    //destination pointer (in MailBox)
4735 wci_recordp     sp;                                             //source pointer
4736 hcf_16          len;                                    //total length to copy to MailBox
4737 hcf_16          tlen;                                   //free length/working length/offset in WMP frame
4738
4739         if ( ifbp->IFB_MBp == NULL ) return rc;  //;?not sufficient
4740         HCFASSERT( ifbp->IFB_MBp != NULL, 0 )                                   //!!!be careful, don't get into an endless recursion
4741         HCFASSERT( ifbp->IFB_MBSize, 0 )
4742
4743         len = 1;                                                                                                                                                                                        /* 1 */
4744         for ( i = 0; i < ltvp->frag_cnt; i++ ) {
4745                 len += ltvp->frag_buf[i].frag_len;
4746         }
4747         if ( ifbp->IFB_MBRp > ifbp->IFB_MBWp ) {
4748                 tlen = ifbp->IFB_MBRp - ifbp->IFB_MBWp;                                                                                                                 /* 2a*/
4749         } else {
4750                 if ( ifbp->IFB_MBRp == ifbp->IFB_MBWp ) {
4751                         ifbp->IFB_MBRp = ifbp->IFB_MBWp = 0;    // optimize Wrapping
4752                 }
4753                 tlen = ifbp->IFB_MBSize - ifbp->IFB_MBWp;                                                                                                               /* 2b*/
4754                 if ( ( tlen <= len + 2 ) && ( len + 2 < ifbp->IFB_MBRp ) ) {    //if trailing space is too small but
4755                                                                                                                                         //       leading space is sufficiently large
4756                         ifbp->IFB_MBp[ifbp->IFB_MBWp] = 0xFFFF;                                 //flag dummy LTV to fill the trailing space
4757                         ifbp->IFB_MBWp = 0;                                                                             //reset WritePointer to begin of MailBox
4758                         tlen = ifbp->IFB_MBRp;                                                                  //get new available space size
4759                 }
4760         }
4761         dp = &ifbp->IFB_MBp[ifbp->IFB_MBWp];
4762         if ( len == 0 ) {
4763                 tlen = 0; //;? what is this good for
4764         }
4765         if ( len + 2 >= tlen ){                                                                                                                                                         /* 6 */
4766                 //Do Not ASSERT, this is a normal condition
4767                 IF_TALLY( ifbp->IFB_HCF_Tallies.NoBufMB++; ) /*NOP to cover against analomies with empty compound*/;
4768                 rc = HCF_ERR_LEN;
4769         } else {
4770                 *dp++ = len;                                                                    //write Len (= size of T+V in words to MB_Info block
4771                 *dp++ = ltvp->base_typ;                                                 //write Type to MB_Info block
4772                 ifbp->IFB_MBWp += len + 1;                                              //update WritePointer of MailBox
4773                 for ( i = 0; i < ltvp->frag_cnt; i++ ) {                                // process each of the fragments
4774                         sp = ltvp->frag_buf[i].frag_addr;
4775                         len = ltvp->frag_buf[i].frag_len;
4776                         while ( len-- ) *dp++ = *sp++;
4777                 }
4778                 ifbp->IFB_MBp[ifbp->IFB_MBWp] = 0;                              //to assure get_info for CFG_MB_INFO stops
4779                 ifbp->IFB_MBInfoLen = ifbp->IFB_MBp[ifbp->IFB_MBRp];                                                                                    /* 8 */
4780         }
4781         return rc;
4782 } // put_info_mb
4783
4784 #endif // HCF_EXT_MB
4785 #endif // HCF_DL_ONLY
4786
4787
4788 /************************************************************************************************************
4789 *
4790 *.SUBMODULE             int setup_bap( IFBP ifbp, hcf_16 fid, int offset, int type )
4791 *.PURPOSE               set up data access to NIC RAM via BAP_1.
4792 *
4793 *.ARGUMENTS
4794 *       ifbp                    address of I/F Block
4795 *       fid                             FID/RID
4796 *       offset                  !!even!! offset in FID/RID
4797 *       type                    IO_IN, IO_OUT
4798 *
4799 *.RETURNS
4800 *       HCF_SUCCESS                                     O.K
4801 *       HCF_ERR_NO_NIC                          card is removed
4802 *       HCF_ERR_DEFUNCT_TIME_OUT        Fatal malfunction detected
4803 *       HCF_ERR_DEFUNCT_.....           if and only if IFB_DefunctStat <> 0
4804 *
4805 *.DESCRIPTION
4806 *
4807 * A non-zero return status indicates:
4808 * - the NIC is considered nonoperational, e.g. due to a time-out of some Hermes activity in the past
4809 * - BAP_1 could not properly be initialized
4810 * - the card is removed before completion of the data transfer
4811 * In all other cases, a zero is returned.
4812 * BAP Initialization failure indicates an H/W error which is very likely to signal complete H/W failure.
4813 * Once a BAP Initialization failure has occurred all subsequent interactions with the Hermes will return a
4814 * "defunct" status till the Hermes is re-initialized by means of an hcf_connect.
4815 *
4816 * A BAP is a set of registers (Offset, Select and Data) offering read/write access to a particular FID or
4817 * RID. This access is based on a auto-increment feature.
4818 * There are two BAPs but these days the HCF uses only BAP_1 and leaves BAP_0 to the PCI Busmastering H/W.
4819 *
4820 * The BAP-mechanism is based on the Busy bit in the Offset register (see the Hermes definition). The waiting
4821 * for Busy must occur between writing the Offset register and accessing the Data register. The
4822 * implementation to wait for the Busy bit drop after each write to the Offset register, implies that the
4823 * requirement that the Busy bit is low  before the Select register is written, is automatically met.
4824 * BAP-setup may be time consuming (e.g. 380 usec for large offsets occurs frequently). The wait for Busy bit
4825 * drop is protected by a loop counter, which is initialized with IFB_TickIni, which is calibrated in init.
4826 *
4827 * The NIC I/F is optimized for word transfer and can only handle word transfer at a word boundary in NIC
4828 * RAM. The intended solution for transfer of a single byte has multiple H/W flaws. There have been different
4829 * S/W Workaround strategies. RID access is hcf_16 based by "nature", so no byte access problems.  For Tx/Rx
4830 * FID access,  the byte logic became obsolete by absorbing it in the double word oriented nature of the MIC
4831 * feature.
4832 *
4833 *
4834 *.DIAGRAM
4835 *
4836 *2:     the test on rc checks whether the HCF went into "defunct" mode ( e.g. BAP initialization or a call to
4837 *       cmd_wait did ever fail).
4838 *4:     the select register and offset register are set
4839 *       the offset register is monitored till a successful condition (no busy bit) is detected or till the
4840 *       (calibrated) protection counter expires
4841 *       If the counter expires, this is reflected in IFB_DefunctStat, so all subsequent calls to setup_bap fail
4842 *       immediately ( see 2)
4843 *6:     initialization of the carry as used by pet/get_frag
4844 *8:     HREG_OFFSET_ERR is ignored as error because:
4845 *        a: the Hermes is robust against it
4846 *        b: it is not known what causes it (probably a bug), hence no strategy can be specified which level is
4847 *               to handle this error in which way. In the past, it could be induced by the MSF level, e.g. by calling
4848 *               hcf_rcv_msg while there was no Rx-FID available. Since this is an MSF-error which is caught by ASSERT,
4849 *               there is no run-time action required by the HCF.
4850 *       Lumping the Offset error in with the Busy bit error, as has been done in the past turns out to be a
4851 *       disaster or a life saver, just depending on what the cause of the error is. Since no prediction can be
4852 *       done about the future, it is "felt" to be the best strategy to ignore this error. One day the code was
4853 *       accompanied by the following comment:
4854 *       //      ignore HREG_OFFSET_ERR, someone, supposedly the MSF programmer ;) made a bug. Since we don't know
4855 *       //      what is going on, we might as well go on - under management pressure - by ignoring it
4856 *
4857 *.ENDDOC                          END DOCUMENTATION
4858 *
4859 ************************************************************************************************************/
4860 HCF_STATIC int
4861 setup_bap( IFBP ifbp, hcf_16 fid, int offset, int type )
4862 {
4863 PROT_CNT_INI
4864 int     rc;
4865
4866         HCFTRACE( ifbp, HCF_TRACE_STRIO );
4867         rc = ifbp->IFB_DefunctStat;
4868         if (rc == HCF_SUCCESS) {                                                                                /*2*/
4869                 OPW( HREG_SELECT_1, fid );                                                                                                                              /*4*/
4870                 OPW( HREG_OFFSET_1, offset );
4871                 if ( type == IO_IN ) {
4872                         ifbp->IFB_CarryIn = 0;
4873                 }
4874                 else ifbp->IFB_CarryOut = 0;
4875                 HCF_WAIT_WHILE( IPW( HREG_OFFSET_1) & HCMD_BUSY );
4876                 HCFASSERT( !( IPW( HREG_OFFSET_1) & HREG_OFFSET_ERR ), MERGE_2( fid, offset ) )                 /*8*/
4877                 if ( prot_cnt == 0 ) {
4878                         HCFASSERT( DO_ASSERT, MERGE_2( fid, offset ) )
4879                         rc = ifbp->IFB_DefunctStat = HCF_ERR_DEFUNCT_TIME_OUT;
4880                         ifbp->IFB_CardStat |= CARD_STAT_DEFUNCT;
4881                 }
4882         }
4883         HCFTRACE( ifbp, HCF_TRACE_STRIO | HCF_TRACE_EXIT );
4884         return rc;
4885 } // setup_bap
4886