[libc] Fix isdigit(), islower() and isupper().
[people/dverkamp/gpxe.git] / src / drivers / net / mlx_ipoib / mt23108.c
1 /**************************************************************************
2 Etherboot -  BOOTP/TFTP Bootstrap Program
3 Skeleton NIC driver for Etherboot
4 ***************************************************************************/
5
6 /*
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License as
9  * published by the Free Software Foundation; either version 2, or (at
10  * your option) any later version.
11  */
12
13 /* to get toupper() */
14 #include <ctype.h>
15 /* to get some global routines like printf */
16 #include "etherboot.h"
17 /* to get the interface to the body of the program */
18 #include "nic.h"
19 /* to get the PCI support functions, if this is a PCI NIC */
20 #include <gpxe/pci.h>
21 /* to get the ISA support functions, if this is an ISA NIC */
22 #include <gpxe/isa.h>
23
24 #include "mt_version.c"
25 #include "mt23108_imp.c"
26
27 /* NIC specific static variables go here */
28
29 int prompt_key(int secs, unsigned char *ch_p)
30 {
31         unsigned long tmo;
32         unsigned char ch;
33
34         for (tmo = currticks() + secs * TICKS_PER_SEC; currticks() < tmo;) {
35                 if (iskey()) {
36                         ch = toupper(getchar());
37                         if ((ch=='V') || (ch=='I')) {
38                                 *ch_p = ch;
39                                 return 1;
40                         }
41                 }
42         }
43
44         return 0;
45 }
46
47 /**************************************************************************
48 IRQ - handle interrupts
49 ***************************************************************************/
50 static void tavor_irq(struct nic *nic, irq_action_t action)
51 {
52         /* This routine is somewhat optional.  Etherboot itself
53          * doesn't use interrupts, but they are required under some
54          * circumstances when we're acting as a PXE stack.
55          *
56          * If you don't implement this routine, the only effect will
57          * be that your driver cannot be used via Etherboot's UNDI
58          * API.  This won't affect programs that use only the UDP
59          * portion of the PXE API, such as pxelinux.
60          */
61
62         if (0) {
63                 nic = NULL;
64         }
65         switch (action) {
66         case DISABLE:
67         case ENABLE:
68                 /* Set receive interrupt enabled/disabled state */
69                 /*
70                    outb ( action == ENABLE ? IntrMaskEnabled : IntrMaskDisabled,
71                    nic->ioaddr + IntrMaskRegister );
72                  */
73                 break;
74         case FORCE:
75                 /* Force NIC to generate a receive interrupt */
76                 /*
77                    outb ( ForceInterrupt, nic->ioaddr + IntrForceRegister );
78                  */
79                 break;
80         }
81 }
82
83 /**************************************************************************
84 POLL - Wait for a frame
85 ***************************************************************************/
86 static int tavor_poll(struct nic *nic, int retrieve)
87 {
88         /* Work out whether or not there's an ethernet packet ready to
89          * read.  Return 0 if not.
90          */
91         /* 
92            if ( ! <packet_ready> ) return 0;
93          */
94
95         /* retrieve==0 indicates that we are just checking for the
96          * presence of a packet but don't want to read it just yet.
97          */
98         /*
99            if ( ! retrieve ) return 1;
100          */
101
102         /* Copy data to nic->packet.  Data should include the
103          * link-layer header (dest MAC, source MAC, type).
104          * Store length of data in nic->packetlen.
105          * Return true to indicate a packet has been read.
106          */
107         /* 
108            nic->packetlen = <packet_length>;
109            memcpy ( nic->packet, <packet_data>, <packet_length> );
110            return 1;
111          */
112         unsigned int size;
113         int rc;
114         rc = poll_imp(nic, retrieve, &size);
115         if (rc) {
116                 return 0;
117         }
118
119         if (size == 0) {
120                 return 0;
121         }
122
123         nic->packetlen = size;
124
125         return 1;
126 }
127
128 /**************************************************************************
129 TRANSMIT - Transmit a frame
130 ***************************************************************************/
131 static void tavor_transmit(struct nic *nic, const char *dest,   /* Destination */
132                            unsigned int type,   /* Type */
133                            unsigned int size,   /* size */
134                            const char *packet)
135 {                               /* Packet */
136         int rc;
137
138         /* Transmit packet to dest MAC address.  You will need to
139          * construct the link-layer header (dest MAC, source MAC,
140          * type).
141          */
142         if (nic) {
143                 rc = transmit_imp(dest, type, packet, size);
144                 if (rc)
145                         eprintf("tranmit error");
146         }
147 }
148
149 /**************************************************************************
150 DISABLE - Turn off ethernet interface
151 ***************************************************************************/
152 static void tavor_disable(struct dev *dev)
153 {
154         /* put the card in its initial state */
155         /* This function serves 3 purposes.
156          * This disables DMA and interrupts so we don't receive
157          *  unexpected packets or interrupts from the card after
158          *  etherboot has finished. 
159          * This frees resources so etherboot may use
160          *  this driver on another interface
161          * This allows etherboot to reinitialize the interface
162          *  if something is something goes wrong.
163          */
164         if (dev || 1) {         // ????
165                 disable_imp();
166         }
167 }
168
169 /**************************************************************************
170 PROBE - Look for an adapter, this routine's visible to the outside
171 ***************************************************************************/
172
173 static int tavor_probe(struct dev *dev, struct pci_device *pci)
174 {
175         struct nic *nic = (struct nic *)dev;
176         int rc;
177         unsigned char user_request;
178
179         if (pci->vendor != MELLANOX_VENDOR_ID) {
180                 eprintf("");
181                 return 0;
182         }
183
184         printf("\n");
185         printf("Mellanox Technologies LTD - Boot over IB implementaion\n");
186         printf("Build version = %s\n\n", build_revision);
187
188         verbose_messages = 0;
189         print_info = 0;
190         printf("Press within 3 seconds:\n");
191         printf("V - to increase verbosity\n");
192         printf("I - to print information\n");
193         if (prompt_key(3, &user_request)) {
194                 if (user_request == 'V') {
195                         printf("User selected verbose messages\n");
196                         verbose_messages = 1;
197                 }
198                 else if (user_request == 'I') {
199                         printf("User selected to print information\n");
200                         print_info = 1;
201                 }
202         }
203         printf("\n");
204
205         adjust_pci_device(pci);
206
207         nic->priv_data = NULL;
208         rc = probe_imp(pci, nic);
209
210         /* give the user a chance to look at the info */
211         if (print_info)
212                 sleep(5);
213
214         if (!rc) {
215                 /* store NIC parameters */
216                 nic->ioaddr = pci->ioaddr & ~3;
217                 nic->irqno = pci->irq;
218                 /* point to NIC specific routines */
219                 dev->disable = tavor_disable;
220                 nic->poll = tavor_poll;
221                 nic->transmit = tavor_transmit;
222                 nic->irq = tavor_irq;
223
224                 return 1;
225         }
226         /* else */
227         return 0;
228 }
229
230 static struct pci_id tavor_nics[] = {
231         PCI_ROM(0x15b3, 0x5a44, "MT23108", "MT23108 HCA driver"),
232         PCI_ROM(0x15b3, 0x6278, "MT25208", "MT25208 HCA driver"),
233 };
234
235 struct pci_driver tavor_driver __pci_driver = {
236         .type = NIC_DRIVER,
237         .name = "MT23108/MT25208",
238         .probe = tavor_probe,
239         .ids = tavor_nics,
240         .id_count = sizeof(tavor_nics) / sizeof(tavor_nics[0]),
241         .class = 0,
242 };