io/ppm/acpisleep.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 * Copyright 2016, Joyent, Inc.
 */

#include <sys/types.h>
#include <sys/smp_impldefs.h>
#include <sys/promif.h>

#include <sys/kmem.h>
#include <sys/archsystm.h>
#include <sys/cpuvar.h>
#include <sys/pte.h>
#include <vm/seg_kmem.h>
#include <sys/epm.h>
#include <sys/cpr.h>
#include <sys/machsystm.h>
#include <sys/clock.h>

#include <sys/cpr_wakecode.h>
#include <sys/acpi/acpi.h>

#ifdef OLDPMCODE
#include "acpi.h"
#endif

#include    <sys/x86_archext.h>
#include    <sys/reboot.h>
#include    <sys/cpu_module.h>
#include    <sys/kdi.h>

/*
 * S3 stuff
 */

int acpi_rtc_wake = 0x0;        /* wake in N seconds */

#if 0   /* debug */
static uint8_t  branchbuf[64 * 1024];   /* for the HDT branch trace stuff */
#endif  /* debug */

extern int boothowto;

#define BOOTCPU 0   /* cpu 0 is always the boot cpu */

extern void     kernel_wc_code(void);
extern tod_ops_t    *tod_ops;
extern int flushes_require_xcalls;
extern int tsc_gethrtime_enable;

extern cpuset_t cpu_ready_set;


/*
 * This is what we've all been waiting for!
 */
int
acpi_enter_sleepstate(s3a_t *s3ap)
{
    ACPI_PHYSICAL_ADDRESS   wakephys = s3ap->s3a_wakephys;
    caddr_t         wakevirt = rm_platter_va;
    /*LINTED*/
    wakecode_t      *wp = (wakecode_t *)wakevirt;
    uint_t          Sx = s3ap->s3a_state;

    PT(PT_SWV);
    /* Set waking vector */
    if (AcpiSetFirmwareWakingVector(wakephys, NULL) != AE_OK) {
        PT(PT_SWV_FAIL);
        PMD(PMD_SX, ("Can't SetFirmwareWakingVector(%lx)\n",
            (long)wakephys))
        goto insomnia;
    }

    PT(PT_EWE);
    /* Enable wake events */
    if (AcpiEnableEvent(ACPI_EVENT_POWER_BUTTON, 0) != AE_OK) {
        PT(PT_EWE_FAIL);
        PMD(PMD_SX, ("Can't EnableEvent(POWER_BUTTON)\n"))
    }
    if (acpi_rtc_wake > 0) {
        /* clear the RTC bit first */
        (void) AcpiWriteBitRegister(ACPI_BITREG_RT_CLOCK_STATUS, 1);
        PT(PT_RTCW);
        if (AcpiEnableEvent(ACPI_EVENT_RTC, 0) != AE_OK) {
            PT(PT_RTCW_FAIL);
            PMD(PMD_SX, ("Can't EnableEvent(RTC)\n"))
        }

        /*
         * Set RTC to wake us in a wee while.
         */
        mutex_enter(&tod_lock);
        PT(PT_TOD);
        TODOP_SETWAKE(tod_ops, acpi_rtc_wake);
        mutex_exit(&tod_lock);
    }

    /*
     * Prepare for sleep ... could've done this earlier?
     */
    PT(PT_SXP);
    PMD(PMD_SX, ("Calling AcpiEnterSleepStatePrep(%d) ...\n", Sx))
    if (AcpiEnterSleepStatePrep(Sx) != AE_OK) {
        PMD(PMD_SX, ("... failed\n!"))
        goto insomnia;
    }

    switch (s3ap->s3a_test_point) {
    case DEVICE_SUSPEND_TO_RAM:
    case FORCE_SUSPEND_TO_RAM:
    case LOOP_BACK_PASS:
        return (0);
    case LOOP_BACK_FAIL:
        return (1);
    default:
        ASSERT(s3ap->s3a_test_point == LOOP_BACK_NONE);
    }

    /*
     * Tell the hardware to sleep.
     */
    PT(PT_SXE);
    PMD(PMD_SX, ("Calling AcpiEnterSleepState(%d) ...\n", Sx))
    if (AcpiEnterSleepState(Sx) != AE_OK) {
        PT(PT_SXE_FAIL);
        PMD(PMD_SX, ("... failed!\n"))
    }

insomnia:
    PT(PT_INSOM);
    /* cleanup is done in the caller */
    return (1);
}

int
acpi_exit_sleepstate(s3a_t *s3ap)
{
    int Sx = s3ap->s3a_state;

    PT(PT_WOKE);
    PMD(PMD_SX, ("!We woke up!\n"))

    PT(PT_LSS);
    if (AcpiLeaveSleepStatePrep(Sx) != AE_OK) {
        PT(PT_LSS_FAIL);
        PMD(PMD_SX, ("Problem with LeaveSleepState!\n"))
    }

    if (AcpiLeaveSleepState(Sx) != AE_OK) {
        PT(PT_LSS_FAIL);
        PMD(PMD_SX, ("Problem with LeaveSleepState!\n"))
    }

    PT(PT_CPB);
    if (AcpiClearEvent(ACPI_EVENT_POWER_BUTTON) != AE_OK) {
        PT(PT_CPB_FAIL);
        PMD(PMD_SX, ("Problem w/ ClearEvent(POWER_BUTTON)\n"))
    }
    if (acpi_rtc_wake > 0 &&
        AcpiDisableEvent(ACPI_EVENT_RTC, 0) != AE_OK) {
        PT(PT_DRTC_FAIL);
        PMD(PMD_SX, ("Problem w/ DisableEvent(RTC)\n"))
    }

    PMD(PMD_SX, ("Exiting acpi_sleepstate() => 0\n"))

    return (0);
}