add profiles for larch 7

10 files changed, 1293 insertions, 0 deletions

diff --git a/build_tools/larch7/larch0/gui/layouts/docviewer.uim b/build_tools/larch7/larch0/gui/layouts/docviewer.uim
new file mode 100644
index 0000000..8e85a0f
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/docviewer.uim
@@ -0,0 +1,72 @@
+# docviewer.uim - The layout for the documentation viewer widget
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.05.21
+
+[
+    ['Frame', 'doc:page',
+            {   'layout':
+                    ['VBOX',
+                        ['HBOX', 'doc:header', '*', 'doc:back', 'doc:forward',
+                                'doc:home', 'doc:parent', 'doc:hide'],
+                        'doc:content'
+                    ]
+            }
+    ],
+    ['Label', 'doc:header',
+            {   'markup': ['h2', _("Documentation")]
+            }
+    ],
+    ['HtmlView', 'doc:content', {}],
+    ['Button', 'doc:hide',
+            {   'text': _("Hide"),
+                'tt': _("Return to the larch controls"),
+                'clicked': ''
+            },
+    ],
+    ['Button','doc:back',
+            {   'icon': 'left',
+                'tt': _("Go back in the viewing history"),
+                'clicked': ''
+            },
+    ],
+    ['Button','doc:forward',
+            {   'icon': 'right',
+                'tt': _("Go forward in the viewing history"),
+                'clicked': ''
+            },
+    ],
+
+    ['Button','doc:home',
+            {   'icon': 'reload',
+                'tt': _("Reload the documentation for the current larch tab"),
+                'clicked': ''
+            },
+    ],
+
+    ['Button','doc:parent',
+            {   'icon': 'up',
+                'tt': _("Go to the general larch documentation index"),
+                'clicked': ''
+            },
+    ],
+
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/editor.uim b/build_tools/larch7/larch0/gui/layouts/editor.uim
new file mode 100644
index 0000000..2338f6e
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/editor.uim
@@ -0,0 +1,92 @@
+# editor.uim - The layout for the editor widget
+#
+# (c) Copyright 2009-2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.05.21
+
+[
+    ['Frame', 'edit:page',
+            {   'layout':
+                    ['VBOX',
+                        ['HBOX', 'edit:header', '*', 'edit:title'],
+                        ['HBOX', 'edit:content',
+                            ['VBOX', 'edit:copy', 'edit:cut', 'edit:paste',
+                                    'edit:undo', 'edit:redo', 'edit:revert',
+                                    '*', 'edit:cancel', 'edit:ok'
+                            ]
+                        ]
+                    ]
+            }
+    ],
+    ['Label', 'edit:header',
+            {   'markup': ['h2', _("Editor")]
+            }
+    ],
+    ['Label', 'edit:title', {}],
+    ['TextEdit', 'edit:content', {}],
+    ['Button', 'edit:ok',
+            {   'text': _('OK'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:cancel',
+            {   'text': _('Cancel'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:revert',
+            {   'text': _('Revert'),
+                'tt': _('Restore the text to its initial/default state'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:copy',
+            {   'text': _('Copy'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:cut',
+            {   'text': _('Cut'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:paste',
+            {   'text': _('Paste'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:undo',
+            {   'text': _('Undo'),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'edit:redo',
+            {   'text': _('Redo'),
+                'clicked': ''
+            }
+    ],
+
+    ['DATA', 'editor_data',
+            {   'messages':
+                    {   'msg_dflt':  _("Editing '%s'")
+                    }
+            },
+    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/logger.uim b/build_tools/larch7/larch0/gui/layouts/logger.uim
new file mode 100644
index 0000000..0ecb7bf
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/logger.uim
@@ -0,0 +1,57 @@
+# logger.uim - The layout for the logging widget
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.05.22
+
+[
+    ['Frame', 'log:page',
+            {   'layout':
+                    ['VBOX',
+                        'log:header',
+                        ['HBOX',
+                            'log:text',
+                            ['VBOX', 'log:clear', '*', 'log:hide']
+                        ]
+                    ]
+             }
+    ],
+    ['Label', 'log:header',
+            {   'markup': ['', ['h2', _("Low-level Command Logging")],
+                        ['p', _("Here you can follow the detailed, low-level"
+                        " progress of the commands.")]]
+            }
+    ],
+    ['TextEdit', 'log:text',
+            {   'ro': True
+            }
+    ],
+    ['Button', 'log:clear',
+            {   'text': _("Clear"),
+                'clicked': ''
+            }
+    ],
+    ['Button', 'log:hide',
+            {   'text': _("Hide"),
+                'tt': _("Go back to the larch controls"),
+                'clicked': ''
+            }
+    ]
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/page_installation.uim b/build_tools/larch7/larch0/gui/layouts/page_installation.uim
new file mode 100644
index 0000000..0949dcd
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_installation.uim
@@ -0,0 +1,179 @@
+# page_installation.uim - The layout for the installation page
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.06.24
+
+[
+    ['Page', ':page_installation',
+            {   'layout':
+                    ['VBOX',
+                        ['HBOX', ':edit_profile', '*', ':pacmanops'],
+                        '*', ':editmirrorlist',
+                        ':settings_advanced',
+                        'HLINE',
+                        ['HBOX', '*', ':install']
+                    ]
+            }
+    ],
+    # - - - - The profile editing frame
+    ['Frame', ':edit_profile',
+            {   'text': _("Edit Profile"),
+                'layout':
+                    ['VBOX',
+                        ':addedpacks',
+                        ':vetopacks',
+                        ':pacmanconf',
+                        ':repos'
+                    ]
+            }
+    ],
+    ['Button', ':addedpacks',
+            {   'text': _("Edit 'addedpacks'"),
+                'tt': _("Edit the list of packages to be installed")
+            },
+        'clicked'
+    ],
+    ['Button', ':vetopacks',
+            {   'text': _("Edit 'vetopacks'"),
+                'tt': _("Edit the list of packages NOT to install")
+            },
+        'clicked'
+    ],
+    ['Button', ':pacmanconf',
+            {   'text': _("Edit pacman.conf options"),
+                'tt': _("Edit pacman.conf options - not the repositories")
+            },
+        'clicked'
+    ],
+    ['Button', ':repos',
+            {   'text': _("Edit pacman.conf repositories"),
+                'tt': _("Edit the repository entries for pacman.conf")
+            },
+        'clicked'
+    ],
+
+    # - - - - The installed package tweaking frame
+    ['OptionalFrame', ':pacmanops',
+            {   'text': _("Tweak Installed Packages"),
+                'layout':
+                    ['VBOX', ':sync', ':update', ':add', ':remove']
+            }
+    ],
+    ['Button', ':sync',
+            {   'text': _("Synchronize db"),
+                'tt': _("Synchronize the pacman db on the target (pacman -Sy)")
+            },
+        'clicked'
+    ],
+    ['Button', ':update',
+            {   'text': _("Update / Add package    [-U]"),
+                'tt': _("Update / Add a package from a package file"
+                        " using pacman -U")
+            },
+        'clicked'
+    ],
+    ['Button', ':add',
+            {   'text': _("Add package(s)    [-S]"),
+                'tt': _("Add one or more packages (space separated)"
+                        " using pacman -S")
+            },
+        'clicked'
+    ],
+    ['Button', ':remove',
+            {   'text': _("Remove package(s)    [-Rs]"),
+                'tt': _("Remove one or more packages (space separated)"
+                        " using pacman -Rs")
+            },
+        'clicked'
+    ],
+
+    # - - - - The advanced installation options frame
+    ['OptionalFrame', ':settings_advanced',
+            {   'text': _("Advanced Installation Options"),
+                'layout': ['HBOX', ':installrepos', 'VLINE,3', ':cache']
+            }
+    ],
+
+    ['OptionalFrame', ':installrepos',
+            {   'text': _("Use project repository list"),
+                'tt': _("Enables use of an alternative pacman.conf"
+                        " for installation only"),
+                'layout':
+                    ['HBOX', ':editrepolist']
+            },
+        'toggled'
+    ],
+    ['Button', ':editrepolist',
+            {   'text': _("Edit repository list"),
+                'tt': _("Edit repository list file used for installation")
+            },
+        'clicked'
+    ],
+    ['Button', ':editmirrorlist',
+            {   'text': _("Edit mirror list used for installation only"),
+                'tt': _("A mirror list for the live system should be placed"
+                        " in the overlay")
+            },
+        'clicked'
+    ],
+
+    ['Frame', ':cache',
+            {   'text': _("Package Cache"),
+                'layout':
+                    ['HBOX', ':cache_show', ':cache_change']
+            }
+    ],
+    ['LineEdit', ':cache_show',
+            {   'ro': True,
+                'tt': _("The path to the (host's) package cache")
+            }
+    ],
+    ['Button', ':cache_change',
+            {   'text': _("Change"),
+                'tt': _("Change the package cache path")
+            },
+        'clicked'
+    ],
+
+    ['Button', ':install',
+            {   'text': _("Install"),
+                'tt': _("This will start the installation to the set path")
+            },
+        'clicked'
+    ],
+
+    ['DATA', 'install_page_data',
+            {   'messages':
+                    {   'edit_pc':  _("Editing pacman.conf options only"),
+                        'edit_pr':  _("Editing pacman repositories"),
+                        'edit_mli': _("Editing mirror list for installation"),
+                        'prompt_ncp': _("Enter new package cache path:"),
+                        'edit_pri': _("Editing pacman repositories for installation"),
+                        'msg_pu':   _("Package to add/update"),
+                        'filter_pu': _("Packages"),
+                        'prompt_pi': _("Enter the names of packages to install -"
+                                    "\n  separated by spaces:"),
+                        'prompt_pr': _("Enter the names of packages to remove -"
+                                    "\n  separated by spaces:"),
+                    }
+            },
+    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/page_larchify.uim b/build_tools/larch7/larch0/gui/layouts/page_larchify.uim
new file mode 100644
index 0000000..df7be8b
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_larchify.uim
@@ -0,0 +1,177 @@
+# page_larchify.uim - The layout for the larchify page
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.02.07
+
+(lambda USERHEADERS:
+[
+    ['Page', ':page_larchify',
+            {   'layout':
+                    ['VBOX',
+                        ':larchify',
+                        ':users',
+                        'HLINE',
+                        ['HBOX', ':overlay', ':locales', ':rcconf'],
+                        '*',
+                        ':larchify_advanced',
+                        'HLINE',
+                        ['HBOX', ':oldsquash', '*', ':build']
+                    ]
+            }
+    ],
+    # - - - - The profile editing frame
+    ['Label', ':larchify',
+            {   'markup': ['', " *** ", ['strong', _("The system to be"
+                    " compressed must be installed and ready.")], " *** "]
+            }
+    ],
+
+    ['Button', ':locales',
+            {   'text': _("Edit supported locales"),
+                'tt': _("Edit the /etc/locale.gen file to select"
+                        " supported glibc locales")
+            },
+        'clicked'
+    ],
+    ['Button', ':rcconf',
+            {   'text': _("Edit Arch configuration"),
+                'tt': _("Edit the /etc/rc.conf file to configure the"
+                        " live system")
+            },
+        'clicked'
+    ],
+    ['Button', ':overlay',
+            {   'text': _("Edit overlay"),
+                'tt': _("Open a file browser on the profile's 'rootoverlay'")
+            },
+        'clicked'
+    ],
+
+    ['OptionalFrame', ':larchify_advanced',
+            {   'text': _("Advanced Options"),
+                'layout':
+                    ['HBOX', ':initcpio', '*', ':oldlocales', ':ssh']
+            }
+    ],
+    ['Button', ':initcpio',
+            {   'text': _("Edit mkinitcpio.conf"),
+                'tt': _("Edit the configuration file for generating"
+                        " the initramfs via mkinitcpio")
+            },
+        'clicked'
+    ],
+    ['CheckBox', ':ssh',
+            {   'text': _("Generate ssh keys"),
+                'tt': _("The ssh host keys will be pre-generated")
+            },
+        'toggled'
+    ],
+    ['CheckBox', ':oldlocales',
+            {   'text': _("Reuse existing locales"),
+                'tt': _("To save time it may be possible to reuse glibc"
+                        " locales from a previous run")
+            },
+#        'toggled'
+    ],
+
+    ['CheckBox', ':oldsquash',
+            {   'text': _("Reuse existing system.sqf"),
+                'tt': _("Reuse existing system.sqf, to save time if the"
+                        " base system hasn't changed")
+            },
+#        'toggled'
+    ],
+    ['Button', ':build',
+            {   'text': _("Larchify"),
+                'tt': _("Build the main components of the larch system")
+            },
+        'clicked'
+    ],
+
+#Note that this should be disabled if installation directory is '/'
+    ['Frame', ':users',
+            {   'text': _("User accounts"),
+                'layout':
+                    ['VBOX',
+                        ':utable',
+                        ['HBOX', ':useradd', ':userdel', '*',
+                            ':rootpwl', ':rootpwe', ':rootpwb'
+                        ]
+                    ]
+            }
+    ],
+    ['List', ':utable',
+            {   'selectionmode': 'Single',
+                'headers': USERHEADERS,
+                'compact': True,
+                'tt': _("Click on a row to select, click on a selected"
+                        " cell to edit")
+            },
+#        'select',
+        'clicked'
+    ],
+    ['Button', ':useradd',
+            {   'text': _("Add user"),
+                'tt': _("Create a new user-name")
+            },
+        'clicked'
+    ],
+    ['Button', ':userdel',
+            {   'text': _("Delete user"),
+                'tt': _("Remove the selected user-name")
+            },
+        'clicked'
+    ],
+    ['Label', ':rootpwl',
+            {   'text': _("Root password:")
+            }
+    ],
+    ['LineEdit', ':rootpwe',
+            {   'ro': True,
+                'tt': _("The unencrypted root password for the live system")
+            }
+    ],
+    ['Button', ':rootpwb',
+            {   'text': _("Change"),
+                'tt': _("Enter a new password for the 'root' user")
+            },
+        'clicked'
+    ],
+
+
+    ['DATA', 'larchify_page_data',
+            {   'messages':
+                    {   'uheaders': USERHEADERS,
+                        'rn_error': _("Renaming failed, see log"),
+                        'ud_error': _("Couldn't adjust user definition"),
+                        'def_skel': _("Default (/etc/skel)"),
+                        'skel_lbl': _("This folder will be copied\n"
+                "to build the user's home folder:"),
+                        'skel_ttl': _("Choose 'skel' Folder"),
+                        'newlogin': _("Enter login-name for new user:"),
+                        'newrootpw': _("Enter root password for live system:"),
+                    }
+            },
+    ],
+]
+)([_("User-Name"), _("Password"), _("Group"),
+                        "UID", _("'skel' directory"),
+                        _("Additional Groups"), _("Expert options")])
diff --git a/build_tools/larch7/larch0/gui/layouts/page_main.uim b/build_tools/larch7/larch0/gui/layouts/page_main.uim
new file mode 100644
index 0000000..3ab4a9e
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_main.uim
@@ -0,0 +1,101 @@
+# page_main.uim - The layout for the main window
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.06.26
+
+[
+    ['Window', ':larch',
+            {   'title': 'larch', 'size': '640_480',
+                'icon': 'images/larchicon.png',
+                'closesignal': '$$$uiclose$$$',
+                'layout':
+                    ['VBOX',
+                        ['HBOX',
+                            ':image',
+                            ['VBOX',
+                                ['HBOX', ':header', '*'],
+                                ['HBOX', ':showlog', ':docs', '*', ':quit'],
+                            ]
+                        ],
+                        ':tabs'
+                    ]
+
+            }
+    ],
+
+    # - Header
+    ['Label', ':image',
+            {   'image': 'images/larch80.png'
+            }
+    ],
+    ['Label', ':header',
+            {   'markup': ['h1', ['color', '#c55500', ['em', 'larch '],
+                        _("Live Arch Linux Construction Kit")]]
+            }
+    ],
+    ['Button', ':showlog',
+            {   'text': _("View Log"),
+                'tt': _("This button switches to the log viewer"),
+            },
+        'clicked'
+    ],
+    ['Button', ':docs',
+            {   'text': _("Help"),
+                'tt': _("This button switches to the documentation viewer"),
+            },
+        'clicked'
+    ],
+    ['Button', ':quit',
+            {   'text': _("Quit"),
+                'tt': _("Stop the current action and quit the program"),
+                'clicked': '$$$uiquit$$$'
+            },
+    ],
+
+#TODO
+    # - Main widget
+    ['Stack', ':tabs',
+            {   'pages': [':notebook', 'progress:page', 'log:page',
+                        'doc:page', 'edit:page']
+            }
+    ],
+
+    # - - The main page of the Stack
+    ['Notebook', ':notebook',
+            {   'tabs': [
+                            [':page_settings', _("Project Settings")],
+                            [':page_installation', _("Installation")],
+                            [':page_larchify', _("Larchify")],
+                            [':page_image', _("Medium Profile")],
+                            [':page_medium', _("Make Medium")],
+                        ]
+            },
+        'changed'
+    ],
+
+    ['DATA', 'main_page_data',
+            {   'messages':
+                    {   'authfail':  _("Authentication failure"),
+                        'getpw': _("Enter the password to run as administrator:"),
+                    }
+            },
+    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/page_medium.uim b/build_tools/larch7/larch0/gui/layouts/page_medium.uim
new file mode 100644
index 0000000..713a3c0
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_medium.uim
@@ -0,0 +1,271 @@
+# page_medium.uim - The layout for the medium building page
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.07.12
+
+[
+    ['Page', ':page_medium',
+            {   'layout':
+                    ['VBOX',
+                        ['HBOX', ':source', 'VLINE', ':bootloader'],
+                        'HLINE',
+                        ['HBOX', ':destination','VLINE', ':detection'],
+                        ['HBOX', '*', ':vlabell', ':vlabele',
+                                ':vlabelb'],
+                        'HLINE',
+                        ['HBOX', ':chroot', 'VLINE,10',
+                                ':bootcd', '*', ':make_medium']
+                    ]
+            }
+    ],
+# Select source:
+#   larch installation (default, but may be invalid), iso, cd-drive, partition
+    ['Frame', ':source',
+            {   'text': _("Select larch source"),
+                'layout':
+                    ['VBOX',
+                        ['HBOX', ':source_larch', ':source_dev',
+                                ':source_iso', ':source_path'],
+                        ['HBOX', ':source_show', ':source_select']
+                    ]
+            }
+    ],
+    ['RadioButton', ':source_larch',
+            {   'text': _("larchified system"),
+                'tt': _("Use the system prepared within the larch build"
+                        " directory")
+            },
+        'toggled'
+    ],
+    ['RadioButton', ':source_dev',
+            {   'text': _("Device"),
+                'tt': _("Use a system on a mountable device")
+            },
+        'toggled'
+    ],
+    ['RadioButton', ':source_iso',
+            {   'text': _("'iso' file"),
+                'tt': _("Use a system on an 'iso' file")
+            },
+        'toggled'
+    ],
+    ['RadioButton', ':source_path',
+            {   'text': _("Path"),
+                'tt': _("Use a directory within the filesystem")
+            },
+        'toggled'
+    ],
+    ['LineEdit', ':source_show',
+            {   'ro': True,
+                'tt': _("The location from where the larch system will"
+                        " be fetched")
+            }
+    ],
+    ['Button', ':source_select',
+            {   'text': _("Choose"),
+                'tt': _("Select the source location")
+            },
+        'clicked'
+    ],
+
+#++++
+    ['OptionalFrame', ':destination',
+            {   'text': _("Write to partition"),
+                'tt': _("Don't create an 'iso' (CD/DVD), write the larch"
+                        " system to a partition (e.g. USB-stick)"),
+                'layout':
+                    ['VBOX',
+                        ['HBOX', ':lm2', ':larchpart', ':selectpart'],
+                        ['GRID',    ['+', ':noformat', ':nombr'],
+                                    ['+', ':nolarchboot', ':dosave']]
+                    ]
+            },
+        'toggled'
+    ],
+    ['Label', ':lm2',
+            {   'text': _("Partition:")
+            }
+    ],
+    ['LineEdit', ':larchpart',
+            {   'ro': True,
+                'tt': _("The partition to which the larch system is to"
+                        " be installed")
+            }
+    ],
+    ['Button', ':selectpart',
+            {   'text': _("Choose"),
+                'tt': _("Select the partition to receive the larch system")
+            },
+        'clicked'
+    ],
+    ['CheckBox', ':noformat',
+            {   'text': _("Don't format"),
+                'tt': _("Copy the data to the partition without formatting"
+                        " first\n(not the normal procedure, NOT RECOMMENDED!)")
+            },
+#        'toggled'
+    ],
+    ['CheckBox', ':nombr',
+            {   'text': _("Don't install the bootloader"),
+                'tt': _("The bootloader will not be installed, leaving"
+                        " the mbr untouched\n"
+                        "(you'll need to provide some other means of booting)")
+            },
+#        'toggled'
+    ],
+    ['CheckBox', ':nolarchboot',
+            {   'text': _("Not bootable via search"),
+                'tt': _("Don't create the file 'larch/larchboot':\n"
+                        " the medium will only be bootable by uuid, label"
+                        " or partition name")
+            },
+        'toggled'
+    ],
+    ['CheckBox', ':dosave',
+            {   'text': _("Enable session-saving"),
+                'tt': _("Can override profile's 'larch/nosave' file,"
+                        " to make session-saving possible in that case too")
+            },
+#        'toggled'
+    ],
+#----
+
+#++++++++
+    ['Frame', ':detection',
+            {   'text': _("Medium Detection"),
+                'tt': _("Choose how the boot scripts determine where to"
+                        " look for the larch system (ONLY ON PARTITIONED MEDIA)"),
+                'layout':
+                    ['VBOX', ':device', ':uuid', ':label', ':search']
+            }
+    ],
+    ['RadioButton', ':uuid',
+            {   'text': _("UUID"),
+                'tt': _("Use the partition's UUID to find it")
+            },
+#        'toggled'
+    ],
+    ['RadioButton', ':label',
+            {   'text': _("LABEL"),
+                'tt': _("Use the partition's label to find it")
+            },
+#        'toggled'
+    ],
+    ['RadioButton', ':device',
+            {   'text': _("Partition"),
+                'tt': _("Use the partition's name (/dev/sdb1, etc.) to find it")
+            },
+#        'toggled'
+    ],
+    ['RadioButton', ':search',
+            {   'text': _("Search (for larchboot)"),
+                'tt': _("Test all CD/DVD devices and partitions until"
+                        " the file 'larch/larchboot' is found")
+            },
+        'toggled'
+    ],
+#--------
+
+#+
+    # Defaults to that of the source
+    ['Label', ':vlabell',
+            {   'text': _("Volume Label:")
+            }
+    ],
+    ['LineEdit', ':vlabele',
+            {   'ro': True,
+                'tt': _("The length may not exceed 16 bytes,"
+                        " 11 for vfat(syslinux)")
+            }
+    ],
+    ['Button', ':vlabelb',
+            {   'text': _("Change"),
+                'tt': _("Enter a new label for the volume, empty to use default")
+            },
+        'clicked'
+    ],
+#-
+
+#++++
+    ['Frame', ':bootloader',
+            {   'text': _("Bootloader"),
+                'tt': _("You can choose between GRUB and"
+                        " syslinux/isolinux as bootloader"),
+                'layout':
+                    ['VBOX', ':grub', ':syslinux']
+            }
+    ],
+    ['RadioButton', ':grub',
+            {   'text': "GRUB",
+                'tt': _("Use GRUB as bootloader")
+            },
+        'toggled'
+    ],
+    ['RadioButton', ':syslinux',
+            {   'text': "syslinux/isolinux",
+                'tt': _("Use syslinux (partition) or isolinux (CD/DVD)"
+                        " as bootloader")
+            },
+        'toggled'
+    ],
+#----
+
+    ['CheckBox', ':chroot',
+            {   'text': _("Use chroot"),
+                'tt': _("Use the larch installation for the build process\n"
+                        " - the default should be alright in most cases")
+            },
+#        'toggled'
+    ],
+
+    ['Button', ':bootcd',
+            {   'text': _("Create boot iso"),
+                'tt': _("Create a small boot iso for this device (for"
+                        " machines that can't boot from USB)")
+            },
+        'clicked'
+    ],
+    ['Button', ':make_medium',
+            {   'text': _("Write the larch medium"),
+                'tt': _("The larch image will be written to the 'iso' file"
+                        " or to the partition, as selected")
+            },
+        'clicked'
+    ],
+
+    ['DATA', 'medium_page_data',
+            {   'messages':
+                    {   'medium_src':   _("Select source medium folder"),
+                        'iso_src':      _("Select source iso file"),
+                        'iso_type':     _("larch iso images"),
+                        'parts_t':      _("Select unmounted partition"),
+                        'parts_src':    _("larch system source:"),
+                        'parts_dst':    _("Device to receive larch system.\n"
+                                "WARNING: Be very careful in choosing here,\n"
+                                "if you choose the wrong one you might\n"
+                                "seriously damage your system!"),
+                        'msg_med':      _("Invalid larch medium folder: %s"),
+                        'prompt_label': _("Volume label (clear to use default):"),
+                        'isopath':      _("Save 'iso' to ..."),
+                    }
+            },
+    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/page_mediumprofile.uim b/build_tools/larch7/larch0/gui/layouts/page_mediumprofile.uim
new file mode 100644
index 0000000..f50a20a
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_mediumprofile.uim
@@ -0,0 +1,99 @@
+# page_mediumprofile.uim - The layout for the medium profile settings page
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.07.08
+
+[
+    ['Page', ':page_image',
+            {   'layout':
+                    ['VBOX',
+                        ':bootlines',
+                        ':grubtemplate',
+                        ':syslinuxtemplate',
+                        ':cdroot',
+                        '*',
+                        ['HBOX', ':nosessionsave', '*',
+#                                ':plabell', ':plabele', ':plabelb'
+                        ]
+                    ]
+            }
+    ],
+    ['Button', ':bootlines',
+            {   'text': _("Edit boot entries"),
+                'tt': _("Edit the file determining the boot entries")
+            },
+        'clicked'
+    ],
+    ['Button', ':grubtemplate',
+            {   'text': _("Edit grub template"),
+                'tt': _("Edit grub's configuration file,"
+                        " but not the larch boot entries")
+            },
+        'clicked'
+    ],
+    ['Button', ':syslinuxtemplate',
+            {   'text': _("Edit syslinux/isolinux template"),
+                'tt': _("Edit the syslinux/isolinux configuration file,"
+                        " but not the larch boot entries")
+            },
+        'clicked'
+    ],
+    ['Button', ':cdroot',
+            {   'text': _("Edit cd-root (open in file browser)"),
+                'tt': _("Open a file browser on the profile's 'cd-root'"
+                        " folder")
+            },
+        'clicked'
+    ],
+#    ['Label', ':plabell',
+#            {   'text': _("Volume Label:")
+#            }
+#    ],
+#    ['LineEdit', ':plabele',
+#            {   'ro': True,
+#                'tt': _("The length may not exceed 16 bytes,"
+#                        " 11 for vfat(syslinux)")
+#            }
+#    ],
+#    ['Button', ':plabelb',
+#            {   'text': _("Change"),
+#                'tt': _("Enter a new label for the volume")
+#            },
+#        'clicked'
+#    ],
+    ['CheckBox', ':nosessionsave',
+            {   'text': _("Disable session saving"),
+                'tt': _("If checked, the medium will have the file"
+                        " 'larch/nosave',\n"
+                        "which only has an effect on writable media.")
+            },
+        'toggled'
+    ],
+
+
+#?
+#    ['DATA', 'mediumprofile_page_data',
+#            {   'messages':
+#                    {   'blah':  _("Blah blah"),
+#                    }
+#            },
+#    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/page_project.uim b/build_tools/larch7/larch0/gui/layouts/page_project.uim
new file mode 100644
index 0000000..938c646
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/page_project.uim
@@ -0,0 +1,181 @@
+# page_project.uim - The layout for the project settings page
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.06.27
+
+[
+    ['Page', ':page_settings',
+            {   'layout':
+                    ['VBOX',
+                        ':settings_profile',
+                        '*',
+                        ':options_advanced',
+                        '*'
+                    ]
+            }
+    ],
+    # - - - - The profile selection frame
+    ['Frame', ':settings_profile',
+            {   'text': _("Profile"),
+                'layout':
+                    ['VBOX',
+                        ['HBOX', ':choose_profile', ':choose_profile_combo',
+                                '*', ':profile_browse'],
+                        ['HBOX', ':profile_rename', ':profile_delete',
+                                ':profile_save']
+                    ]
+            }
+    ],
+    ['Label', ':choose_profile',
+            {   'text': _("Select:"),
+                'align': 'right'
+            }
+    ],
+    ['ComboBox', ':choose_profile_combo',
+            {   'width': 200,
+                'tt': _("Choose a profile from those already in your"
+                        " larch working folder")
+            },
+            'changed'
+    ],
+    ['Button', ':profile_browse',
+            {   'text': _("Browse for Profile"),
+                'tt': _("Fetch a profile from the file-system")
+            },
+        'clicked'
+    ],
+    ['Button', ':profile_rename',
+            {   'text': _("Rename"),
+                'tt': _("Rename the current profile")
+            },
+        'clicked'
+    ],
+    ['Button', ':profile_delete',
+            {   'text': _("Delete"),
+                'tt': _("Delete an unused profile")
+            },
+        'clicked'
+    ],
+    ['Button', ':profile_save',
+            {   'text': _("Copy to ..."),
+                'tt': _("Copy the current profile to somehere else")
+            },
+        'clicked'
+    ],
+
+    # - - - - Advanced project options
+    ['OptionalFrame', ':options_advanced',
+            {   'text': _("Advanced Project Options"),
+                'layout':
+                    ['HBOX',
+                        #['HBOX', '*', ':lplat', ':platform'],
+                        ['GRID',
+                            ['+', ':choose_project', ':choose_project_combo'],
+                            ['+', ':new_project', ':project_delete']
+                        ],
+                        'VLINE,3',
+                        ':installation_path'
+                    ]
+            }
+    ],
+# Pending better support in Arch/pacman
+#    ['Label', '::lplat',
+#            {   'text': _("Platform (processor architecture):")
+#            }
+#    ],
+#    ['ComboBox', ':platform',
+#            {   'tt': _("Which processor architecture?")
+#            },
+#            'changed'
+#    ],
+    ['Label', ':choose_project',
+            {   'text': _("Choose Existing Project:")
+            }
+    ],
+    ['ComboBox', ':choose_project_combo',
+            {   'tt': _("Choose a project from those already defined"),
+                'width': 120
+            },
+            'changed'
+    ],
+    ['Button', ':new_project',
+            {   'text': _("New Project"),
+                'tt': _("Create a new project")
+            },
+        'clicked'
+    ],
+    ['Button', ':project_delete',
+            {   'text': _("Delete"),
+                'tt': _("Delete a project")
+            },
+        'clicked'
+    ],
+    ['Frame', ':installation_path',
+            {   'text': _("Installation Path"),
+                'layout':
+                    ['HBOX', ':installation_path_show',
+                            ':installation_path_change']
+            }
+    ],
+    ['LineEdit', ':installation_path_show',
+            {   'ro': True,
+                'tt': _("The root directory of the Arch installation"
+                        " to larchify")
+            }
+    ],
+    ['Button', ':installation_path_change',
+            {   'text': _("Change"),
+                'tt': _("Change the root directory of the Arch installation")
+            },
+        'clicked'
+    ],
+
+    ['DATA', 'project_page_data',
+            {   'messages':
+                    {   'file_ps':  _("Select profile source folder"),
+                        'prompt_pr': _("Destination profile exists - replace it?"),
+                        'prompt_pn': _("Enter new name for current profile:"),
+                        'prompt_pe': _("Profile '%s' exists already"),
+                        'msg_pu':   _("Can't rename the profile,"
+                                    " it is in use by other projects"),
+                        'file_sp':  _("Save profile folder"),
+                        'prompt_dr': _("Destination exists - replace it?"),
+                        'prompt_dp': _("Select the profile for deletion"),
+                        'delprof': _("Remove Profile"),
+                        'msg_npf':   _("There are no profiles which can"
+                                    " be deleted - all are in use"),
+                        'msg_dpff':   _("Couldn't delete profile '%s' -"
+                                    " check permissions"),
+                        'prompt_ip': _("An empty path here will reset to the default.\n"
+                                "  WARNING: Double check your path -\n"
+                                "  If you make a mistake here it could destroy your system!"
+                                "\n\nEnter new installation path:"),
+                        'prompt_np': _("Enter name for new project:"),
+                        'msg_pe':   _("Project '%s' already exists"),
+                        'prompt_pd': _("Select the project for deletion"),
+                        'delproj': _("Remove Project"),
+                        'msg_np':   _("There are no projects which can be deleted"),
+                        'msg_npd': _("'%s' is not a profile folder"),
+                        'msg_piu': _("The path '%s' is already in use, not saving"),
+                    }
+            },
+    ],
+]
diff --git a/build_tools/larch7/larch0/gui/layouts/progress.uim b/build_tools/larch7/larch0/gui/layouts/progress.uim
new file mode 100644
index 0000000..62ae9e2
--- /dev/null
+++ b/build_tools/larch7/larch0/gui/layouts/progress.uim
@@ -0,0 +1,64 @@
+# progress.uim - The layout for the progress widget
+#
+# (c) Copyright 2010 Michael Towers (larch42 at googlemail dot com)
+#
+# This file is part of the larch project.
+#
+#    larch is free software; you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation; either version 2 of the License, or
+#    (at your option) any later version.
+#
+#    larch is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with larch; if not, write to the Free Software Foundation, Inc.,
+#    51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+#----------------------------------------------------------------------------
+# 2010.05.22
+
+[
+    ['Frame', 'progress:page',
+            {   'layout':
+                    ['VBOX',
+                        'progress:header',
+                        ['HBOX',
+                            'progress:text',
+                            ['VBOX', 'progress:cancel', '*', 'progress:done']
+                        ],
+                        'progress:progress'
+                    ]
+            }
+    ],
+    ['Label', 'progress:header',
+            {   'markup': ['', ['h2', _("Processing ...")],
+                        ['p', _("Here you can follow the detailed, low-level"
+                        " progress of the commands.")]]
+            }
+    ],
+    ['TextEdit', 'progress:text',
+            {   'ro': True
+            }
+    ],
+    ['LineEdit', 'progress:progress',
+            {   'ro': True,
+                'tt': _("An indication of the progress of the current"
+                        " operation, if possible")
+            }
+    ],
+    ['Button', 'progress:cancel',
+            {   'text': _("Cancel"),
+                'tt': _("Stop the current action"),
+                'clicked': '$$$cancel$$$'
+            }
+    ],
+    ['Button', 'progress:done',
+            {   'text': _("Done"),
+                'clicked': ''
+            }
+    ],
+]