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_sbt(&vbus_ext->timer, SBT_1US * interval, 0, 244 os_timer_for_ldm, vbus_ext, 0); 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