[ros-diffs] [dreimer] 37336: Add the last missing commands in a PS1 Version. These DO NOT FULLY work yet. Commited as backup, because of PC formatting needed.

Author: dreimer
Date: Thu Nov 13 02:31:17 2008
New Revision: 37336

URL: http://svn.reactos.org/svn/reactos?rev=37336&view=rev
Log:
Add the last missing commands in a PS1 Version. These DO NOT FULLY work yet. Commited as
backup, because of PC formatting needed.

Added:
    trunk/tools/RosBE/RosBE-Windows/Powershell/Config.ps1   (with props)
    trunk/tools/RosBE/RosBE-Windows/Powershell/chdefgcc.ps1   (with props)
    trunk/tools/RosBE/RosBE-Windows/Powershell/reladdr2line.ps1   (with props)
    trunk/tools/RosBE/RosBE-Windows/Powershell/sSVN.ps1   (with props)
    trunk/tools/RosBE/RosBE-Windows/Powershell/scut.ps1   (with props)
Modified:
    trunk/tools/RosBE/RosBE-Windows/Powershell/charch.ps1
    trunk/tools/RosBE/RosBE-Windows/Powershell/chdefdir.ps1
    trunk/tools/RosBE/RosBE-Windows/Root/Config.cmd
    trunk/tools/RosBE/RosBE-Windows/Root/reladdr2line.cmd

Added: trunk/tools/RosBE/RosBE-Windows/Powershell/Config.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/Config.ps1 (added)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/Config.ps1 [iso-8859-1] Thu Nov 13 02:31:17
2008
@@ -1,0 +1,258 @@
+#
+# PROJECT:     RosBE - ReactOS Build Environment for Windows
+# LICENSE:     GNU General Public License v2. (see LICENSE.txt)
+# FILE:        Root/Config.cmd
+# PURPOSE:     A Basic Config.rbuild Creator for ReactOS.
+# COPYRIGHT:   Copyright 2007 Daniel Reimer <reimer.daniel(a)freenet.de>
+#
+#
+
+$host.ui.RawUI.WindowTitle = "ReactOS Build Configurator"
+
+function settitle {
+    if ($_ROSBE_VERSION -ne $null) {
+        $host.ui.RawUI.WindowTitle = "ReactOS Build Environment
$_ROSBE_VERSION"
+    }
+    exit
+}
+
+#
+# Receive the first Parameter and decide what to do.
+#
+if ($args[0] -eq "delete") {
+    "config.rbuild will be permanently deleted. All your settings will be
gone."
+    "Continue?"
+    $YESNO = Read-Host "(yes), (no)"
+    if ($YESNO -eq "yes") {
+        if (Test-Path ".\config.rbuild") {
+            del ".\config.rbuild"
+            "Main Configuration File was found and deleted."
+        } else {
+            "Main Configuration File was not found in ReactOS Source Tree."
+        }
+        if (Test-Path "$ENV:APPDATA\RosBE\config.rbuild") {
+            del "$ENV:APPDATA\RosBE\config.rbuild"
+            "Working Configuration File was found and deleted."
+        } else {
+            "Working Configuration File was not found in ReactOS Source Tree."
+        }
+    }
+}
+elseif ($args[0] -eq "update") {
+    "old config.rbuild will be deleted and will be updated with a recent,"
+    "default one. You will need to reconfigure it to your wishes later."
+    "Continue?"
+    $YESNO = Read-Host "(yes), (no)"
+    if ($YESNO -eq "yes") {
+        del "$_ROSBE_BASEDIR\*.rbuild"
+        del ".\config.rbuild"
+        copy ".\config.template.rbuild"
"$ENV:APPDATA\RosBE\config.rbuild"
+       "Successfully Updated."
+    }
+}
+elseif ($args[0] -ne $null) {
+    "Unknown parameter specified. Try 'help [COMMAND]'."
+}
+
+#
+# Check if config.rbuild already exists. If not, get a working copy.
+#
+if (!(Test-Path "$ENV:APPDATA\RosBE\config.rbuild")) {
+    copy ".\config.template.rbuild"
"$ENV:APPDATA\RosBE\config.rbuild"
+}
+
+#
+# Help prevent non-useful bug reports/questions.
+#
+""
+"*** Configurations other than release/debug are not useful for ***"
+"*** posting bug reports, and generally not very useful for     ***"
+"*** IRC/Forum discussion. Please refrain from doing so unless  ***"
+"*** you are sure about what you are doing.                     ***"
+""
+
+$YESNO = Read-Host "(yes), (no)"
+
+if ($YESNO -eq "no") {settitle}
+
+#
+# Check if config.template.rbuild is newer than config.rbuild, if it is then
+# inform the user and offer an update.
+#
+if (Test-Path ".\config.rbuild") {
+    if ((gi .\config.template.rbuild).LastWriteTime -gt (gi
.\config.rbuild).LastWriteTime) {
+        ""
+        "*** config.template.rbuild is newer than working config.rbuild ***"
+        "*** The Editor cannot continue with this file. Do you wanna    ***"
+        "*** update to the most recent one? You need to reset all your  ***"
+        "*** previously made settings.                                  ***"
+        ""
+        $YESNO = Read-Host "(yes), (no)"
+        if ($YESNO -eq "yes") {del "$ENV:APPDATA\RosBE\*.rbuild" |
del ".\config.rbuild" | copy ".\config.template.rbuild"
"$ENV:APPDATA\RosBE\config.rbuild"}
+    }
+}
+
+#
+# Start with reading settings from config.rbuild and let the user edit them.
+#
+"Sub-Architecture to build for."
+"Default is: none"
+""
+$SARCH = type "$ENV:APPDATA\RosBE\config.rbuild" | find "SARCH" |
find "property name"
+"$SARCH = $SARCH:~7,-1"
+"Right now: $SARCH"
+$SARCH_CH = Read-Host "(), (xbox)"
+cls
+
+"Which CPU ReactOS should be optimized for."
+""
+"Examples:"
+"Intel: i486, i586 / pentium, pentium-mmx, i686 / pentiumpro, pentium2,
pentium3"
+"        pentium3m, pentium-m, pentium4 / pentium4m, prescott, nocona"
+" AMD:   k6, k6-2 / k6-3, athlon / athlon-tbird, athlon-4 / athlon-xp /
athlon-mp"
+"        k8 / opteron / athlon64 / athlon-fx"
+" IDT:   winchip-c6, winchip2"
+" VIA:   c3, c3-2"
+" Default is: pentium"
+""
+$OARCH = type "$ENV:APPDATA\RosBE\config.rbuild" | find "OARCH" |
find "property name"
+"$OARCH = $OARCH:~7,-1"
+"Right now: $OARCH"
+$OARCH_CH = Read-Host
+if ($OARCH_CH -eq $null) {
+    $OARCH_CH = "pentium"
+}
+cls
+
+"What level do you want ReactOS to be optimized at."
+"This setting does not work if GDB is set."
+"0 = off"
+"1 = Normal compiling. Recommended. It is the default setting in"
+"official release builds and debug builds."
+"warning : 2,3,4,5 is not tested on ReactOS. Change at own risk."
+""
+$OPTIMIZE = type "$ENV:APPDATA\RosBE\config.rbuild" | find "OPTIMIZE"
| find "property name"
+"$OPTIMIZE = $OPTIMIZE:~7,-1"
+"Right now: $OPTIMIZE"
+OPTIMIZE_CH = Read-Host "(0), (1), (2), (3), (4), (5)"
+if ($OPTIMIZE_CH -eq $null) {
+    $OPTIMIZE_CH = 1
+}
+cls
+
+"Whether to compile in the integrated kernel debugger."
+"Default is: 1"
+""
+$KDBG = type "$ENV:APPDATA\RosBE\config.rbuild" | find "KDBG" | find
"property name"
+"$KDBG = $KDBG:~7,-1"
+"Right now: $KDBG"
+$KDBG_CH = Read-Host "(0), (1)"
+if ($KDBG_CH -eq $null) {
+    $KDBG_CH = 1
+}
+cls
+
+"Whether to compile for debugging. No compiler optimizations will be"
+"performed."
+"Default is: 1"
+""
+$DBG = type "$ENV:APPDATA\RosBE\config.rbuild" | find "DBG" | find
"property name" | find /V "KDBG"
+"$DBG = $DBG:~7,-1"
+"Right now: $DBG"
+$DBG_CH = Read-Host "(0), (1)"
+if ($KDBG_CH -eq $null) {
+    $DBG_CH = 1
+}
+cls
+
+"Whether to compile for debugging with GDB. If you don't use GDB,"
+"don't enable this."
+"Default is: 0"
+""
+$GDB = type "$ENV:APPDATA\RosBE\config.rbuild" | find "GDB" | find
"property name"
+"$GDB = $GDB:~7,-1"
+"Right now: $GDB"
+$GDB_CH = Read-Host "(0), (1)"
+if ($GDB_CH -eq $null) {
+    $GDB_CH = 0
+}
+cls
+
+"Whether to compile apps/libs with features covered software patents"
+"or not. If you live in a country where software patents are"
+"valid/apply, don't enable this (except they/you purchased a license"
+"from the patent owner)."
+"Default is: 0"
+""
+$NSWPAT = type "$ENV:APPDATA\RosBE\config.rbuild" | find "NSWPAT" |
find "property name"
+"$NSWPAT = $NSWPAT:~7,-1"
+"Right now: $NSWPAT"
+$NSWPAT_CH = Read-Host "(0), (1)"
+if ($NSWPAT_CH -eq $null) {
+    $NSWPAT_CH = 0
+}
+cls
+
+"Whether to compile with the KD protocol. This will disable support for"
+"KDBG as well as rossym and symbol lookups, and allow WinDBG to connect"
+"to ReactOS. This is currently not fully working, and requires kdcom"
+"from Windows 2003 or TinyKRNL. Booting into debug mode with this flag"
+"enabled will result in a failure to enter GUI mode. Do not enable"
+"unless you know what you're doing."
+"Default is: 0"
+""
+$WINKD = type "$ENV:APPDATA\RosBE\config.rbuild" | find "_WINKD_" |
find "property name"
+"$WINKD = $WINKD:~7,-1"
+"Right now: $WINKD"
+$WINKD_CH = Read-Host "(0), (1)"
+if ($WINKD_CH -eq $null) {
+    $WINKD_CH = 0
+}
+cls
+
+#
+# Generate a config.rbuild, copy it to the Source Tree and delete temp files.
+#
+'<?xml version="1.0"?>' | out-file
"$ENV:TEMP\config.tmp"
+'<!DOCTYPE group SYSTEM "tools/rbuild/project.dtd">' | out-file
-append "$ENV:TEMP\config.tmp"
+'<group>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="SARCH" value="' + $SARCH_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="OARCH" value="' + $OARCH_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="OPTIMIZE" value="' + $OPTIMIZE_CH +
'" />' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="KDBG" value="' + $KDBG_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="DBG" value="' + $DBG_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="GDB" value="' + $GDB_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="NSWPAT" value="' + $NSWPAT_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'<property name="_WINKD_" value="' + $WINKD_CH + '"
/>' | out-file -append "$ENV:TEMP\config.tmp"
+'</group^>' | out-file -append "'$ENV:TEMP\config.tmp"
+
+copy "$ENV:TEMP\config.tmp" "$ENV:APPDATA\RosBE\config.rbuild"
+del $ENV:TEMP\config.tmp
+copy "$ENV:APPDATA\RosBE\config.rbuild" ".\config.rbuild"
+
+if ($_ROSBE_VERSION -ne $null) {
+    $host.ui.RawUI.WindowTitle = "ReactOS Build Environment $_ROSBE_VERSION"
+}
+
+#
+# Unload all used Vars.
+#
+$YESNO = $null
+$SARCH_CH = $null
+$OARCH_CH = $null
+$OPTIMIZE_CH = $null
+$KDBG_CH = $null
+$DBG_CH = $null
+$GDB_CH = $null
+$NSWPAT_CH = $null
+$WINKD_CH = $null
+$SARCH = $null
+$OARCH = $null
+$OPTIMIZE = $null
+$KDBG = $null
+$DBG = $null
+$GDB = $null
+$NSWPAT = $null
+$WINKD = $null
+
+settitle

Propchange: trunk/tools/RosBE/RosBE-Windows/Powershell/Config.ps1
------------------------------------------------------------------------------
    svn:eol-style = native

Modified: trunk/tools/RosBE/RosBE-Windows/Powershell/charch.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/charch.ps1 [iso-8859-1] (original)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/charch.ps1 [iso-8859-1] Thu Nov 13 02:31:17
2008
@@ -19,7 +19,7 @@
 function SYSPARAM {
     IEX "& '$_ROSBE_BASEDIR\rosbe-gcc-env.ps1'"
 }
-if ($args[0] -eq $null) {
+if ($args.count -eq 0) {
     #
     # If Parameters were set, parse them, if not, ask the user to add them.
     #

Modified: trunk/tools/RosBE/RosBE-Windows/Powershell/chdefdir.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/chdefdir.ps1 [iso-8859-1] (original)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/chdefdir.ps1 [iso-8859-1] Thu Nov 13
02:31:17 2008
@@ -14,7 +14,7 @@
 #
 # Parse the command line arguments.
 #
-if ($args[0] -eq $null) {
+if ($args.count -eq 0) {
     #
     # If Parameters were set, parse them, if not, ask the user to add them.
     #

Added: trunk/tools/RosBE/RosBE-Windows/Powershell/chdefgcc.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/chdefgcc.ps1 (added)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/chdefgcc.ps1 [iso-8859-1] Thu Nov 13
02:31:17 2008
@@ -1,0 +1,73 @@
+#
+# PROJECT:     RosBE - ReactOS Build Environment for Windows
+# LICENSE:     GNU General Public License v2. (see LICENSE.txt)
+# FILE:        Root/chdefgcc.cmd
+# PURPOSE:     Tool to change the current gcc in RosBE.
+# COPYRIGHT:   Copyright 2007 Daniel Reimer &lt;reimer.daniel(a)freenet.de&gt;
+#                             Peter Ward &lt;dralnix(a)gmail.com&gt;
+#
+
+if ($_ROSBE_MODE -eq "RosBE") {
+    $host.ui.RawUI.WindowTitle = "Change the current MinGW/GCC Host/Target
directory..."
+}
+
+function EOA {
+    IEX "&'$_ROSBE_BASEDIR\rosbe-gcc-env.cmd' chdefgcc"
+}
+
+function INTERACTIVE {
+    $_1 = Read-Host "Please enter a MinGW/GCC directory (don't use quotes):
"
+    if ($_1 -eq $null) {
+        "ERROR: You must enter a MinGW/GCC directory."
+    }
+    $_2 = Read-Host "Please specify, if this will be the Target or Host GCC: "
+    if ($_2 -eq $null) {
+        "ERROR: You must enter ""target"" or
""host""."
+    }
+}
+if ($_ROSBE_VERSION -ne $null) {
+    $host.ui.RawUI.WindowTitle = "ReactOS Build Environment $_ROSBE_VERSION"
+}
+
+#
+# Parse the command line arguments.
+#
+$_1 = $args[0]
+"$_1"
+$_1 = IEX "& '$_ROSBE_BASEDIR\Tools\rquote.exe' '$_1'"
+$_2 = $args[1]
+if ($_1 -eq $null) {
+    INTERACTIVE
+}
+if ($_2 -eq $null) {
+    INTERACTIVE
+}
+
+if (Test-Path "$_ROSBE_BASEDIR\$_1\.") {
+    $_1 = "$_ROSBE_BASEDIR\$_1"
+} elseif (!(Test-Path "$_1\.")) {
+    "ERROR: The path specified doesn't seem to exist."
+}
+
+if (!(Test-Path "$_1\bin\*gcc.exe")) {
+    "ERROR: No MinGW/GCC found in the specified path."
+}
+
+if ($_2 -eq "target") {
+    $_ROSBE_TARGET_MINGWPATH = $_1
+    "Target Location: $_ROSBE_TARGET_MINGWPATH"
+    EOA
+}
+if ($_2 -eq "host") {
+    $_ROSBE_HOST_MINGWPATH = $_1
+    "Host Location: $_ROSBE_HOST_MINGWPATH"
+    EOA
+} else {
+    "ERROR: You specified wrong parameters."
+}
+
+#
+# Unload all used Vars.
+#
+$_1 = $null
+$_2 = $null

Propchange: trunk/tools/RosBE/RosBE-Windows/Powershell/chdefgcc.ps1
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/tools/RosBE/RosBE-Windows/Powershell/reladdr2line.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/reladdr2line.ps1 (added)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/reladdr2line.ps1 [iso-8859-1] Thu Nov 13
02:31:17 2008
@@ -1,0 +1,85 @@
+#
+# PROJECT:     RosBE - ReactOS Build Environment for Windows
+# LICENSE:     GNU General Public License v2. (see LICENSE.txt)
+# FILE:        Root/reladdr2line.cmd
+# PURPOSE:     Converts a value to hex and displays it.
+# COPYRIGHT:   Copyright 2007 Christoph von Wittich &lt;Christoph_vW(a)reactos.org&gt;
+#                             Daniel Reimer &lt;reimer.daniel(a)freenet.de&gt;
+#                             Peter Ward &lt;dralnix(a)gmail.com&gt;
+#
+#
+
+$host.ui.RawUI.WindowTitle = "reladdr2line..."
+
+#
+# Check if the user supplied a path, if they didn't look for
+# the specified file in the current directory and any
+# sub-directories.
+#
+function CHECKPATH {
+    IEX "$ '&_ROSBE_BASEDIR\Tools\chkslash.exe' $_1"
+    if (errorlevel -eq 2) {
+        $_1 = dir /a:-d /s /b $_1 2>NUL | findstr "$_1"
+    }
+}
+
+#
+# If Parameters were set, parse them, if not, ask the user to add them.
+#
+function INTERACTIVE {
+    if ($_1 -eq $null) {
+        $_1 = Read-Host "Please enter the path/file to be examined: "
+        CHECKPATH
+    }
+    if ($_2 -eq $null) {
+        $_2 = Read-Host "Please enter the address you would like to analyze: "
+    }
+}
+
+#
+# Receive the Parameters and decide what to do.
+#
+if ($args[2] -ne $null) {
+    "ERROR: Too many parameters specified."
+}
+elseif ($args[0] -ne $null) {
+    $_1 = $args[0]
+    CHECKPATH
+}
+elseif ($args[1] -ne $null) {
+    $_2 = $args[1]
+}
+INTERACTIVE
+
+#
+# First get the ImageBase of the File. If its smaller than the given
+# Parameter, everything is ok, because it was already added onto the
+# adress and can be given directly to raddr2line. If not, add it and
+# give the result to raddr2line.
+#
+if ($_1 -eq $null) {
+    "ERROR: You must specify a path/file to examine."
+}
+if ($_2 -eq $null) {
+    "ERROR: You must specify a address to analyze."
+}
+$baseaddr = objdump -p $_1 2>NUL | findstr ImageBase
+if ($i -lt $_2) {
+    IEX "& '$_ROSBE_BASEDIR\Tools\raddr2line.exe' '$_1'
'$_2'"
+} else {
+    set /a baseaddr+=0x$_2
+    $relbase = IEX "'$_ROSBE_BASEDIR\Tools\echoh.exe' $baseaddr"
+    IEX "& '$_ROSBE_BASEDIR\Tools\raddr2line.exe' '$_1'
'$relbase'"
+}
+
+if ($_ROSBE_VERSION -ne $null) {
+    $host.ui.RawUI.WindowTitle = "ReactOS Build Environment $_ROSBE_VERSION"
+}
+
+#
+# Unload all used Vars.
+#
+$_1 = $null
+$_2 = $null
+$baseaddr = $null
+$relbase = $null

Propchange: trunk/tools/RosBE/RosBE-Windows/Powershell/reladdr2line.ps1
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/tools/RosBE/RosBE-Windows/Powershell/sSVN.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/sSVN.ps1 (added)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/sSVN.ps1 [iso-8859-1] Thu Nov 13 02:31:17
2008
@@ -1,0 +1,96 @@
+#
+# PROJECT:     RosBE - ReactOS Build Environment for Windows
+# LICENSE:     GNU General Public License v2. (see LICENSE.txt)
+# FILE:        Root/sSVN.cmd
+# PURPOSE:     Integrated SVN Client.
+# COPYRIGHT:   Copyright 2007 Daniel Reimer &lt;reimer.daniel(a)freenet.de&gt;
+#
+#
+
+function UP {
+    "Local Revision: $OFFSVN"
+    "Online HEAD Revision: $ONSVN"
+    ""
+    if ($OFFSVN -lt $ONSVN) {
+        "Your tree is not up to date. Do you want to update it?"
+        $UP = Read-Host "Please enter 'yes' or 'no': "
+        if ($UP -eq "yes") {
+            IEX "'$_ROSBE_BASEDIR\ssvn' update"
+        }
+    }
+    if ($OFFSVN -eq $ONSVN) {
+        "Your tree is up to date."
+    }
+}
+
+#
+# Receive the first parameter and decide what to do.
+#
+if ($args[0] -eq $null) {
+    "No parameter specified. Try 'help [COMMAND]'."
+}
+
+#
+# These two are directly parsed to svn.
+#
+elseif ($args[0] -eq "update") {
+    $host.ui.RawUI.WindowTitle = "SVN Updating..."
+    "This might take a while, so please be patient."
+    ""
+    if ($args[1] -ne $null) {
+        IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' update -r $args[1]"
+    } else {
+        IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' update"
+    }
+}
+elseif ($args[0] -eq "cleanup") {
+    $host.ui.RawUI.WindowTitle = "SVN Cleaning..."
+    "This might take a while, so please be patient."
+    ""
+    IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' cleanup"
+}
+
+#
+# Check if the folder is empty. If not, output an error.
+#
+elseif ($args[0] -eq "create") {
+    $host.ui.RawUI.WindowTitle = "SVN Creating..."
+    if (Test-Path ".svn\.") {
+        "ERROR: Folder already contains a repository."
+    } else {
+        dir /b 2>nul | findstr "." >nul
+        if (errorlevel -eq 1) {
+            IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' checkout
svn://svn.reactos.org/reactos/trunk/reactos ."
+        } else {
+            "ERROR: Folder is not empty. Continuing is dangerous and can cause
errors. ABORTED"
+        }
+    }
+}
+
+#
+# Output the revision of the local and online trees and tell the user if
+# its up to date or not.
+#
+elseif ($args[0] -eq "status") {
+    $host.ui.RawUI.WindowTitle = "SVN Status"
+    "This might take a while, so please be patient."
+    ""
+    $OFFSVN = IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' info" | find
"Revision:"
+    $ONSVN = IEX "'$_ROSBE_BASEDIR\Tools\svn.exe' info
svn://svn.reactos.org/reactos/trunk/reactos" | find "Revision:"
+    UP
+}
+
+elseif ($args[0] -ne $null) {
+    "Unknown parameter specified. Try 'help ssvn'."
+}
+
+if ($_ROSBE_VERSION -ne $null) {
+    $host.ui.RawUI.WindowTitle = "ReactOS Build Environment $_ROSBE_VERSION"
+}
+
+#
+# Unload all used Vars.
+#
+$OFFSVN = $null
+$ONSVN = $null
+$UP = $null

Propchange: trunk/tools/RosBE/RosBE-Windows/Powershell/sSVN.ps1
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/tools/RosBE/RosBE-Windows/Powershell/scut.ps1
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Powershe…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Powershell/scut.ps1 (added)
+++ trunk/tools/RosBE/RosBE-Windows/Powershell/scut.ps1 [iso-8859-1] Thu Nov 13 02:31:17
2008
@@ -1,0 +1,41 @@
+#
+# PROJECT:     RosBE - ReactOS Build Environment for Windows.
+# LICENSE:     GNU General Public License v2. (see LICENSE.txt)
+# FILE:        Root/scut.cmd
+# PURPOSE:     Manages named shortcuts to ReactOS source directories.
+# COPYRIGHT:   Copyright 2007 Colin Finck &lt;mail(a)colinfinck.de&gt;
+#                             Daniel Reimer &lt;reimer.daniel(a)freenet.de&gt;
+#                             Peter Ward &lt;dralnix(a)gmail.com&gt;
+#
+
+function paramcall {
+    $OUT = IEX "'$_ROSBE_BASEDIR\Tools\scut.exe' $args"
+
+    # It's a shortcut name, so change the directory
+
+    if ($OUT -ne "Default") {
+        if (Test-Path "$OUT\.") {
+           cd $OUT
+            $_ROSBE_ROSSOURCEDIR = $OUT
+        }
+    }
+}
+
+# Check if the parameter is an scut parameter, which can just be forwarded to the EXE
file
+if ($args[0] -eq "add")    {paramcall}
+if ($args[0] -eq "rem")    {paramcall}
+if ($args[0] -eq "edit")   {paramcall}
+if ($args[0] -eq "def")    {paramcall}
+if ($args[0] -eq "list")   {paramcall}
+if ($args[0] -eq "/?")     {paramcall}
+if ($args[0] -eq "-h")     {paramcall}
+if ($args[0] -eq "--help") {paramcall}
+
+if ($_ROSBE_VERSION -ne $null) {
+    $host.ui.RawUI.WindowTitle = "ReactOS Build Environment $_ROSBE_VERSION"
+}
+
+#
+# Unload all used Vars.
+#
+$OUT = $null

Propchange: trunk/tools/RosBE/RosBE-Windows/Powershell/scut.ps1
------------------------------------------------------------------------------
    svn:eol-style = native

Modified: trunk/tools/RosBE/RosBE-Windows/Root/Config.cmd
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Root/Con…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Root/Config.cmd [iso-8859-1] (original)
+++ trunk/tools/RosBE/RosBE-Windows/Root/Config.cmd [iso-8859-1] Thu Nov 13 02:31:17 2008
@@ -26,7 +26,6 @@
     goto :NOK
 
     :CONT
-
     if exist "config.rbuild" (
         del "config.rbuild"
         echo Main Configuration File was found and deleted.
@@ -50,7 +49,6 @@
     if /i "%YESNO%"=="no" goto :NOK
 
     :CONT2
-
     del "%_ROSBE_BASEDIR%\*.rbuild"
     del "config.rbuild"
     copy "config.template.rbuild" "%APPDATA%\RosBE\config.rbuild"

Modified: trunk/tools/RosBE/RosBE-Windows/Root/reladdr2line.cmd
URL:
http://svn.reactos.org/svn/reactos/trunk/tools/RosBE/RosBE-Windows/Root/rel…
==============================================================================
--- trunk/tools/RosBE/RosBE-Windows/Root/reladdr2line.cmd [iso-8859-1] (original)
+++ trunk/tools/RosBE/RosBE-Windows/Root/reladdr2line.cmd [iso-8859-1] Thu Nov 13 02:31:17
2008
@@ -38,8 +38,6 @@
 :: adress and can be given directly to raddr2line. If not, add it and
 :: give the result to raddr2line.
 ::
-
-:RADD2RLINE
 
 if "%_1%" == "" (
     echo ERROR: You must specify a path/file to examine.