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