Changeset 5561 for i2c-tools/trunk/eeprom/ddcmon
- Timestamp:
- 12/11/08 17:56:54 (3 years ago)
- Files:
-
- 1 modified
-
i2c-tools/trunk/eeprom/ddcmon (modified) (8 diffs)
Legend:
- Unmodified
- Added
- Removed
-
i2c-tools/trunk/eeprom/ddcmon
r5164 r5561 78 78 my $offset = shift || 0; 79 79 my $bytes = ''; 80 80 81 81 sysopen(FH, $filename, O_RDONLY) 82 82 or die "Can't open $filename"; … … 142 142 { 143 143 my ($bytes, $offset) = @_; 144 144 145 145 return $bytes->[$offset]; 146 146 } … … 149 149 { 150 150 my ($bytes, $offset) = @_; 151 151 152 152 return ($bytes->[$offset] 153 153 | ($bytes->[$offset+1] << 8)); … … 168 168 { 169 169 my ($bytes, $offset) = @_; 170 170 171 171 return ($bytes->[$offset] 172 172 | ($bytes->[$offset+1] << 8) … … 177 177 { 178 178 my ($bytes, $offset) = @_; 179 179 180 180 return ($bytes->[$offset] 181 181 | ($bytes->[$offset+1] << 8) … … 221 221 return $mode[($bytes->[$offset] >> 3) & 0x03]; 222 222 } 223 223 224 224 sub good_signature 225 225 { 226 226 my $bytes = shift; 227 227 228 228 return $bytes->[0] == 0x00 229 229 && $bytes->[1] == 0xff … … 245 245 $cs += $bytes->[$i]; 246 246 } 247 247 248 248 return (($cs & 0xff) == 0 ? 'OK' : 'Not OK'); 249 249 } … … 535 535 { 536 536 my $error = print_edid($ARGV[0], $address); 537 537 538 538 if ($error == 1) 539 539 {
