docs/77087: The bootvinum script given in the handbook doesn't work for 5.X

[yUnwEb]

>Number:         77087
>Category:       docs
>Synopsis:       The bootvinum script given in the handbook doesn't work for 5.X
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-doc
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          doc-bug
>Submitter-Id:   current-users
>Arrival-Date:   Fri Feb 04 04:40:21 GMT 2005
>Closed-Date:
>Last-Modified:
>Originator:     yUnwEb
>Release:        FreeBSD 5.3-RELEASE
>Organization:
>Environment:
FreeBSD bender.zuazo.org 5.3-RELEASE FreeBSD 5.3-RELEASE #0: Fri Nov 26 00:40:08 CET 2004     root at bender.zuazo.org:/usr/src/sys/i386/compile/BENDER53  i386
>Description:
      I have installed FreeBSD 5.3 and I have seen that the first
non-root filesystem partition is now called adXs1d instead of adXs1e.
So, the bootvinum perl script doesn't work properly.
      I have done a simple patch to solve this.
>How-To-Repeat:
      
>Fix:
# patch bootvinum < bootvinum.patch

--- bootvinum.old	Thu Dec 30 00:51:25 2004
+++ bootvinum	Thu Dec 30 00:54:55 2004
@@ -55,9 +55,9 @@
     $rsp = $dn if $mnt eq '/';
     next if $mnt =~ /^\/NOFUTURE/;
   }
-  # Move /rootback from partition e to a
+  # Move /rootback from partition d to a
   if ($mnt =~ /^\/rootback/) {
-    $dev =~ s/e$/a/;
+    $dev =~ s/d$/a/;
     $pass = 1;
     $rbsp = substr($dev, 5, length($dev)-6);
     print FSOUT "$dev\t\t$mnt\t$fstyp\t$opt\t\t$dump\t$pass\n";
@@ -149,7 +149,7 @@
     if ($part && $part eq 'a:' && $spndl[$i] eq $rsp) {
     $rootsiz = $siz;
     }
-    if ($part && $part eq 'e:' && $spndl[$i] eq $rbsp) {
+    if ($part && $part eq 'd:' && $spndl[$i] eq $rbsp) {
       if ($rootsiz != $siz) {
     die("Rootback size ($siz) != root size ($rootsiz)\n");
       }
@@ -171,8 +171,8 @@
       $swapspndl = 1;
       next;
     }
-    # Move rootback spindle e partitions to a
-    if ($part && $part eq 'e:' && $spndl[$i] eq $rbsp) {
+    # Move rootback spindle d partitions to a
+    if ($part && $part eq 'd:' && $spndl[$i] eq $rbsp) {
       printf DLOUT "%4s%9d%9d%10s%9d%6d%6d\n", 'a:', $siz, $off, $fstyp,
     $fsiz, $bsiz, $bps;
       next;

>Release-Note:
>Audit-Trail:
>Unformatted: