xref: /freebsd/sys/dev/hpt27xx/hpt27xx_os_bsd.c (revision 0572ccaa4543b0abef8ef81e384c1d04de9f3da1)
1 /*-
2  * Copyright (c) 2011 HighPoint Technologies, Inc.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD$
27  */
28 
29 #include <dev/hpt27xx/hpt27xx_config.h>
30 
31 #include <dev/hpt27xx/os_bsd.h>
32 
33 /* hardware access */
34 HPT_U8   os_inb  (void *port) { return inb((unsigned)(HPT_UPTR)port); }
35 HPT_U16  os_inw  (void *port) { return inw((unsigned)(HPT_UPTR)port); }
36 HPT_U32  os_inl  (void *port) { return inl((unsigned)(HPT_UPTR)port); }
37 
38 void os_outb (void *port, HPT_U8 value) { outb((unsigned)(HPT_UPTR)port, (value)); }
39 void os_outw (void *port, HPT_U16 value) { outw((unsigned)(HPT_UPTR)port, (value)); }
40 void os_outl (void *port, HPT_U32 value) { outl((unsigned)(HPT_UPTR)port, (value)); }
41 
42 void os_insw (void *port, HPT_U16 *buffer, HPT_U32 count)
43 { insw((unsigned)(HPT_UPTR)port, (void *)buffer, count); }
44 
45 void os_outsw(void *port, HPT_U16 *buffer, HPT_U32 count)
46 { outsw((unsigned)(HPT_UPTR)port, (void *)buffer, count); }
47 
48 HPT_U32 __dummy_reg = 0;
49 
50 /* PCI configuration space */
51 HPT_U8  os_pci_readb (void *osext, HPT_U8 offset)
52 {
53     return  pci_read_config(((PHBA)osext)->pcidev, offset, 1);
54 }
55 
56 HPT_U16 os_pci_readw (void *osext, HPT_U8 offset)
57 {
58     return  pci_read_config(((PHBA)osext)->pcidev, offset, 2);
59 }
60 
61 HPT_U32 os_pci_readl (void *osext, HPT_U8 offset)
62 {
63     return  pci_read_config(((PHBA)osext)->pcidev, offset, 4);
64 }
65 
66 void os_pci_writeb (void *osext, HPT_U8 offset, HPT_U8 value)
67 {
68     pci_write_config(((PHBA)osext)->pcidev, offset, value, 1);
69 }
70 
71 void os_pci_writew (void *osext, HPT_U8 offset, HPT_U16 value)
72 {
73     pci_write_config(((PHBA)osext)->pcidev, offset, value, 2);
74 }
75 
76 void os_pci_writel (void *osext, HPT_U8 offset, HPT_U32 value)
77 {
78     pci_write_config(((PHBA)osext)->pcidev, offset, value, 4);
79 }
80 
81 #if __FreeBSD_version < 500043
82 /* PCI space access */
83 HPT_U8 pcicfg_read_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
84 {
85 	HPT_U8 v;
86 	pcicfgregs pciref;
87 
88 	pciref.bus  = bus;
89 	pciref.slot = dev;
90 	pciref.func = func;
91 
92 	v = pci_cfgread(&pciref, reg, 1);
93 	return v;
94 }
95 HPT_U32 pcicfg_read_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
96 {
97 	HPT_U32 v;
98 	pcicfgregs pciref;
99 
100 	pciref.bus  = bus;
101 	pciref.slot = dev;
102 	pciref.func = func;
103 
104 	v = pci_cfgread(&pciref, reg, 4);
105 	return v;
106 }
107 void pcicfg_write_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U8 v)
108 {
109 	pcicfgregs pciref;
110 
111 	pciref.hose = -1;
112 	pciref.bus  = bus;
113 	pciref.slot = dev;
114 	pciref.func = func;
115 
116 	pci_cfgwrite(&pciref, reg, v, 1);
117 }
118 void pcicfg_write_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U32 v)
119 {
120 	pcicfgregs pciref;
121 
122 	pciref.hose = -1;
123 	pciref.bus  = bus;
124 	pciref.slot = dev;
125 	pciref.func = func;
126 
127 	pci_cfgwrite(&pciref, reg, v, 4);
128 }/* PCI space access */
129 #else
130 HPT_U8 pcicfg_read_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
131 {
132 	return (HPT_U8)pci_cfgregread(bus, dev, func, reg, 1);
133 }
134 HPT_U32 pcicfg_read_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
135 {
136 	return (HPT_U32)pci_cfgregread(bus, dev, func, reg, 4);
137 }
138 void pcicfg_write_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U8 v)
139 {
140 	pci_cfgregwrite(bus, dev, func, reg, v, 1);
141 }
142 void pcicfg_write_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U32 v)
143 {
144 	pci_cfgregwrite(bus, dev, func, reg, v, 4);
145 }/* PCI space access */
146 #endif
147 
148 void *os_map_pci_bar(
149     void *osext,
150     int index,
151     HPT_U32 offset,
152     HPT_U32 length
153 )
154 {
155 	PHBA hba = (PHBA)osext;
156 	HPT_U32 base;
157 
158 	hba->pcibar[index].rid = 0x10 + index * 4;
159 	base = pci_read_config(hba->pcidev, hba->pcibar[index].rid, 4);
160 
161 	if (base & 1) {
162 		hba->pcibar[index].type = SYS_RES_IOPORT;
163 		hba->pcibar[index].res = bus_alloc_resource(hba->pcidev,
164 			hba->pcibar[index].type, &hba->pcibar[index].rid, 0, ~0, length, RF_ACTIVE);
165 		hba->pcibar[index].base = (void *)(unsigned long)(base & ~0x1);
166 	} else {
167 		hba->pcibar[index].type = SYS_RES_MEMORY;
168 		hba->pcibar[index].res = bus_alloc_resource(hba->pcidev,
169 			hba->pcibar[index].type, &hba->pcibar[index].rid, 0, ~0, length, RF_ACTIVE);
170 		hba->pcibar[index].base = (char *)rman_get_virtual(hba->pcibar[index].res) + offset;
171 	}
172 
173 	return hba->pcibar[index].base;
174 }
175 
176 void os_unmap_pci_bar(void *osext, void *base)
177 {
178 	PHBA hba = (PHBA)osext;
179 	int index;
180 
181 	for (index=0; index<6; index++) {
182 		if (hba->pcibar[index].base==base) {
183 			bus_release_resource(hba->pcidev, hba->pcibar[index].type,
184 				hba->pcibar[index].rid, hba->pcibar[index].res);
185 			hba->pcibar[index].base = 0;
186 			return;
187 		}
188 	}
189 }
190 
191 void freelist_reserve(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT count)
192 {
193     PVBUS_EXT vbus_ext = osext;
194 
195     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
196         vbus_ext = ((PHBA)osext)->vbus_ext;
197 
198     list->next = vbus_ext->freelist_head;
199     vbus_ext->freelist_head = list;
200     list->dma = 0;
201     list->size = size;
202     list->head = 0;
203 #if DBG
204     list->reserved_count =
205 #endif
206     list->count = count;
207 }
208 
209 void *freelist_get(struct freelist *list)
210 {
211     void * result;
212     if (list->count) {
213         HPT_ASSERT(list->head);
214         result = list->head;
215         list->head = *(void **)result;
216         list->count--;
217         return result;
218     }
219     return 0;
220 }
221 
222 void freelist_put(struct freelist * list, void *p)
223 {
224     HPT_ASSERT(list->dma==0);
225     list->count++;
226     *(void **)p = list->head;
227     list->head = p;
228 }
229 
230 void freelist_reserve_dma(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT alignment, HPT_UINT count)
231 {
232     PVBUS_EXT vbus_ext = osext;
233 
234     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
235         vbus_ext = ((PHBA)osext)->vbus_ext;
236 
237     list->next = vbus_ext->freelist_dma_head;
238     vbus_ext->freelist_dma_head = list;
239     list->dma = 1;
240     list->alignment = alignment;
241     list->size = size;
242     list->head = 0;
243 #if DBG
244     list->reserved_count =
245 #endif
246     list->count = count;
247 }
248 
249 void *freelist_get_dma(struct freelist *list, BUS_ADDRESS *busaddr)
250 {
251     void *result;
252     HPT_ASSERT(list->dma);
253     result = freelist_get(list);
254     if (result)
255         *busaddr = *(BUS_ADDRESS *)((void **)result+1);
256     return result;
257 }
258 
259 void freelist_put_dma(struct freelist *list, void *p, BUS_ADDRESS busaddr)
260 {
261     HPT_ASSERT(list->dma);
262     list->count++;
263     *(void **)p = list->head;
264     *(BUS_ADDRESS *)((void **)p+1) = busaddr;
265     list->head = p;
266 }
267 
268 HPT_U32 os_get_stamp(void)
269 {
270     HPT_U32 stamp;
271     do { stamp = random(); } while (stamp==0);
272     return stamp;
273 }
274 
275 void os_stallexec(HPT_U32 microseconds)
276 {
277     DELAY(microseconds);
278 }
279 
280 static void os_timer_for_ldm(void *arg)
281 {
282 	PVBUS_EXT vbus_ext = (PVBUS_EXT)arg;
283 	ldm_on_timer((PVBUS)vbus_ext->vbus);
284 }
285 
286 void  os_request_timer(void * osext, HPT_U32 interval)
287 {
288 	PVBUS_EXT vbus_ext = osext;
289 
290 	HPT_ASSERT(vbus_ext->ext_type==EXT_TYPE_VBUS);
291 
292 	untimeout(os_timer_for_ldm, vbus_ext, vbus_ext->timer);
293 	vbus_ext->timer = timeout(os_timer_for_ldm, vbus_ext, interval * hz / 1000000);
294 }
295 
296 HPT_TIME os_query_time(void)
297 {
298 	return ticks * (1000000 / hz);
299 }
300 
301 void os_schedule_task(void *osext, OSM_TASK *task)
302 {
303 	PVBUS_EXT vbus_ext = osext;
304 
305 	HPT_ASSERT(task->next==0);
306 
307 	if (vbus_ext->tasks==0)
308 		vbus_ext->tasks = task;
309 	else {
310 		OSM_TASK *t = vbus_ext->tasks;
311 		while (t->next) t = t->next;
312 		t->next = task;
313 	}
314 
315 	if (vbus_ext->worker.ta_context)
316 		TASK_ENQUEUE(&vbus_ext->worker);
317 }
318 
319 int os_revalidate_device(void *osext, int id)
320 {
321 
322     return 0;
323 }
324 
325 int os_query_remove_device(void *osext, int id)
326 {
327 	PVBUS_EXT				vbus_ext = (PVBUS_EXT)osext;
328 	struct cam_periph		*periph = NULL;
329     struct cam_path			*path;
330     int						status,retval = 0;
331 
332     status = xpt_create_path(&path, NULL, vbus_ext->sim->path_id, id, 0);
333     if (status == CAM_REQ_CMP) {
334 		if((periph = cam_periph_find(path, "da")) != NULL){
335 			if(periph->refcount >= 1)
336 				retval = -1;
337 		}
338 		xpt_free_path(path);
339     }
340 
341     return retval;
342 }
343 
344 HPT_U8 os_get_vbus_seq(void *osext)
345 {
346     return ((PVBUS_EXT)osext)->sim->path_id;
347 }
348 
349 int  os_printk(char *fmt, ...)
350 {
351     va_list args;
352     static char buf[512];
353 
354     va_start(args, fmt);
355     vsnprintf(buf, sizeof(buf), fmt, args);
356     va_end(args);
357     return printf("%s: %s\n", driver_name, buf);
358 }
359 
360 #if DBG
361 void os_check_stack(const char *location, int size){}
362 
363 void __os_dbgbreak(const char *file, int line)
364 {
365     printf("*** break at %s:%d ***", file, line);
366     while (1);
367 }
368 
369 int hpt_dbg_level = 1;
370 #endif
371