sys/i386/acpica/acpi_machdep.c

   1 /*-
   2  * Copyright (c) 2001 Mitsuru IWASAKI
   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/bus.h>
  32 #include <sys/condvar.h>
  33 #include <sys/conf.h>
  34 #include <sys/fcntl.h>
  35 #include <sys/kernel.h>
  36 #include <sys/sysctl.h>
  37 #include <sys/uio.h>
  38 #include <vm/vm.h>
  39 #include <vm/pmap.h>
  40
  41 #include <contrib/dev/acpica/acpi.h>
  42 #include <dev/acpica/acpivar.h>
  43 #include <dev/acpica/acpiio.h>
  44
  45 /*
  46  * APM driver emulation
  47  */
  48
  49 #include <sys/selinfo.h>
  50
  51 #include <machine/apm_bios.h>
  52 #include <machine/pc/bios.h>
  53
  54 #include <i386/bios/apm.h>
  55
  56 SYSCTL_DECL(_debug_acpi);
  57
  58 uint32_t acpi_resume_beep;
  59 TUNABLE_INT("debug.acpi.resume_beep", &acpi_resume_beep);
  60 SYSCTL_UINT(_debug_acpi, OID_AUTO, resume_beep, CTLFLAG_RW, &acpi_resume_beep,
  61     0, "Beep the PC speaker when resuming");
  62 uint32_t acpi_reset_video;
  63 TUNABLE_INT("hw.acpi.reset_video", &acpi_reset_video);
  64
  65 static int intr_model = ACPI_INTR_PIC;
  66 static int apm_active;
  67
  68 static d_open_t apmopen;
  69 static d_close_t apmclose;
  70 static d_write_t apmwrite;
  71 static d_ioctl_t apmioctl;
  72 static d_poll_t apmpoll;
  73
  74 static struct cdevsw apm_cdevsw = {
  75         .d_version =    D_VERSION,
  76         .d_open =       apmopen,
  77         .d_close =      apmclose,
  78         .d_write =      apmwrite,
  79         .d_ioctl =      apmioctl,
  80         .d_poll =       apmpoll,
  81         .d_name =       "apm",
  82 };
  83
  84 static int
  85 acpi_capm_convert_battstate(struct  acpi_battinfo *battp)
  86 {
  87         int     state;
  88
  89         state = APM_UNKNOWN;
  90
  91         if (battp->state & ACPI_BATT_STAT_DISCHARG) {
  92                 if (battp->cap >= 50)
  93                         state = 0;      /* high */
  94                 else
  95                         state = 1;      /* low */
  96         }
  97         if (battp->state & ACPI_BATT_STAT_CRITICAL)
  98                 state = 2;              /* critical */
  99         if (battp->state & ACPI_BATT_STAT_CHARGING)
 100                 state = 3;              /* charging */
 101
 102         /* If still unknown, determine it based on the battery capacity. */
 103         if (state == APM_UNKNOWN) {
 104                 if (battp->cap >= 50)
 105                         state = 0;      /* high */
 106                 else
 107                         state = 1;      /* low */
 108         }
 109
 110         return (state);
 111 }
 112
 113 static int
 114 acpi_capm_convert_battflags(struct  acpi_battinfo *battp)
 115 {
 116         int     flags;
 117
 118         flags = 0;
 119
 120         if (battp->cap >= 50)
 121                 flags |= APM_BATT_HIGH;
 122         else {
 123                 if (battp->state & ACPI_BATT_STAT_CRITICAL)
 124                         flags |= APM_BATT_CRITICAL;
 125                 else
 126                         flags |= APM_BATT_LOW;
 127         }
 128         if (battp->state & ACPI_BATT_STAT_CHARGING)
 129                 flags |= APM_BATT_CHARGING;
 130         if (battp->state == ACPI_BATT_STAT_NOT_PRESENT)
 131                 flags = APM_BATT_NOT_PRESENT;
 132
 133         return (flags);
 134 }
 135
 136 static int
 137 acpi_capm_get_info(apm_info_t aip)
 138 {
 139         int     acline;
 140         struct  acpi_battinfo batt;
 141
 142         aip->ai_infoversion = 1;
 143         aip->ai_major       = 1;
 144         aip->ai_minor       = 2;
 145         aip->ai_status      = apm_active;
 146         aip->ai_capabilities= 0xff00;   /* unknown */
 147
 148         if (acpi_acad_get_acline(&acline))
 149                 aip->ai_acline = APM_UNKNOWN;   /* unknown */
 150         else
 151                 aip->ai_acline = acline;        /* on/off */
 152
 153         if (acpi_battery_get_battinfo(NULL, &batt) != 0) {
 154                 aip->ai_batt_stat = APM_UNKNOWN;
 155                 aip->ai_batt_life = APM_UNKNOWN;
 156                 aip->ai_batt_time = -1;          /* unknown */
 157                 aip->ai_batteries = ~0U;         /* unknown */
 158         } else {
 159                 aip->ai_batt_stat = acpi_capm_convert_battstate(&batt);
 160                 aip->ai_batt_life = batt.cap;
 161                 aip->ai_batt_time = (batt.min == -1) ? -1 : batt.min * 60;
 162                 aip->ai_batteries = acpi_battery_get_units();
 163         }
 164
 165         return (0);
 166 }
 167
 168 static int
 169 acpi_capm_get_pwstatus(apm_pwstatus_t app)
 170 {
 171         device_t dev;
 172         int     acline, unit, error;
 173         struct  acpi_battinfo batt;
 174
 175         if (app->ap_device != PMDV_ALLDEV &&
 176             (app->ap_device < PMDV_BATT0 || app->ap_device > PMDV_BATT_ALL))
 177                 return (1);
 178
 179         if (app->ap_device == PMDV_ALLDEV)
 180                 error = acpi_battery_get_battinfo(NULL, &batt);
 181         else {
 182                 unit = app->ap_device - PMDV_BATT0;
 183                 dev = devclass_get_device(devclass_find("battery"), unit);
 184                 if (dev != NULL)
 185                         error = acpi_battery_get_battinfo(dev, &batt);
 186                 else
 187                         error = ENXIO;
 188         }
 189         if (error)
 190                 return (1);
 191
 192         app->ap_batt_stat = acpi_capm_convert_battstate(&batt);
 193         app->ap_batt_flag = acpi_capm_convert_battflags(&batt);
 194         app->ap_batt_life = batt.cap;
 195         app->ap_batt_time = (batt.min == -1) ? -1 : batt.min * 60;
 196
 197         if (acpi_acad_get_acline(&acline))
 198                 app->ap_acline = APM_UNKNOWN;
 199         else
 200                 app->ap_acline = acline;        /* on/off */
 201
 202         return (0);
 203 }
 204
 205 static int
 206 apmopen(struct cdev *dev, int flag, int fmt, d_thread_t *td)
 207 {
 208         return (0);
 209 }
 210
 211 static int
 212 apmclose(struct cdev *dev, int flag, int fmt, d_thread_t *td)
 213 {
 214         return (0);
 215 }
 216
 217 static int
 218 apmioctl(struct cdev *dev, u_long cmd, caddr_t addr, int flag, d_thread_t *td)
 219 {
 220         int     error = 0;
 221         struct  acpi_softc *acpi_sc;
 222         struct apm_info info;
 223         apm_info_old_t aiop;
 224
 225         acpi_sc = devclass_get_softc(devclass_find("acpi"), 0);
 226
 227         switch (cmd) {
 228         case APMIO_SUSPEND:
 229                 if ((flag & FWRITE) == 0)
 230                         return (EPERM);
 231                 if (apm_active)
 232                         acpi_SetSleepState(acpi_sc, acpi_sc->acpi_suspend_sx);
 233                 else
 234                         error = EINVAL;
 235                 break;
 236         case APMIO_STANDBY:
 237                 if ((flag & FWRITE) == 0)
 238                         return (EPERM);
 239                 if (apm_active)
 240                         acpi_SetSleepState(acpi_sc, acpi_sc->acpi_standby_sx);
 241                 else
 242                         error = EINVAL;
 243                 break;
 244         case APMIO_GETINFO_OLD:
 245                 if (acpi_capm_get_info(&info))
 246                         error = ENXIO;
 247                 aiop = (apm_info_old_t)addr;
 248                 aiop->ai_major = info.ai_major;
 249                 aiop->ai_minor = info.ai_minor;
 250                 aiop->ai_acline = info.ai_acline;
 251                 aiop->ai_batt_stat = info.ai_batt_stat;
 252                 aiop->ai_batt_life = info.ai_batt_life;
 253                 aiop->ai_status = info.ai_status;
 254                 break;
 255         case APMIO_GETINFO:
 256                 if (acpi_capm_get_info((apm_info_t)addr))
 257                         error = ENXIO;
 258                 break;
 259         case APMIO_GETPWSTATUS:
 260                 if (acpi_capm_get_pwstatus((apm_pwstatus_t)addr))
 261                         error = ENXIO;
 262                 break;
 263         case APMIO_ENABLE:
 264                 if ((flag & FWRITE) == 0)
 265                         return (EPERM);
 266                 apm_active = 1;
 267                 break;
 268         case APMIO_DISABLE:
 269                 if ((flag & FWRITE) == 0)
 270                         return (EPERM);
 271                 apm_active = 0;
 272                 break;
 273         case APMIO_HALTCPU:
 274                 break;
 275         case APMIO_NOTHALTCPU:
 276                 break;
 277         case APMIO_DISPLAY:
 278                 if ((flag & FWRITE) == 0)
 279                         return (EPERM);
 280                 break;
 281         case APMIO_BIOS:
 282                 if ((flag & FWRITE) == 0)
 283                         return (EPERM);
 284                 bzero(addr, sizeof(struct apm_bios_arg));
 285                 break;
 286         default:
 287                 error = EINVAL;
 288                 break;
 289         }
 290
 291         return (error);
 292 }
 293
 294 static int
 295 apmwrite(struct cdev *dev, struct uio *uio, int ioflag)
 296 {
 297         return (uio->uio_resid);
 298 }
 299
 300 static int
 301 apmpoll(struct cdev *dev, int events, d_thread_t *td)
 302 {
 303         return (0);
 304 }
 305
 306 static void
 307 acpi_capm_init(struct acpi_softc *sc)
 308 {
 309         make_dev(&apm_cdevsw, 0, 0, 5, 0664, "apm");
 310 }
 311
 312 int
 313 acpi_machdep_init(device_t dev)
 314 {
 315         struct  acpi_softc *sc;
 316
 317         sc = devclass_get_softc(devclass_find("acpi"), 0);
 318         acpi_capm_init(sc);
 319
 320         acpi_install_wakeup_handler(sc);
 321
 322         if (intr_model == ACPI_INTR_PIC)
 323                 BUS_CONFIG_INTR(dev, AcpiGbl_FADT.SciInterrupt,
 324                     INTR_TRIGGER_LEVEL, INTR_POLARITY_LOW);
 325         else
 326                 acpi_SetIntrModel(intr_model);
 327
 328         SYSCTL_ADD_UINT(&sc->acpi_sysctl_ctx,
 329             SYSCTL_CHILDREN(sc->acpi_sysctl_tree), OID_AUTO,
 330             "reset_video", CTLFLAG_RW, &acpi_reset_video, 0,
 331             "Call the VESA reset BIOS vector on the resume path");
 332
 333         return (0);
 334 }
 335
 336 void
 337 acpi_SetDefaultIntrModel(int model)
 338 {
 339
 340         intr_model = model;
 341 }
 342
 343 /* Check BIOS date.  If 1998 or older, disable ACPI. */
 344 int
 345 acpi_machdep_quirks(int *quirks)
 346 {
 347         char *va;
 348         int year;
 349
 350         /* BIOS address 0xffff5 contains the date in the format mm/dd/yy. */
 351         va = pmap_mapbios(0xffff0, 16);
 352         sscanf(va + 11, "%2d", &year);
 353         pmap_unmapbios((vm_offset_t)va, 16);
 354
 355         /*
 356          * Date must be >= 1/1/1999 or we don't trust ACPI.  Note that this
 357          * check must be changed by my 114th birthday.
 358          */
 359         if (year > 90 && year < 99)
 360                 *quirks = ACPI_Q_BROKEN;
 361
 362         return (0);
 363 }
 364
 365 void
 366 acpi_cpu_c1()
 367 {
 368         __asm __volatile("sti; hlt");
 369 }