root/lm-sensors/trunk/prog/sensors/main.c @ 2216

Revision 2216, 12.2 KB (checked in by mmh, 11 years ago)

Add proper sensors support for asb100.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1/*
2    main.c - Part of sensors, a user-space program for hardware monitoring
3    Copyright (c) 1998, 1999  Frodo Looijaard <frodol@dds.nl>
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 2 of the License, or
8    (at your option) any later version.
9
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.
14
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software
17    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18*/
19
20#include <stdio.h>
21#include <stdlib.h>
22#include <getopt.h>
23#include <string.h>
24#include <errno.h>
25
26#include "lib/sensors.h"
27#include "lib/error.h"
28#include "chips.h"
29#include "version.h"
30
31#define PROGRAM "sensors"
32#define VERSION LM_VERSION
33#define DEFAULT_CONFIG_FILE_NAME "sensors.conf"
34
35static char *config_file_name = NULL;
36FILE *config_file;
37static const char *config_file_path[] = 
38  { "/etc", "/usr/local/etc", "/usr/lib/sensors", "/usr/local/lib/sensors",
39    "/usr/lib", "/usr/local/lib", ".", 0 };
40
41extern int main(int argc, char *arv[]);
42static void print_short_help(void);
43static void print_long_help(void);
44static void print_version(void);
45static void open_config_file(void);
46static int open_this_config_file(char *filename);
47static void do_a_print(sensors_chip_name name);
48static int do_a_set(sensors_chip_name name);
49static int do_the_real_work(int *error);
50static const char *sprintf_chip_name(sensors_chip_name name);
51
52#define CHIPS_MAX 20
53sensors_chip_name chips[CHIPS_MAX];
54int chips_count=0;
55int do_sets, do_unknown, fahrenheit, hide_adapter, hide_unknown;
56
57void print_short_help(void)
58{
59  printf("Try `%s -h' for more information\n",PROGRAM);
60}
61
62void print_long_help(void)
63{
64  printf("Usage: %s [OPTION]... [CHIP]...\n",PROGRAM);
65  printf("  -c, --config-file     Specify a config file\n");
66  printf("  -h, --help            Display this help text\n");
67  printf("  -s, --set             Execute `set' statements too (root only)\n");
68  printf("  -f, --fahrenheit      Show temperatures in degrees fahrenheit\n");
69  printf("  -A, --no-adapter      Do not show adapter and algorithm for each chip\n");
70  printf("  -U, --no-unknown      Do not show unknown chips\n");
71  printf("  -u, --unknown         Treat chips as unknown ones (testing only)\n");
72  printf("  -v, --version         Display the program version\n");
73  printf("\n");
74  printf("By default, a list of directories is examined for config file `sensors.conf'.\n");
75  printf("Use `-' after `-c' to read the config file from stdin.\n");
76  printf("If no chips are specified, all chip info will be printed.\n");
77  printf("Example chip names:\n");
78  printf("\tlm78-i2c-0-2d\t*-i2c-0-2d\n");
79  printf("\tlm78-i2c-0-*\t*-i2c-0-*\n");
80  printf("\tlm78-i2c-*-2d\t*-i2c-*-2d\n");
81  printf("\tlm78-i2c-*-*\t*-i2c-*-*\n");
82  printf("\tlm78-isa-0290\t*-isa-0290\n");
83  printf("\tlm78-isa-*\t*-isa-*\n");
84  printf("\tlm78-*\n");
85}
86
87void print_version(void)
88{
89  printf("%s version %s\n", PROGRAM, VERSION);
90}
91
92/* This examines global var config_file, and leaves the name there too.
93   It also opens config_file. */
94void open_config_file(void)
95{
96#define MAX_FILENAME_LEN 1024
97  char *filename;
98  char buffer[MAX_FILENAME_LEN];
99  int res,i;
100
101  if (config_file_name && !strcmp(config_file_name,"-")) {
102    config_file = stdin;
103    return;
104  } else if (config_file_name && index(config_file_name,'/')) {
105    if ((res = open_this_config_file(config_file_name))) {
106      fprintf(stderr,"Could not locate or open config file\n");
107      fprintf(stderr,"%s: %s\n",config_file_name,strerror(-res));
108      exit(1);
109    }
110  }
111  else {
112    if (config_file_name)
113      filename = config_file_name;
114    else
115      filename = DEFAULT_CONFIG_FILE_NAME;
116    for (i = 0; config_file_path[i]; i++) {
117      if ((snprintf(buffer,MAX_FILENAME_LEN,
118                   "%s/%s",config_file_path[i],filename)) < 1) {
119        fprintf(stderr,
120                "open_config_file: ridiculous long config file name!\n");
121        exit(1);
122      }
123      if (!open_this_config_file(buffer)) {
124        free(config_file_name);
125        config_file_name = strdup(buffer);
126        return;
127      }
128    }
129    fprintf(stderr,"Could not locate or open config file!\n");
130    exit(1);
131  }
132}
133   
134int open_this_config_file(char *filename)
135{
136  config_file = fopen(filename,"r");
137  if (! config_file)
138    return -errno;
139  return 0;
140}
141
142void close_config_file(void)
143{
144  if (fclose(config_file)) {
145    fprintf(stderr,"Could not close config file\n");
146    fprintf(stderr,"%s: %s\n",config_file_name,strerror(errno));
147  }
148 
149  free(config_file_name);
150}
151
152int main (int argc, char *argv[])
153{
154  int c,res,i,error;
155
156  struct option long_opts[] =  {
157    { "help", no_argument, NULL, 'h' },
158    { "set", no_argument, NULL, 's' },
159    { "version", no_argument, NULL, 'v'},
160    { "fahrenheit", no_argument, NULL, 'f' },
161    { "no-adapter", no_argument, NULL, 'A' },
162    { "no-unknown", no_argument, NULL, 'U' },
163    { "config-file", required_argument, NULL, 'c' },
164    { "unknown", no_argument, NULL, 'u' },
165    { 0,0,0,0 }
166  };
167
168  do_unknown = 0;
169  do_sets = 0;
170  hide_adapter = 0;
171  while (1) {
172    c = getopt_long(argc,argv,"hsvfAUc:u",long_opts,NULL);
173    if (c == EOF)
174      break;
175    switch(c) {
176    case ':':
177    case '?':
178      print_short_help();
179      exit(1);
180    case 'h':
181      print_long_help();
182      exit(0);
183    case 'v':
184      print_version();
185      exit(0);
186    case 'c':
187      config_file_name = strdup(optarg);
188      break;
189    case 's':
190      do_sets = 1;
191      break;
192    case 'f':
193      fahrenheit = 1;
194      break;
195    case 'A':
196      hide_adapter = 1;
197      break;
198    case 'U':
199      hide_unknown = 1;
200      break;
201    case 'u':
202      do_unknown = 1;
203      break;
204    default:
205      fprintf(stderr,"Internal error while parsing options!\n");
206      exit(1);
207    }
208  }
209
210  if (optind == argc) {
211    chips[0].prefix = SENSORS_CHIP_NAME_PREFIX_ANY;
212    chips[0].bus = SENSORS_CHIP_NAME_BUS_ANY;
213    chips[0].addr = SENSORS_CHIP_NAME_ADDR_ANY;
214    chips_count = 1;
215  } else 
216    for(i = optind; i < argc; i++) 
217      if ((res = sensors_parse_chip_name(argv[i],chips+chips_count))) {
218        fprintf(stderr,"Parse error in chip name `%s'\n",argv[i]);
219        print_short_help();
220        exit(1);
221      } else if (++chips_count == CHIPS_MAX) {
222        fprintf(stderr,"Too many chips on command line!\n");
223        exit(1);
224      }
225
226
227  open_config_file();
228
229  if ((res = sensors_init(config_file))) {
230    fprintf(stderr,"%s\n",sensors_strerror(res));
231    if (res == -SENSORS_ERR_PROC)
232      fprintf(stderr,
233              "Unable to find i2c bus information;\n"
234              "For 2.6 kernels, make sure you have mounted sysfs!\n"
235              "For older kernels, make sure you have done 'modprobe i2c-proc'!\n");
236    exit(1);
237  }
238
239  close_config_file();
240
241  if(do_the_real_work(&error)) {
242    sensors_cleanup();
243    exit(error);
244  } else {
245    if(chips[0].prefix == SENSORS_CHIP_NAME_PREFIX_ANY)
246            fprintf(stderr,"No sensors found!\n");
247    else
248            fprintf(stderr,"Specified sensor(s) not found!\n");
249    sensors_cleanup();
250    exit(1);
251  }
252}
253
254/* returns number of chips found */
255int do_the_real_work(int *error)
256{
257  const sensors_chip_name *chip;
258  int chip_nr,i;
259  int cnt = 0;
260
261  *error = 0;
262  for (chip_nr = 0; (chip = sensors_get_detected_chips(&chip_nr));)
263    for(i = 0; i < chips_count; i++)
264      if (sensors_match_chip(*chip,chips[i])) {
265        if(do_sets) {
266          if (do_a_set(*chip))
267            *error = 1;
268        } else
269          do_a_print(*chip);
270        i = chips_count;
271        cnt++;
272      }
273   return(cnt);
274}
275
276/* returns 1 on error */
277int do_a_set(sensors_chip_name name)
278{
279  int res;
280
281  /* skip i2c subclients since sysfs doesn't hide these... */
282  if(name.bus >= 0)
283        if(name.addr >= 0x48 && name.addr <= 0x4f)
284                if(!strcmp(name.prefix, "as99127f") ||
285                   !strcmp(name.prefix, "asb100") ||
286                   !strcmp(name.prefix, "w83781d") ||
287                   !strcmp(name.prefix, "w83782d") ||
288                   !strcmp(name.prefix, "w83783s") ||
289                   !strcmp(name.prefix, "w83791d") ||
290                   !strcmp(name.prefix, "w83627hf") ||
291                   !strcmp(name.prefix, "w83697hf"))
292                        return 0;
293
294  if ((res = sensors_do_chip_sets(name))) {
295    if (res == -SENSORS_ERR_PROC) {
296      fprintf(stderr,"%s: %s for writing;\n",sprintf_chip_name(name),
297              sensors_strerror(res));
298      fprintf(stderr,"Run as root?\n");
299      return 1;
300    } else {
301      fprintf(stderr,"%s: %s\n",sprintf_chip_name(name),
302              sensors_strerror(res));
303    }
304  }
305  return 0;
306}
307
308const char *sprintf_chip_name(sensors_chip_name name)
309{
310  #define BUF_SIZE 200
311  static char buf[BUF_SIZE];
312
313  if (name.bus == SENSORS_CHIP_NAME_BUS_ISA)
314    snprintf(buf,BUF_SIZE,"%s-isa-%04x",name.prefix,name.addr);
315  else if (name.bus == SENSORS_CHIP_NAME_BUS_DUMMY)
316    snprintf(buf,BUF_SIZE,"%s-%s-%04x",name.prefix,name.busname,name.addr);
317  else
318    snprintf(buf,BUF_SIZE,"%s-i2c-%d-%02x",name.prefix,name.bus,name.addr);
319  return buf;
320}
321
322struct match {
323        const char * prefix;
324        void (*fn) (const sensors_chip_name *name);
325};
326
327struct match matches[] = {
328        { "ds1621", print_ds1621 },
329        { "lm75", print_lm75 },
330        { "adm1021", print_adm1021 },
331        { "max1617", print_adm1021 },
332        { "max1617a", print_adm1021 },
333        { "thmc10", print_adm1021 },
334        { "lm84", print_adm1021 },
335        { "gl523", print_adm1021 },
336        { "adm1023", print_adm1021 },
337        { "mc1066", print_adm1021 },
338        { "adm9240", print_adm9240 },
339        { "ds1780", print_adm9240 },
340        { "lm81", print_adm9240 },
341        { "lm78", print_lm78 },
342        { "lm78-j", print_lm78 },
343        { "lm79", print_lm78 },
344        { "mtp008", print_mtp008 },
345        { "sis5595", print_sis5595 },
346        { "via686a", print_via686a },
347        { "lm80", print_lm80 },
348        { "lm85", print_lm85 },
349        { "lm85b", print_lm85 },
350        { "lm85c", print_lm85 },
351        { "adm1027", print_lm85 },
352        { "adt7463", print_lm85 },
353        { "emc6d100", print_lm85 },
354        { "lm87", print_lm87 },
355        { "gl518sm", print_gl518 },
356        { "adm1025", print_adm1025 },
357        { "adm1024", print_adm1024 },
358        { "w83781d", print_w83781d },
359        { "w83782d", print_w83781d },
360        { "w83783d", print_w83781d },
361        { "w83627hf", print_w83781d },
362        { "w83627thf", print_w83781d },
363        { "w83697hf", print_w83781d },
364        { "w83791d", print_w83781d },
365        { "as99127f", print_w83781d },
366        { "maxilife", print_maxilife },
367        { "maxilife-cg", print_maxilife },
368        { "maxilife-co", print_maxilife },
369        { "maxilife-as", print_maxilife },
370        { "maxilife-nba", print_maxilife },
371        { "it87", print_it87 },
372        { "ddcmon", print_ddcmon },
373        { "eeprom", print_eeprom },
374        { "fscpos", print_fscpos },
375        { "fscscy", print_fscscy },
376        { "fscher", print_fscher },
377        { "pcf8591", print_pcf8591 },
378        { "vt1211", print_vt1211 },
379        { "smsc47m1", print_smsc47m1 },
380        { "lm92", print_lm92 },
381        { "vt8231", print_vt8231 },
382        { "bmc", print_bmc },
383        { "adm1026", print_adm1026 },
384        { "lm83", print_lm83 },
385        { "lm90", print_lm90 },
386        { "adm1032", print_lm90 },
387        { "xeontemp", print_xeontemp },
388        { "max6650", print_max6650 },
389        { "asb100", print_asb100 },
390        { NULL, NULL }
391};
392
393void do_a_print(sensors_chip_name name)
394{
395  const char *algo,*adap;
396  struct match *m;
397
398  /* skip i2c subclients since sysfs doesn't hide these... */
399  if(name.bus >= 0)
400        if(name.addr >= 0x48 && name.addr <= 0x4f)
401                if(!strcmp(name.prefix, "as99127f") ||
402                   !strcmp(name.prefix, "asb100") ||
403                   !strcmp(name.prefix, "w83781d") ||
404                   !strcmp(name.prefix, "w83782d") ||
405                   !strcmp(name.prefix, "w83783s") ||
406                   !strcmp(name.prefix, "w83791d") ||
407                   !strcmp(name.prefix, "w83627hf") ||
408                   !strcmp(name.prefix, "w83697hf"))
409                        return;
410
411  /* do we know how to display it? */
412  for(m = matches; m->prefix != NULL; m++) {
413    if(!strcmp(name.prefix, m->prefix)) break;
414  }
415
416  if(m->prefix==NULL && hide_unknown)
417    return;
418
419  printf("%s\n",sprintf_chip_name(name));
420  adap = sensors_get_adapter_name(name.bus);
421  if (adap && !hide_adapter)
422    printf("Adapter: %s\n",adap);
423  algo = sensors_get_algorithm_name(name.bus);
424  if (algo && !hide_adapter)
425    printf("Algorithm: %s\n",algo);
426  if (!algo || !adap)
427    printf(" ERROR: Can't get adapter or algorithm?!?\n");
428  if (do_unknown)
429    print_unknown_chip(&name);
430  else {
431    if(m->prefix == NULL)
432        print_unknown_chip(&name);
433    else
434        m->fn(&name);
435  }
436  printf("\n");
437}
Note: See TracBrowser for help on using the browser.