sys/dev/raid/hptrr/hptrr_os_bsd.c

   1 /*
   2  * Copyright (c) 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: src/sys/dev/hptrr/hptrr_os_bsd.c,v 1.4 2008/03/08 18:06:48 scottl Exp $
  27  */
  28 #include <dev/raid/hptrr/hptrr_config.h>
  29 /* $Id: os_bsd.c,v 1.11 2005/06/03 14:06:38 kdh Exp $
  30  *
  31  * HighPoint RAID Driver for FreeBSD
  32  * Copyright (C) 2005 HighPoint Technologies, Inc. All Rights Reserved.
  33  */
  34
  35 #include <dev/raid/hptrr/os_bsd.h>
  36
  37 /* hardware access */
  38 HPT_U8   os_inb  (void *port) { return inb((unsigned)(HPT_UPTR)port); }
  39 HPT_U16  os_inw  (void *port) { return inw((unsigned)(HPT_UPTR)port); }
  40 HPT_U32  os_inl  (void *port) { return inl((unsigned)(HPT_UPTR)port); }
  41
  42 void os_outb (void *port, HPT_U8 value) { outb((unsigned)(HPT_UPTR)port, (value)); }
  43 void os_outw (void *port, HPT_U16 value) { outw((unsigned)(HPT_UPTR)port, (value)); }
  44 void os_outl (void *port, HPT_U32 value) { outl((unsigned)(HPT_UPTR)port, (value)); }
  45
  46 void os_insw (void *port, HPT_U16 *buffer, HPT_U32 count)
  47 { insw((unsigned)(HPT_UPTR)port, (void *)buffer, count); }
  48
  49 void os_outsw(void *port, HPT_U16 *buffer, HPT_U32 count)
  50 { outsw((unsigned)(HPT_UPTR)port, (void *)buffer, count); }
  51
  52 HPT_U32 __dummy_reg = 0;
  53
  54 /* PCI configuration space */
  55 HPT_U8  os_pci_readb (void *osext, HPT_U8 offset)
  56 {
  57     return  pci_read_config(((PHBA)osext)->pcidev, offset, 1);
  58 }
  59
  60 HPT_U16 os_pci_readw (void *osext, HPT_U8 offset)
  61 {
  62     return  pci_read_config(((PHBA)osext)->pcidev, offset, 2);
  63 }
  64
  65 HPT_U32 os_pci_readl (void *osext, HPT_U8 offset)
  66 {
  67     return  pci_read_config(((PHBA)osext)->pcidev, offset, 4);
  68 }
  69
  70 void os_pci_writeb (void *osext, HPT_U8 offset, HPT_U8 value)
  71 {
  72     pci_write_config(((PHBA)osext)->pcidev, offset, value, 1);
  73 }
  74
  75 void os_pci_writew (void *osext, HPT_U8 offset, HPT_U16 value)
  76 {
  77     pci_write_config(((PHBA)osext)->pcidev, offset, value, 2);
  78 }
  79
  80 void os_pci_writel (void *osext, HPT_U8 offset, HPT_U32 value)
  81 {
  82     pci_write_config(((PHBA)osext)->pcidev, offset, value, 4);
  83 }
  84
  85 void *os_map_pci_bar(
  86     void *osext,
  87     int index,
  88     HPT_U32 offset,
  89     HPT_U32 length
  90 )
  91 {
  92         PHBA hba = (PHBA)osext;
  93
  94     hba->pcibar[index].rid = 0x10 + index * 4;
  95
  96     if (pci_read_config(hba->pcidev, hba->pcibar[index].rid, 4) & 1)
  97         hba->pcibar[index].type = SYS_RES_IOPORT;
  98     else
  99         hba->pcibar[index].type = SYS_RES_MEMORY;
 100
 101     hba->pcibar[index].res = bus_alloc_resource(hba->pcidev,
 102                 hba->pcibar[index].type, &hba->pcibar[index].rid, 0, ~0, length, RF_ACTIVE);
 103
 104         hba->pcibar[index].base = (char *)rman_get_virtual(hba->pcibar[index].res) + offset;
 105         return hba->pcibar[index].base;
 106 }
 107
 108 void os_unmap_pci_bar(void *osext, void *base)
 109 {
 110         PHBA hba = (PHBA)osext;
 111         int index;
 112
 113         for (index=0; index<6; index++) {
 114                 if (hba->pcibar[index].base==base) {
 115                         bus_release_resource(hba->pcidev, hba->pcibar[index].type,
 116                                 hba->pcibar[index].rid, hba->pcibar[index].res);
 117                         hba->pcibar[index].base = 0;
 118                         return;
 119                 }
 120         }
 121 }
 122
 123 void freelist_reserve(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT count)
 124 {
 125     PVBUS_EXT vbus_ext = osext;
 126
 127     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
 128         vbus_ext = ((PHBA)osext)->vbus_ext;
 129
 130     list->next = vbus_ext->freelist_head;
 131     vbus_ext->freelist_head = list;
 132     list->dma = 0;
 133     list->size = size;
 134     list->head = 0;
 135 #if DBG
 136     list->reserved_count =
 137 #endif
 138     list->count = count;
 139 }
 140
 141 void *freelist_get(struct freelist *list)
 142 {
 143     void * result;
 144     if (list->count) {
 145         HPT_ASSERT(list->head);
 146         result = list->head;
 147         list->head = *(void **)result;
 148         list->count--;
 149         return result;
 150     }
 151     return 0;
 152 }
 153
 154 void freelist_put(struct freelist * list, void *p)
 155 {
 156     HPT_ASSERT(list->dma==0);
 157     list->count++;
 158     *(void **)p = list->head;
 159     list->head = p;
 160 }
 161
 162 void freelist_reserve_dma(struct freelist *list, void *osext, HPT_UINT size, HPT_UINT alignment, HPT_UINT count)
 163 {
 164     PVBUS_EXT vbus_ext = osext;
 165
 166     if (vbus_ext->ext_type!=EXT_TYPE_VBUS)
 167         vbus_ext = ((PHBA)osext)->vbus_ext;
 168
 169     list->next = vbus_ext->freelist_dma_head;
 170     vbus_ext->freelist_dma_head = list;
 171     list->dma = 1;
 172     list->alignment = alignment;
 173     list->size = size;
 174     list->head = 0;
 175 #if DBG
 176     list->reserved_count =
 177 #endif
 178     list->count = count;
 179 }
 180
 181 void *freelist_get_dma(struct freelist *list, BUS_ADDRESS *busaddr)
 182 {
 183     void *result;
 184     HPT_ASSERT(list->dma);
 185     result = freelist_get(list);
 186     if (result)
 187         *busaddr = *(BUS_ADDRESS *)((void **)result+1);
 188     return result;
 189 }
 190
 191 void freelist_put_dma(struct freelist *list, void *p, BUS_ADDRESS busaddr)
 192 {
 193     HPT_ASSERT(list->dma);
 194     list->count++;
 195     *(void **)p = list->head;
 196     *(BUS_ADDRESS *)((void **)p+1) = busaddr;
 197     list->head = p;
 198 }
 199
 200 HPT_U32 os_get_stamp(void)
 201 {
 202     HPT_U32 stamp;
 203     do { stamp = krandom(); } while (stamp==0);
 204     return stamp;
 205 }
 206
 207 void os_stallexec(HPT_U32 microseconds)
 208 {
 209     DELAY(microseconds);
 210 }
 211
 212 static void os_timer_for_ldm(void *arg)
 213 {
 214         PVBUS_EXT vbus_ext = (PVBUS_EXT)arg;
 215         ldm_on_timer((PVBUS)vbus_ext->vbus);
 216 }
 217
 218 void  os_request_timer(void * osext, HPT_U32 interval)
 219 {
 220         PVBUS_EXT vbus_ext = osext;
 221
 222         HPT_ASSERT(vbus_ext->ext_type==EXT_TYPE_VBUS);
 223
 224         callout_stop(&vbus_ext->timer);
 225         callout_reset(&vbus_ext->timer, interval * hz / 1000000, os_timer_for_ldm, vbus_ext);
 226 }
 227
 228 HPT_TIME os_query_time(void)
 229 {
 230         return ticks * (1000000 / hz);
 231 }
 232
 233 void os_schedule_task(void *osext, OSM_TASK *task)
 234 {
 235         PVBUS_EXT vbus_ext = osext;
 236
 237         HPT_ASSERT(task->next==0);
 238
 239         if (vbus_ext->tasks==0)
 240                 vbus_ext->tasks = task;
 241         else {
 242                 OSM_TASK *t = vbus_ext->tasks;
 243                 while (t->next) t = t->next;
 244                 t->next = task;
 245         }
 246
 247         if (vbus_ext->worker.ta_context)
 248                 TASK_ENQUEUE(&vbus_ext->worker);
 249 }
 250
 251 int os_revalidate_device(void *osext, int id)
 252 {
 253
 254     return 0;
 255 }
 256
 257 int os_query_remove_device(void *osext, int id)
 258 {
 259         PVBUS_EXT                               vbus_ext = (PVBUS_EXT)osext;
 260         struct cam_periph               *periph = NULL;
 261     struct cam_path                     *path;
 262     int                                         status,retval = 0;
 263
 264     status = xpt_create_path(&path, NULL, vbus_ext->sim->path_id, id, 0);
 265     if (status == CAM_REQ_CMP) {
 266                 if((periph = cam_periph_find(path, "da")) != NULL){
 267                         if(periph->refcount >= 1)
 268                                 retval = -1;
 269                 }
 270                 xpt_free_path(path);
 271     }
 272
 273     return retval;
 274 }
 275
 276 HPT_U8 os_get_vbus_seq(void *osext)
 277 {
 278     return ((PVBUS_EXT)osext)->sim->path_id;
 279 }
 280
 281 int  os_printk(char *fmt, ...)
 282 {
 283     __va_list args;
 284     static char buf[512];
 285
 286     __va_start(args, fmt);
 287     kvsnprintf(buf, sizeof(buf), fmt, args);
 288     __va_end(args);
 289     return kprintf("%s: %s\n", driver_name, buf);
 290 }
 291
 292 #if DBG
 293 void os_check_stack(const char *location, int size){}
 294
 295 void __os_dbgbreak(const char *file, int line)
 296 {
 297     kprintf("*** break at %s:%d ***", file, line);
 298     while (1);
 299 }
 300
 301 int hptrr_dbg_level = 1;
 302 #endif