bsd/netat/adsp_misc.c

   1 /*
   2  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. The rights granted to you under the License
  10  * may not be used to create, or enable the creation or redistribution of,
  11  * unlawful or unlicensed copies of an Apple operating system, or to
  12  * circumvent, violate, or enable the circumvention or violation of, any
  13  * terms of an Apple operating system software license agreement.
  14  *
  15  * Please obtain a copy of the License at
  16  * http://www.opensource.apple.com/apsl/ and read it before using this file.
  17  *
  18  * The Original Code and all software distributed under the License are
  19  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  20  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  21  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  22  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  23  * Please see the License for the specific language governing rights and
  24  * limitations under the License.
  25  *
  26  * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  27  */
  28 #include <sys/errno.h>
  29 #include <sys/types.h>
  30 #include <sys/param.h>
  31 #include <machine/spl.h>
  32 #include <sys/systm.h>
  33 #include <sys/kernel.h>
  34 #include <sys/proc.h>
  35 #include <sys/filedesc.h>
  36 #include <sys/fcntl.h>
  37 #include <sys/mbuf.h>
  38 #include <sys/socket.h>
  39
  40 #include <netat/sysglue.h>
  41 #include <netat/appletalk.h>
  42 #include <netat/at_pcb.h>
  43 #include <netat/debug.h>
  44 #include <netat/adsp.h>
  45 #include <netat/adsp_internal.h>
  46
  47 /*
  48  * These function replace the Mk68 assembly routines found in qAddToEnd.s and
  49  * q????.s
  50  *    Modified for MP, 1996 by Tuyen Nguyen
  51  *   Modified, April 9, 1997 by Tuyen Nguyen for MacOSX.
  52  */
  53
  54
  55 /* ----------------------------------------------------------------------
  56  * void qAddToEnd(void *qhead, void *qelem)
  57  *
  58  * INPUTS:
  59  *              Ptr             to ptr to 1st item in queue
  60  *              Ptr             to item to add to end of queue
  61  * OUTPUTS:
  62  *              none
  63  *
  64  * Assumptions: The link field is the FIRST field of the qelem structure.
  65  * ----------------------------------------------------------------------
  66  */
  67 int qAddToEnd(qhead, qelem)
  68         struct qlink **qhead;
  69         struct qlink *qelem;
  70 {
  71         /* define our own type to access the next field. NOTE THAT THE "NEXT"
  72          * FIELD IS ASSUMED TO BE THE FIRST FIELD OF THE STRUCTURE
  73          */
  74
  75         register struct qlink *q;
  76
  77         /* Scan the linked list to the end and update the previous
  78          * element next field. (do that protocted).
  79          */
  80
  81         q = *qhead;
  82         if (q) {
  83                 while (q->qlinkp) {
  84                         /* are we about to link to ourself */
  85                         if (q == qelem)
  86                                 goto breakit;
  87                         q = q->qlinkp;
  88                 }
  89                 q->qlinkp = qelem;
  90         }
  91         else {
  92                 *qhead = qelem;
  93         }
  94         qelem->qlinkp = (struct qlink *) 0;
  95 breakit:
  96 #ifdef NOTDEF
  97         DPRINTF("%s: qhead=%x added elem=%x\n","qAddToEnd", qhead, qelem);
  98 #endif
  99         return 0;
 100 }
 101
 102
 103
 104 /* ----------------------------------------------------------------------
 105  *  qfind_m
 106  *      void* qfind_m(void *qhead, void NPTR match, ProcPtr compare_fnx)
 107  *
 108  *  Hunt down a linked list of queue elements calling the compare
 109  *  function on each item. When the compare function returns true,
 110  *  return ptr to the queue element.
 111  *
 112  *
 113  *  INPUTS:
 114  *              qhead   Address of ptr to first item in queue
 115  *              match
 116  *              compare_fnx
 117  *  OUTPUTS:
 118  *              D0 & A0 Ptr to queue element or NIL
 119  *  REGISTERS:
 120  *      D0,D1,A0,A1
 121  * ----------------------------------------------------------------------
 122  */
 123 void* qfind_m(qhead, match, compare_fnx)
 124         CCBPtr  qhead;
 125         void  *match;
 126         ProcPtr compare_fnx;
 127 {
 128         CCBPtr queue_item = qhead;
 129
 130         while (queue_item) {
 131                 if ((*compare_fnx)(queue_item,match))
 132                         break;
 133
 134                 queue_item = queue_item->ccbLink;
 135         }
 136
 137         return (queue_item);
 138 }