xref: /freebsd/sys/dev/hpt27xx/hpt27xx_os_bsd.c (revision 40a8ac8f62b535d30349faf28cf47106b7041b83)
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 /* PCI space access */
82 HPT_U8 pcicfg_read_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
83 {
84 	return (HPT_U8)pci_cfgregread(bus, dev, func, reg, 1);
85 }
86 HPT_U32 pcicfg_read_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg)
87 {
88 	return (HPT_U32)pci_cfgregread(bus, dev, func, reg, 4);
89 }
90 void pcicfg_write_byte (HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U8 v)
91 {
92 	pci_cfgregwrite(bus, dev, func, reg, v, 1);
93 }
94 void pcicfg_write_dword(HPT_U8 bus, HPT_U8 dev, HPT_U8 func, HPT_U8 reg, HPT_U32 v)
95 {
96 	pci_cfgregwrite(bus, dev, func, reg, v, 4);
97 }/* PCI space access */
98 
99 void *os_map_pci_bar(
100     void *osext,
101     int index,
102     HPT_U32 offset,
103     HPT_U32 length
104 )
105 {
106 	PHBA hba = (PHBA)osext;
107 	HPT_U32 base;
108 
109 	hba->pcibar[index].rid = 0x10 + index * 4;
110 	base = pci_read_config(hba->pcidev, hba->pcibar[index].rid, 4);
111 
112 	if (base & 1) {
113 		hba->pcibar[index].type = SYS_RES_IOPORT;
114 		hba->pcibar[index].res = bus_alloc_resource(hba->pcidev,
115 			hba->pcibar[index].type, &hba->pcibar[index].rid, 0, ~0, length, RF_ACTIVE);
116 		hba->pcibar[index].base = (void *)(unsigned long)(base & ~0x1);
117 	} else {
118 		hba->pcibar[index].type = SYS_RES_MEMORY;
119 		hba->pcibar[index].res = bus_alloc_resource(hba->pcidev,
120 			hba->pcibar[index].type, &hba->pcibar[index].rid, 0, ~0, length, RF_ACTIVE);
121 		hba->pcibar[index].base = (char *)rman_get_virtual(hba->pcibar[index].res) + offset;
122 	}
123 
124 	return hba->pcibar[index].base;
125 }
126 
127 void os_unmap_pci_bar(void *osext, void *base)
128 {
129 	PHBA hba = (PHBA)osext;
130 	int index;
131 
132 	for (index=0; index<6; index++) {
133 		if (hba->pcibar[index].base==base) {
134 			bus_release_resource(hba->pcidev, hba->pcibar[index].type,
135 				hba->pcibar[index].rid, hba->pcibar[index].res);
136 			hba->pcibar[index].base = 0;
137 			return;
138 		}
139 	}
140 }
141 
142 void freelist_reserve(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT count)
143 {
144     PVBUS_EXT vbus_ext = osext;
145 
146     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
147         vbus_ext = ((PHBA)osext)->vbus_ext;
148 
149     list->next = vbus_ext->freelist_head;
150     vbus_ext->freelist_head = list;
151     list->dma = 0;
152     list->size = size;
153     list->head = 0;
154 #if DBG
155     list->reserved_count =
156 #endif
157     list->count = count;
158 }
159 
160 void *freelist_get(struct freelist *list)
161 {
162     void * result;
163     if (list->count) {
164         HPT_ASSERT(list->head);
165         result = list->head;
166         list->head = *(void **)result;
167         list->count--;
168         return result;
169     }
170     return 0;
171 }
172 
173 void freelist_put(struct freelist * list, void *p)
174 {
175     HPT_ASSERT(list->dma==0);
176     list->count++;
177     *(void **)p = list->head;
178     list->head = p;
179 }
180 
181 void freelist_reserve_dma(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT alignment, HPT_UINT count)
182 {
183     PVBUS_EXT vbus_ext = osext;
184 
185     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
186         vbus_ext = ((PHBA)osext)->vbus_ext;
187 
188     list->next = vbus_ext->freelist_dma_head;
189     vbus_ext->freelist_dma_head = list;
190     list->dma = 1;
191     list->alignment = alignment;
192     list->size = size;
193     list->head = 0;
194 #if DBG
195     list->reserved_count =
196 #endif
197     list->count = count;
198 }
199 
200 void *freelist_get_dma(struct freelist *list, BUS_ADDRESS *busaddr)
201 {
202     void *result;
203     HPT_ASSERT(list->dma);
204     result = freelist_get(list);
205     if (result)
206         *busaddr = *(BUS_ADDRESS *)((void **)result+1);
207     return result;
208 }
209 
210 void freelist_put_dma(struct freelist *list, void *p, BUS_ADDRESS busaddr)
211 {
212     HPT_ASSERT(list->dma);
213     list->count++;
214     *(void **)p = list->head;
215     *(BUS_ADDRESS *)((void **)p+1) = busaddr;
216     list->head = p;
217 }
218 
219 HPT_U32 os_get_stamp(void)
220 {
221     HPT_U32 stamp;
222     do { stamp = random(); } while (stamp==0);
223     return stamp;
224 }
225 
226 void os_stallexec(HPT_U32 microseconds)
227 {
228     DELAY(microseconds);
229 }
230 
231 static void os_timer_for_ldm(void *arg)
232 {
233 	PVBUS_EXT vbus_ext = (PVBUS_EXT)arg;
234 	ldm_on_timer((PVBUS)vbus_ext->vbus);
235 }
236 
237 void  os_request_timer(void * osext, HPT_U32 interval)
238 {
239 	PVBUS_EXT vbus_ext = osext;
240 
241 	HPT_ASSERT(vbus_ext->ext_type==EXT_TYPE_VBUS);
242 
243 	callout_reset(&vbus_ext->timer, interval * hz / 1000000,
244 	    os_timer_for_ldm, vbus_ext);
245 }
246 
247 HPT_TIME os_query_time(void)
248 {
249 	return ticks * (1000000 / hz);
250 }
251 
252 void os_schedule_task(void *osext, OSM_TASK *task)
253 {
254 	PVBUS_EXT vbus_ext = osext;
255 
256 	HPT_ASSERT(task->next==0);
257 
258 	if (vbus_ext->tasks==0)
259 		vbus_ext->tasks = task;
260 	else {
261 		OSM_TASK *t = vbus_ext->tasks;
262 		while (t->next) t = t->next;
263 		t->next = task;
264 	}
265 
266 	if (vbus_ext->worker.ta_context)
267 		TASK_ENQUEUE(&vbus_ext->worker);
268 }
269 
270 int os_revalidate_device(void *osext, int id)
271 {
272 
273     return 0;
274 }
275 
276 int os_query_remove_device(void *osext, int id)
277 {
278 	return 0;
279 }
280 
281 HPT_U8 os_get_vbus_seq(void *osext)
282 {
283     return ((PVBUS_EXT)osext)->sim->path_id;
284 }
285 
286 int  os_printk(char *fmt, ...)
287 {
288     va_list args;
289     static char buf[512];
290 
291     va_start(args, fmt);
292     vsnprintf(buf, sizeof(buf), fmt, args);
293     va_end(args);
294     return printf("%s: %s\n", driver_name, buf);
295 }
296 
297 #if DBG
298 void os_check_stack(const char *location, int size){}
299 
300 void __os_dbgbreak(const char *file, int line)
301 {
302     printf("*** break at %s:%d ***", file, line);
303     while (1);
304 }
305 
306 int hpt_dbg_level = 1;
307 #endif
308