From: <cod...@go...> - 2007-08-17 00:13:03
|
Author: easuter Date: Thu Aug 16 13:16:38 2007 New Revision: 22 Modified: trunk/.lang/.pot trunk/.lang/Functions.pot trunk/.lang/Global.pot trunk/.lang/InputBox.pot trunk/.lang/Main.pot trunk/.lang/Utils.pot trunk/.lang/cDiskInfo.pot trunk/.lang/cPartInfo.pot trunk/.lang/cPartInstall.pot trunk/.lang/frmChoice.pot trunk/.lang/frmConfig.pot trunk/.lang/frmDriveSelect.pot trunk/.lang/frmGO.pot trunk/.lang/frmMain.pot trunk/.lang/frmPackages.pot trunk/.lang/frmPartSelect.pot trunk/.lang/frmPartitioner.pot trunk/.lang/frmPartitions.pot trunk/.lang/frmTools.pot trunk/.lang/frmWelcome.pot trunk/Functions.module trunk/Global.class trunk/frmDriveSelect.class Log: Changes: -Global module: instDriveIndex long integer variable added to hold the index corresponding to the installDrive string variable -frmDriveSelect.class: code added to assign the selected drive index in the gridDisk_Click() event -Functions: AutoRootSize function now uses the hard-drive data stored in the Global.DiskInfo array and no longer repeats the use of the fdisk command Modified: trunk/.lang/.pot ============================================================================== --- trunk/.lang/.pot (original) +++ trunk/.lang/.pot Thu Aug 16 13:16:38 2007 @@ -18,16 +18,16 @@ msgid "Enter a value:" msgstr "" -#: InputBox.class:205 frmDriveSelect.class:126 frmPartSelect.class:372 +#: InputBox.class:205 frmDriveSelect.class:129 frmPartSelect.class:372 msgid "OK" msgstr "" -#: InputBox.class:212 frmChooseFB.class:91 frmDriveSelect.class:133 +#: InputBox.class:212 frmChooseFB.class:91 frmDriveSelect.class:136 #: frmPartSelect.class:379 msgid "Cancel" msgstr "" -#: frmChoice.class:94 +#: frmChoice.class:95 msgid "" "<center><h3><b>You have 3 choices:</b></h3></center>\n" "\n" @@ -48,23 +48,23 @@ "</ul>\n" msgstr "" -#: frmChoice.class:105 +#: frmChoice.class:106 msgid "Choose install type" msgstr "" -#: frmChoice.class:120 +#: frmChoice.class:121 msgid "Install types" msgstr "" -#: frmChoice.class:125 +#: frmChoice.class:126 msgid "Full-automatic" msgstr "" -#: frmChoice.class:131 +#: frmChoice.class:132 msgid "Semi-automatic" msgstr "" -#: frmChoice.class:137 +#: frmChoice.class:138 msgid "Advanced" msgstr "" @@ -206,11 +206,11 @@ msgid "Config 2" msgstr "" -#: frmDriveSelect.class:107 frmPartSelect.class:347 +#: frmDriveSelect.class:110 frmPartSelect.class:347 msgid "Drives" msgstr "" -#: frmDriveSelect.class:115 +#: frmDriveSelect.class:118 msgid "Click on a row to select..." msgstr "" Modified: trunk/.lang/Functions.pot ============================================================================== --- trunk/.lang/Functions.pot (original) +++ trunk/.lang/Functions.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/Functions.module +# /home/easuter/vinstall-ng/Functions.module # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/Global.pot ============================================================================== --- trunk/.lang/Global.pot (original) +++ trunk/.lang/Global.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/Global.class +# /home/easuter/vinstall-ng/Global.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/InputBox.pot ============================================================================== --- trunk/.lang/InputBox.pot (original) +++ trunk/.lang/InputBox.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/InputBox.class +# /home/easuter/vinstall-ng/InputBox.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/Main.pot ============================================================================== --- trunk/.lang/Main.pot (original) +++ trunk/.lang/Main.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/Main.module +# /home/easuter/vinstall-ng/Main.module # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/Utils.pot ============================================================================== --- trunk/.lang/Utils.pot (original) +++ trunk/.lang/Utils.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/Utils.module +# /home/easuter/vinstall-ng/Utils.module # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/cDiskInfo.pot ============================================================================== --- trunk/.lang/cDiskInfo.pot (original) +++ trunk/.lang/cDiskInfo.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/cDiskInfo.class +# /home/easuter/vinstall-ng/cDiskInfo.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/cPartInfo.pot ============================================================================== --- trunk/.lang/cPartInfo.pot (original) +++ trunk/.lang/cPartInfo.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/cPartInfo.class +# /home/easuter/vinstall-ng/cPartInfo.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/cPartInstall.pot ============================================================================== --- trunk/.lang/cPartInstall.pot (original) +++ trunk/.lang/cPartInstall.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/cPartInstall.class +# /home/easuter/vinstall-ng/cPartInstall.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmChoice.pot ============================================================================== --- trunk/.lang/frmChoice.pot (original) +++ trunk/.lang/frmChoice.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmChoice.class +# /home/easuter/vinstall-ng/frmChoice.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. @@ -14,27 +14,27 @@ "Content-Type: text/plain; charset=UTF-8\n" "Content-Transfer-Encoding: 8bit\n" -#: frmChoice.class:94 +#: frmChoice.class:95 msgid "<center><h3><b>You have 3 choices:</b></h3></center>\n\n<ul>\n<li><b><u>Full-automatic install:</u></b> Our easiest install yet; choose this option if you want to use your entire hard disk for VL. Your system will be automatically set up, partitions and all. <font color=\"#FF0000\">WARNING: this option will DELETE everything on your hard disk, or offer a choice if there are multiple disks.</font> There will of course be a confirmation dialog in case you selected this option by mistake.</li>\n<li><b><u>Semi-automatic install:</u></b> With this option, you manually partition your drives with gparted, but the rest of the setup will be pretty automatic.</li>\n<li><b><u>Advanced install:</u></b> For the technically savvy user that must do everything by hand. You can control most aspects of the install. However, there will be assisted options available all the way through, so this is a very flexible install.</li>\n</ul>\n" msgstr "" -#: frmChoice.class:105 +#: frmChoice.class:106 msgid "Choose install type" msgstr "" -#: frmChoice.class:120 +#: frmChoice.class:121 msgid "Install types" msgstr "" -#: frmChoice.class:125 +#: frmChoice.class:126 msgid "Full-automatic" msgstr "" -#: frmChoice.class:131 +#: frmChoice.class:132 msgid "Semi-automatic" msgstr "" -#: frmChoice.class:137 +#: frmChoice.class:138 msgid "Advanced" msgstr "" Modified: trunk/.lang/frmConfig.pot ============================================================================== --- trunk/.lang/frmConfig.pot (original) +++ trunk/.lang/frmConfig.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmConfig.class +# /home/easuter/vinstall-ng/frmConfig.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmDriveSelect.pot ============================================================================== --- trunk/.lang/frmDriveSelect.pot (original) +++ trunk/.lang/frmDriveSelect.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmDriveSelect.class +# /home/easuter/vinstall-ng/frmDriveSelect.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. @@ -14,19 +14,19 @@ "Content-Type: text/plain; charset=UTF-8\n" "Content-Transfer-Encoding: 8bit\n" -#: frmDriveSelect.class:107 +#: frmDriveSelect.class:110 msgid "Drives" msgstr "" -#: frmDriveSelect.class:115 +#: frmDriveSelect.class:118 msgid "Click on a row to select..." msgstr "" -#: frmDriveSelect.class:126 +#: frmDriveSelect.class:129 msgid "OK" msgstr "" -#: frmDriveSelect.class:133 +#: frmDriveSelect.class:136 msgid "Cancel" msgstr "" Modified: trunk/.lang/frmGO.pot ============================================================================== --- trunk/.lang/frmGO.pot (original) +++ trunk/.lang/frmGO.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmGO.class +# /home/easuter/vinstall-ng/frmGO.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmMain.pot ============================================================================== --- trunk/.lang/frmMain.pot (original) +++ trunk/.lang/frmMain.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmMain.class +# /home/easuter/vinstall-ng/frmMain.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmPackages.pot ============================================================================== --- trunk/.lang/frmPackages.pot (original) +++ trunk/.lang/frmPackages.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmPackages.class +# /home/easuter/vinstall-ng/frmPackages.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmPartSelect.pot ============================================================================== --- trunk/.lang/frmPartSelect.pot (original) +++ trunk/.lang/frmPartSelect.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmPartSelect.class +# /home/easuter/vinstall-ng/frmPartSelect.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmPartitioner.pot ============================================================================== --- trunk/.lang/frmPartitioner.pot (original) +++ trunk/.lang/frmPartitioner.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmPartitioner.class +# /home/easuter/vinstall-ng/frmPartitioner.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmPartitions.pot ============================================================================== --- trunk/.lang/frmPartitions.pot (original) +++ trunk/.lang/frmPartitions.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmPartitions.class +# /home/easuter/vinstall-ng/frmPartitions.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmTools.pot ============================================================================== --- trunk/.lang/frmTools.pot (original) +++ trunk/.lang/frmTools.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmTools.class +# /home/easuter/vinstall-ng/frmTools.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/.lang/frmWelcome.pot ============================================================================== --- trunk/.lang/frmWelcome.pot (original) +++ trunk/.lang/frmWelcome.pot Thu Aug 16 13:16:38 2007 @@ -1,4 +1,4 @@ -# /home/moe/projects/vl-installer/frmWelcome.class +# /home/easuter/vinstall-ng/frmWelcome.class # Generated by Gambas compiler # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. Modified: trunk/Functions.module ============================================================================== --- trunk/Functions.module (original) +++ trunk/Functions.module Thu Aug 16 13:16:38 2007 @@ -277,24 +277,13 @@ DIM iTotalSize AS Long DIM sTemp AS String -IF Global.enumPARTMODE = 0 THEN 'Use entire drive - IF Global.SimulationMode = TRUE THEN - sTemp = "3800000" - ELSE 'Get real value from fdisk - SHELL "fdisk -s " & Global.installDrive TO sTemp - ENDIF - - iTotalSize = CLng(Val(Trim$(sTemp))) * 1024 'Convert to long integer and turn value into bytes +IF partmode = 0 THEN 'Use entire drive + iTotalSize = Global.DiskInfo[Global.instDriveIndex - 1].Bytes iRootSize = iTotalSize - CalcSwap(Global.SysMemory) - -ELSE IF Global.enumPARTMODE = 1 'Use only free space - IF Global.SimulationMode = TRUE THEN - sTemp = "3800000" - ELSE - 'Do whatever needs to be done to get free space values from available partitions - ENDIF +ELSE IF partmode = 1 'Use only free space on partition + 'Do whatever needs to be done to get free space values from available partitions ELSE - Message.Error("Unacceptable partition mode (" & Global.enumPARTMODE & ") for AutoRootSize function.") + Message.Error("Unacceptable partition mode (" & partmode & ") for AutoRootSize function.") ENDIF RETURN iRootSize Modified: trunk/Global.class ============================================================================== --- trunk/Global.class (original) +++ trunk/Global.class Thu Aug 16 13:16:38 2007 @@ -64,6 +64,7 @@ 'temp stuff 2 check out: STATIC PUBLIC installDrive AS String +STATIC PUBLIC instDriveIndex AS Long ' Boot Manager variables STATIC PUBLIC MBRSel AS String ' MBR to use in case there is more than 1 Modified: trunk/frmDriveSelect.class ============================================================================== --- trunk/frmDriveSelect.class (original) +++ trunk/frmDriveSelect.class Thu Aug 16 13:16:38 2007 @@ -4,6 +4,7 @@ PRIVATE MaxDisks AS Long PRIVATE selectedDisk AS String +PRIVATE selectedDiskIndex AS Long PUBLIC SUB Form_Open() DIM arrTemp AS NEW String[] @@ -64,6 +65,7 @@ NEXT gridDisk[gridDisk.Row, 3].Text = "+++" selectedDisk = gridDisk[gridDisk.Row, 0].Text + selectedDiskIndex = gridDisk.Row ENDIF END @@ -72,6 +74,7 @@ IF selectedDisk = "" THEN selectedDisk = gridDisk[1, 0].Text Global.installDrive = selectedDisk +Global.instDriveIndex = selectedDiskIndex IF Global.DebugMode = TRUE THEN message.Info(Global.installDrive) ME.Close(TRUE) |