315 lines
7.4 KiB
C
315 lines
7.4 KiB
C
/* $NetBSD: sysmon_envsys.c,v 1.1 2000/11/05 04:06:13 thorpej Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 2000 Zembu Labs, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* Author: Jason R. Thorpe <thorpej@zembu.com>
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by Zembu Labs, Inc.
|
|
* 4. Neither the name of Zembu Labs nor the names of its employees may
|
|
* be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY ZEMBU LABS, INC. ``AS IS'' AND ANY EXPRESS
|
|
* OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WAR-
|
|
* RANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DIS-
|
|
* CLAIMED. IN NO EVENT SHALL ZEMBU LABS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
/*
|
|
* Environmental sensor framework for sysmon. Hardware monitors
|
|
* such as the LM78 and VIA 82C686A (or even ACPI, eventually) can
|
|
* register themselves to provide backplane fan and temperature
|
|
* information, etc.
|
|
*/
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/conf.h>
|
|
#include <sys/errno.h>
|
|
#include <sys/fcntl.h>
|
|
#include <sys/lock.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/proc.h>
|
|
|
|
#include <dev/sysmon/sysmonvar.h>
|
|
|
|
/*
|
|
* We run at ENVSYS version 1.
|
|
*/
|
|
#define SYSMON_ENVSYS_VERSION (1 * 1000)
|
|
|
|
struct lock sysmon_envsys_lock;
|
|
|
|
LIST_HEAD(, sysmon_envsys) sysmon_envsys_list =
|
|
LIST_HEAD_INITIALIZER(&sysmon_envsys_list);
|
|
struct simplelock sysmon_envsys_list_slock = SIMPLELOCK_INITIALIZER;
|
|
u_int sysmon_envsys_next_sensor_index;
|
|
|
|
int sysmon_envsys_initialized;
|
|
struct simplelock sysmon_envsys_initialized_slock = SIMPLELOCK_INITIALIZER;
|
|
|
|
void sysmon_envsys_init(void);
|
|
|
|
int sysmonioctl_envsys(dev_t, u_long, caddr_t, int, struct proc *);
|
|
int sysmonioctl_wdog(dev_t, u_long, caddr_t, int, struct proc *);
|
|
|
|
struct sysmon_envsys *sysmon_envsys_find(u_int);
|
|
void sysmon_envsys_release(struct sysmon_envsys *);
|
|
|
|
/*
|
|
* sysmon_envsys_init:
|
|
*
|
|
* Initialize the system monitor.
|
|
*/
|
|
void
|
|
sysmon_envsys_init(void)
|
|
{
|
|
|
|
lockinit(&sysmon_envsys_lock, PWAIT|PCATCH, "smenv", 0, 0);
|
|
sysmon_envsys_initialized = 1;
|
|
}
|
|
|
|
/*
|
|
* sysmonopen_envsys:
|
|
*
|
|
* Open the system monitor device.
|
|
*/
|
|
int
|
|
sysmonopen_envsys(dev_t dev, int flag, int mode, struct proc *p)
|
|
{
|
|
int error = 0;
|
|
|
|
simple_lock(&sysmon_envsys_initialized_slock);
|
|
if (sysmon_envsys_initialized == 0)
|
|
sysmon_envsys_init();
|
|
|
|
error = lockmgr(&sysmon_envsys_lock,
|
|
LK_EXCLUSIVE | LK_INTERLOCK |
|
|
((flag & O_NONBLOCK) ? LK_NOWAIT : 0),
|
|
&sysmon_envsys_initialized_slock);
|
|
|
|
return (error);
|
|
}
|
|
|
|
/*
|
|
* sysmonclose_envsys:
|
|
*
|
|
* Close the system monitor device.
|
|
*/
|
|
int
|
|
sysmonclose_envsys(dev_t dev, int flag, int mode, struct proc *p)
|
|
{
|
|
|
|
(void) lockmgr(&sysmon_envsys_lock, LK_RELEASE, NULL);
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* sysmonioctl_envsys:
|
|
*
|
|
* Perform an envsys control request.
|
|
*/
|
|
int
|
|
sysmonioctl_envsys(dev_t dev, u_long cmd, caddr_t data, int flag,
|
|
struct proc *p)
|
|
{
|
|
struct sysmon_envsys *sme;
|
|
int error = 0;
|
|
u_int oidx;
|
|
|
|
switch (cmd) {
|
|
/*
|
|
* For ENVSYS commands, we translate the absolute sensor index
|
|
* to a device-relative sensor index.
|
|
*/
|
|
case ENVSYS_VERSION:
|
|
*(int32_t *)data = SYSMON_ENVSYS_VERSION;
|
|
break;
|
|
|
|
case ENVSYS_GRANGE:
|
|
{
|
|
struct envsys_range *rng = (void *) data;
|
|
|
|
sme = sysmon_envsys_find(0); /* XXX */
|
|
if (sme == NULL) {
|
|
/* Return empty range for `no sensors'. */
|
|
rng->low = 1;
|
|
rng->high = 0;
|
|
break;
|
|
}
|
|
|
|
if (rng->units < ENVSYS_NSENSORS)
|
|
*rng = sme->sme_ranges[rng->units];
|
|
else {
|
|
/* Return empty range for unsupported sensor types. */
|
|
rng->low = 1;
|
|
rng->high = 0;
|
|
}
|
|
sysmon_envsys_release(sme);
|
|
break;
|
|
}
|
|
|
|
case ENVSYS_GTREDATA:
|
|
{
|
|
struct envsys_tre_data *tred = (void *) data;
|
|
|
|
tred->validflags = 0;
|
|
|
|
sme = sysmon_envsys_find(tred->sensor);
|
|
if (sme == NULL)
|
|
break;
|
|
oidx = tred->sensor;
|
|
tred->sensor = SME_SENSOR_IDX(sme, tred->sensor);
|
|
if (tred->sensor < sme->sme_nsensors)
|
|
error = (*sme->sme_gtredata)(sme, tred);
|
|
tred->sensor = oidx;
|
|
sysmon_envsys_release(sme);
|
|
break;
|
|
}
|
|
|
|
case ENVSYS_STREINFO:
|
|
{
|
|
struct envsys_basic_info *binfo = (void *) data;
|
|
|
|
sme = sysmon_envsys_find(binfo->sensor);
|
|
if (sme == NULL) {
|
|
binfo->validflags = 0;
|
|
break;
|
|
}
|
|
oidx = binfo->sensor;
|
|
binfo->sensor = SME_SENSOR_IDX(sme, binfo->sensor);
|
|
if (binfo->sensor < sme->sme_nsensors)
|
|
error = (*sme->sme_streinfo)(sme, binfo);
|
|
else
|
|
binfo->validflags = 0;
|
|
binfo->sensor = oidx;
|
|
sysmon_envsys_release(sme);
|
|
break;
|
|
}
|
|
|
|
case ENVSYS_GTREINFO:
|
|
{
|
|
struct envsys_basic_info *binfo = (void *) data;
|
|
|
|
binfo->validflags = 0;
|
|
|
|
sme = sysmon_envsys_find(binfo->sensor);
|
|
if (sme == NULL)
|
|
break;
|
|
oidx = binfo->sensor;
|
|
binfo->sensor = SME_SENSOR_IDX(sme, binfo->sensor);
|
|
if (binfo->sensor < sme->sme_nsensors)
|
|
*binfo = sme->sme_sensor_info[binfo->sensor];
|
|
binfo->sensor = oidx;
|
|
sysmon_envsys_release(sme);
|
|
break;
|
|
}
|
|
|
|
default:
|
|
error = ENOTTY;
|
|
}
|
|
|
|
return (error);
|
|
}
|
|
|
|
/*
|
|
* sysmon_envsys_register:
|
|
*
|
|
* Register an ENVSYS device.
|
|
*/
|
|
int
|
|
sysmon_envsys_register(struct sysmon_envsys *sme)
|
|
{
|
|
int error = 0;
|
|
|
|
simple_lock(&sysmon_envsys_list_slock);
|
|
|
|
/* XXX Only get to register one, for now. */
|
|
if (LIST_FIRST(&sysmon_envsys_list) != NULL) {
|
|
error = EEXIST;
|
|
goto out;
|
|
}
|
|
|
|
if (sme->sme_envsys_version != SYSMON_ENVSYS_VERSION) {
|
|
error = EINVAL;
|
|
goto out;
|
|
}
|
|
|
|
sme->sme_fsensor = sysmon_envsys_next_sensor_index;
|
|
sysmon_envsys_next_sensor_index += sme->sme_nsensors;
|
|
LIST_INSERT_HEAD(&sysmon_envsys_list, sme, sme_list);
|
|
|
|
out:
|
|
simple_unlock(&sysmon_envsys_list_slock);
|
|
return (error);
|
|
}
|
|
|
|
/*
|
|
* sysmon_envsys_unregister:
|
|
*
|
|
* Unregister an ENVSYS device.
|
|
*/
|
|
void
|
|
sysmon_envsys_unregister(struct sysmon_envsys *sme)
|
|
{
|
|
|
|
simple_lock(&sysmon_envsys_list_slock);
|
|
LIST_REMOVE(sme, sme_list);
|
|
simple_unlock(&sysmon_envsys_list_slock);
|
|
}
|
|
|
|
/*
|
|
* sysmon_envsys_find:
|
|
*
|
|
* Find an ENVSYS device. The list remains locked upon
|
|
* a match.
|
|
*/
|
|
struct sysmon_envsys *
|
|
sysmon_envsys_find(u_int idx)
|
|
{
|
|
struct sysmon_envsys *sme;
|
|
|
|
simple_lock(&sysmon_envsys_list_slock);
|
|
|
|
for (sme = LIST_FIRST(&sysmon_envsys_list); sme != NULL;
|
|
sme = LIST_NEXT(sme, sme_list)) {
|
|
if (idx >= sme->sme_fsensor &&
|
|
idx < (sme->sme_fsensor + sme->sme_nsensors))
|
|
return (sme);
|
|
}
|
|
|
|
simple_unlock(&sysmon_envsys_list_slock);
|
|
return (NULL);
|
|
}
|
|
|
|
/*
|
|
* sysmon_envsys_release:
|
|
*
|
|
* Release an ENVSYS device.
|
|
*/
|
|
/* ARGSUSED */
|
|
void
|
|
sysmon_envsys_release(struct sysmon_envsys *sme)
|
|
{
|
|
|
|
simple_unlock(&sysmon_envsys_list_slock);
|
|
}
|