home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #1 / Ham Radio 2000.iso / ham2000 / tcp_ip / gracil / twindv21 / gracilis.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-07  |  4.1 KB  |  190 lines
  1. /****************************************************************************
  2. *
  3. *            COPYRIGHT 1990,91,92 BY GRACILIS INC.
  4. *
  5. *             623 Palace St.
  6. *             Aurora, Il. 60506
  7. *
  8. *             (708)-801-8800        Office
  9. *             (708)-844-0183        (FAX - Support BBS)
  10. *
  11. * GRACILIS, INC., MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS 
  12. * SOFTWARE FOR ANY PURPOSE.  
  13. *
  14. * THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY.
  15. * 
  16. * Permission is granted for non-commercial use/distribution only, as long as
  17. * this copyright header is included intact and unaltered.
  18. *
  19. ******************************************************************************/
  20.  
  21. #include <stdio.h>
  22. #include <dos.h>
  23. #include "global.h"
  24. #include "mbuf.h"
  25. #include "iface.h"
  26. #include "gracilis.h"
  27.  
  28.  
  29. /*
  30.  * Dequeue of Available Buffers - Used with a head pointer and
  31.  * a Counter to dequeue a pre-allocated receive buffer of type "struct mbuf".
  32.  *
  33.  * Use only for LIFO queues!  (i.e. don't need a tail pointer)
  34.  */
  35. struct mbuf *
  36. f_dequeavail(headp, availcount)
  37. struct mbuf **headp;
  38. int16 *availcount;
  39. {
  40.     char    i_state;
  41.     struct mbuf *rx_mbufp;
  42.     
  43.     rx_mbufp = NULLBUF;
  44.  
  45.     i_state = dirps();
  46.  
  47.     rx_mbufp = *headp;
  48.  
  49.     if ( *headp != NULLBUF )
  50.     {
  51.         *headp = rx_mbufp->anext;
  52.         (*availcount)--;
  53.         rx_mbufp->anext = NULLBUF;
  54.     }
  55.  
  56.     restore(i_state);
  57.  
  58.         /* return the mbuf used to receive data */
  59.     return(rx_mbufp);    
  60. }
  61.  
  62.  
  63.  
  64.  
  65. /*
  66.  * Fill a preallocated mbuf queue with a specified number of buffers.
  67.  * Used with a head pointer and a Counter.
  68.  * THIS IS USED by PackeTen and PackeTwin
  69.  * drivers to maintain their receive frame queues.
  70.  *
  71.  */
  72. void
  73. f_getavail(headp, getcount, bufsize, rxavailcount, ifacep, dma_flg)
  74. struct mbuf **headp;            /* address of headq */
  75. int16 getcount;                    /* number of mbufs to get */
  76. int16 bufsize;                    /* size of data buffer */
  77. int16 *rxavailcount;            /* headq's avail counter */
  78. struct iface *ifacep;            /* device's iface control structure's */
  79.                     /* address */
  80. bool    dma_flg;
  81. {
  82.     char    i_state;
  83.     struct mbuf *rx_mbufp;
  84.     int16    gotcount = 0;    
  85.     struct mbuf *badlist,*srchptr;    /* discard list */
  86.     ulong realaddr;
  87.     unsigned page,alloc_size;
  88.  
  89. #ifdef OLD_KA9Q
  90.     struct phdr *hdr;
  91. #endif
  92.  
  93.  
  94.     badlist = NULLBUF;    /* init list to null */
  95.  
  96.     while ( (getcount > 0) )
  97.     {
  98. #ifdef OLD_KA9Q
  99.         alloc_size = bufsize + sizeof(struct phdr);
  100. #else
  101.         alloc_size = bufsize;
  102. #endif
  103.         rx_mbufp = alloc_mbuf(alloc_size);
  104.  
  105.         /* If we are being asked for dma-able buffers, then check */
  106.         if( dma_flg == TRUE )
  107.         {
  108.             /* A rendition of an absolute address for the ptr */
  109.             realaddr = ((ulong)FP_SEG(rx_mbufp) << 4) + 
  110.                         (ulong)FP_OFF(rx_mbufp);
  111.  
  112.             /* DMA page reg for 8237 */
  113.             page = realaddr >> 16;
  114.             if(((realaddr + alloc_size) >> 16) != page)
  115.             {
  116.                 rx_mbufp->next = NULL;
  117.  
  118.                 /* put this buffer on a list to be free'd */
  119.  
  120.                 if(badlist == NULLBUF)badlist = rx_mbufp;
  121.                 else 
  122.                 {
  123.                     /* find the end of the list */
  124.                     srchptr = badlist;
  125.                     while(srchptr->next != NULLBUF)
  126.                             srchptr = srchptr->next;
  127.                     /* put this one on the end */
  128.                     srchptr->next = rx_mbufp;
  129.                 }
  130.  
  131.                 /* cause the loop to try again */
  132.                 rx_mbufp = NULLBUF;
  133.  
  134.                 pwait(NULL);     /* be nice to others... */
  135.             }
  136.  
  137.         }
  138.  
  139.         if(rx_mbufp != NULLBUF )
  140.         {
  141.             /* setup the packet header for the DRIVER */
  142.             /* calling this routine */
  143.  
  144. #ifdef OLD_KA9Q
  145.             /* init to packet header's byte count */
  146.             rx_mbufp->cnt = sizeof(struct phdr);
  147.             hdr = (struct phdr *)rx_mbufp->data;
  148.             hdr->type = ifacep->type;
  149.             hdr->iface = ifacep;
  150.  
  151.  
  152.             /* Rx data goes in after packet header  */
  153.             /* works because data is a char pointer */
  154.             rx_mbufp->data += sizeof(struct phdr);
  155. #endif
  156.  
  157.             i_state = dirps();
  158.  
  159.             if ( *headp != NULLBUF )
  160.             {
  161.                 rx_mbufp->anext = *headp;
  162.                 *headp = rx_mbufp;
  163.             }
  164.             else
  165.             {
  166.                 *headp = rx_mbufp;
  167.  
  168.                 /* done in alloc_mbuf() */
  169.                 /* rx_mbufp->anext = NULLBUF; */
  170.             }
  171.             (*rxavailcount)++;
  172.             restore(i_state);
  173.         
  174.             getcount--;
  175.  
  176.             gotcount++;
  177.         }
  178.  
  179.     }
  180.     /* All done... now free any accumulated non-dma_able buffers */
  181.     if(badlist != NULLBUF)free_p(badlist);
  182.  
  183.     return;
  184. }
  185.  
  186.  
  187.  
  188.  
  189.  
  190.