From ee1e8b1c53d0d2f9d45fa35ddd7c6413d6a42958 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 1 Mar 2002 18:28:31 +0000
Subject: added ext3 support.

---
 rescue/tree/etc/oem | 52 ++++++++++++++++++++++++++++++++++++----------------
 1 file changed, 36 insertions(+), 16 deletions(-)

diff --git a/rescue/tree/etc/oem b/rescue/tree/etc/oem
index b50205db8..3601fb71e 100755
--- a/rescue/tree/etc/oem
+++ b/rescue/tree/etc/oem
@@ -12,7 +12,7 @@ where [options] are:
 ";
     exit 1;
 }
-my (%options, $yes, $hd, $hdp, $cd);
+my (%options, $yes, $hd, $hdp, $cd, $fs);
 
 #- avoid globing as it is not available in rescue ramdisk.
 foreach my $device (split ' ', `/bin/ls -d /proc/ide/hd*`) {
@@ -125,6 +125,8 @@ while (<F>) {
     /\[lang[=:]([^]]*)\]/ and $options{lang} = $1;
     /\[server\]/ and $options{server} = '';
     /\[boot_entries[=:]([^]]*)\]/ and $options{boot_entries} = $1;
+    /\[ext2\]/ and $options{fs} = "ext2";
+    /\[ext3\]/ and $options{fs} = "ext3";
 }
 close F;
 foreach (@ARGV) { /^([^=:]*)[=:]?(.*)/ and $options{$1} = $2; /^no([^=:]*)/ and delete $options{$1} }
@@ -141,6 +143,11 @@ foreach (keys %options) {
     print "Using option [$_" . ($options{$_} && "=$options{$_}") . "]\n";
 }
 
+#- filesystem to use.
+$fs ||= $options{fs} || "ext3";
+$fs eq "ext3" and system "modprobe", "ext3";
+print "Using filesystem of type $fs\n";
+
 #- check for already existing partition table, if none are found
 #- create 3 partitions (one for install, one for swap and one for root).
 #- if only a fat partition is found, resize it do include the above partition.
@@ -283,17 +290,17 @@ if ($minor == 5) {
 }
 printf F "mkpart logical ext2 %s %s\n", correct_start_end(\$point, $point+$inst_size);
 printf F "mkpart logical linux-swap %s %s\n", correct_start_end(\$point, $point+$swap_size);
-printf F "mkpart logical ext2 %s %s\n", correct_start_end(\$point, $point+$root_size);
+printf F "mkpart logical %s %s %s\n", $fs, correct_start_end(\$point, $point+$root_size);
 if (exists $options{server} && $hd !~ /^rd\//) {
     my $var_size = ($hd_size - $point) / 2;
     if ($var_size > 1500) {
 	$var = $root+1;
-	printf F "mkpart logical ext2 %s %s\n", correct_start_end(\$point, $point+$var_size);
+	printf F "mkpart logical %s %s %s\n", $fs, correct_start_end(\$point, $point+$var_size);
     }
 }
 if ($hd_size - $point > 100 && $hd !~ /^rd\//) {
     $home = ($var || $root) + 1;
-    printf F "mkpart logical ext2 %s %s\n", correct_start_end(\$point, $hd_size);
+    printf F "mkpart logical %s %s %s\n", $fs, correct_start_end(\$point, $hd_size);
 }
 print F "quit\n";
 close F or die "unable to partition the disk $hd";
@@ -303,32 +310,32 @@ print "Setting swap\n";
 system "mkswap", "/dev/$hdp$swap";
 system "swapon", "/dev/$hdp$swap";
 
-#- we have 
+#- we have to format using right fs.
 print "Formatting /dev/$hdp$inst partition\n";
-system "mkfs.ext2", "/dev/$hdp$inst";
+mkfs("ext2", "/dev/$hdp$inst");
 print "Formatting /dev/$hdp$root partition\n";
-system "mkfs.ext2", "/dev/$hdp$root";
+mkfs($fs, "/dev/$hdp$root");
 if ($var) {
     print "Formatting /dev/$hdp$var partition\n";
-    system "mkfs.ext2", "/dev/$hdp$var";
+    mkfs($fs, "/dev/$hdp$var");
 }
 if ($home) {
     print "Formatting /dev/$hdp$home partition\n";
-    system "mkfs.ext2", "/dev/$hdp$home";
+    mkfs($fs, "/dev/$hdp$home");
 }
 
 print "Mounting partitions\n";
 mkdir "/hd";
 system "mount", "-t", "ext2", "/dev/$hdp$inst", "/hd";
 mkdir "/mnt";
-system "mount", "-t", "ext2", "/dev/$hdp$root", "/mnt";
+system "mount", "-t", $fs, "/dev/$hdp$root", "/mnt";
 if ($var) {
     mkdir "/mnt/var";
-    system "mount", "-t", "ext2", "/dev/$hdp$var", "/mnt/var";
+    system "mount", "-t", $fs, "/dev/$hdp$var", "/mnt/var";
 }
 if ($home) {
     mkdir "/mnt/home";
-    system "mount", "-t", "ext2", "/dev/$hdp$home", "/mnt/home";
+    system "mount", "-t", $fs, "/dev/$hdp$home", "/mnt/home";
 }
 
 print "Copying installation on hard drive\n";
@@ -487,12 +494,12 @@ foreach (qw(/etc /etc/sysconfig /etc/rpm /var /var/lib /var/lib/rpm /var/log /pr
 }
 system "mount", "-t", "proc", "proc", "/mnt/proc";
 open F, ">/mnt/etc/fstab";
-print F "/dev/$hdp$root / ext2 defaults 1 1\n";
+print F "/dev/$hdp$root / $fs defaults 1 1\n";
 if ($var) {
-    print F "/dev/$hdp$var /var ext2 defaults 1 2\n";
+    print F "/dev/$hdp$var /var $fs defaults 1 2\n";
 }
 if ($home) {
-    print F "/dev/$hdp$home /home ext2 defaults 1 2\n";
+    print F "/dev/$hdp$home /home $fs defaults 1 2\n";
 }
 close F;
 open F, ">/mnt/etc/sysconfig/i18n";
@@ -589,6 +596,19 @@ System is now halted.\n\n";
 
 system "halt";
 
+#- gives way to format partition (simpler approach)
+sub mkfs {
+    my ($fs, $dev) = @_;
+    for ($fs) {
+	/ext2/ and do { system "mkfs.ext2", $dev;
+			next };
+	/ext3/ and do { system "mkfs.ext2", "-j", $dev;
+			system "tune2fs", "-c0", "-i0", $dev;
+			next };
+	die "unknown fs: $_\n";
+    }
+}
+
 #- provide package fullname that have to be installed and copied.
 sub select_packages {
     my ($dir, $lang) = @_;
@@ -852,7 +872,7 @@ sub read_rpmsrate {
 		      map { packageById($packages, $_) } packageDepsId($p);
 
 		    my @m3 = ((grep { !/^\d$/ } @m), @m2);
-		    if (@m3 == 1 && $m3[0] eq 'INSTALL') {
+		    if (@m3 >= 1 && $m3[0] eq 'INSTALL' || @m3 >=2 && $m3[1] eq 'INSTALL') {
 			push @{$packages->{needToCopy} ||= []}, $_;
 			next; #- don't need to put INSTALL flag for a package.
 		    }
-- 
cgit v1.2.1