src/lib/psensor.c

   1 /*
   2  * Copyright (C) 2010-2013 jeanfi@gmail.com
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License as
   6  * published by the Free Software Foundation; either version 2 of the
   7  * License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  17  * 02110-1301 USA
  18  */
  19 #include <stdlib.h>
  20 #include <string.h>
  21
  22 #include <locale.h>
  23 #include <libintl.h>
  24 #define _(str) gettext(str)
  25
  26 #include "hdd.h"
  27 #include "psensor.h"
  28 #include "lmsensor.h"
  29
  30 #ifdef HAVE_GTOP
  31 #include "cpu.h"
  32 #endif
  33
  34 struct psensor *psensor_create(char *id,
  35                                char *name,
  36                                char *chip,
  37                                unsigned int type,
  38                                int values_max_length)
  39 {
  40         struct psensor *psensor
  41             = (struct psensor *)malloc(sizeof(struct psensor));
  42
  43         psensor->id = id;
  44         psensor->name = name;
  45         psensor->chip = chip;
  46         psensor->enabled = 1;
  47         psensor->min = UNKNOWN_DBL_VALUE;
  48         psensor->max = UNKNOWN_DBL_VALUE;
  49
  50         psensor->type = type;
  51
  52         psensor->values_max_length = values_max_length;
  53         psensor->measures = measures_dbl_create(values_max_length);
  54
  55         psensor->alarm_enabled = 0;
  56         psensor->alarm_high_threshold = 0;
  57         psensor->alarm_low_threshold = 0;
  58
  59         psensor->cb_alarm_raised = NULL;
  60         psensor->cb_alarm_raised_data = NULL;
  61         psensor->alarm_raised = 0;
  62
  63         psensor->url = NULL;
  64
  65         psensor->color = NULL;
  66
  67         psensor->appindicator_enabled = 0;
  68
  69         return psensor;
  70 }
  71
  72 void psensor_values_resize(struct psensor *s, int new_size)
  73 {
  74         struct measure *new_ms, *cur_ms;
  75         int cur_size;
  76
  77         cur_size = s->values_max_length;
  78         cur_ms = s->measures;
  79         new_ms = measures_dbl_create(new_size);
  80
  81         if (cur_ms) {
  82                 int i;
  83                 for (i = 0; i < new_size - 1 && i < cur_size - 1; i++)
  84                         measure_copy(&cur_ms[cur_size - i - 1],
  85                                      &new_ms[new_size - i - 1]);
  86
  87                 measures_free(s->measures);
  88         }
  89
  90         s->values_max_length = new_size;
  91         s->measures = new_ms;
  92 }
  93
  94 void psensor_free(struct psensor *sensor)
  95 {
  96         if (sensor) {
  97                 log_debug("Cleanup %s", sensor->id);
  98
  99                 free(sensor->name);
 100                 free(sensor->id);
 101
 102                 if (sensor->chip)
 103                         free(sensor->chip);
 104
 105                 if (sensor->color)
 106                         free(sensor->color);
 107
 108                 measures_free(sensor->measures);
 109
 110                 free(sensor->url);
 111
 112                 free(sensor);
 113         }
 114 }
 115
 116 void psensor_list_free(struct psensor **sensors)
 117 {
 118         struct psensor **sensor_cur;
 119
 120         if (sensors) {
 121                 sensor_cur = sensors;
 122
 123                 while (*sensor_cur) {
 124                         psensor_free(*sensor_cur);
 125
 126                         sensor_cur++;
 127                 }
 128
 129                 free(sensors);
 130
 131                 sensors = NULL;
 132         }
 133 }
 134
 135 int psensor_list_size(struct psensor **sensors)
 136 {
 137         int size;
 138         struct psensor **sensor_cur;
 139
 140         if (!sensors)
 141                 return 0;
 142
 143         size = 0;
 144         sensor_cur = sensors;
 145
 146         while (*sensor_cur) {
 147                 size++;
 148                 sensor_cur++;
 149         }
 150         return size;
 151 }
 152
 153 int psensor_list_contains_type(struct psensor **sensors, unsigned int type)
 154 {
 155         struct psensor **s;
 156
 157         if (!sensors)
 158                 return 0;
 159
 160         s = sensors;
 161         while (*s) {
 162                 if ((*s)->type & type)
 163                         return 1;
 164                 s++;
 165         }
 166
 167         return 0;
 168 }
 169
 170 struct psensor **psensor_list_add(struct psensor **sensors,
 171                                   struct psensor *sensor)
 172 {
 173         int size = psensor_list_size(sensors);
 174
 175         struct psensor **result
 176             = malloc((size + 1 + 1) * sizeof(struct psensor *));
 177
 178         if (sensors)
 179                 memcpy(result, sensors, size * sizeof(struct psensor *));
 180
 181         result[size] = sensor;
 182         result[size + 1] = NULL;
 183
 184         return result;
 185 }
 186
 187 struct psensor *psensor_list_get_by_id(struct psensor **sensors, const char *id)
 188 {
 189         struct psensor **sensors_cur = sensors;
 190
 191         while (*sensors_cur) {
 192                 if (!strcmp((*sensors_cur)->id, id))
 193                         return *sensors_cur;
 194
 195                 sensors_cur++;
 196         }
 197
 198         return NULL;
 199 }
 200
 201 int is_temp_type(unsigned int type)
 202 {
 203         return type & SENSOR_TYPE_TEMP;
 204 }
 205
 206 int is_fan_type(unsigned int type)
 207 {
 208         return type & SENSOR_TYPE_FAN;
 209 }
 210
 211 double celcius_to_fahrenheit(double c)
 212 {
 213         return c * (9.0/5.0) + 32;
 214 }
 215
 216 double fahrenheit_to_celcius(double f)
 217 {
 218         return (f - 32) * (5.0/9.0);
 219 }
 220
 221 char *
 222 psensor_value_to_str(unsigned int type, double value, int use_celcius)
 223 {
 224         char *str;
 225         const char *unit;
 226
 227         /*
 228          * should not be possible to exceed 20 characters with temp or
 229          * rpm values the .x part is never displayed
 230          */
 231         str = malloc(20);
 232
 233         unit = psensor_type_to_unit_str(type, use_celcius);
 234
 235         if (is_temp_type(type) && !use_celcius)
 236                 value = celcius_to_fahrenheit(value);
 237
 238         sprintf(str, "%.0f%s", value, unit);
 239
 240         return str;
 241 }
 242
 243 char *
 244 psensor_measure_to_str(const struct measure *m,
 245                        unsigned int type,
 246                        unsigned int use_celcius)
 247 {
 248         return psensor_value_to_str(type, m->value, use_celcius);
 249 }
 250
 251 void psensor_set_current_value(struct psensor *sensor, double value)
 252 {
 253         struct timeval tv;
 254
 255         if (gettimeofday(&tv, NULL) != 0)
 256                 timerclear(&tv);
 257
 258         psensor_set_current_measure(sensor, value, tv);
 259 }
 260
 261 void psensor_set_current_measure(struct psensor *s, double v, struct timeval tv)
 262 {
 263         memmove(s->measures,
 264                 &s->measures[1],
 265                 (s->values_max_length - 1) * sizeof(struct measure));
 266
 267         s->measures[s->values_max_length - 1].value = v;
 268         s->measures[s->values_max_length - 1].time = tv;
 269
 270         if (s->min == UNKNOWN_DBL_VALUE || v < s->min)
 271                 s->min = v;
 272
 273         if (s->max == UNKNOWN_DBL_VALUE || v > s->max)
 274                 s->max = v;
 275
 276         if (s->alarm_enabled) {
 277                 if (v > s->alarm_high_threshold || v < s->alarm_low_threshold) {
 278                         if (!s->alarm_raised && s->cb_alarm_raised)
 279                                 s->cb_alarm_raised(s, s->cb_alarm_raised_data);
 280
 281                         s->alarm_raised = 1;
 282                 } else {
 283                         s->alarm_raised = 0;
 284                 }
 285         }
 286 }
 287
 288 double psensor_get_current_value(const struct psensor *sensor)
 289 {
 290         return sensor->measures[sensor->values_max_length - 1].value;
 291 }
 292
 293 struct measure *psensor_get_current_measure(struct psensor *sensor)
 294 {
 295         return &sensor->measures[sensor->values_max_length - 1];
 296 }
 297
 298 /*
 299   Returns the minimal value of a given 'type' (SENSOR_TYPE_TEMP or
 300   SENSOR_TYPE_FAN)
 301  */
 302 double get_min_value(struct psensor **sensors, int type)
 303 {
 304         double m = UNKNOWN_DBL_VALUE;
 305         struct psensor **s = sensors;
 306
 307         while (*s) {
 308                 struct psensor *sensor = *s;
 309
 310                 if (sensor->enabled && (sensor->type & type)) {
 311                         int i;
 312                         double t;
 313
 314                         for (i = 0; i < sensor->values_max_length; i++) {
 315                                 t = sensor->measures[i].value;
 316
 317                                 if (t == UNKNOWN_DBL_VALUE)
 318                                         continue;
 319
 320                                 if (m == UNKNOWN_DBL_VALUE || t < m)
 321                                         m = t;
 322                         }
 323                 }
 324                 s++;
 325         }
 326
 327         return m;
 328 }
 329
 330 /*
 331   Returns the maximal value of a given 'type' (SENSOR_TYPE_TEMP or
 332   SENSOR_TYPE_FAN)
 333  */
 334 double get_max_value(struct psensor **sensors, int type)
 335 {
 336         double m = UNKNOWN_DBL_VALUE;
 337         struct psensor **s = sensors;
 338
 339         while (*s) {
 340                 struct psensor *sensor = *s;
 341
 342                 if (sensor->enabled && (sensor->type & type)) {
 343                         int i;
 344                         double t;
 345                         for (i = 0; i < sensor->values_max_length; i++) {
 346                                 t = sensor->measures[i].value;
 347
 348                                 if (t == UNKNOWN_DBL_VALUE)
 349                                         continue;
 350
 351                                 if (m == UNKNOWN_DBL_VALUE || t > m)
 352                                         m = t;
 353                         }
 354                 }
 355                 s++;
 356         }
 357
 358         return m;
 359 }
 360
 361 double
 362 psensor_get_max_current_value(struct psensor **sensors, unsigned int type)
 363 {
 364         double m = UNKNOWN_DBL_VALUE;
 365         struct psensor **s_cur = sensors;
 366
 367         while (*s_cur) {
 368                 struct psensor *s = *s_cur;
 369
 370                 if (s->enabled && (s->type & type)) {
 371                         double v = psensor_get_current_value(s);
 372
 373                         if (m == UNKNOWN_DBL_VALUE || v > m)
 374                                 m = v;
 375                 }
 376
 377                 s_cur++;
 378         }
 379
 380         return m;
 381 }
 382
 383 double get_min_temp(struct psensor **sensors)
 384 {
 385         return get_min_value(sensors, SENSOR_TYPE_TEMP);
 386 }
 387
 388 double get_min_rpm(struct psensor **sensors)
 389 {
 390         return get_min_value(sensors, SENSOR_TYPE_FAN);
 391 }
 392
 393 double get_max_rpm(struct psensor **sensors)
 394 {
 395         return get_max_value(sensors, SENSOR_TYPE_FAN);
 396 }
 397
 398 double get_max_temp(struct psensor **sensors)
 399 {
 400         return get_max_value(sensors, SENSOR_TYPE_TEMP);
 401 }
 402
 403 struct psensor **get_all_sensors(int use_libatasmart, int values_max_length)
 404 {
 405         struct psensor **psensors;
 406         struct psensor **tmp_psensors;
 407
 408         psensors = lmsensor_psensor_list_add(NULL, values_max_length);
 409
 410         if (!use_libatasmart) {
 411                 tmp_psensors = hddtemp_psensor_list_add(psensors,
 412                                                         values_max_length);
 413                 if (tmp_psensors != psensors) {
 414                         free(psensors);
 415                         psensors = tmp_psensors;
 416                 }
 417         }
 418 #ifdef HAVE_ATASMART
 419                 else {
 420                         tmp_psensors = hdd_psensor_list_add(psensors,
 421                                                             values_max_length);
 422                         if (tmp_psensors != psensors) {
 423                                 free(psensors);
 424                                 psensors = tmp_psensors;
 425                         }
 426                 }
 427 #endif
 428
 429         if (!psensors) {        /* there is no detected sensors */
 430                 psensors = malloc(sizeof(struct psensor *));
 431                 *psensors = NULL;
 432         }
 433
 434         return psensors;
 435 }
 436
 437 const char *psensor_type_to_str(unsigned int type)
 438 {
 439         if (type & SENSOR_TYPE_NVCTRL)
 440                 return "NVidia GPU";
 441
 442         if (type & SENSOR_TYPE_ATIADL) {
 443                 if (type & SENSOR_TYPE_TEMP)
 444                         return "AMD GPU Temperature";
 445                 else if (type & SENSOR_TYPE_RPM)
 446                         return "AMD GPU Fan Speed";
 447                 else /* type & SENSOR_TYPE_USAGE */
 448                         return "AMD GPU Usage";
 449         }
 450
 451         if ((type & SENSOR_TYPE_HDD_TEMP) == SENSOR_TYPE_HDD_TEMP)
 452                 return "HDD Temperature";
 453
 454         if ((type & SENSOR_TYPE_CPU_USAGE) == SENSOR_TYPE_CPU_USAGE)
 455                 return "CPU Usage";
 456
 457         if (type & SENSOR_TYPE_TEMP)
 458                 return "Temperature";
 459
 460         if (type & SENSOR_TYPE_FAN)
 461                 return "Fan";
 462
 463         if (type & SENSOR_TYPE_CPU)
 464                 return "CPU";
 465
 466         if (type & SENSOR_TYPE_REMOTE)
 467                 return "Remote";
 468
 469         return "N/A";
 470 }
 471
 472
 473 const char *psensor_type_to_unit_str(unsigned int type, int use_celcius)
 474 {
 475         if (is_temp_type(type)) {
 476                 if (use_celcius)
 477                         return "\302\260C";
 478                 else
 479                         return "\302\260F";
 480         } else if (is_fan_type(type)) {
 481                 return _("RPM");
 482         } else if (type & SENSOR_TYPE_CPU_USAGE) {
 483                 return _("%");
 484         } else {
 485                 return _("N/A");
 486         }
 487 }
 488
 489 void psensor_list_update_measures(struct psensor **sensors)
 490 {
 491         lmsensor_psensor_list_update(sensors);
 492
 493 #ifdef HAVE_GTOP
 494         cpu_psensor_list_update(sensors);
 495 #endif
 496
 497         if (psensor_list_contains_type(sensors, SENSOR_TYPE_HDDTEMP))
 498                 hddtemp_psensor_list_update(sensors);
 499
 500 #ifdef HAVE_ATASMART
 501         if (psensor_list_contains_type(sensors, SENSOR_TYPE_ATASMART))
 502                 hdd_psensor_list_update(sensors);
 503 #endif
 504 }
 505
 506 void psensor_log_measures(struct psensor **sensors)
 507 {
 508         if (log_level == LOG_DEBUG)
 509                 while (*sensors) {
 510                         log_debug("Measure: %s %.2f",
 511                                    (*sensors)->name,
 512                                    psensor_get_current_value(*sensors));
 513
 514                         sensors++;
 515                 }
 516 }
 517
 518 void psensor_init()
 519 {
 520         lmsensor_init();
 521 }
 522
 523 void psensor_cleanup()
 524 {
 525         lmsensor_cleanup();
 526 }
 527
 528 struct psensor **psensor_list_copy(struct psensor **sensors)
 529 {
 530         struct psensor **result;
 531         int n, i;
 532
 533         n = psensor_list_size(sensors);
 534         result = malloc((n+1) * sizeof(struct psensor *));
 535         for (i = 0; i < n; i++)
 536                 result[i] = sensors[i];
 537         result[n] = NULL;
 538
 539         return result;
 540 }
 541
 542 char *
 543 psensor_current_value_to_str(const struct psensor *s, unsigned int celcius)
 544 {
 545         return psensor_value_to_str(s->type,
 546                                     psensor_get_current_value(s),
 547                                     celcius);
 548 }