2
* sysfs.c sysfs ABI access functions for TMON program
4
* Copyright (C) 2013 Intel Corporation. All rights reserved.
6
* This program is free software; you can redistribute it and/or
7
* modify it under the terms of the GNU General Public License version
8
* 2 or later as published by the Free Software Foundation.
10
* This program is distributed in the hope that it will be useful,
11
* but WITHOUT ANY WARRANTY; without even the implied warranty of
12
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13
* GNU General Public License for more details.
15
* Author: Jacob Pan <jacob.jun.pan@linux.intel.com>
33
struct tmon_platform_data ptdata;
34
const char *trip_type_name[] = {
41
int sysfs_set_ulong(char *path, char *filename, unsigned long val)
47
snprintf(filepath, 256, "%s/%s", path, filename);
49
fd = fopen(filepath, "w");
51
syslog(LOG_ERR, "Err: open %s: %s\n", __func__, filepath);
54
ret = fprintf(fd, "%lu", val);
60
/* history of thermal data, used for control algo */
61
#define NR_THERMAL_RECORDS 3
62
struct thermal_data_record trec[NR_THERMAL_RECORDS];
63
int cur_thermal_record; /* index to the trec array */
65
static int sysfs_get_ulong(char *path, char *filename, unsigned long *p_ulong)
71
snprintf(filepath, 256, "%s/%s", path, filename);
73
fd = fopen(filepath, "r");
75
syslog(LOG_ERR, "Err: open %s: %s\n", __func__, filepath);
78
ret = fscanf(fd, "%lu", p_ulong);
84
static int sysfs_get_string(char *path, char *filename, char *str)
90
snprintf(filepath, 256, "%s/%s", path, filename);
92
fd = fopen(filepath, "r");
94
syslog(LOG_ERR, "Err: open %s: %s\n", __func__, filepath);
97
ret = fscanf(fd, "%256s", str);
103
/* get states of the cooling device instance */
104
static int probe_cdev(struct cdev_info *cdi, char *path)
106
sysfs_get_string(path, "type", cdi->type);
107
sysfs_get_ulong(path, "max_state", &cdi->max_state);
108
sysfs_get_ulong(path, "cur_state", &cdi->cur_state);
110
syslog(LOG_INFO, "%s: %s: type %s, max %lu, curr %lu inst %d\n",
112
cdi->type, cdi->max_state, cdi->cur_state, cdi->instance);
117
static int str_to_trip_type(char *name)
121
for (i = 0; i < NR_THERMAL_TRIP_TYPE; i++) {
122
if (!strcmp(name, trip_type_name[i]))
129
/* scan and fill in trip point info for a thermal zone and trip point id */
130
static int get_trip_point_data(char *tz_path, int tzid, int tpid)
136
if (tpid >= MAX_NR_TRIP)
138
/* check trip point type */
139
snprintf(filename, sizeof(filename), "trip_point_%d_type", tpid);
140
sysfs_get_string(tz_path, filename, temp_str);
141
trip_type = str_to_trip_type(temp_str);
143
syslog(LOG_ERR, "%s:%s no matching type\n", __func__, temp_str);
146
ptdata.tzi[tzid].tp[tpid].type = trip_type;
147
syslog(LOG_INFO, "%s:tz:%d tp:%d:type:%s type id %d\n", __func__, tzid,
148
tpid, temp_str, trip_type);
150
/* TODO: check attribute */
155
/* return instance id for file format such as trip_point_4_temp */
156
static int get_instance_id(char *name, int pos, int skip)
161
ch = strtok(name, "_");
164
syslog(LOG_INFO, "%s:%s:%s:%d", __func__, name, ch, i);
165
ch = strtok(NULL, "_");
167
return atol(ch + skip);
173
/* Find trip point info of a thermal zone */
174
static int find_tzone_tp(char *tz_name, char *d_name, struct tz_info *tzi,
178
unsigned long temp_ulong;
180
if (strstr(d_name, "trip_point") &&
181
strstr(d_name, "temp")) {
182
/* check if trip point temp is non-zero
183
* ignore 0/invalid trip points
185
sysfs_get_ulong(tz_name, d_name, &temp_ulong);
186
if (temp_ulong < MAX_TEMP_KC) {
188
/* found a valid trip point */
189
tp_id = get_instance_id(d_name, 2, 0);
190
syslog(LOG_DEBUG, "tzone %s trip %d temp %lu tpnode %s",
191
tz_name, tp_id, temp_ulong, d_name);
192
if (tp_id < 0 || tp_id >= MAX_NR_TRIP) {
193
syslog(LOG_ERR, "Failed to find TP inst %s\n",
197
get_trip_point_data(tz_name, tz_id, tp_id);
198
tzi->tp[tp_id].temp = temp_ulong;
205
/* check cooling devices for binding info. */
206
static int find_tzone_cdev(struct dirent *nl, char *tz_name,
207
struct tz_info *tzi, int tz_id, int cid)
209
unsigned long trip_instance = 0;
210
char cdev_name_linked[256];
212
char cdev_trip_name[256];
215
if (nl->d_type == DT_LNK) {
216
syslog(LOG_DEBUG, "TZ%d: cdev: %s cid %d\n", tz_id, nl->d_name,
219
if (tzi->nr_cdev > ptdata.nr_cooling_dev) {
220
syslog(LOG_ERR, "Err: Too many cdev? %d\n",
224
/* find the link to real cooling device record binding */
225
snprintf(cdev_name, 256, "%s/%s", tz_name, nl->d_name);
226
memset(cdev_name_linked, 0, sizeof(cdev_name_linked));
227
if (readlink(cdev_name, cdev_name_linked,
228
sizeof(cdev_name_linked) - 1) != -1) {
229
cdev_id = get_instance_id(cdev_name_linked, 1,
230
sizeof("device") - 1);
231
syslog(LOG_DEBUG, "cdev %s linked to %s : %d\n",
232
cdev_name, cdev_name_linked, cdev_id);
233
tzi->cdev_binding |= (1 << cdev_id);
235
/* find the trip point in which the cdev is binded to
238
snprintf(cdev_trip_name, 256, "%s%s", nl->d_name,
240
sysfs_get_ulong(tz_name, cdev_trip_name,
242
/* validate trip point range, e.g. trip could return -1
243
* when passive is enabled
245
if (trip_instance > MAX_NR_TRIP)
247
tzi->trip_binding[cdev_id] |= 1 << trip_instance;
248
syslog(LOG_DEBUG, "cdev %s -> trip:%lu: 0x%lx %d\n",
249
cdev_name, trip_instance,
250
tzi->trip_binding[cdev_id],
263
/*****************************************************************************
264
* Before calling scan_tzones, thermal sysfs must be probed to determine
265
* the number of thermal zones and cooling devices.
266
* We loop through each thermal zone and fill in tz_info struct, i.e.
268
root@jacob-chiefriver:~# tree -d /sys/class/thermal/thermal_zone0
269
/sys/class/thermal/thermal_zone0
270
|-- cdev0 -> ../cooling_device4
271
|-- cdev1 -> ../cooling_device3
272
|-- cdev10 -> ../cooling_device7
273
|-- cdev11 -> ../cooling_device6
274
|-- cdev12 -> ../cooling_device5
275
|-- cdev2 -> ../cooling_device2
276
|-- cdev3 -> ../cooling_device1
277
|-- cdev4 -> ../cooling_device0
278
|-- cdev5 -> ../cooling_device12
279
|-- cdev6 -> ../cooling_device11
280
|-- cdev7 -> ../cooling_device10
281
|-- cdev8 -> ../cooling_device9
282
|-- cdev9 -> ../cooling_device8
283
|-- device -> ../../../LNXSYSTM:00/device:62/LNXTHERM:00
285
`-- subsystem -> ../../../../class/thermal
286
*****************************************************************************/
287
static int scan_tzones(void)
290
struct dirent **namelist;
294
if (!ptdata.nr_tz_sensor)
297
for (i = 0; i <= ptdata.max_tz_instance; i++) {
298
memset(tz_name, 0, sizeof(tz_name));
299
snprintf(tz_name, 256, "%s/%s%d", THERMAL_SYSFS, TZONE, i);
301
dir = opendir(tz_name);
303
syslog(LOG_INFO, "Thermal zone %s skipped\n", tz_name);
306
/* keep track of valid tzones */
307
n = scandir(tz_name, &namelist, 0, alphasort);
309
syslog(LOG_ERR, "scandir failed in %s", tz_name);
311
sysfs_get_string(tz_name, "type", ptdata.tzi[k].type);
312
ptdata.tzi[k].instance = i;
313
/* detect trip points and cdev attached to this tzone */
314
j = 0; /* index for cdev */
315
ptdata.tzi[k].nr_cdev = 0;
316
ptdata.tzi[k].nr_trip_pts = 0;
320
if (find_tzone_tp(tz_name, namelist[n]->d_name,
323
temp_str = strstr(namelist[n]->d_name, "cdev");
328
if (!find_tzone_cdev(namelist[n], tz_name,
329
&ptdata.tzi[k], i, j))
330
j++; /* increment cdev index */
335
/*TODO: reverse trip points */
337
syslog(LOG_INFO, "TZ %d has %d cdev\n", i,
338
ptdata.tzi[k].nr_cdev);
345
static int scan_cdevs(void)
348
struct dirent **namelist;
352
if (!ptdata.nr_cooling_dev) {
353
fprintf(stderr, "No cooling devices found\n");
356
for (i = 0; i <= ptdata.max_cdev_instance; i++) {
357
memset(cdev_name, 0, sizeof(cdev_name));
358
snprintf(cdev_name, 256, "%s/%s%d", THERMAL_SYSFS, CDEV, i);
360
dir = opendir(cdev_name);
362
syslog(LOG_INFO, "Cooling dev %s skipped\n", cdev_name);
363
/* there is a gap in cooling device id, check again
364
* for the same index.
369
n = scandir(cdev_name, &namelist, 0, alphasort);
371
syslog(LOG_ERR, "scandir failed in %s", cdev_name);
373
sysfs_get_string(cdev_name, "type", ptdata.cdi[k].type);
374
ptdata.cdi[k].instance = i;
375
if (strstr(ptdata.cdi[k].type, ctrl_cdev)) {
376
ptdata.cdi[k].flag |= CDEV_FLAG_IN_CONTROL;
377
syslog(LOG_DEBUG, "control cdev id %d\n", i);
390
int probe_thermal_sysfs(void)
393
struct dirent **namelist;
396
dir = opendir(THERMAL_SYSFS);
398
fprintf(stderr, "\nNo thermal sysfs, exit\n");
401
n = scandir(THERMAL_SYSFS, &namelist, 0, alphasort);
403
syslog(LOG_ERR, "scandir failed in thermal sysfs");
405
/* detect number of thermal zones and cooling devices */
409
if (strstr(namelist[n]->d_name, CDEV)) {
410
inst = get_instance_id(namelist[n]->d_name, 1,
411
sizeof("device") - 1);
412
/* keep track of the max cooling device since
415
if (inst > ptdata.max_cdev_instance)
416
ptdata.max_cdev_instance = inst;
418
syslog(LOG_DEBUG, "found cdev: %s %d %d\n",
420
ptdata.nr_cooling_dev,
421
ptdata.max_cdev_instance);
422
ptdata.nr_cooling_dev++;
423
} else if (strstr(namelist[n]->d_name, TZONE)) {
424
inst = get_instance_id(namelist[n]->d_name, 1,
426
if (inst > ptdata.max_tz_instance)
427
ptdata.max_tz_instance = inst;
429
syslog(LOG_DEBUG, "found tzone: %s %d %d\n",
432
ptdata.max_tz_instance);
433
ptdata.nr_tz_sensor++;
439
syslog(LOG_INFO, "found %d tzone(s), %d cdev(s), target zone %d\n",
440
ptdata.nr_tz_sensor, ptdata.nr_cooling_dev,
441
target_thermal_zone);
444
if (!ptdata.nr_tz_sensor) {
445
fprintf(stderr, "\nNo thermal zones found, exit\n\n");
449
ptdata.tzi = calloc(sizeof(struct tz_info), ptdata.max_tz_instance+1);
451
fprintf(stderr, "Err: allocate tz_info\n");
455
/* we still show thermal zone information if there is no cdev */
456
if (ptdata.nr_cooling_dev) {
457
ptdata.cdi = calloc(sizeof(struct cdev_info),
458
ptdata.max_cdev_instance + 1);
461
fprintf(stderr, "Err: allocate cdev_info\n");
466
/* now probe tzones */
474
/* convert sysfs zone instance to zone array index */
475
int zone_instance_to_index(int zone_inst)
479
for (i = 0; i < ptdata.nr_tz_sensor; i++)
480
if (ptdata.tzi[i].instance == zone_inst)
485
/* read temperature of all thermal zones */
486
int update_thermal_data()
490
static unsigned long samples;
492
if (!ptdata.nr_tz_sensor) {
493
syslog(LOG_ERR, "No thermal zones found!\n");
497
/* circular buffer for keeping historic data */
498
if (cur_thermal_record >= NR_THERMAL_RECORDS)
499
cur_thermal_record = 0;
500
gettimeofday(&trec[cur_thermal_record].tv, NULL);
502
fprintf(tmon_log, "%lu ", ++samples);
503
fprintf(tmon_log, "%3.1f ", p_param.t_target);
505
for (i = 0; i < ptdata.nr_tz_sensor; i++) {
506
memset(tz_name, 0, sizeof(tz_name));
507
snprintf(tz_name, 256, "%s/%s%d", THERMAL_SYSFS, TZONE,
508
ptdata.tzi[i].instance);
509
sysfs_get_ulong(tz_name, "temp",
510
&trec[cur_thermal_record].temp[i]);
512
fprintf(tmon_log, "%lu ",
513
trec[cur_thermal_record].temp[i]/1000);
515
for (i = 0; i < ptdata.nr_cooling_dev; i++) {
519
snprintf(cdev_name, 256, "%s/%s%d", THERMAL_SYSFS, CDEV,
520
ptdata.cdi[i].instance);
521
probe_cdev(&ptdata.cdi[i], cdev_name);
522
val = ptdata.cdi[i].cur_state;
526
fprintf(tmon_log, "%lu ", val);
530
fprintf(tmon_log, "\n");
537
void set_ctrl_state(unsigned long state)
539
char ctrl_cdev_path[256];
541
unsigned long cdev_state;
545
/* set all ctrl cdev to the same state */
546
for (i = 0; i < ptdata.nr_cooling_dev; i++) {
547
if (ptdata.cdi[i].flag & CDEV_FLAG_IN_CONTROL) {
548
if (ptdata.cdi[i].max_state < 10) {
549
strcpy(ctrl_cdev, "None.");
552
/* scale to percentage of max_state */
553
cdev_state = state * ptdata.cdi[i].max_state/100;
555
"ctrl cdev %d set state %lu scaled to %lu\n",
556
ptdata.cdi[i].instance, state, cdev_state);
557
snprintf(ctrl_cdev_path, 256, "%s/%s%d", THERMAL_SYSFS,
558
CDEV, ptdata.cdi[i].instance);
559
syslog(LOG_DEBUG, "ctrl cdev path %s", ctrl_cdev_path);
560
sysfs_set_ulong(ctrl_cdev_path, "cur_state",
566
void get_ctrl_state(unsigned long *state)
568
char ctrl_cdev_path[256];
569
int ctrl_cdev_id = -1;
572
/* TODO: take average of all ctrl types. also consider change based on
573
* uevent. Take the first reading for now.
575
for (i = 0; i < ptdata.nr_cooling_dev; i++) {
576
if (ptdata.cdi[i].flag & CDEV_FLAG_IN_CONTROL) {
577
ctrl_cdev_id = ptdata.cdi[i].instance;
578
syslog(LOG_INFO, "ctrl cdev %d get state\n",
579
ptdata.cdi[i].instance);
583
if (ctrl_cdev_id == -1) {
587
snprintf(ctrl_cdev_path, 256, "%s/%s%d", THERMAL_SYSFS,
589
sysfs_get_ulong(ctrl_cdev_path, "cur_state", state);
592
void free_thermal_data(void)