/* See LICENSE file for copyright and license details. */
#include <stddef.h>

#include "../util.h"


#if defined(__linux__)
    #include <stdint.h>

    const char *
    temp(const char *file)
    {
    static _Thread_local char buf[1024];
        uintmax_t temp;

        if (pscanf(buf, file, "%ju", &temp) != 1)
            return NULL;

        return bprintf(buf, "%ju", temp / 1000);
    }
#elif defined(__OpenBSD__)
    #include <stdio.h>
    #include <sys/time.h> /* before <sys/sensors.h> for struct timeval */
    #include <sys/sensors.h>
    #include <sys/sysctl.h>

    const char *
    temp(const char *unused)
    {
    static _Thread_local char buf[1024];
        int mib[5];
        size_t size;
        struct sensor temp;

        mib[0] = CTL_HW;
        mib[1] = HW_SENSORS;
        mib[2] = 0; /* cpu0 */
        mib[3] = SENSOR_TEMP;
        mib[4] = 0; /* temp0 */

        size = sizeof(temp);

        if (sysctl(mib, 5, &temp, &size, NULL, 0) < 0) {
            warn("sysctl 'SENSOR_TEMP':");
            return NULL;
        }

        /* kelvin to celsius */
        return bprintf(buf, "%d", (int)((float)(temp.value-273150000) / 1E6));
    }
#elif defined(__FreeBSD__)
    #include <stdio.h>
    #include <stdlib.h>
    #include <sys/sysctl.h>

    #define ACPI_TEMP "hw.acpi.thermal.%s.temperature"

    const char *
    temp(const char *zone)
    {
    static _Thread_local char buf[1024];
        char buf[256];
        int temp;
        size_t len;

        len = sizeof(temp);
        snprintf(buf, sizeof(buf), ACPI_TEMP, zone);
        if (sysctlbyname(buf, &temp, &len, NULL, 0) < 0
                || !len)
            return NULL;

        /* kelvin to decimal celcius */
        return bprintf(buf, "%d.%d", (temp - 2731) / 10, abs((temp - 2731) % 10));
    }
#endif