Browse Source

Switch to SVN revision numbering, so that the version is always up-to-date.

git-svn-id: http://lm-sensors.org/svn/i2c-tools/trunk@5089 7894878c-1315-0410-8ee3-d5d059ff63e0
tags/v3.0.1
Jean Delvare 18 years ago
parent
commit
35cef6eb2c
  1. 23
      eeprom/decode-dimms.pl

23
eeprom/decode-dimms.pl

@ -47,7 +47,11 @@ use strict;
use POSIX; use POSIX;
use Fcntl qw(:DEFAULT :seek); use Fcntl qw(:DEFAULT :seek);
use vars qw($opt_html $opt_body $opt_bodyonly $opt_igncheck $use_sysfs use vars qw($opt_html $opt_body $opt_bodyonly $opt_igncheck $use_sysfs
@vendors %decode_callback);
@vendors %decode_callback $revision);
$revision = '$Revision$ ($Date$)';
$revision =~ s/\$\w+: (.*?) \$/$1/g;
$revision =~ s/ \([^()]*\)//;
@vendors = ( @vendors = (
["AMD", "AMI", "Fairchild", "Fujitsu", ["AMD", "AMI", "Fairchild", "Fujitsu",
@ -389,6 +393,19 @@ sub printh ($$) # print header w/ given text
} }
} }
sub printc ($) # print comment
{
my ($comment) = @_;
if ($opt_html) {
$comment =~ s/</\&lt;/sg;
$comment =~ s/>/\&gt;/sg;
$comment =~ s/\n/<br>\n/sg;
print "<!-- $comment -->\n";
} else {
print "# $comment\n";
}
}
# Parameter: bytes 0-63 # Parameter: bytes 0-63
sub decode_sdr_sdram($) sub decode_sdr_sdram($)
{ {
@ -1036,10 +1053,10 @@ if ($opt_body)
"</head><body>\n"; "</head><body>\n";
} }
printc "$0 version $revision";
printh 'Memory Serial Presence Detect Decoder', printh 'Memory Serial Presence Detect Decoder',
'By Philip Edelbrock, Christian Zuckschwerdt, Burkart Lingner, 'By Philip Edelbrock, Christian Zuckschwerdt, Burkart Lingner,
Jean Delvare and others
Version 2.10.2';
Jean Delvare and others';
my $dimm_count=0; my $dimm_count=0;

Loading…
Cancel
Save