1/****************************************************************************
2 *******                                                              *******
3 *******                      L I S T                                 *******
4 *******                                                              *******
5 ****************************************************************************
6
7 Author  : Jeremy Rolls.
8 Date    : 04-Nov-1990
9
10 *
11 *  (C) 1990 - 2000 Specialix International Ltd., Byfleet, Surrey, UK.
12 *
13 *      This program is free software; you can redistribute it and/or modify
14 *      it under the terms of the GNU General Public License as published by
15 *      the Free Software Foundation; either version 2 of the License, or
16 *      (at your option) any later version.
17 *
18 *      This program is distributed in the hope that it will be useful,
19 *      but WITHOUT ANY WARRANTY; without even the implied warranty of
20 *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21 *      GNU General Public License for more details.
22 *
23 *      You should have received a copy of the GNU General Public License
24 *      along with this program; if not, write to the Free Software
25 *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26
27 Version : 0.01
28
29
30                            Mods
31 ----------------------------------------------------------------------------
32  Date     By                Description
33 ----------------------------------------------------------------------------
34 ***************************************************************************/
35
36#ifndef _list_h
37#define _list_h 1
38
39#ifdef SCCS_LABELS
40#ifndef lint
41static char *_rio_list_h_sccs = "@(#)list.h	1.9" ;
42#endif
43#endif
44
45#define PKT_IN_USE    0x1
46
47#ifdef INKERNEL
48
49#define ZERO_PTR (ushort) 0x8000
50#define	CaD	PortP->Caddr
51
52/*
53** We can add another packet to a transmit queue if the packet pointer pointed
54** to by the TxAdd pointer has PKT_IN_USE clear in its address.
55*/
56
57#ifndef linux
58#if defined(MIPS) && !defined(MIPSEISA)
59/* May the shoes of the Devil dance on your grave for creating this */
60#define   can_add_transmit(PacketP,PortP) \
61          (!((uint)(PacketP = (struct PKT *)RIO_PTR(CaD,RINDW(PortP->TxAdd))) \
62          & (PKT_IN_USE<<2)))
63
64#elif  defined(MIPSEISA) || defined(nx6000) || \
65       defined(drs6000)  || defined(UWsparc)
66
67#define   can_add_transmit(PacketP,PortP) \
68          (!((uint)(PacketP = (struct PKT *)RIO_PTR(CaD,RINDW(PortP->TxAdd))) \
69	  & PKT_IN_USE))
70
71#else
72#define   can_add_transmit(PacketP,PortP) \
73          (!((uint)(PacketP = (struct PKT *)RIO_PTR(CaD,*PortP->TxAdd)) \
74	  & PKT_IN_USE))
75#endif
76
77/*
78** To add a packet to the queue, you set the PKT_IN_USE bit in the address,
79** and then move the TxAdd pointer along one position to point to the next
80** packet pointer. You must wrap the pointer from the end back to the start.
81*/
82#if defined(MIPS) || defined(nx6000) || defined(drs6000) || defined(UWsparc)
83#   define add_transmit(PortP)  \
84	WINDW(PortP->TxAdd,RINDW(PortP->TxAdd) | PKT_IN_USE);\
85	if (PortP->TxAdd == PortP->TxEnd)\
86	    PortP->TxAdd = PortP->TxStart;\
87	else\
88	    PortP->TxAdd++;\
89	WWORD(PortP->PhbP->tx_add , RIO_OFF(CaD,PortP->TxAdd));
90#elif defined(AIX)
91#   define add_transmit(PortP)  \
92	{\
93	    register ushort *TxAddP = (ushort *)RIO_PTR(Cad,PortP->TxAddO);\
94	    WINDW( TxAddP, RINDW( TxAddP ) | PKT_IN_USE );\
95	    if (PortP->TxAddO == PortP->TxEndO )\
96		PortP->TxAddO = PortP->TxStartO;\
97	    else\
98		PortP->TxAddO += sizeof(ushort);\
99	    WWORD(((PHB *)RIO_PTR(Cad,PortP->PhbO))->tx_add , PortP->TxAddO );\
100	}
101#else
102#   define add_transmit(PortP)  \
103	*PortP->TxAdd |= PKT_IN_USE;\
104	if (PortP->TxAdd == PortP->TxEnd)\
105	    PortP->TxAdd = PortP->TxStart;\
106	else\
107	    PortP->TxAdd++;\
108	PortP->PhbP->tx_add = RIO_OFF(CaD,PortP->TxAdd);
109#endif
110
111/*
112** can_remove_receive( PacketP, PortP ) returns non-zero if PKT_IN_USE is set
113** for the next packet on the queue. It will also set PacketP to point to the
114** relevent packet, [having cleared the PKT_IN_USE bit]. If PKT_IN_USE is clear,
115** then can_remove_receive() returns 0.
116*/
117#if defined(MIPS) || defined(nx6000) || defined(drs6000) || defined(UWsparc)
118#   define can_remove_receive(PacketP,PortP) \
119	((RINDW(PortP->RxRemove) & PKT_IN_USE) ? \
120	(PacketP=(struct PKT *)RIO_PTR(CaD,(RINDW(PortP->RxRemove) & ~PKT_IN_USE))):0)
121#elif defined(AIX)
122#   define can_remove_receive(PacketP,PortP) \
123	((RINDW((ushort *)RIO_PTR(Cad,PortP->RxRemoveO)) & PKT_IN_USE) ? \
124	(PacketP=(struct PKT *)RIO_PTR(Cad,RINDW((ushort *)RIO_PTR(Cad,PortP->RxRemoveO)) & ~PKT_IN_USE)):0)
125#else
126#   define can_remove_receive(PacketP,PortP) \
127	((*PortP->RxRemove & PKT_IN_USE) ? \
128	(PacketP=(struct PKT *)RIO_PTR(CaD,(*PortP->RxRemove & ~PKT_IN_USE))):0)
129#endif
130
131
132/*
133** Will God see it within his heart to forgive us for this thing that
134** we have created? To remove a packet from the receive queue you clear
135** its PKT_IN_USE bit, and then bump the pointers. Once the pointers
136** get to the end, they must be wrapped back to the start.
137*/
138#if defined(MIPS) || defined(nx6000) || defined(drs6000) || defined(UWsparc)
139#   define remove_receive(PortP) \
140	WINDW(PortP->RxRemove, (RINDW(PortP->RxRemove) & ~PKT_IN_USE));\
141	if (PortP->RxRemove == PortP->RxEnd)\
142	    PortP->RxRemove = PortP->RxStart;\
143	else\
144	    PortP->RxRemove++;\
145	WWORD(PortP->PhbP->rx_remove , RIO_OFF(CaD,PortP->RxRemove));
146#elif defined(AIX)
147#   define remove_receive(PortP) \
148    {\
149        register ushort *RxRemoveP = (ushort *)RIO_PTR(Cad,PortP->RxRemoveO);\
150        WINDW( RxRemoveP, RINDW( RxRemoveP ) & ~PKT_IN_USE );\
151        if (PortP->RxRemoveO == PortP->RxEndO)\
152            PortP->RxRemoveO = PortP->RxStartO;\
153        else\
154            PortP->RxRemoveO += sizeof(ushort);\
155        WWORD(((PHB *)RIO_PTR(Cad,PortP->PhbO))->rx_remove, PortP->RxRemoveO );\
156    }
157#else
158#   define remove_receive(PortP) \
159	*PortP->RxRemove &= ~PKT_IN_USE;\
160	if (PortP->RxRemove == PortP->RxEnd)\
161	    PortP->RxRemove = PortP->RxStart;\
162	else\
163	    PortP->RxRemove++;\
164	PortP->PhbP->rx_remove = RIO_OFF(CaD,PortP->RxRemove);
165#endif
166#endif
167
168
169#else /* !IN_KERNEL */
170
171#define ZERO_PTR NULL
172
173
174#ifdef HOST
175/* #define can_remove_transmit(pkt,phb) ((((char*)pkt = (*(char**)(phb->tx_remove))-1) || 1)) && (*phb->u3.s2.tx_remove_ptr & PKT_IN_USE))   */
176#define remove_transmit(phb) *phb->u3.s2.tx_remove_ptr &= ~(ushort)PKT_IN_USE;\
177                             if (phb->tx_remove == phb->tx_end)\
178                                phb->tx_remove = phb->tx_start;\
179                             else\
180                                phb->tx_remove++;
181#define can_add_receive(phb) !(*phb->u4.s2.rx_add_ptr & PKT_IN_USE)
182#define add_receive(pkt,phb) *phb->rx_add = pkt;\
183                             *phb->u4.s2.rx_add_ptr |= PKT_IN_USE;\
184                             if (phb->rx_add == phb->rx_end)\
185                                phb->rx_add = phb->rx_start;\
186                             else\
187                                phb->rx_add++;
188#endif
189#endif
190
191#ifdef RTA
192#define splx(oldspl)    if ((oldspl) == 0) spl0()
193#endif
194
195#endif /* ifndef _list.h */
196/*********** end of file ***********/
197