Changeset 1819

Timestamp:

06/28/03 10:25:19 (10 years ago)

Author:

khali

Message:

Fix UTF-8 incompatibility. Thanks a lot to Jim Morris for testing!

Location:

lm-sensors/trunk

Files:

• CHANGES (modified) (1 diff)
• prog/detect/sensors-detect (modified) (4 diffs)

lm-sensors/trunk/CHANGES

@@ -102 +102 @@
                           Fix "C" format error;
                           Add support for adm1026, 82801EB (ICH5), W83791D;
-                          Add support for w83l785ts, nForce2
+                          Add support for w83l785ts, nForce2;
+                          Fix UTF-8 incompatibility
 
 2.7.0 (20021208)

lm-sensors/trunk/prog/detect/sensors-detect

@@ -1341 +1341 @@
 sub initialize_ioports
 {
-  sysopen IOPORTS, "/dev/port", 2;
+  sysopen (IOPORTS, "/dev/port", O_RDWR|O_BINARY)
+    or die "/dev/port: $!\n";
+  binmode (IOPORTS, ':raw');
+}
+
+sub close_ioports
+{
+  close (IOPORTS)
+    or print "Warning: $!\n";
 }
 
@@ -1363 +1371 @@
   if ($_[1] > 0xff)
   {
-        my ($package, $filename, $line, $sub) = caller(1);
+    my ($package, $filename, $line, $sub) = caller(1);
     print "\n*** Called outb with value=$_[1] from line $line\n",
           "*** (in $sub). PLEASE REPORT!\n",
@@ -3548 +3556 @@
     print " Do you want to scan the ISA bus? (YES/no): ";
     if (not <STDIN> =~ /^\s*[Nn]/) {
-      initialize_ioports or die "Sorry, can't access /dev/port ($!)?!?";
-      scan_isa_bus;
+      initialize_ioports();
+      scan_isa_bus();
+      close_ioports();
     }
   }
@@ -3563 +3572 @@
     print " Do you want to scan for Super I/O sensors? (YES/no): ";
     if (not <STDIN> =~ /^\s*[Nn]/) {
-      initialize_ioports or die "Sorry, can't access /dev/port ($!)?!?";
-      scan_superio;
+      initialize_ioports();
+      scan_superio();
+      close_ioports();
     }
   }