Menu
▾
▴
[Vectorlinux-devel] [vinstall-ng commit] r109 - branches/iVL
|
From: <cod...@go...> - 2008-08-07 22:01:27
|
Author: M0...@gm...
Date: Thu Aug 7 15:01:23 2008
New Revision: 109
Modified:
branches/iVL/FrmLilo.class
branches/iVL/MdlLiloOsList.module
branches/iVL/Order
Log:
- Lilo OS choices is getting better.
- Began lilo.conf construct ( see Order)
Modified: branches/iVL/FrmLilo.class
==============================================================================
--- branches/iVL/FrmLilo.class (original)
+++ branches/iVL/FrmLilo.class Thu Aug 7 15:01:23 2008
@@ -20,6 +20,8 @@
PUBLIC SUB Form_Open()
+
+
' FMain.FrmCurr = ME
' FMain.tvPlan["Conf0"].Selected = TRUE
' FMain.tvPlan["Conf0"].Picture = MdlCore.sNowPic
@@ -78,9 +80,24 @@
END
PUBLIC SUB FBResolution_Click()
-
+ DIM box AS TextBox
ME.sVidMode = Trim(ME.FBResolution.Text)
- MdlLiloOsList.LIST_LILO_OS_CHOICES()
+ 'MdlLiloOsList.LIST_LILO_OS_CHOICES()
+ IF Trim(ME.FBResolution.Text) = "Standard" THEN
+ FOR EACH box IN MdlLiloOsList.txtAppends
+ box.Enabled = FALSE
+ box.text = "Not available in \'Standard\' resolution mode"
+ box.Width = MdlObjSizer.get_object_width(box.text) + 12
+ NEXT
+
+ ELSE
+ FOR EACH box IN MdlLiloOsList.txtAppends
+ box.Enabled = TRUE
+ box.text = "splash=silent"
+ box.Width = box.Parent.Width - MdlLiloOsList.iAppendLeft - 12
+ NEXT
+ END IF
+
END
Modified: branches/iVL/MdlLiloOsList.module
==============================================================================
--- branches/iVL/MdlLiloOsList.module (original)
+++ branches/iVL/MdlLiloOsList.module Thu Aug 7 15:01:23 2008
@@ -17,6 +17,8 @@
PRIVATE cbarr AS Object[]
PRIVATE sText AS String
+PUBLIC txtAppends AS Object[]
+PUBLIC iAppendLeft AS Integer
PUBLIC SUB LIST_LILO_OS_CHOICES()
DIM sFatList AS String
@@ -38,6 +40,7 @@
x = 4
y = 4
+txtAppends = NEW Object[]
FrmLilo.TabStrip1.Count = 1
cbarr = NEW Object[]
@@ -73,6 +76,8 @@
ELSE
FrmLilo.TabStrip1[i].text = sLiloDesc
END IF
+ WITH FrmLilo.TabStrip1
+ .Index = i
tl = NEW TextLabel(FrmLilo.TabStrip1) AS "OSIntro"
WITH tl
@@ -113,47 +118,29 @@
.Move(4, txtAppnd.top + txtAppnd.Height + 4,
MdlObjSizer.get_object_width(.text))
.Height = 27
.Alignment = Align.Normal
+ ME.iAppendLeft = .x + .Width + 4
END WITH
- txtAppnd = NEW TextBox(FrmLilo.TabStrip1) AS "AppendBox"
+
+ txtAppnd = NEW TextBox(FrmLilo.TabStrip1) AS "AppendBox"
WITH txtAppnd
.Move(tl.Left + tl.Width + 8, tl.top, tl.Width)
IF FrmLilo.sVidMode <> "Standard" THEN
.Enabled = TRUE
.text = "splash=silent"
+ .Width = FrmLilo.TabStrip1.Width - tl.Width
ELSE
.Enabled = FALSE
- .Text = "not available"
+ .Text = "not available in \'Standard\' Resolution mode"
+ .Width = MdlObjSizer.get_object_width(.text) + 12
END IF
.Height = 27
+ txtAppends.Add(txtAppnd)
END WITH
-
- ' ' '
- ' ' ' 'Message.Info(FrmLilo.TabStrip1.Count)
- ' ' ' FrmLilo.TabStrip1[FrmLilo.TabStrip1.Count].text =
sLiloDesc
- ' ' ' RETURN
- ' ' ' cbLiloItem = NEW CheckBox(FrmLiloOsList.scrlOsList)
AS "OsList"
- ' ' '
- ' ' '
- ' ' ' WITH cbLiloItem
- ' ' ' .x = x
- ' ' ' .y = y
- ' ' ' IF sLiloDesc <> "Linux" THEN
- ' ' ' .Text = sLiloDesc & Space(1) & "Linux" & Space(1)
& "on" & Space(1) & arrLinux[i]
- ' ' ' ELSE
- ' ' ' .Text = sLiloDesc
- ' ' ' END IF
- ' ' '
- ' ' ' .tag = arrLinux[i]
- ' ' ' .Height = 27
- ' ' ' .Width = MdlObjSizer.get_object_width(.text) + 36 '
allow room for the checkbox
- ' ' ' .Value = TRUE
- ' ' '
- ' ' ' END WITH
- ' ' '
- ' ' ' cbarr.Add(cbLiloItem)
- ' ' ' y = y + cbLiloItem.Height + 4
+
+ END WITH ' end jacking with the tabstrip itself
+
END IF
@@ -164,6 +151,16 @@
END
+
+PUBLIC SUB IncludeOs_click()
+ IF LAST.value = FALSE THEN
+Message("Excluding " & FrmLilo.TabStrip1.Current.text & " from the boot
menu")
+END IF
+
+
+END
+
+
PUBLIC SUB OsList_click()
Modified: branches/iVL/Order
==============================================================================
--- branches/iVL/Order (original)
+++ branches/iVL/Order Thu Aug 7 15:01:23 2008
@@ -1,27 +1,12 @@
-(09:55:32 AM) uelsk8s: 1 ... $MNTPNT/veclinux/required veclinux.tlz, then
vlconfig.tlz
-(09:55:32 AM) uelsk8s: 2 $MNTPNT/veclinux/optional
-(09:55:32 AM) uelsk8s: 3 $mntpnt/packages/* (except required)
-(09:55:32 AM) uelsk8s: 4 $mntpint/packages/required
-(09:55:32 AM) uelsk8s: 5 $MNTPNT/veclinux/required/vlconfig2.tlz
-(09:55:57 AM) uelsk8s: because they are not listed in packages.txt for the
user to select from
-(09:56:13 AM) uelsk8s: they have to be installed or the install will break
-
-
-(07:38:13 AM) uelsk8s: for i in $(ls packages/*/*.tlz|grep -v required);do
install-pkg $i $ROOT || echo FAILED;done
-
-TODO:
- + Add option to format partition to swap
- + Modify partition listing so that it hides (or disables) selecting the
partition which hosts the ISO to be used for the new install
- + Add option to mount (but not format) linux partitions. (add
/mnt/<partition_addr> to the combobox list)
-
-
- Required bulkd
- optional (selected) bulks
- optional (selected) from PACKAGES.TXT
- packages/required
- CONF from SETUP.CONF
- Kernel (below)
-
-
-
- + need to copy SOURCE_MNT_POINT/isolinux/kernel/sata to
TARGET_MNT_POINT/boot/vmlinuz-2.6.25.7
\ No newline at end of file
+HOW TO GENERATE LILO.CONF IDEA
+1) Populate the tabstrip in FrmLilo with all the OSs found in the system
+2) let the usr customize each OS's append lines and other options?
+3) Provide a button for the user to press when done. On this event, the
following needs to happen
+ * Run through each tab in the tabstrip and determine if the checkbox
has been ticked on or off
+ + if off, then exclude that entire section from the lilo.conf else
+ - Generate a lilo.conf entry with the information in that tab
+Hope this works.
+For WINDOWS partitions (installations) simply list the install location
+ (maybe look for WINDOWS or WINDOWS\SYSTEM32 to be sure it's a real
install)
+ and do not offer any other options. just to include / exclude from the
menu
+
\ No newline at end of file
|
