sys/i386/i386/geode.c

   1 /*-
   2  * Copyright (c) 2003-2004 Poul-Henning Kamp
   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
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include <sys/param.h>
  31 #include <sys/systm.h>
  32 #include <sys/timetc.h>
  33 #include <sys/bus.h>
  34 #include <sys/kernel.h>
  35 #include <sys/module.h>
  36 #include <sys/watchdog.h>
  37 #include <dev/pci/pcireg.h>
  38 #include <dev/pci/pcivar.h>
  39 #include <dev/led/led.h>
  40 #include <machine/pc/bios.h>
  41
  42 static struct bios_oem bios_soekris = {
  43         { 0xf0000, 0xf1000 },
  44         {
  45                 { "Soekris", 0, 8 },    /* Soekris Engineering. */
  46                 { "net4", 0, 8 },       /* net45xx */
  47                 { "comBIOS", 0, 54 },   /* comBIOS ver. 1.26a  20040819 ... */
  48                 { NULL, 0, 0 },
  49         }
  50 };
  51
  52 static struct bios_oem bios_pcengines = {
  53         { 0xf9000, 0xfa000 },
  54         {
  55                 { "PC Engines WRAP", 0, 28 },   /* PC Engines WRAP.1C v1.03 */
  56                 { "tinyBIOS", 0, 28 },          /* tinyBIOS V1.4a (C)1997-2003 */
  57                 { NULL, 0, 0 },
  58         }
  59 };
  60
  61 static struct bios_oem bios_advantech = {
  62         { 0xfe000, 0xff000 },
  63         {
  64                 { "**** PCM-582", 5, 33 },      /* PCM-5823 BIOS V1.12 ... */
  65                 { "GXm-Cx5530", -11, 35 },      /* 06/07/2002-GXm-Cx5530... */
  66                 { NULL, 0, 0 },
  67         }
  68 };
  69
  70 static unsigned cba;
  71 static unsigned gpio;
  72 static unsigned geode_counter;
  73
  74 static struct cdev *led1, *led2, *led3;
  75 static int      led1b, led2b, led3b;
  76
  77 static void
  78 led_func(void *ptr, int onoff)
  79 {
  80         uint32_t u;
  81         int bit;
  82
  83         bit = *(int *)ptr;
  84         if (bit < 0) {
  85                 bit = -bit;
  86                 onoff = !onoff;
  87         }
  88
  89         u = inl(gpio + 4);
  90         if (onoff)
  91                 u |= 1 << bit;
  92         else
  93                 u &= ~(1 << bit);
  94         outl(gpio, u);
  95 }
  96
  97
  98 static unsigned
  99 geode_get_timecount(struct timecounter *tc)
 100 {
 101         return (inl(geode_counter));
 102 }
 103
 104 static struct timecounter geode_timecounter = {
 105         geode_get_timecount,
 106         NULL,
 107         0xffffffff,
 108         27000000,
 109         "Geode",
 110         1000
 111 };
 112
 113 static uint64_t
 114 geode_cputicks(void)
 115 {
 116         unsigned c;
 117         static unsigned last;
 118         static uint64_t offset;
 119
 120         c = inl(geode_counter);
 121         if (c < last)
 122                 offset += (1LL << 32);
 123         last = c;
 124         return (offset | c);
 125 }
 126
 127 /*
 128  * The GEODE watchdog runs from a 32kHz frequency.  One period of that is
 129  * 31250 nanoseconds which we round down to 2^14 nanoseconds.  The watchdog
 130  * consists of a power-of-two prescaler and a 16 bit counter, so the math
 131  * is quite simple.  The max timeout is 14 + 16 + 13 = 2^43 nsec ~= 2h26m.
 132  */
 133 static void
 134 geode_watchdog(void *foo __unused, u_int cmd, int *error)
 135 {
 136         u_int u, p, r;
 137
 138         u = cmd & WD_INTERVAL;
 139         if (u >= 14 && u <= 43) {
 140                 u -= 14;
 141                 if (u > 16) {
 142                         p = u - 16;
 143                         u -= p;
 144                 } else {
 145                         p = 0;
 146                 }
 147                 if (u == 16)
 148                         u = (1 << u) - 1;
 149                 else
 150                         u = 1 << u;
 151                 r = inw(cba + 2) & 0xff00;
 152                 outw(cba + 2, p | 0xf0 | r);
 153                 outw(cba, u);
 154                 *error = 0;
 155         } else {
 156                 outw(cba, 0);
 157         }
 158 }
 159
 160 /*
 161  * The Advantech PCM-582x watchdog expects 0x1 at I/O port 0x0443
 162  * every 1.6 secs +/- 30%. Writing 0x0 disables the watchdog
 163  * NB: reading the I/O port enables the timer as well
 164  */
 165 static void
 166 advantech_watchdog(void *foo __unused, u_int cmd, int *error)
 167 {
 168         u_int u;
 169
 170         u = cmd & WD_INTERVAL;
 171         if (u > 0 && u <= WD_TO_1SEC) {
 172                 outb(0x0443, 1);
 173                 *error = 0;
 174         } else {
 175                 outb(0x0443, 0);
 176         }
 177 }
 178
 179 static int
 180 geode_probe(device_t self)
 181 {
 182 #define BIOS_OEM_MAXLEN 80
 183         static u_char bios_oem[BIOS_OEM_MAXLEN] = "\0";
 184
 185         if (pci_get_devid(self) == 0x0515100b) {
 186                 if (geode_counter == 0) {
 187                         /*
 188                          * The address of the CBA is written to this register
 189                          * by the bios, see p161 in data sheet.
 190                          */
 191                         cba = pci_read_config(self, 0x64, 4);
 192                         printf("Geode CBA@ 0x%x\n", cba);
 193                         geode_counter = cba + 0x08;
 194                         outl(cba + 0x0d, 2);
 195                         printf("Geode rev: %02x %02x\n",
 196                                 inb(cba + 0x3c), inb(cba + 0x3d));
 197                         tc_init(&geode_timecounter);
 198                         EVENTHANDLER_REGISTER(watchdog_list, geode_watchdog,
 199                             NULL, 0);
 200                         set_cputicker(geode_cputicks, 27000000, 0);
 201                 }
 202         } else if (pci_get_devid(self) == 0x0510100b) {
 203                 gpio = pci_read_config(self, PCIR_BAR(0), 4);
 204                 gpio &= ~0x1f;
 205                 printf("Geode GPIO@ = %x\n", gpio);
 206                 if ( bios_oem_strings(&bios_soekris,
 207                                         bios_oem, BIOS_OEM_MAXLEN) > 0 ) {
 208                         led1b = 20;
 209                         led1 = led_create(led_func, &led1b, "error");
 210                 } else if ( bios_oem_strings(&bios_pcengines,
 211                                         bios_oem, BIOS_OEM_MAXLEN) > 0 ) {
 212                         led1b = -2;
 213                         led2b = -3;
 214                         led3b = -18;
 215                         led1 = led_create(led_func, &led1b, "led1");
 216                         led2 = led_create(led_func, &led2b, "led2");
 217                         led3 = led_create(led_func, &led3b, "led3");
 218                         /*
 219                         * Turn on first LED so we don't make
 220                         * people think their box just died.
 221                         */
 222                         led_func(&led1b, 1);
 223                 }
 224                 if ( strlen(bios_oem) )
 225                         printf("Geode %s\n", bios_oem);
 226         } else if (pci_get_devid(self) == 0x01011078) {
 227                 if ( bios_oem_strings(&bios_advantech,
 228                                 bios_oem, BIOS_OEM_MAXLEN) > 0 ) {
 229                         printf("Geode %s\n", bios_oem);
 230                         EVENTHANDLER_REGISTER(watchdog_list, advantech_watchdog,
 231                             NULL, 0);
 232                 }
 233         }
 234         return (ENXIO);
 235 }
 236
 237 static int
 238 geode_attach(device_t self)
 239 {
 240
 241         return(ENODEV);
 242 }
 243
 244 static device_method_t geode_methods[] = {
 245         /* Device interface */
 246         DEVMETHOD(device_probe,         geode_probe),
 247         DEVMETHOD(device_attach,        geode_attach),
 248         DEVMETHOD(device_suspend,       bus_generic_suspend),
 249         DEVMETHOD(device_resume,        bus_generic_resume),
 250         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
 251         {0, 0}
 252 };
 253
 254 static driver_t geode_driver = {
 255         "geode",
 256         geode_methods,
 257         0,
 258 };
 259
 260 static devclass_t geode_devclass;
 261
 262 DRIVER_MODULE(geode, pci, geode_driver, geode_devclass, 0, 0);