sensors-conf-convert: New, script to convert old configuration files

to use the new symbol names.


git-svn-id: http://lm-sensors.org/svn/lm-sensors/branches/lm-sensors-3.0.0@4770 7894878c-1315-0410-8ee3-d5d059ff63e0

1 files changed, 467 insertions, 0 deletions

diff --git a/etc/sensors-conf-convert b/etc/sensors-conf-convert
new file mode 100755
index 00000000..bda09830
--- /dev/null
+++ b/etc/sensors-conf-convert
@@ -0,0 +1,467 @@
+#!/usr/bin/perl -w -pi.old
+
+# Convert a sensors.conf file from the old (Linux 2.4, lm-sensors 2)
+# symbol names to the new (Linux 2.6, lm-sensors 3) symbol names.
+#
+# Copyright (C) 2007  Jean Delvare <khali@linux-fr.org>
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA 02110-1301, USA.
+
+# Implemented conversions:
+# * The "algorithm name" part of bus statements is removed.
+# * Bus statements for the ISA bus are removed.
+# * Chip names containing dashes are removed.
+# * Label, ignore, set and compute statements referencing features
+#   which are not part of the new interface are removed.
+# * Label, ignore, set and compute statements referencing features
+#   which have been renamed are updated. This includes both general
+#   feature name changes and chip-specific feature name changes.
+#
+# Note that we have to look at the commented out lines too, so that
+# the user doesn't have a bad surprise when uncommenting them.
+
+use strict;
+use vars qw($debug $chip %trans @delete %chip_trans %chip_delete);
+
+BEGIN
+{
+	$debug = 0;
+
+	%trans = (
+		qr/\bvid\b/			=> sub { "cpu0_vid" },
+		qr/\bremote_temp\b/		=> sub { "temp2" },
+		qr/\bremote_temp_hyst\b/	=> sub { "temp2_max_hyst" },
+		qr/\bremote_temp_low\b/		=> sub { "temp2_min" },
+		qr/\bremote_temp_over\b/	=> sub { "temp2_max" },
+		qr/\btemp\b/			=> sub { "temp1" },
+		qr/\btemp_hyst\b/		=> sub { "temp1_max_hyst" },
+		qr/\btemp_low\b/		=> sub { "temp1_min" },
+		qr/\btemp_over\b/		=> sub { "temp1_max" },
+		qr/\btemp_high\b/		=> sub { "temp1_max" },
+		qr/\btemp_crit\b/		=> sub { "temp1_crit" },
+
+		qr/\bvin(\d+)_max\b/		=> sub { "in$1_max" },
+		qr/\bvin(\d+)_min\b/		=> sub { "in$1_min" },
+		qr/\bvin(\d+)\b/		=> sub { "in$1" },
+		qr/\btemp(\d+)_over\b/		=> sub { "temp$1_max" },
+		qr/\btemp(\d+)_hyst\b/		=> sub { "temp$1_max_hyst" },
+		qr/\btemp(\d+)_high\b/		=> sub { "temp$1_max" },
+		qr/\btemp(\d+)_low\b/		=> sub { "temp$1_min" },
+		qr/\bsensor(\d+)\b/		=> sub { "temp$1_type" },
+	);
+
+	@delete = (
+		qr/\balarms\b/,
+		qr/\bbeeps\b/,
+		qr/\bpwm\d*\b/,
+		qr/\bpwm\d+_enable\b/,
+		qr/\b(in|temp|fan)\d+_(state|status)\b/,
+		qr/\banalog_out\b/,
+		qr/\balarms_(in|temp|fan)\b/,
+	);
+
+	%chip_trans = (
+		"gl518sm" => {
+			qr/\bvdd\b/			=> sub { "in0" },
+			qr/\bvdd_min\b/			=> sub { "in0_min" },
+			qr/\bvdd_max\b/			=> sub { "in0_max" },
+		},
+		"gl520sm" => {
+			qr/\bvdd\b/			=> sub { "in0" },
+			qr/\bvdd_min\b/			=> sub { "in0_min" },
+			qr/\bvdd_max\b/			=> sub { "in0_max" },
+		},
+		"lm80" => {
+			qr/\btemp_hot_hyst\b/		=> sub { "temp1_max_hyst" },
+			qr/\btemp_hot_max\b/		=> sub { "temp1_max" },
+			qr/\btemp_os_hyst\b/		=> sub { "temp1_crit_hyst" },
+			qr/\btemp_os_max\b/		=> sub { "temp1_crit" },
+		},
+		"lm83" => {
+			qr/\btcrit\b/			=> sub { "temp3_crit" },
+		},
+		"lm90" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"adm1032" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"lm86" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"lm99" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"adt7461" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"max6657" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"max6680" => {
+			qr/\btcrit(\d)\b/		=> sub { "temp$1_crit" },
+			qr/\bhyst(\d)\b/		=> sub { "temp$1_crit_hyst" },
+		},
+		"lm93" => {
+			qr/\bvid([12])\b/			=> sub { "cpu".($1-1)."_vid" },
+		},
+		"adm9240" => {
+			qr/"2\.5V(|_min|_max)"/		=> sub { "in0$1" },
+			qr/\bVccp1(|_min|_max)\b/	=> sub { "in1$1" },
+			qr/"3\.3V(|_min|_max)"/		=> sub { "in2$1" },
+			qr/"5V(|_min|_max)"/		=> sub { "in3$1" },
+			qr/"12V(|_min|_max)"/		=> sub { "in4$1" },
+			qr/\bVccp2(|_min|_max)\b/	=> sub { "in5$1" },
+		},
+		"lm81" => {
+			qr/"2\.5V(|_min|_max)"/		=> sub { "in0$1" },
+			qr/\bVccp1(|_min|_max)\b/	=> sub { "in1$1" },
+			qr/"3\.3V(|_min|_max)"/		=> sub { "in2$1" },
+			qr/"5V(|_min|_max)"/		=> sub { "in3$1" },
+			qr/"12V(|_min|_max)"/		=> sub { "in4$1" },
+			qr/\bVccp2(|_min|_max)\b/	=> sub { "in5$1" },
+		},
+		"ds1780" => {
+			qr/"2\.5V(|_min|_max)"/		=> sub { "in0$1" },
+			qr/\bVccp1(|_min|_max)\b/	=> sub { "in1$1" },
+			qr/"3\.3V(|_min|_max)"/		=> sub { "in2$1" },
+			qr/"5V(|_min|_max)"/		=> sub { "in3$1" },
+			qr/"12V(|_min|_max)"/		=> sub { "in4$1" },
+			qr/\bVccp2(|_min|_max)\b/	=> sub { "in5$1" },
+		},
+		"adm1024" => {
+			qr/"2\.5V(|_min|_max)"/		=> sub { "in0$1" },
+			qr/\bVccp1(|_min|_max)\b/	=> sub { "in1$1" },
+			qr/"3\.3V(|_min|_max)"/		=> sub { "in2$1" },
+			qr/"5V(|_min|_max)"/		=> sub { "in3$1" },
+			qr/"12V(|_min|_max)"/		=> sub { "in4$1" },
+			qr/\bVccp2(|_min|_max)\b/	=> sub { "in5$1" },
+			qr/\btemp(\d)\b/		=> sub { "temp".($1+1) },
+			qr/\btemp(\d)_hyst\b/		=> sub { "temp".($1+1)."_max_hyst" },
+			qr/\btemp(\d)_over\b/		=> sub { "temp".($1+1)."_max" },
+		},
+		"maxilife" => {
+			qr/\bvid(\d)(|_min|_max)\b/	=> sub { "in".($1-1).$2 },
+		},
+		"thmc50" => {
+			qr/\btemp_hyst\b/		=> sub { "temp1_min" },
+			qr/\bremote_temp_hyst\b/	=> sub { "temp2_min" },
+		},
+		"adm1022" => {
+			qr/\btemp_hyst\b/		=> sub { "temp1_min" },
+			qr/\bremote_temp_hyst\b/	=> sub { "temp2_min" },
+		},
+		"adm1026" => {
+			qr/\bfan(\d)(|_div|_min)\b/	=> sub { "fan".($1+1).$2 },
+			qr/\btemp(\d)_therm\b/		=> sub { "temp$1_crit" },
+		},
+		"via686a" => {
+			qr/"2\.0V"/			=> sub { "in0" },
+			qr/"2\.5V"/			=> sub { "in1" },
+			qr/"3\.3V"/			=> sub { "in2" },
+			qr/"5\.0V"/			=> sub { "in3" },
+			qr/"12V"/			=> sub { "in4" },
+		},
+		"lm87" => {
+			qr/"2\.5V(|_min|_max)"/		=> sub { "in0$1" },
+			qr/\bVccp1(|_min|_max)\b/	=> sub { "in1$1" },
+			qr/"3\.3V(|_min|_max)"/		=> sub { "in2$1" },
+			qr/"5V(|_min|_max)"/		=> sub { "in3$1" },
+			qr/"12V(|_min|_max)"/		=> sub { "in4$1" },
+			qr/\bVccp2(|_min|_max)\b/	=> sub { "in5$1" },
+			qr/\bAIN1(|_min|_max)\b/	=> sub { "in6$1" },
+			qr/\bAIN2(|_min|_max)\b/	=> sub { "in7$1" },
+			qr/\bCPU_Temp\b/		=> sub { "temp2" },
+		},
+		"fscpos" => {
+			qr/\bvolt12\b/			=> sub { "in0" },
+			qr/\bvolt5\b/			=> sub { "in1" },
+			qr/\bvoltbatt\b/		=> sub { "in2" },
+		},
+		"fscscy" => {
+			qr/\bvolt12\b/			=> sub { "in0" },
+			qr/\bvolt5\b/			=> sub { "in1" },
+			qr/\bvoltbatt\b/		=> sub { "in2" },
+		},
+		"pcf8591" => {
+			qr/\bch(\d)\b/			=> sub { "in$1" },
+		},
+		"smsc47m192" => {
+			qr/\btemp(\d)_input_fault\b/	=> sub { "temp$1_fault" },
+		},
+		"lm92" => {
+			qr/\btemp_hyst\b/		=> sub { "temp1_crit_hyst" },
+		},
+		"max1619" => {
+			qr/\btemp2_hyst\b/		=> sub { "temp2_crit_hyst" },
+		},
+		"lm78" => {
+			qr/\bin([56])_(min|max)\b/	=> sub { "in$1_".($2 eq "max" ? "min" : "max") },
+		},
+		"lm79" => {
+			qr/\bin([56])_(min|max)\b/	=> sub { "in$1_".($2 eq "max" ? "min" : "max") },
+		},
+		"w83781d" => {
+			qr/\bin([56])_(min|max)\b/	=> sub { "in$1_".($2 eq "max" ? "min" : "max") },
+		},
+		"as99127f" => {
+			qr/\bin([56])_(min|max)\b/	=> sub { "in$1_".($2 eq "max" ? "min" : "max") },
+		},
+	);
+
+	%chip_delete = (
+		"adm1021" => [
+			qr/\bdie_code\b/,
+		],
+		"lm84" => [
+			qr/\bdie_code\b/,
+		],
+		"gl523" => [
+			qr/\bdie_code\b/,
+		],
+		"thmc10" => [
+			qr/\bdie_code\b/,
+		],
+		"gl518sm" => [
+			qr/\bfan1_off\b/,
+			qr/\bfan1_off_pin\b/,
+			qr/\biterate\b/,
+		],
+		"gl520sm" => [
+			qr/\bfan1_off\b/,
+			qr/\btwo_temps\b/,
+		],
+		"w83792d" => [
+			qr/\bchassis\b/,
+		],
+		"w83793" => [
+			qr/\bchassis\b/,
+		],
+		"maxilife" => [
+			qr/\bpll(|_min|_max)\b/,
+		],
+		"thmc50" => [
+			qr/\banalog output\b/,
+			qr/\binterrupts\b/,
+			qr/\binterrupt mask\b/,
+			qr/\bdie_code\b/,
+		],
+		"adm1022" => [
+			qr/\banalog output\b/,
+			qr/\binterrupts\b/,
+			qr/\binterrupt mask\b/,
+			qr/\bdie_code\b/,
+		],
+		"adm1026" => [
+			qr/\balarm_mask\b/,
+			qr/\bgpio\b/,
+			qr/\bgpio_mask\b/,
+			qr/\bafc_pwm\b/,
+			qr/\bafc_analog_out\b/,
+			qr/\btemp\d_tmin\b/,
+		],
+		"lm85" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"lm85b" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"lm85c" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"emc6d100" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"emc6d102" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"adm1027" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"adt7473" => [
+			qr/\bpwm\d_(spinup|min|freq|min_ctl|zone|spinup_ctl)\b/,
+			qr/\bzone\d_(limit|hyst|range|critical|smooth)\b/,
+			qr/\bfan\d_(tach_mode|ppr)\b/,
+		],
+		"fscpos" => [
+			qr/\brev\b/,
+			qr/\bevent\b/,
+			qr/\bcontrol\b/,
+			qr/\bfan\d_ripple\b/,
+			qr/\bwdog_(preset|state|control)\b/,
+		],
+		"fscscy" => [
+			qr/\brev\b/,
+			qr/\bevent\b/,
+			qr/\bcontrol\b/,
+			qr/\btemp\d_lim\b/,
+			qr/\bfan\d_ripple\b/,
+			qr/\bwdog_(preset|state|control)\b/,
+		],
+		"fscher" => [
+			qr/\brev\b/,
+			qr/\bevent\b/,
+			qr/\bcontrol\b/,
+			qr/\bfan\d_ripple\b/,
+			qr/\bwdog_(preset|state|control)\b/,
+		],
+		"pcf8591" => [
+			qr/\bain_conf\b/,
+			qr/\baout_enable\b/,
+			qr/\baout\b/,
+		],
+		"vt1211" => [
+			qr/\bconfig\b/,
+		],
+		"vt8231" => [
+			qr/\bconfig\b/,
+		],
+		"max6650" => [
+			qr/\bspeed\b/,
+		],
+		"max6651" => [
+			qr/\bspeed\b/,
+		],
+		"applesmc" => [
+			qr/\bfan\d_(max|safe)\b/,
+		],
+	);
+
+	print "# Converted by sensors-conf-convert on ".localtime()."\n";
+}
+
+sub substitute_line($$)
+{
+	my ($chip, $line) = @_;
+
+	# First the chip-specific ones
+	if ($chip && exists $chip_trans{$chip}) {
+		foreach my $t (keys %{$chip_trans{$chip}}) {
+			$line =~ s/$t/$chip_trans{$chip}->{$t}->()/ge;
+		}
+	}
+
+	# Then the general substitutions
+	foreach my $t (keys %trans) {
+		# Kudos to the nice folks in #perl on freenode :)
+		$line =~ s/$t/$trans{$t}->()/ge;
+	}
+
+	return $line;
+}
+
+sub delete_line($)
+{
+	my $feature = shift;
+
+	# First the general deletions
+	foreach my $t (@delete) {
+		return 1 if $feature =~ m/$t/;
+	}
+
+	# Then the chip-specific ones
+	if ($chip && exists $chip_delete{$chip}) {
+		foreach my $t (@{$chip_delete{$chip}}) {
+			return 1 if $feature =~ m/$t/;
+		}
+	}
+
+	return 0;
+}
+
+if (m/^# Converted by sensors-conf-convert/) {
+	print STDERR "WARNING: Converting an already converted file!\n";
+	print STDERR "         Result will be incorrect for some chip types.\n";
+}
+
+# Bus statements
+if (m/^([\s#]*bus\s+"?i2c-\d+"?\s+"([^"]+)")\s+"[^"]*"/) {
+	print STDERR "Processing bus statement: $2\n" if $debug;
+
+	if ($2 eq "ISA main adapter") {
+		$_ = '';	# Drop entirely 
+	} else {
+		$_ = "$1\n";	# Drop algorithm name
+	}
+}
+
+# Chip statements
+elsif (m/^[\s#]*chip\s+"([\w\d*-]+)"/) {
+	# We only remember the first chip name, assuming that all chips
+	# in a given "chip" statement need the same specific processing
+	$chip = $1;
+	$chip =~ s/-.*//;
+	undef $chip if $chip eq "*";
+
+	# Remove dashes from chip names, as this is no longer allowed
+	s/(\s+"lm78-)j-/$1/g;
+	s/(\s+"maxilife-)(cg|co|as|nba)-/$1/g;
+	# Simplify possible duplicates
+	s/("lm78-\*")(\s+"lm78-\*")+/$1/g;
+	s/("maxilife-\*")(\s+"maxilife-\*")+/$1/g;
+
+	# "*" is no longer a valid chip name
+	s/"\*"/"\*-\*"/g;
+
+	print STDERR "Processing chip section: $chip\n" if $chip and $debug;
+}
+
+# Drop references to lm78-j
+elsif (m/^\s*#+.*lm78-?j/i) {
+	s/(lm78), lm78-?j/$1/gi;
+	s/(lm78)-?j/$1/gi;
+}
+
+# Drop references to vrm
+elsif (m/^[\s#]*set\s+vrm\s/i
+    || m/^\s*#+\s*adjust this if your vid is wrong/i
+    || m/^\s*#+\s*Also, one should set vrm prior to using vid in any formula/) {
+	$_ = '';
+}
+
+# Drop references to pwm
+elsif (m/^\s*#+\s*PWM Output/i) {
+	$_ = '';
+}
+
+# Feature name substitution
+elsif (m/^[\s#]*(?:label|ignore|set|compute)\s+(\S+)\s/) {
+	if (delete_line($1)) {
+		# Delete references to features that are now gone
+		$_ = '';
+	} else {
+		# Substitute feature names
+		$_ = substitute_line($chip, $_);
+	}
+}