sys/dev/hptnr/hptnr_os_bsd.c

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