home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 February / PCWorld_2000-02_cd.bin / live / sbin / lpdev_config < prev    next >
Text File  |  1999-11-12  |  6KB  |  207 lines
  1. #!/usr/bin/perl
  2. ###################################
  3. #Name : lpdev_config
  4. #
  5. #Description: To create filesystems and setup loop devices for loop
  6. # device installs and create and linuxrc for the ramdisk used during
  7. # loadlin boot.  
  8. #
  9. # lpdev_config should be invoked as follows 
  10. # 1st arg: windows partition device to install cdl on 
  11. # 2nd arg: size of root filesystem (in MB) 
  12. # 3rd arg: size of swap filesystem (in MB)
  13. # 4th arg: 1 if we want badblock checking. 
  14. #            
  15. #Copyright (C) 1999 Corel Corporation 
  16. # 
  17. # EXHIBIT A -Corel Public License. 
  18. # 
  19. # The contents of this file are subject to the Corel Public License 
  20. # Version 1.0 (the "License"); you may not use this file except in 
  21. # compliance  with the License. You may obtain a copy of the License at 
  22. # linux.corel.com/linuxproducts/corellinux/license.htm. 
  23. # Software distributed under the License is distributed on an "AS IS" 
  24. # basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the 
  25. # License for the specific language governing rights and limitations 
  26. # under the License. 
  27. # The Original Code is lpdev_config. 
  28. # The Initial Developer of the Original Code is Corel Corporation. 
  29. # Portions created by Corel are Copyright (C) 1999  All Rights Reserved. 
  30. # Contributor(s): ______________________________________. 
  31. ###################################################################
  32.  
  33. # to be safe and since we might have typos in variable names
  34. use strict;
  35.  
  36. my( $TEMP_MOUNT, $DEV, $ROOT_SIZE, $SWAP_SIZE, $ROOT, $SWAP, $TARGET, $ROOT_LOOPDEV, $SWAP_LOOPDEV, $FSTYPE, $TEMP_MOUNT2, $BOOTDSK_IMG, $TMP_DIR, $KERNEL_PKG, $DOSUTILS, $BADBLOCKCHK) = ();
  37.  
  38. $TEMP_MOUNT="/tmp/mnt";
  39. $TEMP_MOUNT2="/tmp/mnt2";
  40. $TMP_DIR="$TEMP_MOUNT/cdl_tmp";
  41. $DEV=$ARGV[0];
  42. $ROOT_SIZE=$ARGV[1];
  43. $SWAP_SIZE=$ARGV[2];
  44. $BADBLOCKCHK=$ARGV[3];
  45. $ROOT="$TEMP_MOUNT/cdl/system/root.img";
  46. $SWAP="$TEMP_MOUNT/cdl/system/swap.img";
  47. $TARGET="/target";
  48. $ROOT_LOOPDEV="/dev/loop1";
  49. $SWAP_LOOPDEV="/dev/loop2";
  50. $FSTYPE="";
  51. $BOOTDSK_IMG="/instmnt/boot/boot1440.img";
  52. $KERNEL_PKG="/instmnt/dists/stable/main/binary-i386/base/kernel-2.2.x.deb";
  53. #$INITRD="ws/initrd";
  54. $DOSUTILS="/instmnt/tools";
  55.  
  56. # make sure we have a temp mount point ready
  57. `umount $TEMP_MOUNT`;
  58. `rm -fr $TEMP_MOUNT`;
  59. `mkdir $TEMP_MOUNT`;
  60.  
  61. `umount $TEMP_MOUNT2`;
  62. `rm -fr $TEMP_MOUNT2`;
  63. `mkdir $TEMP_MOUNT2`;
  64.  
  65. if( ! -e $DEV ) {
  66.     die "$DEV not found: $!";
  67. }
  68.  
  69. # mount the device properly depending on its partition type
  70. #if( `fdisk -l|grep $DEV|grep Win95` ) {
  71.     $FSTYPE="vfat";
  72. #} elsif( `fdisk -l|grep $DEV|grep DOS` ) {
  73. #    $FSTYPE="msdos";
  74. #}
  75.  
  76. if( $BADBLOCKCHK == 1 ) {
  77.     $BADBLOCKCHK="-c";
  78. } else {
  79.     $BADBLOCKCHK="";
  80. }
  81.  
  82. `mount -t $FSTYPE $DEV $TEMP_MOUNT`;
  83.  
  84. # if an installation of cdl already exists move it to cdl-# 
  85. # and update the linuxrc to use the modified directory
  86. if( -e "$TEMP_MOUNT/cdl" ) {
  87.     my ($c, @linuxrc) = (0, (), "");
  88.     for($c=1;(-e "$TEMP_MOUNT/cdl_$c");$c++)
  89.     {
  90.     }
  91.     `mv $TEMP_MOUNT/cdl $TEMP_MOUNT/cdl_$c`;
  92.  
  93.     `gunzip $TEMP_MOUNT/cdl_$c/initrd.gz`;
  94.     `mount -o loop $TEMP_MOUNT/cdl_$c/initrd $TEMP_MOUNT2`;
  95.     @linuxrc = `cat $TEMP_MOUNT2/linuxrc`;
  96.     foreach my $elem (@linuxrc) 
  97.     {
  98.         $elem =~ s/\/cdl[_\d]*\//\/cdl_$c\//;
  99.     }
  100.  
  101.     `rm $TEMP_MOUNT2/linuxrc`;
  102.     open(FOUT, ">$TEMP_MOUNT2/linuxrc");
  103.     print FOUT @linuxrc;
  104.     close FOUT;
  105.  
  106.     # set proper permissions for linuxrc
  107.     `chmod a+x $TEMP_MOUNT2/linuxrc`;
  108.  
  109.     `umount $TEMP_MOUNT2`;
  110.     `gzip $TEMP_MOUNT/cdl_$c/initrd`;
  111. }
  112.  
  113. `mkdir $TEMP_MOUNT/cdl`;
  114. `mkdir $TEMP_MOUNT/cdl/system`;
  115.  
  116. # create the root/swap ``partitions''
  117. `dd if=/dev/zero of=$ROOT bs=1024 count=$ROOT_SIZE`;
  118. `dd if=/dev/zero of=$SWAP bs=1024 count=$SWAP_SIZE`;
  119.  
  120. # unhook /dev/loopX (pray that they are not currently busy)
  121. `losetup -d $ROOT_LOOPDEV`;
  122. `losetup -d $SWAP_LOOPDEV`;
  123.  
  124. # connect the root/swap ``partitions'' to loopback devices 
  125. # (requires loopback device support in the kernel)
  126. `losetup $ROOT_LOOPDEV $ROOT`;
  127. `losetup $SWAP_LOOPDEV $SWAP`;
  128.  
  129. `sync;sync`;
  130.  
  131. #`e2label $SWAP_LOOPDEV cdl:`;
  132.  
  133. # create the filesystems
  134. `mke2fs $BADBLOCKCHK $ROOT_LOOPDEV -L "cdl:/"`;
  135.  
  136. `sync; sync`;
  137.  
  138. `mkswap $BADBLOCKCHK $SWAP_LOOPDEV`;
  139.  
  140. `sync; sync`;
  141.  
  142. `swapon $SWAP_LOOPDEV`;
  143.  
  144. `sync;sync`;
  145.  
  146. # copy the compressed ramdisk image to the cdl dir on the windows
  147. # partition and uncompress it
  148. `mount -t ext2 -o loop $BOOTDSK_IMG $TEMP_MOUNT2`;
  149. `cp $TEMP_MOUNT2/boot/initrd.gz $TEMP_MOUNT/cdl`;
  150.  
  151. # for now we use the install kernel as the runtime kernel
  152. `cp $TEMP_MOUNT2/boot/vmlinuz $TEMP_MOUNT/cdl`;
  153. `umount $TEMP_MOUNT2`;
  154.  
  155. # copy the runtime kernel from a kernel deb pkg (should be added when
  156. # the runtime kernel pkg is ready)
  157. #`mkdir $TMP_DIR`;
  158. #`dpkg -x $KERNEL_PKG $TMP_DIR`;
  159.  
  160. # this assume the dpkg extract puts the kernel into boot/vmlinuz. This
  161. # probably will need changing
  162. #`cp $TMP_DIR/boot/vmlinuz $TEMP_MOUNT/cdl`;
  163.  
  164.  
  165. `gunzip $TEMP_MOUNT/cdl/initrd.gz`;
  166.  
  167. `sync; sync`;
  168.  
  169. # mount the initrd image
  170. `mount -t ext2 -o loop $TEMP_MOUNT/cdl/initrd $TEMP_MOUNT2`;
  171.  
  172. # write the proper linuxrc file
  173. open(FOUT, ">$TEMP_MOUNT2/linuxrc") or die "Cannot open $TEMP_MOUNT2/linuxrc: $!";
  174.  
  175. print FOUT "#!/bin/kiss\n";
  176. print FOUT "mount -t $FSTYPE $DEV /mnt\n";
  177. print FOUT "echo \"linuxrc: DOS partition mounted!\"\n";
  178. print FOUT "/sbin/losetup $ROOT_LOOPDEV /mnt/cdl/system/root.img\n";
  179. print FOUT "/sbin/losetup $SWAP_LOOPDEV /mnt/cdl/system/swap.img\n";
  180. print FOUT "echo \"linuxrc: Loop devices attached!!\"\n";
  181.  
  182. close FOUT;
  183.  
  184. # set proper permissions for linuxrc
  185. `chmod a+x $TEMP_MOUNT2/linuxrc`;
  186.  
  187. `sync;sync`;
  188. # umount the ramdisk image and recompress it
  189. `umount $TEMP_MOUNT2`;
  190. `gzip $TEMP_MOUNT/cdl/initrd`;
  191.  
  192. # remove the temp dir
  193. `rm -fr $TMP_DIR`;
  194.  
  195. # uncompress the loadlin binary and the batch file to start cdl from
  196. # the dos/windows partition
  197. `cp $DOSUTILS/loadlin.exe $TEMP_MOUNT/cdl`;
  198.  
  199. open(FOUT, ">$TEMP_MOUNT/cdl/startcdl.bat") or die "Cannot open $TEMP_MOUNT/cdl/startcdl.bat: $!";
  200.  
  201. print FOUT "echo Starting Corel Linux ...\r\n";
  202. print FOUT "loadlin vmlinuz root=$ROOT_LOOPDEV initrd=initrd.gz\r\n";
  203. close FOUT;
  204.  
  205. `sync;sync`;
  206. `sync;sync`;
  207.