From: <cod...@go...> - 2009-02-25 23:33:15
|
Author: M0...@gm... Date: Wed Feb 25 14:08:32 2009 New Revision: 505 Modified: branches/speedy/.lang/.pot branches/speedy/.lang/Step3.pot branches/speedy/.lang/Step3a1a.pot branches/speedy/.lang/Step3a2.pot branches/speedy/.lang/Step5.pot branches/speedy/.lang/Step6.pot branches/speedy/.lang/Step8.pot branches/speedy/Step3.class branches/speedy/Step3a1a.class branches/speedy/Step3a2.class branches/speedy/Step5.class branches/speedy/Step8.class Log: Debugged automatic partition. Ready for testing. Finished summary on automatic partitioning and for customized installations Modified: branches/speedy/.lang/.pot ============================================================================== --- branches/speedy/.lang/.pot (original) +++ branches/speedy/.lang/.pot Wed Feb 25 14:08:32 2009 @@ -50,7 +50,7 @@ msgid "Disk Partitioning" msgstr "" -#: MdlStartUp.module:47 Step8.class:121 +#: MdlStartUp.module:47 Step8.class:130 msgid "Software Selection" msgstr "" @@ -58,7 +58,7 @@ msgid "Installation" msgstr "" -#: MdlStartUp.module:49 Step8.class:190 +#: MdlStartUp.module:49 Step8.class:213 msgid "Installation Summary" msgstr "" @@ -156,7 +156,7 @@ msgid "to search for media again" msgstr "" -#: Step1.class:98 Step2.class:198 Step5.class:166 +#: Step1.class:98 Step2.class:198 Step5.class:177 msgid "Click" msgstr "" @@ -216,7 +216,7 @@ msgid "This feature can help you avoid an unsuccesful installation." msgstr "" -#: Step1.class:433 Step3a1a.class:169 Step3a1.class:22 Step7a.class:143 +#: Step1.class:433 Step3a1a.class:186 Step3a1.class:22 Step7a.class:143 msgid "WARNING:" msgstr "" @@ -376,43 +376,43 @@ msgid "Create New" msgstr "" -#: Step3a1a.class:148 +#: Step3a1a.class:160 msgid "Failed to format partitions, please try another partitioning method" msgstr "" -#: Step3a1a.class:160 +#: Step3a1a.class:177 msgid "Partitioning stage complete. Click" msgstr "" -#: Step3a1a.class:160 Step3a2.class:322 Step5.class:166 +#: Step3a1a.class:177 Step3a2.class:359 Step5.class:177 msgid "to continue" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "All existing data in" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "is about to be deleted." msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "This step cannot be undone. Are you sure you want to continue?" msgstr "" -#: Step3a1a.class:169 Step6.class:499 Step7a.class:143 +#: Step3a1a.class:186 Step6.class:434 Step7a.class:143 msgid "Yes" msgstr "" -#: Step3a1a.class:169 Step6.class:499 Step7a.class:143 +#: Step3a1a.class:186 Step6.class:434 Step7a.class:143 msgid "No" msgstr "" -#: Step3a1a.class:173 +#: Step3a1a.class:190 msgid "Preparing hard disk for new partitioning structure. Please wait" msgstr "" -#: Step3a1a.class:193 +#: Step3a1a.class:210 msgid "Operation cancelled by user. No changes have been made to the system" msgstr "" @@ -458,39 +458,39 @@ "VectorLinux" msgstr "" -#: Step3a2.class:191 +#: Step3a2.class:192 msgid "Please wait while your hard drive is being partitioned" msgstr "" -#: Step3a2.class:204 +#: Step3a2.class:205 msgid "Unable to find enough un-used space to perform auto-partition." msgstr "" -#: Step3a2.class:204 +#: Step3a2.class:205 msgid "Please consider using a different partitioning option." msgstr "" -#: Step3a2.class:206 +#: Step3a2.class:207 msgid "" "Unable to find enough un-used space to perform auto-partition. Please " "consider using a different partitioning option." msgstr "" -#: Step3a2.class:322 +#: Step3a2.class:359 msgid "Partitioning stage complete... Click" msgstr "" -#: Step3a2.class:352 +#: Step3a2.class:407 msgid "" "We are unable to find any hard disks with enough unpartitioned space for " "this operation." msgstr "" -#: Step3a2.class:352 +#: Step3a2.class:407 msgid "Please consider using another partitioning method." msgstr "" -#: Step3a2.class:354 +#: Step3a2.class:409 msgid "" "Unable to find any hard drives with enough unpartitioned space. Please go " "back and select another partitioning method" @@ -555,29 +555,29 @@ msgid "Select the partitioning method you would like to use" msgstr "" -#: Step3.class:153 +#: Step3.class:175 msgid "Automatic" msgstr "" -#: Step3.class:163 +#: Step3.class:185 msgid "" "Automatically resize your partitions and / or create the correct disk space " "for VectorLinux." msgstr "" -#: Step3.class:170 +#: Step3.class:192 msgid "Manually resize my partitions " msgstr "" -#: Step3.class:180 +#: Step3.class:202 msgid "Use the partitioning tool to prepare your system partitions." msgstr "" -#: Step3.class:187 +#: Step3.class:209 msgid "My hard drive is already partitioned" msgstr "" -#: Step3.class:197 +#: Step3.class:219 msgid "Install VectorLinux to existing partitions on my hard drive" msgstr "" @@ -589,91 +589,101 @@ msgid "Resize partitions using Gparted" msgstr "" -#: Step5.class:64 +#: Step5.class:67 msgid "" "Gparted was not found on this system. Please install gparted and try again" msgstr "" #: Step5.class:69 +msgid "Unable to launch partitioning tool." +msgstr "" + +#: Step5.class:69 +msgid "" +"The gparted program was not found on this system. Please install gparted or " +"choose another partitioning method." +msgstr "" + +#: Step5.class:80 msgid "Loading partitioning utility...Please Wait" msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "" "The VectorLinux installer is unable to embed the gparted partitioning " "utility." msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "" "Please consider using the automatic partition option, or use other means of" msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "partitioning your hard drives." msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "" "VectorLinux is about to launch the GParted partitioning tool. Use this " "utility to" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "move, resize, delete or create partitions." msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "When you are finished, you will need to exit the utility from the" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "GParted" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "menu" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "SYSTEM RESTART SUGGESTED" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "" "Your system still contains some non-linux partitions. If you still have a " "Windows operating system installed, it is recomended " msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "that you reboot your system at this time. " msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "Click the" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "button to restart your computer now, or click" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "to continue without restarting." msgstr "" -#: Step5.class:166 +#: Step5.class:177 msgid "PARTITIONING DONE" msgstr "" -#: Step5.class:182 +#: Step5.class:193 msgid "Your computer will restart in 10 seconds" msgstr "" -#: Step5.class:239 +#: Step5.class:250 msgid "Loading partitioning utility ... Please Wait" msgstr "" -#: Step5.class:248 +#: Step5.class:259 msgid "Restart Now" msgstr "" @@ -697,7 +707,7 @@ msgid "Not Used" msgstr "" -#: Step6.class:167 Step8.class:71 +#: Step6.class:167 Step8.class:73 msgid "Do not format" msgstr "" @@ -717,7 +727,7 @@ msgid "Please select only one partition for this purpose" msgstr "" -#: Step6.class:394 +#: Step6.class:329 msgid "Select which partitions to use for installation" msgstr "" @@ -789,7 +799,7 @@ msgid "Install everthing in the image (Fully Automated)" msgstr "" -#: Step7.class:126 Step8.class:111 +#: Step7.class:126 Step8.class:120 msgid "Customized" msgstr "" @@ -797,7 +807,7 @@ msgid "Select the components you wish to install (Advanced)" msgstr "" -#: Step7.class:144 Step8.class:113 +#: Step7.class:144 Step8.class:122 msgid "Minimal" msgstr "" @@ -805,43 +815,55 @@ msgid "Install the most minimal working confuguration (For older hardware)" msgstr "" -#: Step8.class:72 +#: Step8.class:44 +msgid "Distribution" +msgstr "" + +#: Step8.class:62 +msgid "Partitions to be used" +msgstr "" + +#: Step8.class:74 msgid "Not Formatted" msgstr "" -#: Step8.class:72 +#: Step8.class:74 msgid "Mount to" msgstr "" -#: Step8.class:74 +#: Step8.class:76 msgid "Format to" msgstr "" -#: Step8.class:74 +#: Step8.class:76 msgid "and mount to" msgstr "" -#: Step8.class:86 +#: Step8.class:88 msgid "Swap Space" msgstr "" -#: Step8.class:109 +#: Step8.class:101 +msgid "Pre-formatted to reiserfs, and used for /" +msgstr "" + +#: Step8.class:118 msgid "Full" msgstr "" -#: Step8.class:116 +#: Step8.class:125 msgid "Installation Method" msgstr "" -#: Step8.class:122 +#: Step8.class:131 msgid "Major Components" msgstr "" -#: Step8.class:132 +#: Step8.class:141 msgid "Additional Software" msgstr "" -#: Step8.class:209 +#: Step8.class:232 msgid "" "Your VectorLinux installation is about to be performed as follows. If you " "need to make any changes, this is your last chance." Modified: branches/speedy/.lang/Step3.pot ============================================================================== --- branches/speedy/.lang/Step3.pot (original) +++ branches/speedy/.lang/Step3.pot Wed Feb 25 14:08:32 2009 @@ -22,27 +22,27 @@ msgid "Select the partitioning method you would like to use" msgstr "" -#: Step3.class:153 +#: Step3.class:175 msgid "Automatic" msgstr "" -#: Step3.class:163 +#: Step3.class:185 msgid "Automatically resize your partitions and / or create the correct disk space for VectorLinux." msgstr "" -#: Step3.class:170 +#: Step3.class:192 msgid "Manually resize my partitions " msgstr "" -#: Step3.class:180 +#: Step3.class:202 msgid "Use the partitioning tool to prepare your system partitions." msgstr "" -#: Step3.class:187 +#: Step3.class:209 msgid "My hard drive is already partitioned" msgstr "" -#: Step3.class:197 +#: Step3.class:219 msgid "Install VectorLinux to existing partitions on my hard drive" msgstr "" Modified: branches/speedy/.lang/Step3a1a.pot ============================================================================== --- branches/speedy/.lang/Step3a1a.pot (original) +++ branches/speedy/.lang/Step3a1a.pot Wed Feb 25 14:08:32 2009 @@ -46,47 +46,47 @@ msgid "Create New" msgstr "" -#: Step3a1a.class:148 +#: Step3a1a.class:160 msgid "Failed to format partitions, please try another partitioning method" msgstr "" -#: Step3a1a.class:160 +#: Step3a1a.class:177 msgid "Partitioning stage complete. Click" msgstr "" -#: Step3a1a.class:160 +#: Step3a1a.class:177 msgid "to continue" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "WARNING:" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "All existing data in" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "is about to be deleted." msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "This step cannot be undone. Are you sure you want to continue?" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "Yes" msgstr "" -#: Step3a1a.class:169 +#: Step3a1a.class:186 msgid "No" msgstr "" -#: Step3a1a.class:173 +#: Step3a1a.class:190 msgid "Preparing hard disk for new partitioning structure. Please wait" msgstr "" -#: Step3a1a.class:193 +#: Step3a1a.class:210 msgid "Operation cancelled by user. No changes have been made to the system" msgstr "" Modified: branches/speedy/.lang/Step3a2.pot ============================================================================== --- branches/speedy/.lang/Step3a2.pot (original) +++ branches/speedy/.lang/Step3a2.pot Wed Feb 25 14:08:32 2009 @@ -42,39 +42,39 @@ msgid "Select the location on your hard drive where you would like to install VectorLinux" msgstr "" -#: Step3a2.class:191 +#: Step3a2.class:192 msgid "Please wait while your hard drive is being partitioned" msgstr "" -#: Step3a2.class:204 +#: Step3a2.class:205 msgid "Unable to find enough un-used space to perform auto-partition." msgstr "" -#: Step3a2.class:204 +#: Step3a2.class:205 msgid "Please consider using a different partitioning option." msgstr "" -#: Step3a2.class:206 +#: Step3a2.class:207 msgid "Unable to find enough un-used space to perform auto-partition. Please consider using a different partitioning option." msgstr "" -#: Step3a2.class:322 +#: Step3a2.class:359 msgid "Partitioning stage complete... Click" msgstr "" -#: Step3a2.class:322 +#: Step3a2.class:359 msgid "to continue" msgstr "" -#: Step3a2.class:352 +#: Step3a2.class:407 msgid "We are unable to find any hard disks with enough unpartitioned space for this operation." msgstr "" -#: Step3a2.class:352 +#: Step3a2.class:407 msgid "Please consider using another partitioning method." msgstr "" -#: Step3a2.class:354 +#: Step3a2.class:409 msgid "Unable to find any hard drives with enough unpartitioned space. Please go back and select another partitioning method" msgstr "" Modified: branches/speedy/.lang/Step5.pot ============================================================================== --- branches/speedy/.lang/Step5.pot (original) +++ branches/speedy/.lang/Step5.pot Wed Feb 25 14:08:32 2009 @@ -18,91 +18,99 @@ msgid "Resize partitions using Gparted" msgstr "" -#: Step5.class:64 +#: Step5.class:67 msgid "Gparted was not found on this system. Please install gparted and try again" msgstr "" #: Step5.class:69 +msgid "Unable to launch partitioning tool." +msgstr "" + +#: Step5.class:69 +msgid "The gparted program was not found on this system. Please install gparted or choose another partitioning method." +msgstr "" + +#: Step5.class:80 msgid "Loading partitioning utility...Please Wait" msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "The VectorLinux installer is unable to embed the gparted partitioning utility." msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "Please consider using the automatic partition option, or use other means of" msgstr "" -#: Step5.class:92 +#: Step5.class:103 msgid "partitioning your hard drives." msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "VectorLinux is about to launch the GParted partitioning tool. Use this utility to" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "move, resize, delete or create partitions." msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "When you are finished, you will need to exit the utility from the" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "GParted" msgstr "" -#: Step5.class:114 +#: Step5.class:125 msgid "menu" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "SYSTEM RESTART SUGGESTED" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "Your system still contains some non-linux partitions. If you still have a Windows operating system installed, it is recomended " msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "that you reboot your system at this time. " msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "Click the" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "button to restart your computer now, or click" msgstr "" -#: Step5.class:161 +#: Step5.class:172 msgid "to continue without restarting." msgstr "" -#: Step5.class:166 +#: Step5.class:177 msgid "PARTITIONING DONE" msgstr "" -#: Step5.class:166 +#: Step5.class:177 msgid "Click" msgstr "" -#: Step5.class:166 +#: Step5.class:177 msgid "to continue" msgstr "" -#: Step5.class:182 +#: Step5.class:193 msgid "Your computer will restart in 10 seconds" msgstr "" -#: Step5.class:239 +#: Step5.class:250 msgid "Loading partitioning utility ... Please Wait" msgstr "" -#: Step5.class:248 +#: Step5.class:259 msgid "Restart Now" msgstr "" Modified: branches/speedy/.lang/Step6.pot ============================================================================== --- branches/speedy/.lang/Step6.pot (original) +++ branches/speedy/.lang/Step6.pot Wed Feb 25 14:08:32 2009 @@ -54,15 +54,15 @@ msgid "Please select only one partition for this purpose" msgstr "" -#: Step6.class:394 +#: Step6.class:329 msgid "Select which partitions to use for installation" msgstr "" -#: Step6.class:499 +#: Step6.class:434 msgid "Yes" msgstr "" -#: Step6.class:499 +#: Step6.class:434 msgid "No" msgstr "" Modified: branches/speedy/.lang/Step8.pot ============================================================================== --- branches/speedy/.lang/Step8.pot (original) +++ branches/speedy/.lang/Step8.pot Wed Feb 25 14:08:32 2009 @@ -14,63 +14,75 @@ "Content-Type: text/plain; charset=UTF-8\n" "Content-Transfer-Encoding: 8bit\n" -#: Step8.class:71 +#: Step8.class:44 +msgid "Distribution" +msgstr "" + +#: Step8.class:62 +msgid "Partitions to be used" +msgstr "" + +#: Step8.class:73 msgid "Do not format" msgstr "" -#: Step8.class:72 +#: Step8.class:74 msgid "Not Formatted" msgstr "" -#: Step8.class:72 +#: Step8.class:74 msgid "Mount to" msgstr "" -#: Step8.class:74 +#: Step8.class:76 msgid "Format to" msgstr "" -#: Step8.class:74 +#: Step8.class:76 msgid "and mount to" msgstr "" -#: Step8.class:86 +#: Step8.class:88 msgid "Swap Space" msgstr "" -#: Step8.class:109 +#: Step8.class:101 +msgid "Pre-formatted to reiserfs, and used for /" +msgstr "" + +#: Step8.class:118 msgid "Full" msgstr "" -#: Step8.class:111 +#: Step8.class:120 msgid "Customized" msgstr "" -#: Step8.class:113 +#: Step8.class:122 msgid "Minimal" msgstr "" -#: Step8.class:116 +#: Step8.class:125 msgid "Installation Method" msgstr "" -#: Step8.class:121 +#: Step8.class:130 msgid "Software Selection" msgstr "" -#: Step8.class:122 +#: Step8.class:131 msgid "Major Components" msgstr "" -#: Step8.class:132 +#: Step8.class:141 msgid "Additional Software" msgstr "" -#: Step8.class:190 +#: Step8.class:213 msgid "Installation Summary" msgstr "" -#: Step8.class:209 +#: Step8.class:232 msgid "Your VectorLinux installation is about to be performed as follows. If you need to make any changes, this is your last chance." msgstr "" Modified: branches/speedy/Step3.class ============================================================================== --- branches/speedy/Step3.class (original) +++ branches/speedy/Step3.class Wed Feb 25 14:08:32 2009 @@ -41,24 +41,44 @@ ClsGlobal.fRunningMainForm.listview1["Step1"].picture = MdlStartUp.pDone ClsGlobal.fRunningMainForm.listview1["Step2"].picture = MdlStartUp.pNow IF ME.rbAutoPart.Value = TRUE THEN + + RETURN "Step3a" + END IF + IF ME.rbCustomPart.Value = TRUE THEN + + RETURN "Step5" + END IF + IF ME.rbPrePartitioned.Value = TRUE THEN + + RETURN "Step6" + END IF + +END + +PUBLIC SUB SET_PARTITIONING_METHOD() + + IF ME.rbAutoPart.Value = TRUE THEN ClsGlobal.bAutoPartition = TRUE PRINT " ---> Use built-in auto partition tools for partitioning" - RETURN "Step3a" + 'RETURN "Step3a" END IF IF ME.rbCustomPart.Value = TRUE THEN 'embed gparted PRINT " ---> Embed GParted for partitioning" ClsGlobal.bAutoPartition = FALSE - RETURN "Step5" + 'RETURN "Step5" END IF IF ME.rbPrePartitioned.Value = TRUE THEN ' Use existing partitions PRINT " ---> Install to pre-partitioned hard drive" ClsGlobal.bAutoPartition = FALSE - RETURN "Step6" + 'RETURN "Step6" END IF END + + + PUBLIC SUB StartUp() ME.Resize(ClsGlobal.fRunningMainForm.Pnlstack.Width, ClsGlobal.fRunningMainForm.PnlStack.Height) @@ -68,6 +88,8 @@ END PUBLIC SUB OnExit() + + ME.SET_PARTITIONING_METHOD() END Modified: branches/speedy/Step3a1a.class ============================================================================== --- branches/speedy/Step3a1a.class (original) +++ branches/speedy/Step3a1a.class Wed Feb 25 14:08:32 2009 @@ -87,7 +87,13 @@ sResults = Split(sSwapList, "\n") sSwapPart = sResults[0] PRINT " --- Use existing swap partition " & sSwapPart - ClsGlobal.sTargetSwap = sSwapPart ' set the address to the swap partition. + + ' detect size of swap partition + SHELL "parted " & Left(sSwapPart, Len("/dev/hda")) & " unit GB print | grep \"^ " & Right(sSwapPart, Len(sSwapPart) - Len("/dev/hda")) & "\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + 'Message("Size dump for swap " & sDump) + 'SHELL "echo \"" & Trim(sDump) & "\" cut -f 3 -d \' \'" TO sDump + + ClsGlobal.sTargetSwap = Trim(sSwapPart & "-" & Trim(sDump)) ' set the address to the swap partition. 'Message("Using swap " & sSwapPart) END SELECT ELSE ' no swap found @@ -132,8 +138,14 @@ PRINT " --- Creating swap partition at " & sDrive & "2 ... Size = " & lNeededSwap & " Kb" SHELL "parted " & sDrive & " mkpartfs primary linux-swap " & Trim(sPartedDetails[0]) & " " & Trim(sPartedDetails[2]) & " 1 > /dev/null " WAIT - ClsGlobal.sTargetRoot = sDrive & "1" - ClsGlobal.sTargetSwap = sDrive & "2" + ' get partition sizes now + SHELL "parted " & sDrive & " unit GB print | grep \"^ 1\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + 'SHELL "parted " & Left(sSwapPart, Len("/dev/hda")) & " unit GB print | grep \"^ " & Right(sSwapPart, Len(sSwapPart) - Len("/dev/hda")) & "\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump +' SHELL "echo \"" & Trim(sDump) & " cut -f 3 -d \' \'" TO sDump + ClsGlobal.sTargetRoot = Trim(sDrive & "1" & "-" & Trim(sDump)) + SHELL "parted " & sDrive & " unit GB print | grep \"^ 2\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + 'SHELL "echo \"" & Trim(sDump) & " cut -f 3 -d \' \'" TO sDump + ClsGlobal.sTargetSwap = Trim(sDrive & "2" & "-" & Trim(sDump)) ELSE @@ -148,8 +160,13 @@ sStatus = ("Failed to format partitions, please try another partitioning method") RETURN END IF + + SHELL "parted " & sDrive & " unit GB print | grep \"^ 1\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + 'SHELL "echo \"" & Trim(sDump) & " cut -f 3 -d \' \'" TO sDump + ClsGlobal.sTargetRoot = Trim(sDrive & "1" & "-" & Trim(sDump)) - ClsGlobal.sTargetRoot = sDrive & "1" + ' + 'ClsGlobal.sTargetRoot = sDrive & "1" 'SHELL "mkfs.reiserfs -q " & sDrive & "1" WAIT 'Message(sPartedDetails[0]) 'Message(sPartedDetails[1]) Modified: branches/speedy/Step3a2.class ============================================================================== --- branches/speedy/Step3a2.class (original) +++ branches/speedy/Step3a2.class Wed Feb 25 14:08:32 2009 @@ -25,9 +25,9 @@ ME.tlbanner.Text = "<h2>" & ("Install VectorLinux to free space on disk") & "</H2>" ME.MovieBox1.Path = "images/throbber.gif" ME.MovieBox1.Playing = FALSE - objTargetOptions = NEW Object[] + 'objTargetOptions = NEW Object[] - ME.LIST_FREE_SPACE() + 'ME.LIST_FREE_SPACE() END @@ -183,6 +183,7 @@ DIM sOutLine, sDumparr AS String[] DIM lFreeKB, lFreeStart, lFreeEnd AS Long DIM sRootPart, sSwapPart AS String + DIM sPart, sNum AS String ME.HPanel3.Visible = FALSE @@ -232,12 +233,22 @@ SHELL "parted " & Trim(sDrive) & " -s \"mkpart primary reiserfs 0kb -" & lNeededSwap & "kb\"" WAIT ' partition 1 'WAIT 1 - SHELL "parted " & Trim(sDrive) & " -s \"mkpart primary linux-swap -" & lNeededSwap & "kb -1kb\"" WAIT ' partition 2 - SHELL "mkswap " & Trim(sDrive) & (iLastPartNo + 2) WAIT ' make the swap partition - EXEC ["swapon", Trim(sDrive) & (iLastPartNo + 2)] WAIT - + SHELL "probepart | grep -i \"linux swap\"| cut -f 1 -d \' \'" TO sDump + sDump = Trim(sDump) ' this is possibly an array + IF sDump THEN + sDumparr = Split(sDump, "\n") + PRINT " ---+ Use existing swap partition -> " & sDumparr[0] + sSwapPart = Trim(sDumparr[0]) + + + ELSE + SHELL "parted " & Trim(sDrive) & " -s \"mkpart primary linux-swap -" & lNeededSwap & "kb -1kb\"" WAIT ' partition 2 + SHELL "mkswap " & Trim(sDrive) & (iLastPartNo + 2) WAIT ' make the swap partition + EXEC ["swapon", Trim(sDrive) & (iLastPartNo + 2)] WAIT + sSwapPart = Trim(sdrive) & (iLastPartNo + 2) + END IF sRootPart = Trim(sdrive) & (iLastPartNo + 1) - sSwapPart = Trim(sdrive) & (iLastPartNo + 2) + ' Ready to start setting defined target partitions. '################################################################################################################### @@ -262,13 +273,26 @@ SHELL "parted " & Trim(sDrive) & " -s \"mkpart primary reiserfs " & lFreeStart & "kb " & (lFreeEnd - lNeededSwap) & "kb\"" WAIT 'iLastpart + 1 partition EXEC ["mkfs.reiserfs", "-fq", sDrive & (iLastPartNo + 1)] WAIT PRINT " --- Created / partition preformatted to reiserfs " & Trim(sdrive) & (iLastPartNo + 1) + + SHELL "probepart | grep -i \"linux swap\"| cut -f 1 -d \' \'" TO sDump + sDump = Trim(sDump) ' this is possibly an array + IF sDump THEN + sDumparr = Split(sDump, "\n") + PRINT " ---+ Use existing swap partition -> " & sDumparr[0] + sSwapPart = Trim(sDumparr[0]) + + + ELSE + + SHELL "parted " & Trim(sdrive) & " -s \"mkpart primary linux-swap " & (lFreeEnd - lNeededSwap) & "kb " & lFreeEnd & "kb\"" WAIT ' ilastpart + 2 partitiong PRINT " --- Created swap partition " & Trim(sdrive) & (iLastPartNo + 2) SHELL "mkswap " & Trim(sdrive) & (iLastPartNo + 2) WAIT SHELL "swapon " & Trim(sdrive) & (iLastPartNo + 2) WAIT - - sRootPart = Trim(sdrive) & (iLastPartNo + 1) sSwapPart = Trim(sdrive) & (iLastPartNo + 2) + END IF + sRootPart = Trim(sdrive) & (iLastPartNo + 1) + ELSE ' this method skips one number I think ' BEGIN BY CREATING AN EXTENDED PARTITION TO HOLD LOGICAL PARTITIONS IN IT @@ -291,7 +315,18 @@ SHELL "parted " & Trim(sDrive) & " -s \"mkpart logical reiserfs " & lFreeStart & "kb " & (lFreeEnd - lNeededSwap) & "kb\"" WAIT 'SHELL "echo yes | parted " & Trim(sdrive) & " mkfs reiserfs " & (iLastPartNo + 2) WAIT SHELL "mkfs.reiserfs -fq " & sDrive & (iLastPartNo + 2) WAIT - + + ' search for existing swap partitions + SHELL "probepart | grep -i \"linux swap\"| cut -f 1 -d \' \'" TO sDump + sDump = Trim(sDump) ' this is possibly an array + IF sDump THEN + sDumparr = Split(sDump, "\n") + PRINT " ---+ Use existing swap partition -> " & sDumparr[0] + sSwapPart = Trim(sDumparr[0]) + + + ELSE + ' ####################### RECALCULATE FREE SPACE ######################################## SHELL "parted " & Trim(sDrive) & " unit gb print free | grep -i \"free space\" | tr -s \' \',\"\" | cut -f 2-4 -d \' \'" TO sPartedRes 'Message(sPartedRes) @@ -312,8 +347,10 @@ ' ' ' ' ' "EOF" ' ' ' ' ' File.Save("/tmp/swapmaker", sDump) ' ' ' ' ' SHELL "sh /tmp/swapmaker" WAIT + sSwapPart = Trim(sdrive) & (iLastPartNo + 3) + END IF sRootPart = Trim(sdrive) & (iLastPartNo + 2) - sRootPart = Trim(sdrive) & (iLastPartNo + 3) + END IF END IF @@ -324,8 +361,22 @@ ' set the flag for partition reading ClsGlobal.bAutoPartition = TRUE - ClsGlobal.sTargetRoot = sRootPart - ClsGlobal.sTargetSwap = sSwapPart + + sPart = Left(sRootPart, Len("/dev/hda")) + sNum = Right(sRootPart, Len(sRootPart) - Len(sPart)) + + ' get the size of the / partition that was just created. + SHELL "parted " & sPart & " unit GB print | grep \"^ " & sNum & "\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + + sDump = Trim(sDump) + ClsGlobal.sTargetRoot = sRootPart & "-" & Trim(sDump) + + ' get the size of the swap partition that was just created. + sPart = Left(sSwapPart, Len("/dev/hda")) + sNum = Right(sSwapPart, Len(sSwapPart) - Len(sPart)) + SHELL "parted " & sPart & " unit GB print | grep \"^ " & sNum & "\" | tr -s \' \',\"\" | cut -f 5 -d \' \'" TO sDump + sDump = Trim(sDump) + ClsGlobal.sTargetSwap = sSwapPart & "-" & Trim(sDump) @@ -336,13 +387,17 @@ PUBLIC FUNCTION GETNEXT() AS String - + RETURN "Step7" END PUBLIC SUB STARTUP() - 'ME.LIST_FREE_SPACE() + DIM i AS Integer + + objTargetOptions = NEW Object[] + ME.LIST_FREE_SPACE() + FOR EACH RadioButton1 IN objTargetOptions IF RadioButton1.Enabled = TRUE THEN INC i NEXT @@ -362,6 +417,7 @@ PUBLIC SUB ONEXIT() ' CREATE THE PARTITIONS NOW + ME.PERFORM_PARTITIONING() END @@ -374,6 +430,6 @@ PUBLIC SUB Form_Menu() - ME.PERFORM_PARTITIONING() + 'ME.PERFORM_PARTITIONING() END Modified: branches/speedy/Step5.class ============================================================================== --- branches/speedy/Step5.class (original) +++ branches/speedy/Step5.class Wed Feb 25 14:08:32 2009 @@ -29,6 +29,9 @@ PUBLIC SUB StartUp() ME.Resize(ClsGlobal.fRunningMainForm.Pnlstack.Width, ClsGlobal.fRunningMainForm.PnlStack.Height) + ME.tlEmbDone.Visible = FALSE + ME.tlEmbDone.Parent.Visible = FALSE + ME.Embedder1.Visible = TRUE ME.EMBED_GPARTED() END @@ -62,6 +65,14 @@ IF Exist("/usr/sbin/gparted") = FALSE THEN Message.Error(("Gparted was not found on this system. Please install gparted and try again")) + ME.tlEmbDone.Text = "<b>" & ("Unable to launch partitioning tool.") & "</b>" & "<br><br>" & + ("The gparted program was not found on this system. Please install gparted or choose another partitioning method.") + ClsGlobal.fRunningMainForm.btnext.Enabled = FALSE + Embedder1.Visible = FALSE + tlEmbDone.Parent.Visible = TRUE + tlEmbDone.Visible = TRUE + + RETURN END IF Modified: branches/speedy/Step8.class ============================================================================== --- branches/speedy/Step8.class (original) +++ branches/speedy/Step8.class Wed Feb 25 14:08:32 2009 @@ -42,10 +42,11 @@ WITH ME.TreeView1 .Add("DistroInfo", ("Distribution"), MdlStartUp.pCategory) - .Add("Distro0", ("Name"), PicInfo, "DistroInfo") - .Add("Distro00", Trim(ClsGlobal.sDistroName),, "Distro0") - .Add("Distro1", ("Version"), PicInfo, "DistroInfo") - .Add("Distro10", Trim(ClsGlobal.sDistroVer),, "Distro1") + .Add("Distro0", ClsGlobal.sDistroName & Space(1) & ClsGlobal.sDistroVer, PicInfo, "DistroInfo") + '.Add("Distro0", ("Name"), PicInfo, "DistroInfo") + '.Add("Distro00", Trim(ClsGlobal.sDistroName),, "Distro0") + '.Add("Distro1", ("Version"), PicInfo, "DistroInfo") + '.'Add("Distro10", Trim(ClsGlobal.sDistroVer),, "Distro1") END WITH END @@ -59,6 +60,7 @@ WITH ME.TreeView1 .Add("Part", ("Partitions to be used"), MdlStartUp.pCategory) + IF ClsGlobal.bAutoPartition = FALSE THEN sArr = Split(ClsGlobal.sVitalPartList, ",") FOR i = 0 TO sArr.Max sList = Trim(sArr[i]) @@ -93,7 +95,14 @@ .Add("Swaps" & i, Left(sSwap, InStr(sSwap, "-") - 1) & Space(1) & " -- " & Right(sSwap, Len(sSwap) - InStr(sSwap, "-")), PicDisk, "Swaps") END IF NEXT - + ELSE ' AUTOMATIC PARTITIONING SELECTED + 'Message("Automatic partition selection") + .Add("Part1", Replace(ClsGlobal.sTargetRoot, "-", " -- "), PicDisk, "Part") + .Add("Part1.1", ("Pre-formatted to reiserfs, and used for /"), PicTask, "Part1") + .Add("Swaps", ("Swap Space"),, "Part") + .Add("Swaps1", Replace(ClsGlobal.sTargetSwap, "-", " -- "), PicDisk, "Swaps") + '.Add("Swaps1.1", + END IF END WITH END @@ -152,11 +161,25 @@ END + +PUBLIC SUB Expand_Tree() + + ME.TreeView1["DistroInfo"].Expanded = TRUE + ME.TreeView1["Part"].Expanded = TRUE + ME.TreeView1["Install Type"].Expanded = TRUE + IF ME.TreeView1.Exist("Software") THEN + ME.TreeView1["Software"].Expanded = TRUE + END IF + +END + + PUBLIC SUB StartUp() ME.TreeView1.Clear() ME.SUMMARIZE_DISTRO_INFO() ME.SUMMARIZE_PARTITION_SELECTION() ME.SUMMARIZE_INSTALL_TYPE() + ME.Expand_Tree() END |