[GRASS-SVN] r59584 - grass/trunk/mswindows/external/rbatch

svn_grass at osgeo.org svn_grass at osgeo.org
Sat Apr 5 13:43:48 PDT 2014


Author: hellik
Date: 2014-04-05 13:43:48 -0700 (Sat, 05 Apr 2014)
New Revision: 59584

Removed:
   grass/trunk/mswindows/external/rbatch/#Rscript.bat
   grass/trunk/mswindows/external/rbatch/ANNOUNCE
   grass/trunk/mswindows/external/rbatch/COPYING
   grass/trunk/mswindows/external/rbatch/COPYRIGHTS
   grass/trunk/mswindows/external/rbatch/NEWS
   grass/trunk/mswindows/external/rbatch/R.bat
   grass/trunk/mswindows/external/rbatch/README
   grass/trunk/mswindows/external/rbatch/RESOURCES
   grass/trunk/mswindows/external/rbatch/Rcmd.bat
   grass/trunk/mswindows/external/rbatch/Rgui.bat
   grass/trunk/mswindows/external/rbatch/RguiStart.bat
   grass/trunk/mswindows/external/rbatch/Rscript.bat
   grass/trunk/mswindows/external/rbatch/Rtidy.bat
   grass/trunk/mswindows/external/rbatch/Rtools.bat
   grass/trunk/mswindows/external/rbatch/RtoolsVersion.bat
   grass/trunk/mswindows/external/rbatch/Rversions.bat
   grass/trunk/mswindows/external/rbatch/Stangle.bat
   grass/trunk/mswindows/external/rbatch/Sweave.bat
   grass/trunk/mswindows/external/rbatch/THANKS
   grass/trunk/mswindows/external/rbatch/WISHLIST
   grass/trunk/mswindows/external/rbatch/clip2r.js
   grass/trunk/mswindows/external/rbatch/copydir.bat
   grass/trunk/mswindows/external/rbatch/el.js
   grass/trunk/mswindows/external/rbatch/find-miktex.hta
   grass/trunk/mswindows/external/rbatch/movedir.bat
   grass/trunk/mswindows/external/rbatch/rterm.bat
   grass/trunk/mswindows/external/rbatch/show-svn-info.hta
Log:
update Windows batchfiles for use with R: part 2 - delete old files

Deleted: grass/trunk/mswindows/external/rbatch/#Rscript.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/#Rscript.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/#Rscript.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/ANNOUNCE
===================================================================
--- grass/trunk/mswindows/external/rbatch/ANNOUNCE	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/ANNOUNCE	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,63 +0,0 @@
-
-batchfiles is a set of batch, javascript and HTML
-Application files that are useful for running R and
-associated programs.
-
-Version 0.6-0 updates them for the new architecture
-specific directory structure in R 2.12.0 .
-
-A few of the lesser used utilities have been dropped.
-
-Each batchfile is self contained.  To install just
-place all or just any that you wish to use anywhere on
-your path.  The batch command:
-
-	path
-
-will show you which folders are on your path.
-
-
-DOWNLOAD
-
-They can be downloaded individually from the svn
-repository available via the home page or they can be
-downloaded all at one in a zip file from CRAN here:
-http://cran.r-project.org/contrib/extra/batchfiles/
-
-
-MORE INFO
-
-More info is available from the home page:
-http://batchfiles.googlecode.com
-
-
-LIST OF PROGRAMS
-
-Legend:
-h = no args gives help
-0 = common usage is to enter command name without arguments
-d = in development
-* = all files marked with one star are the same.  Program checks name by which its called to determine action.
-** = all files marked with two stars are the same.  Program checks name by which its called to determine action.
-
-#Rscript.bat - put at top of R file to make it a batch file (h) (*)
-clip2r.js - pastes clipboard into Rgui.  See comments in file for use from vim. (0)(d)
-copydir.bat - copy a library from one version of R to another (h)
-el.js - run elevated - Vista and up, e.g. el Rgui  runs R elevated
-find-miktex.hta - GUI to find MiKTeX (0)
-kopy.bat - copy Rcmd to other batch files (h)(d)
-movedir.bat - move library from one version of R to another (h) 
-R.bat - like R.exe but finds R from registry (0) (*)
-Rcmd.bat - like Rcmd.exe but finds R from registry (h) (*)
-Rgui.bat - like Rgui.exe but finds R from registry (0) (*)
-RguiStart.bat - like Rgui.bat but arg1 defines folder to start R in (*)
-Rscript.bat - run .R script (h) (*)
-Rterm.bat - like rterm.exe but finds R from registry (h) (*)
-Rtidy.bat - reformat a .R file, e.g. Rtidy myfile.R > outfile.R (d)
-Rtools.bat - place Rtools on path for remainder of console session (0) (*)
-Rversions.bat - list R and set R version in registry, e.g. on Vista: el cmd/c Rversions R-2.12.0 (0)
-show-svn-info.hta - show svn info if current folder is an svn checkout (0)
-Stangle.bat - run arg1 through Stangle (h) (**)
-Sweave.bat - run arg1 through Sweave (h) (**)
-
-

Deleted: grass/trunk/mswindows/external/rbatch/COPYING
===================================================================
--- grass/trunk/mswindows/external/rbatch/COPYING	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/COPYING	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,340 +0,0 @@
-		    GNU GENERAL PUBLIC LICENSE
-		       Version 2, June 1991
-
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
-     59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- Everyone is permitted to copy and distribute verbatim copies
- of this license document, but changing it is not allowed.
-
-			    Preamble
-
-  The licenses for most software are designed to take away your
-freedom to share and change it.  By contrast, the GNU General Public
-License is intended to guarantee your freedom to share and change free
-software--to make sure the software is free for all its users.  This
-General Public License applies to most of the Free Software
-Foundation's software and to any other program whose authors commit to
-using it.  (Some other Free Software Foundation software is covered by
-the GNU Library General Public License instead.)  You can apply it to
-your programs, too.
-
-  When we speak of free software, we are referring to freedom, not
-price.  Our General Public Licenses are designed to make sure that you
-have the freedom to distribute copies of free software (and charge for
-this service if you wish), that you receive source code or can get it
-if you want it, that you can change the software or use pieces of it
-in new free programs; and that you know you can do these things.
-
-  To protect your rights, we need to make restrictions that forbid
-anyone to deny you these rights or to ask you to surrender the rights.
-These restrictions translate to certain responsibilities for you if you
-distribute copies of the software, or if you modify it.
-
-  For example, if you distribute copies of such a program, whether
-gratis or for a fee, you must give the recipients all the rights that
-you have.  You must make sure that they, too, receive or can get the
-source code.  And you must show them these terms so they know their
-rights.
-
-  We protect your rights with two steps: (1) copyright the software, and
-(2) offer you this license which gives you legal permission to copy,
-distribute and/or modify the software.
-
-  Also, for each author's protection and ours, we want to make certain
-that everyone understands that there is no warranty for this free
-software.  If the software is modified by someone else and passed on, we
-want its recipients to know that what they have is not the original, so
-that any problems introduced by others will not reflect on the original
-authors' reputations.
-
-  Finally, any free program is threatened constantly by software
-patents.  We wish to avoid the danger that redistributors of a free
-program will individually obtain patent licenses, in effect making the
-program proprietary.  To prevent this, we have made it clear that any
-patent must be licensed for everyone's free use or not licensed at all.
-
-  The precise terms and conditions for copying, distribution and
-modification follow.
-
-		    GNU GENERAL PUBLIC LICENSE
-   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-
-  0. This License applies to any program or other work which contains
-a notice placed by the copyright holder saying it may be distributed
-under the terms of this General Public License.  The "Program", below,
-refers to any such program or work, and a "work based on the Program"
-means either the Program or any derivative work under copyright law:
-that is to say, a work containing the Program or a portion of it,
-either verbatim or with modifications and/or translated into another
-language.  (Hereinafter, translation is included without limitation in
-the term "modification".)  Each licensee is addressed as "you".
-
-Activities other than copying, distribution and modification are not
-covered by this License; they are outside its scope.  The act of
-running the Program is not restricted, and the output from the Program
-is covered only if its contents constitute a work based on the
-Program (independent of having been made by running the Program).
-Whether that is true depends on what the Program does.
-
-  1. You may copy and distribute verbatim copies of the Program's
-source code as you receive it, in any medium, provided that you
-conspicuously and appropriately publish on each copy an appropriate
-copyright notice and disclaimer of warranty; keep intact all the
-notices that refer to this License and to the absence of any warranty;
-and give any other recipients of the Program a copy of this License
-along with the Program.
-
-You may charge a fee for the physical act of transferring a copy, and
-you may at your option offer warranty protection in exchange for a fee.
-
-  2. You may modify your copy or copies of the Program or any portion
-of it, thus forming a work based on the Program, and copy and
-distribute such modifications or work under the terms of Section 1
-above, provided that you also meet all of these conditions:
-
-    a) You must cause the modified files to carry prominent notices
-    stating that you changed the files and the date of any change.
-
-    b) You must cause any work that you distribute or publish, that in
-    whole or in part contains or is derived from the Program or any
-    part thereof, to be licensed as a whole at no charge to all third
-    parties under the terms of this License.
-
-    c) If the modified program normally reads commands interactively
-    when run, you must cause it, when started running for such
-    interactive use in the most ordinary way, to print or display an
-    announcement including an appropriate copyright notice and a
-    notice that there is no warranty (or else, saying that you provide
-    a warranty) and that users may redistribute the program under
-    these conditions, and telling the user how to view a copy of this
-    License.  (Exception: if the Program itself is interactive but
-    does not normally print such an announcement, your work based on
-    the Program is not required to print an announcement.)
-
-These requirements apply to the modified work as a whole.  If
-identifiable sections of that work are not derived from the Program,
-and can be reasonably considered independent and separate works in
-themselves, then this License, and its terms, do not apply to those
-sections when you distribute them as separate works.  But when you
-distribute the same sections as part of a whole which is a work based
-on the Program, the distribution of the whole must be on the terms of
-this License, whose permissions for other licensees extend to the
-entire whole, and thus to each and every part regardless of who wrote it.
-
-Thus, it is not the intent of this section to claim rights or contest
-your rights to work written entirely by you; rather, the intent is to
-exercise the right to control the distribution of derivative or
-collective works based on the Program.
-
-In addition, mere aggregation of another work not based on the Program
-with the Program (or with a work based on the Program) on a volume of
-a storage or distribution medium does not bring the other work under
-the scope of this License.
-
-  3. You may copy and distribute the Program (or a work based on it,
-under Section 2) in object code or executable form under the terms of
-Sections 1 and 2 above provided that you also do one of the following:
-
-    a) Accompany it with the complete corresponding machine-readable
-    source code, which must be distributed under the terms of Sections
-    1 and 2 above on a medium customarily used for software interchange; or,
-
-    b) Accompany it with a written offer, valid for at least three
-    years, to give any third party, for a charge no more than your
-    cost of physically performing source distribution, a complete
-    machine-readable copy of the corresponding source code, to be
-    distributed under the terms of Sections 1 and 2 above on a medium
-    customarily used for software interchange; or,
-
-    c) Accompany it with the information you received as to the offer
-    to distribute corresponding source code.  (This alternative is
-    allowed only for noncommercial distribution and only if you
-    received the program in object code or executable form with such
-    an offer, in accord with Subsection b above.)
-
-The source code for a work means the preferred form of the work for
-making modifications to it.  For an executable work, complete source
-code means all the source code for all modules it contains, plus any
-associated interface definition files, plus the scripts used to
-control compilation and installation of the executable.  However, as a
-special exception, the source code distributed need not include
-anything that is normally distributed (in either source or binary
-form) with the major components (compiler, kernel, and so on) of the
-operating system on which the executable runs, unless that component
-itself accompanies the executable.
-
-If distribution of executable or object code is made by offering
-access to copy from a designated place, then offering equivalent
-access to copy the source code from the same place counts as
-distribution of the source code, even though third parties are not
-compelled to copy the source along with the object code.
-
-  4. You may not copy, modify, sublicense, or distribute the Program
-except as expressly provided under this License.  Any attempt
-otherwise to copy, modify, sublicense or distribute the Program is
-void, and will automatically terminate your rights under this License.
-However, parties who have received copies, or rights, from you under
-this License will not have their licenses terminated so long as such
-parties remain in full compliance.
-
-  5. You are not required to accept this License, since you have not
-signed it.  However, nothing else grants you permission to modify or
-distribute the Program or its derivative works.  These actions are
-prohibited by law if you do not accept this License.  Therefore, by
-modifying or distributing the Program (or any work based on the
-Program), you indicate your acceptance of this License to do so, and
-all its terms and conditions for copying, distributing or modifying
-the Program or works based on it.
-
-  6. Each time you redistribute the Program (or any work based on the
-Program), the recipient automatically receives a license from the
-original licensor to copy, distribute or modify the Program subject to
-these terms and conditions.  You may not impose any further
-restrictions on the recipients' exercise of the rights granted herein.
-You are not responsible for enforcing compliance by third parties to
-this License.
-
-  7. If, as a consequence of a court judgment or allegation of patent
-infringement or for any other reason (not limited to patent issues),
-conditions are imposed on you (whether by court order, agreement or
-otherwise) that contradict the conditions of this License, they do not
-excuse you from the conditions of this License.  If you cannot
-distribute so as to satisfy simultaneously your obligations under this
-License and any other pertinent obligations, then as a consequence you
-may not distribute the Program at all.  For example, if a patent
-license would not permit royalty-free redistribution of the Program by
-all those who receive copies directly or indirectly through you, then
-the only way you could satisfy both it and this License would be to
-refrain entirely from distribution of the Program.
-
-If any portion of this section is held invalid or unenforceable under
-any particular circumstance, the balance of the section is intended to
-apply and the section as a whole is intended to apply in other
-circumstances.
-
-It is not the purpose of this section to induce you to infringe any
-patents or other property right claims or to contest validity of any
-such claims; this section has the sole purpose of protecting the
-integrity of the free software distribution system, which is
-implemented by public license practices.  Many people have made
-generous contributions to the wide range of software distributed
-through that system in reliance on consistent application of that
-system; it is up to the author/donor to decide if he or she is willing
-to distribute software through any other system and a licensee cannot
-impose that choice.
-
-This section is intended to make thoroughly clear what is believed to
-be a consequence of the rest of this License.
-
-  8. If the distribution and/or use of the Program is restricted in
-certain countries either by patents or by copyrighted interfaces, the
-original copyright holder who places the Program under this License
-may add an explicit geographical distribution limitation excluding
-those countries, so that distribution is permitted only in or among
-countries not thus excluded.  In such case, this License incorporates
-the limitation as if written in the body of this License.
-
-  9. The Free Software Foundation may publish revised and/or new versions
-of the General Public License from time to time.  Such new versions will
-be similar in spirit to the present version, but may differ in detail to
-address new problems or concerns.
-
-Each version is given a distinguishing version number.  If the Program
-specifies a version number of this License which applies to it and "any
-later version", you have the option of following the terms and conditions
-either of that version or of any later version published by the Free
-Software Foundation.  If the Program does not specify a version number of
-this License, you may choose any version ever published by the Free Software
-Foundation.
-
-  10. If you wish to incorporate parts of the Program into other free
-programs whose distribution conditions are different, write to the author
-to ask for permission.  For software which is copyrighted by the Free
-Software Foundation, write to the Free Software Foundation; we sometimes
-make exceptions for this.  Our decision will be guided by the two goals
-of preserving the free status of all derivatives of our free software and
-of promoting the sharing and reuse of software generally.
-
-			    NO WARRANTY
-
-  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
-FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
-OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
-PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
-OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
-TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
-PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
-REPAIR OR CORRECTION.
-
-  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
-WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
-REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
-INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
-OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
-TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
-YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
-PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
-POSSIBILITY OF SUCH DAMAGES.
-
-		     END OF TERMS AND CONDITIONS
-
-	    How to Apply These Terms to Your New Programs
-
-  If you develop a new program, and you want it to be of the greatest
-possible use to the public, the best way to achieve this is to make it
-free software which everyone can redistribute and change under these terms.
-
-  To do so, attach the following notices to the program.  It is safest
-to attach them to the start of each source file to most effectively
-convey the exclusion of warranty; and each file should have at least
-the "copyright" line and a pointer to where the full notice is found.
-
-    <one line to give the program's name and a brief idea of what it does.>
-    Copyright (C) <year>  <name of author>
-
-    This program 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.
-
-    This program 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 this program; if not, write to the Free Software
-    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-
-Also add information on how to contact you by electronic and paper mail.
-
-If the program is interactive, make it output a short notice like this
-when it starts in an interactive mode:
-
-    Gnomovision version 69, Copyright (C) year  name of author
-    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
-    This is free software, and you are welcome to redistribute it
-    under certain conditions; type `show c' for details.
-
-The hypothetical commands `show w' and `show c' should show the appropriate
-parts of the General Public License.  Of course, the commands you use may
-be called something other than `show w' and `show c'; they could even be
-mouse-clicks or menu items--whatever suits your program.
-
-You should also get your employer (if you work as a programmer) or your
-school, if any, to sign a "copyright disclaimer" for the program, if
-necessary.  Here is a sample; alter the names:
-
-  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
-  `Gnomovision' (which makes passes at compilers) written by James Hacker.
-
-  <signature of Ty Coon>, 1 April 1989
-  Ty Coon, President of Vice
-
-This General Public License does not permit incorporating your program into
-proprietary programs.  If your program is a subroutine library, you may
-consider it more useful to permit linking proprietary applications with the
-library.  If this is what you want to do, use the GNU Library General
-Public License instead of this License.

Deleted: grass/trunk/mswindows/external/rbatch/COPYRIGHTS
===================================================================
--- grass/trunk/mswindows/external/rbatch/COPYRIGHTS	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/COPYRIGHTS	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,10 +0,0 @@
-COPYRIGHT STATUS
-----------------
-
-This code is:
-
-  Copyright (C) 2005 Gabor Grothendieck
-
-All code is subject to the GNU General Public License, Version 2. See
-the file COPYING for the exact conditions under which you may
-redistribute it.

Deleted: grass/trunk/mswindows/external/rbatch/NEWS
===================================================================
--- grass/trunk/mswindows/external/rbatch/NEWS	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/NEWS	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,296 +0,0 @@
-Changes in version 0.6-6
-
-  o bug fixes
-
-Changes in version 0.6-5
-
-  o if MYSQL_HOME has not already been set then it set it to the last file
-    among these, if any:
-
-		%ProgramFiles%\MySQL\*
-
-    This allows one to install and run RMySQL without setting any environment 
-    variables.  (Note that MySQL should be installed from the mysql site.
-    xampp and wamp do not include the header files needed by RMySQL.)
-
-Changes in version 0.6-4
-
-  o fixed bugs
-
-Changes in version 0.6-3
-
-  o fixed bugs
-
-Changes in version 0.6-1
-
-  o fixed bugs
-
-  o R_ARCH and --arch can consistently be any of 32, i386, 64, x64, /i386 or /64
-    (vs R itself which otherwise uses different values for R_ARCH and --arch)
-
-Changes in version 0.6
-
-  o enhancements to handle architecture specific directory structure in R 2.12.0
-    Supports R_ARCH environment variable and --arch= first argument.  Valid
-    values are 32, 64, i386, x64.  Default is i386.
-
-Changes in version 0.5-1
-
-  o new experimental command clip2r.js
-
-  o bug fixes
-
-Changes in version 0.5-0
-
-  o new command show-svn-info.hta when run from a Tortoise SVN checkout
-    folder shows some info about it.  Requires Tortoise SVN version 1.5
-    or higher.
-
-  o new command find-miktex.hta can be run without arguments from the
-    Windows command line or double clicked from Windows Explorer 
-    to show path to the MiKTeX bin directory.
-
-  o Rversions.hta now also changes the .RData association and has
-    been verified to work on both XP and Vista.
-
-  o new RExcelversion.hta (also distributed with RExcel) that is like
-    Rversions.hta but also sets the version for Rexcel at the same time
-    and has been verified to work on both XP and Vista.
-
-  o jgr.bat now passes the Windows library and R home to jgr.exe automatically
-
-  o added defensive code to allow code to work even in the presence of
-    certain bad PATH variables
-
-  o testing on XP32, XPx64, Vista32, Win7x64 (thanks to Nicholas Hirschey)
-
-Changes in version 0.4-3
-
-  o Sweave.bat and Stangle.bat were not automatically finding MiKTeX.  
-    Fixed.
-
-Changes in version 0.4-2
-
-  o can optionally work off initialization files in place of registry.
-    Place rbatchfilesrc.bat in current directory or %userprofile% (so 
-    different directories can work off different versions of R, say) 
-    or same directory as the other batchfiles and it will run it first.
-    Typically rbatchfiles.bat would constain these two lines or similar:
-		set R_HOME=C:\Program Files\R\R-2.7.0
-		set R_TOOLS=C:\Rtools
-
-  o added Stangle.bat
-
-Changes in version 0.4-1
-
-  o it is no longer necessary to set any paths to build R packages
-    provided Rtools 2.7 or later is used.  Rcmd.bat and the other
-    scripts automatically find Rtools from the registry (including perl)
-    and if MikTeX is at %ProgramFiles%\MiKTeX* or %SystemDrive%:\MiKTex  
-    then it will find MiKTeX too.  New optional environment variables 
-    R_TOOLS and R_MIKTEX are available to force specified paths to be used.
-
-  o new Rtools.bat command that sets the path for the current cmd instance
-    to the one that R*.bat files use internally.  That is, rtools/bin,
-    rtools/perl/bin, rtools/MinGW/bin and MiKTeX .../miktex/bin are added 
-    to the path.  This is not needed to run or install R programs but only
-    if you want to access the rtools for other purposes.
-
-  o new el.js command which runs the command given as its argument elevated.
-    e.g. el cmd
-
-Changes in version 0.4-0
-
-  o as of 0.4-0 batchfiles is being developed and tested on Vista.
-    It may still work on XP but if any of the commands do not then use
-    version 0.3-2 instead since that was exclusively tested on XP.
-
-  o added RguiStart.bat which is like Rgui.bat but takes a single argument
-    which is a directory and starts up there
-
-  o the dependency of sweave.bat on Rterm.bat was eliminated so all
-    batch and javascript programs in this collection are now independent
-    of each other and have no dependencies aside form R.  (The perl
-    program, toggleDoc.pl, is does depend on perl and toggleDoc.js.)
-
-  o added info on how to use RguiStart.bat and sweave.bat with SendTo
-    folder
-
-  o misc improvements to README file
-
-  o improved help message given by sweave.bat when issued with no arguments
-
-  o removed only tested on XP messages since they work on Vista
-
-  o changed algorithm in Rversions.bat.  Now it checks current directory,
-    R_HOME and all keys in R's portion of the registry plus all sibling
-    folders of those mentioned.  Also it runs RSetReg.exe elevated
-    on Vista.  New version has not been tested on XP; however, older
-    versions are still available and were tested on XP.
-
-  o updated copydir.bat portion of README to discuss additional alternatives
-
-  o removed find-miktex.bat, Rfind.bat and makepkg.bat (they are still
-    available in batchfiles version 0.3-2)
-
-  o added toggleDoc.pl/toggleDoc.js which adds a toggle box to each 00Index.html
-    which when checked collapses similar HTML help lines into one.  Contributed
-    by Dieter Menne.
-
-Changes in version 0.3-2
- 
-  o sweave.bat now uses Rterm.bat rather than Rcmd.bat which makes it usable
-    with a basic R installation (i.e. sh.exe not needed).  Previously it
-    required Rcmd.bat but now it requires Rterm.bat instead.
-
-  o added Rterm.bat (just a copy of Rcmd.bat)
-
-Changes in Version 0.3-1
-
-  o new find-miktex.bat which lists the mixktex folders from the registry
-
-  o new Rscript.bat which allows one to use the Rscript facility in 
-    R 2.5.0 and later without changing pathnames.  Just place Rscript.bat
-    in any existing path and it will automatically find the
-    current version of R from the registry and run the Rscript.exe that
-    is there.
-
-  o runR.bat.  If you have an R script such as myfile.R then you can create
-    a batch script for it by copying runR.bat to myfile.bat.  Then when you
-    issue the command myfile or myfile.bat it will run the R script in
-    myfile.R .  Just place myfile.bat and myfile.R anywhere in your path.  
-    This uses Rscript.bat .
-
-  o #Rscript.  If you have an Rscript called myfile.R, say, then if you
-    copy the script to myfile.bat and place 
-       #Rscript %0 %*  
-    as the first line with the remainder being the R commands then issuing
-    the command myfile or myfile.bat will run the R script.  The advantage
-    over the runR.bat method is that there is only one file, myfile.bat.
-    You don't need myfile.R anymore.  The disadvantage is that it will 
-    echo the #Rscript line to stdout.  This will be fixed if and when 
-    Rscript ever gets the perl/python/ruby -x flag.  (The runR approach will 
-    not echo additional lines but does require two files.)  
-
-  o new Rtidy.bat is a sample Rscript that uses the #Rscript facility
-    based on George Georgalis' UNIX code
-
-  o withgs.bat now checks for latest ghostscript version.  (Previously 
-    version was hard coded and it only worked for that version.)
-
-Changes in Version 0.3-0
-
-  o sweave now generates a second .pdf ending which is a copy of the first
-    but has a unique name and displays that.  This works around a problem
-    with acrobat that it will not display two files with the same name
-    at the same time.
-
-  o new --tex, --pdf, --nobck.pdf switches are available on sweave.  Also
-    expanded help when entering sweave without args.
-    
-Changes in Version 0.2-9
-
-  o updated README and other documentation files and inline documentation
-
-  o added sweave.bat
- 
-  o new google code home page and svn repository
-    http://code.google.com/p/batchfiles/
-
-Changes in Version 0.2-8
-
-  o bug fix in copydir.bat and movedir.bat
-
-Changes in Version 0.2-7
-
-  o removed extra popup from Rversions.hta
-
-  o Rfind.bat now looks in registry for MiKTeX, replacing
-    previous heuristic.  [Thanks for help from Duncan
-    Murdoch].  Also RToolsDir typo fixed in Rfind.bat.
-
-Changes in Version 0.2-6
-
-  o batch files no longer use short names internally since this
-    triggers a bug in Windows batch in the case of the new R
-    folder naming conventions.
-
-  o Rversions.hta - fix for path names with spaces
-
-  o Rrefresh.bat has been removed (after having been deprecated in
-    in previous versions of batchfiles).
-
-  o tested movedir.bat by using it to upgrade R-2.2.0pat to R-2.2.1.  
-    See instructions in README.
-
-Changes in Version 0.2-5
-
-  o added movedir.bat which moves libraries from one version of
-    R to another.  This is like copydir.bat but is much faster and
-    can be used when the older version of R is no longer needed
-    (unlike copydir.bat which preserves the older version).  See
-    README for usage.
-
-Changes in Version 0.2-3
-
-  o added copydir.bat which can copy libraries from one version of
-    R to another.  (This is a temporary solution until R provides
-    facilities for upgrading the libraries, expected in R 2.3.0 .)
-    See README for usage.
-    
-  o eliminated all code associated with reading and manipulation of
-    R_ENVIRON, R_PROFILE and R_LIBS simplifying the batch files.  Use
-    copydir.bat instead.
-
-  o Rversions.hta is a javascript GUI version of Rversions.bat 
-
-Changes in Version 0.2-2
-
-  o added jgr.bat which starts up the JGR GUI.
-
-  o added Rversions.bat which can list the directories of all R versions 
-    available and can set one to become the current R version.
-
-  o all batch scripts which used the environment variable name Rrw now 
-    use the environment variable name R_HOME instead.
-
-  o Rcmd.bat, Rgui.bat, R.bat, jgr.bat files will now read R_ENVIRON, 
-    if present, and set the R_LIBS definition in it, if present (unless
-    R_LIBS is already defined as an environment variable).  All R_ENVIRON
-    file syntax accepted by R is supported including comments (#), 
-    var=value, var=${foo-bar} and recursions, var=${A-${B-C}}.
-
-  o makepkg.bat internals were simplified due to previous point.
-
-  o updated WISHLIST.
-
-  o updated THANKS.
-
-  o updated README.  More introductory information.  Also instructions 
-    for Rgui shortcut will disable screen flash on startup. Corrections.
-
-Changes in Version 0.2-1
-
-  o improvements to README
-
-Changes in Version 0.2-0
-
-  o can now support configurations without *.site files (as well as
-    configurations with *.site files) thereby reducing the minimum 
-    configuration even further.  
-
-  o Rcmd.bat, Rgui.bat and R.bat now temporarily set R_ENVIRON,
-    R_PROFILE and R_LIBS as needed so that it is no longer necessary to 
-    copy the *.site files into the etc directory eliminating all
-    reconfiguration when upgrading to a new version of R (except for
-    refreshing MiKTeX).
-
-  o new command miktex-refresh.bat is used to refresh MiKTeX after a
-    new version of R is installed. Previously this was done in
-    Rrefresh.bat which is now deprecated.  Rrefresh.bat is no longer 
-    needed (unless you want each R version to have its own *.site files).
-
-  o new NEWS, WISHLIST and RESOURCES files.
-
-  o README provides additional details.
-

Deleted: grass/trunk/mswindows/external/rbatch/R.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/R.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/R.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/README
===================================================================
--- grass/trunk/mswindows/external/rbatch/README	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/README	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,367 +0,0 @@
-
-batchfiles contains GPL-2 batch files for installing and maintaining R.  
-
-Each is self contained, independent of the others and need no installation. 
-Just place it anywhere on your path.
-
----
-
-PROGRAM LIST
-
-Legend:
-h = no args gives help
-0 = common usage is to enter command name without arguments
-d = in development
-2.11 = only works with R 2.11
-* = all files marked with one star are the same.  Program checks name by which its called to determine action.
-** = all files marked with two stars are the same.  Program checks name by which its called to determine action.
-
-#Rscript.bat - put at top of R file to make it a batch file (h) (*)
-clip2r.js - pastes clipboard into Rgui.  See comments in file for use from vim. (0)(d)
-copydir.bat - copy a library from one version of R to another (h)
-el.js - run elevated - Vista and up, e.g. el Rgui  runs R elevated
-find-miktex.hta - GUI to find MiKTeX (0)
-kopy.bat - copy Rcmd to other batch files (h)(d)
-movedir.bat - move library from one version of R to another (h) 
-R.bat - like R.exe but finds R from registry (0) (*)
-Rcmd.bat - like Rcmd.exe but finds R from registry (h) (*)
-Rgui.bat - like Rgui.exe but finds R from registry (0) (*)
-RguiStart.bat - like Rgui.bat but arg1 defines folder to start R in (*)
-Rscript.bat - run .R script (h) (*)
-Rterm.bat - like rterm.exe but finds R from registry (h) (*)
-Rtidy.bat - reformat a .R file, e.g. Rtidy myfile.R > outfile.R (d)
-Rtools.bat - place Rtools on path for remainder of console session (0) (*)
-Rversions.bat - list R and set R version in registry, e.g. on Vista: el cmd/c Rversions R-2.10.1 (0)
-Rversions.hta - GUI interface to RSetReg.  List and set R version, e.g. on Vista: el cmd /c Rversions.hta (0)(2.11)
-show-svn-info.hta - show svn info if current folder is an svn checkout (0)
-Stangle.bat - run arg1 through Stangle (h) (**)
-Sweave.bat - run arg1 through Sweave (h) (**)
-
----
-
-DESCRIPTIONS
-
-R.bat, Rcmd.bat, Rscript.bat, Rgui.bat, and RguiStart.bat are all the same
-file.  They query the name by which they were called to determine what they do.
-Similarly Sweave.bat and Stangle.bat are the same file.
-
-The home page and NEWS file provide more info.
-
-BATCH PROGRAMS
-
-0. Rtools.bat
-1. R.bat, Rcmd.bat, Rscript.bat, Rgui.bat
-2. #Rscript.bat
-3. RguiStart.bat
-4. Sweave.bat and Stangle.bat
-5. copydir.bat
-6. movedir.bat
-7. find-miktex.hta
-
-
-0. Rtools.bat.  Sets path to what Rcmd.bat and others use internally.
-This only sets the path for the current command shell instance.
-
-1. R.bat, Rcmd.bat, Rscript.bat, Rgui.bat, Rscript.bat - are front
-ends to  the corresponding .exe files.  They locate R in the registry (and also
-look in a few other places if not found there).  Then they look for Rtools and
-MiKTeX and if found they add them temporarily to the path.  (Rtools and MiKTeX
-are needed when building R packages from source but are not needed for just
-running R nor are they need to download and install binary packages from CRAN.)
-Then they run R.exe, Rcmd.exe, Rscript.exe, Rgui.exe or JGR.exe with the same
-arguments.    They are actually all the same file just renamed.  (RguiStart.bat
-described separately is also the same file and all the code from this file is
-also at the end of Sweave.bat, also described separately.)  The file checks
-what name it was called by and acts accordingly.
-
-Their main advantages are:
-- you don't have to modify your path just to run R.
-- you don't have to modify your path to build R packages from source.
-- when you upgrade R they automatically work without change
-  since they will pick up the new version of R from the registry
-  automatically.
-- Sweave.bat and Stangle.bat, unlike, Rcmd Sweave and Rcmd Stangle
-  do not depend on rtools.
-
-You can put Rgui.bat on your desktop and associate a Windows
-ShortCut key (http://support.microsoft.com/kb/310417) with
-it so that you can just press the Windows key and
-R, say, to activate R.
-
-Here are some examples of using them from the command line.
-It assumes you have placed el.js, Rcmd.bat and Rgui.bat in
-your path.  el cmd spawns a command console with Administrator
-rights.  This is needed to build HTML help but you can omit
-the el command if you don't need that.
-
-    el cmd
-	Rcmd check mypackage 
-	Rcmd build mypackage
-	Rcmd build mypackage --binary
-	Rcmd INSTALL mypackage_1.0-0.tar.gz
-	Rcmd INSTALL mypackage_1.0-0.tar.gz -l library
-	Rscript myprog.R < mydata.dat
-	Rgui
-
-(When installing packages on Vista it is recommended that
-you do this from within a console session that has Administrator
-rights.  It will typically work even without that; however, the
-HTML help will not be created.)
-
-Older version of the Rcmd BATCH command in R had problems
-with spaces in pathnames so be sure you use a sufficiently
-recent version of R.  If you are using an old version of R
-that has problems use the short name corresponding to any
-long name with spaces:
-
-For example, suppose we have a file 
-   C:\Documents and Settings\Administrator\myfile.R .
-Then try this:
-
-	cd \
-	dir/x doc*
-	Rcmd BATCH c:\docume~1\Administrator\myfile.R
-
-where the dir/x command showed us the short name corresponding to
-the longer space-embedded name: Documents and Settings.  
-
-2. #Rscript.bat
-
-#Rscript.bat can be used as the first line of an R script to make 
-it callable as a batch file.  For example, if we have a myfile.R
-file then we can create a myfile.bat file that looks like this:
-
-#Rscript %0 %*
-...R code from myfile.R goes here...
-
-and now we can just issue the command myfile to run it.  We
-no longer need myfile.R.
-
-See the Rtidy.bat file for an example.  Note that it does have 
-the disadvantage that the output of the R program starts off 
-with the command itself.  R needs to be able to handle the 
-perl/python/ruby -x switch.  In the meantime #Rscript.bat 
-will mainly be useful for those scripts where the output does 
-not go to the standard output or where the addition of this 
-line is acceptable.
-
-3. RguiStart.bat
-
-This is like Rgui.bat except it intercepts the first argument
-and interprets it as the folder in which to start R (or if its
-an .Rdata file then it interprets it as the .Rdata file to start 
-R with).  The main reason for its existence is so that you can 
-place it in your SendTo folder.  On Vista do this:
-
-  copy RguiStart.bat %APPDATA%\Microsoft\Windows\SendTo
-
-(or to locate locate the SendTo folder in Windows Explorer on Vista
-enter shell:sendto into the Windows Explorer address bar and copy
-your RguiStart.bat file there.)
-
-Then, on Vista, when you are in Windows Explorer you can right click 
-on any folder in your user area and choose SendTo.  From the SendTo
-menu choose RGuiStart.bat to start up R in that folder.  If you 
-right click on an .Rdata file rather than a folder then R will
-start up with that file loaded (although in that case its probably
-easier to just double click the .Rdata file provided you have
-file type associations set up -- if you don't then the RguiStart.bat
-will provide an alternative).
-
-A second possibility is to place RguiStart.bat on your desktop and
-then drag a folder to it to start R in that folder.
-
-A third possibility is to just shift right click a folder in Windows
-Explorer and choose Open Command Window Here and then when the command
-window opens enter Rgui assuming you have placed Rgui.bat somewhere in
-your path.
-
-4. Sweave.bat and Stangle.bat - will run Sweave, then pdflatex and then
-display latex file.  Stangle.bat will run Stangle producing an R file.
-Unlike Rcmd Sweave and Rcmd Stangle these do not depend on rtools.
-Sweave.bat and Stangle.bat are actually the same file.  The file determines
-what to do by looking at the name by which it was called.
-
-      Sweave mydoc.Rnw
-   or
-      Sweave mydoc 
-
-The script runs Sweave, pdflatex and then displays the pdf
-file (assuming the user has .pdf extension associated with a
-pdf viewer).  If there is an error in Sweave or the .tex
-file is not newer than the Sweave'd file the script stops.
-Similarly if there is an error in pdflatex or the .pdf is
-not newer than the .tex file then the script stops.  Note
-that _two_ .pdf files are generated.  They are identical
-except one has a unique name created by suffixing the base
-with the date and time and .bck.pdf.  The one with the unique name 
-is the one viewed.  This overcomes problems of not being able to
-view the .pdf if the .pdf from a prior run is current being
-viewed (which would happen since by default the Acrobat viewer 
-won't allow you to view two files of the same name concurrently).
-Every so often the user should delete all *.bck.pdf files.
-
-Try:
-
-sweave
-
-without arguments to see options and get more info.
-
-Aside from using sweave from the command line, if you place
-sweave.bat in your SendTo folder as discussed under
-RguiStart.bat you can right click .Rnw files and choose
-SendTo > sweave to sweave them.
-
-You may need to copy Sweave.sty to the directory containing
-your .Rnw sweave file to use sweave.bat .
-
-5. Rversions.bat - similar to Rversions.hta but 
--- its batch whereas Rversions.hta is GUI
--- uses slightly different heuristic to find R versions
--- run without args to list versions available; run with any of
-   the listed versions to set that as the new version
--- both forms work on XP; to run arg form on Vista run it elevated
-   e.g. el cmd /c Rversions.bat R-2.10.0
-
-Examples:
-
-	:: list R versions
-	rversions.bat
-
-	:: check mypkg using R current version, 2.4.0, say
-	Rcmd check mypkg
-
-	:: switch to version R-2.5.0 and recheck
-	rversions R-2.5.0
-	Rcmd check mypkg
-
-	:: reset back to version 2.4.0
-	rversions.bat R-2.4.0
-
-6. copydir.bat - can be used to copy the libraries from an
-old version of R to your new one.  It will not overwrite any
-libraries already there so it should be safe to use. e.g. to
-upgrade R to a new version
-
-  :: Example is for upgrading from R-2.4.1 to R-2.5.0
-
-  :: first, download and install R-2.11.0
-  :: now perform the next two commands at the Windows console
-
-  cd %userprofile%\Documents\R\win-library
-  :: you can use movedir instead of copydir if you prefer to move them
-  copydir 2.10\library 2.11\library
-  
-  :: ... now startup new version of R (R 2.11.0 in this example)
-  # issue this command in R 2.5.0
-  update.packages(checkBuilt = TRUE, ask = "graphics")
-  # or (see note below)
-  update.packages(ask = "graphics")
-
-  :: press OK and it will update those packages as necessary
-
-  # ... optionally check for deprecated packages
-  # 1. first select all repositories that you use with menu:
-  #    Packages | Repositories
-  # 2. second check if there are any deprecated packages that
-  #    were copied over but are not longer on CRAN or other repository
-  dp <- setdiff(installed.packages()[,1], available.packages()[,1])
-  # look at what we have
-  dp
-  # if you wish to remove them issue the remove.packages command:
-  # remove.packages(dp)
-
-  :: ... exit R and start it up again ...
-
-Note that the checkBuilt=TRUE argument will potentially
-cause all your packages to be downloaded again so you could
-try leaving it off and then reissue the command with
-checkBuilt=TRUE later only if you run into problems.  I
-normally do it without the checkBuilt=TRUE.
-
-It is anticipated that this command will ultimately be
-superceded by functionality in the R setup procedure at
-which time this will be deprecated.  Note that this method
-of just copying libraries may not work depending on the
-versions of R involved.  If its necessary to re-install most
-packages it can be done by issuing the following R command
-after performing the copydir.bat:
-install.packages(installed.packages()[,1])
- 
-(Note that 2.8 of the R Windows FAQ
-
-http://cran.r-project.org/bin/windows/base/rw-FAQ.html#What_0027s-the-best-way-to-upgrade_003f
-
-refers to copying any installed package to the library
-folder but does not address how to accomplish that.  That
-omission is what copydir.bat addresses.)
-
-An alternative to copydir is to reinstall all packages
-
-	# Alternative to copydir.bat #1
-	# this example is for moving from 2.4.1 to 2.5.0
-	# run this in R 2.5.0
-	setwd(R.home())
-	ip <- installed.packages(lib.loc = "../R-2.4.1/library")
-	ip <- ip[ip[,1]!="base" ,1]
-	install.packages(ip)
-
-The above is taken from:
-https://www.stat.math.ethz.ch/pipermail/r-help/2007-May/131806.html
-Note that you may still have to use movedir.bat or copydir.bat
-after the above if it fails to install everything.  Since movedir.bat
-and copydir.bat won't overwrite anything this should be safe.
-
-	# Alternative to copydir.bat #2
-	#---run in previous version, e.g. R 2.4.1
-	packages <- installed.packages()[,"Package"]
-	save(packages, file = "~/Rpackages")
-
-	#---run in new version, e.g. R 2.5.0
-	load("~/Rpackages")
-	install.packages(setdiff(packages, installed.packages()[,"Package"]))
-
-	file.remove("~/Rpackages")
-
-This copydir alternative is based on:
-https://www.stat.math.ethz.ch/pipermail/r-help/2007-May/131131.html
-
-7. movedir - same arguments as copydir.  Only difference is
-that it moves the directories rather than copying them.  This
-can be used if you are no longer interested in using the
-packages with the old version of R other than by
-reinstalling them.)  This has the advantage that its much
-faster than copydir.  The example under copydir works with
-movedir too.  Just replace copydir with movedir in that
-example.  Comments under copydir.bat apply here too.  I
-mostly use movedir.bat myself instead of copydir.bat since
-its so much faster.
-
-8. show-svn-info.hta - Just run this from any Tortoise SVN folder
-and it will display some information about it.  Requires version 1.5
-or higher of Tortoise SVN.
-
-9. find-miktex.hta - displays the path to the MiKTeX bin directory.
-Just enter find-miktex.hta at the Windows command line (no arguments 
-are needed) or double click it from Windows Explorer.  
-
-ADDITIONAL FILES
-
-1. RESOURCES - additional information on writing Windows XP
-batch files.
-
-2. COPYRIGHT and COPYING - this is free software subject to
-   the GPL license as described.
-
-3. THANKS - acknowledgments.
-
-DEPRECATED AND CHANGED
-
-- Rfind.bat
-- makepkg.bat
-- Rversions.hta
-- toggerDoc.pl
-
-These are no longer distributed but can be found in older distributions of this
-package.  It is unknown whether they work with recent versions of R.  (I found
-I was not using these so am no longer maintaining them.)

Deleted: grass/trunk/mswindows/external/rbatch/RESOURCES
===================================================================
--- grass/trunk/mswindows/external/rbatch/RESOURCES	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/RESOURCES	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,146 +0,0 @@
-XP BATCH COMMAND RESOURCES
-
-This file contains R-specific resources for Windows XP batch file
-creation and also general resources for Windows XP batch file creation.
-
-A. MAKING A WINDOWS PACKAGE IN R
---------------------------------
-
-Make sure that:
-
-- you have read:
-   "Writing R Extensions" manual
-   http://www.murdoch-sutherland.com/Rtools/
-
-- you have downloaded and installed the tools from
-  http://www.murdoch-sutherland.com/Rtools/tools.zip.
-
-- you have installed LaTeX (MiKTeX), perl, the Microsoft help
-  compiler, and (if the package contains C or Fortran source code) the
-  MinGW compilers, as described at
-    http://www.murdoch-sutherland.com/Rtools/.
-  
-- read
-  http://www.murdoch-sutherland.com/Rtools/miktex.html
-
-- your path contains the tools, htmlhelp, and the bin directories for R,
-  LaTeX, Perl, and (if the package contains C or Fortran source code
-  to be compiled with MinGW) MinGW.  The tools directory should be the
-  first item in the path.  This link shows how to set your path:
-  http://www.computerhope.com/issues/ch000549.htm
-
-Assuming that the R installation is in \Program Files\R\R-x.y-z
-
-1. Assuming your source package tree is in \Rpkgs\mypackage
-   then at a Windows command prompt:
-
-        cd \Rpkgs
-        Rcmd INSTALL mypackage
-
-   which will install it to \Program Files\R\R-x.y-z\library\mypackage
-   Or if you want to install it to a separate library:
-
-        cd \Rpkgs
-        md library
-        Rcmd INSTALL -l library mypackage
-
-2. Now in R:
-
-        library(mypackage)
-        ... test it out ...
-
-   or if you installed it to a separate library:
-
-        library(mypackage, lib = "/Rpkgs/library")
-
-3. Once it seems reasonably OK, see whether it passes Rcmd check:
-
-        cd \Rpkgs
-        Rcmd check mypackage
-
-   and fix it up until it does.
-
-4. Now create versions for Unix and Windows that you can distribute:
-
-        cd \Rpkgs
-        Rcmd build mypackage
-        Rcmd build mypackage --binary
-
-5. If you want to submit it to CRAN then upload the .tar.gz
-   file that was created from the "Rcmd build mypackage"
-   command in #4 to ftp://cran.R-project.org/incoming .
-   I usually use FileZilla to do the upload.
-   http://filezilla.sourceforge.net/
-
-
-B. Some R Resources on making packages
---------------------------------------
-
-John Fox provides a batch file for making packages:
-
-	http://tolstoy.newcastle.edu.au/R/help/04/11/6729.html
-
-Henrik Bengtsson provides a batch file for setting environment
-variables:
-
-	http://tolstoy.newcastle.edu.au/R/devel/04a/0594.html
-
-Information on building packages can be found in the Writing
-Extensions Manual.    The following link is also useful although
-the enclosed batch files eliminate the need for some of the 
-procedures discussed:
-
-	http://www.murdoch-sutherland.com/Rtools/
-
-Googling for
-
-	creating making R packages
-
-will find links to a number of privately written tutorials.
-(I have not reviewed these.)
-
-C. GENERAL RESOURCES ON WINDOWS BATCH FILE PROGRAMMMING
--------------------------------------------------------
-
-The Windows command line commands will bring up help information 
-that is particularly useful:
-
-	help set
-	help for
-	help if
-
-Here are some links on Windows batch file programmming.
-
-	ftp://garbo.uwasa.fi/pc/link/tscmd.zip - FAQ with many idioms
-
-	http://gearbox.maem.umr.edu/batch/f_w_util/ - Frank Westlake utilities
-
-	http://gearbox.maem.umr.edu/fwu/ - more Frank Westlake utilities
-
-	http://groups-beta.google.com/group/alt.msdos.batch.nt/msg/5a9587e871c27a75 - cmd bugs
-
-	http://groups-beta.google.com/group/alt.msdos.batch/msg/7b1d22945c89af75 - cmd help resources 
-
-	http://msdn.microsoft.com/downloads/list/webdev.asp - Windows script downloads
-
-	http://thesystemguard.com/TheGuardBook/CCS-Int/ - info on batch commands
-
-	http://www.allenware.com/icsw/icswref.htm - info on batch commands
-
-	http://www.commandline.co.uk - Ritchie Lawrence cmd line utilities
-
-	http://www.cybermesa.com/~bstewart/ - Bill Stewart’s scripting tools
-
-	http://www.fpschultze.de - FP Shcultze’s batch tricks
-
-	http://www.microsoft.com/technet/community/columns/scripts - MS TechNet scripting
-
-	http://www.murdoch-sutherland.com/Rtools - R package building tools
-
-	http://www.paulsadowski.com/WSH/cmdutils.htm - Paul Sadowski batch info
-
-	http://www.ss64.com/nt/index.html - batch command reference
-
-	http://www.vlaurie.com/computers2/Articles/rundll32.htm - rundll for batch scripts
-
-

Deleted: grass/trunk/mswindows/external/rbatch/Rcmd.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rcmd.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rcmd.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/Rgui.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rgui.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rgui.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/RguiStart.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/RguiStart.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/RguiStart.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/Rscript.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rscript.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rscript.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/Rtidy.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rtidy.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rtidy.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,8 +0,0 @@
-#Rscript %0.bat %*
-# usage: Rtidy sourcefile.R > sourcefile.Rtidy.R
-# based on 3.1 of R Extensions Manual
-options(keep.source = FALSE)
-source(commandArgs(TRUE))
-dump(ls(all = TRUE), file = stdout())
-q("no")
-

Deleted: grass/trunk/mswindows/external/rbatch/Rtools.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rtools.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rtools.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/RtoolsVersion.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/RtoolsVersion.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/RtoolsVersion.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,30 +0,0 @@
- at echo off
-
-setlocal
-rem if /i "%1"==path (path %2) && goto:eof
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-if not defined R_TOOLS (
-	echo "Warning: Rtools not found in registry."
-	if exist "C:\Rtools" set R_TOOLS=C:\Rtools
-)
-if not defined R_TOOLS (
-	echo "Warning: Rtools not found in common locations."
-	goto:eof
-)
-
-echo Rtools at: %R_TOOLS%
-if not exist "%R_TOOLS%\VERSION.txt" (
-	echo Rtools version: 2.12 or 2.13 or earlier.
-	goto:eof
-)
-
-type %R_TOOLS%\VERSION.txt
-
-endlocal
-

Deleted: grass/trunk/mswindows/external/rbatch/Rversions.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Rversions.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Rversions.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,103 +0,0 @@
-
- at echo off
-
-:: Without args this lists the R_HOME directory for each version of R
-:: on the system.  If one of those directories is given as an argument
-:: then that version is set to the current version
-:: Note: Use Rfind.bat and look on R_HOME line to find current version of R.
-
-setlocal
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-if not defined R_HOME if exist bin\rcmd.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-:: look for architecture in these places in this order:
-:: - environment variable R_ARCH
-:: - first arg if its --arch
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use i386
-
-call :process_arch %*
-rem set R
-
-cd %R_HOME%
-cd ..
-
-if "%1"=="" (
-	for /d %%a in (*) do if exist %%a\bin\R.exe echo %%a
-	goto:eof
-)
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%1\bin\%R_ARCH0%\RSetReg.exe
-rem set cmdpath
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%1\bin\RSetReg.exe
-rem set cmdpath
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: RSetReg.exe not found" & goto:eof
-goto:eof
-:cmdpathfound
-"%cmdpath%"
-
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    (set arg=%~1) 
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" (set R_ARCH=%1) & goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/Stangle.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Stangle.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Stangle.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,377 +0,0 @@
- at echo off
-setlocal
-rem rem ver | findstr XP >NUL
-
-for %%i in (%0) do set cmd0=%%~ni
-set cmd=Sweave
-if /i "%cmd0%"=="Stangle" set cmd=Stangle
-
-if not defined SWEAVE_STYLEPATH_DEFAULT set SWEAVE_STYLEPATH_DEFAULT=TRUE
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	set R_BATCHFILES_RC
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-if "%1"=="" goto:help
-if "%1"=="-h" goto:help
-if "%1"=="--help" goto:help
-if "%1"=="/?" goto:help
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else check for .\bin\R.exe
-:: else check registry
-:: else check for existence of bin\R.exe in:
-::   %ProgramFiles%\R\R\R-*
-:: where more recently dated R-* directories would be matched over older ones
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-if not defined R_HOME if exist bin\R.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-	if not defined R_HOME echo "Error: R not found" & goto:eof
-
-if not "%1"==":Rterm" goto:notRterm
-
-	set here=%CD%
-	set args=%2 %3 %4 %5 %6 %7 %8 %9
-
-	set cmd=:Rterm
-
-	goto:Rterm
-)
-:notRterm
-goto:continue
-:help
-echo Usage: %0 abc.Rnw
-echo    or  %0 abc
-if /i "%cmd%"=="stangle" goto:eof
-echo switches:
-echo    -t or --tex or     produce tex file and exit
-echo    -p or --pdf or     produce pdf file and exit
-echo    -n or --nobck.pdf  do not create .bck.pdf; instead display pdf directly
-echo Runs sweave producing a .tex file.  Then it runs pdflatex producing
-echo  a .pdf file and a .bck.pdf file.  Finally the .bck.pdf file is 
-echo  displayed on screen.
-echo.
-echo Examples:
-echo.
-echo 1. Run sweave, pdflatex, create backup pdf with unique name, display it
-echo       sweave mydoc.Rnw
-echo 2. Same
-echo       sweave mydoc
-echo 3. Run sweave to create tex file.  Do not run pdflatex or display.
-echo       sweave mydoc --tex
-echo 4. Run sweave and pdflatex creating pdf file.  Do not create .bck.pdf
-echo    file and do not display file.
-echo       sweave mydoc --pdf
-echo 5. Run sweave and pdflatex. Do not create .bck.pdf. Display .pdf file.
-echo       sweave mydoc --nobck
-goto:eof
-:continue
-
-call :process_arch %*
-
-:: argument processing
-:: - returns 'file' as file argument
-
-    :loop 
-    (set arg=%~1) 
-    shift 
-    if not defined arg goto :cont 
-    (set prefix1=%arg:~0,1%) 
-    if "%prefix1%"=="-" goto:switch
-    set file=%arg%
-    goto:loop
-	:switch
-	set switch0=%arg:-=%
-	set switch0=%switch0:~0,1%
-	rem architecture switch was previously handled so skip over it here
-	if "%switch0%"=="a" goto:loop
-	set switch=%switch0%
-    goto:loop
-    :cont
-
-if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-if exist "%file%.Rtex" set infile="%file%.Rtex"
-if exist "%file%.Snw" set infile="%file%.Snw"
-if exist "%file%.Rnw" set infile="%file%.Rnw"
-if exist "%file%" set infile="%file%" 
-set infilslsh=%infile:\=/%
-:: call sweave
-echo library('utils'); %cmd%(%infilslsh%) | %cmd0%.bat :Rterm --no-restore --slave
-if /i "%cmd%"=="stangle" goto:eof
-:: echo on
-if errorlevel 1 goto:eof
-if /i "%switch%"=="t" goto:eof
-
-:: echo %cd%
-for %%a in ("%file%") do set base=%%~sdpna
-if not exist "%base%.tex" goto:eof
-for /f "delims=" %%a in ('dir %infile% "%base%.tex" /od/b ^| more +1'
-) do set ext=%%~xa
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if "%ext%"==".tex" (pdflatex "%base%.tex") else goto:eof
-if errorlevel 1 goto:eof
-if /i "%switch%"=="p" goto:eof
-
-if not exist "%base%.pdf" goto:eof
-for /f "delims=" %%a in ('dir "%base%.pdf" "%base%.tex" /od/b ^| more +1'
-) do set ext=%%~xa
-if not "%ext%"==".pdf" goto:eof
-set pdffile=%base%.pdf
-if /i "%switch%"=="n" start "" "%pdffile%" && goto:eof
-set tmpfile=%date%-%time%
-set tmpfile=%tmpfile: =-%
-set tmpfile=%tmpfile::=.%
-set tmpfile=%tmpfile:/=.%
-set tmpfile=%base%-%tmpfile%.bck.pdf
-copy "%pdffile%" "%tmpfile%"
-start "" "%tmpfile%"
-echo *** delete *.bck.pdf files when done ***
-goto:eof
-
-
-
- at echo off
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else check for .\bin\R.exe
-:: else check registry
-:: else check for existence of bin\R.exe in each of the following:
-::   %ProgramFiles%\R\R\R-*
-:: where more recently created R-* directories would be matched over
-:: older ones.
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-if not defined R_HOME if exist bin\R.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-
-if not defined R_HOME for /f "delims=" %%a in (
-	'dir/b/od "%ProgramFiles%"\R\R-* 2^>NUL'
-) do if exist "%ProgramFiles%\R\%%a\bin\R.exe" (set R_HOME=%ProgramFiles%\R\%%a)
-
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^|
-findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    PATH %R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni 
-
-goto %cmd%
-goto:eof
-
-:: note that RguiStart sets cmd to rgui.exe and then 
-:: jumps to :Rgui.exe where processing is finished
-:RguiStart
-:RguiStart.exe
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:Rgui
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-
-:Rcmd2
-:Rcmd2.exe
-:Rcmd
-:Rcmd.exe
-(set cmd=rcmd.exe)&goto:main
-
-:Rterm
-:Rterm.exe
-(set cmd=rterm.exe)&goto:main
-
-:Rgui
-:Rgui.exe
-(set cmd=rgui.exe)&goto:main
-
-:R
-:R.exe
-(set cmd=r)&goto:main
-
-:Rjgr
-:Rjgr.exe
-(set cmd=rjgr)&goto:main
-
-:#Rscript
-:#Rscript.exe
-:Rscript
-:Rscript.exe
-(set cmd=rscript.exe)&goto:main
-
-# main portion of program
-:main
-set st=
-if /i %cmd%==rgui.exe set st=start
-:: if /i %cmd%==#rscript.exe set cmd=rscript.exe
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-rem set cmdpath
-
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-
-endlocal
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	rem set R_HOME
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    (set arg=%~1) 
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" (set R_ARCH=%1) & goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined R_ARCH goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal
-
-
-

Deleted: grass/trunk/mswindows/external/rbatch/Sweave.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/Sweave.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/Sweave.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,377 +0,0 @@
- at echo off
-setlocal
-rem rem ver | findstr XP >NUL
-
-for %%i in (%0) do set cmd0=%%~ni
-set cmd=Sweave
-if /i "%cmd0%"=="Stangle" set cmd=Stangle
-
-if not defined SWEAVE_STYLEPATH_DEFAULT set SWEAVE_STYLEPATH_DEFAULT=TRUE
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	set R_BATCHFILES_RC
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-if "%1"=="" goto:help
-if "%1"=="-h" goto:help
-if "%1"=="--help" goto:help
-if "%1"=="/?" goto:help
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else check for .\bin\R.exe
-:: else check registry
-:: else check for existence of bin\R.exe in:
-::   %ProgramFiles%\R\R\R-*
-:: where more recently dated R-* directories would be matched over older ones
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-if not defined R_HOME if exist bin\R.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-	if not defined R_HOME echo "Error: R not found" & goto:eof
-
-if not "%1"==":Rterm" goto:notRterm
-
-	set here=%CD%
-	set args=%2 %3 %4 %5 %6 %7 %8 %9
-
-	set cmd=:Rterm
-
-	goto:Rterm
-)
-:notRterm
-goto:continue
-:help
-echo Usage: %0 abc.Rnw
-echo    or  %0 abc
-if /i "%cmd%"=="stangle" goto:eof
-echo switches:
-echo    -t or --tex or     produce tex file and exit
-echo    -p or --pdf or     produce pdf file and exit
-echo    -n or --nobck.pdf  do not create .bck.pdf; instead display pdf directly
-echo Runs sweave producing a .tex file.  Then it runs pdflatex producing
-echo  a .pdf file and a .bck.pdf file.  Finally the .bck.pdf file is 
-echo  displayed on screen.
-echo.
-echo Examples:
-echo.
-echo 1. Run sweave, pdflatex, create backup pdf with unique name, display it
-echo       sweave mydoc.Rnw
-echo 2. Same
-echo       sweave mydoc
-echo 3. Run sweave to create tex file.  Do not run pdflatex or display.
-echo       sweave mydoc --tex
-echo 4. Run sweave and pdflatex creating pdf file.  Do not create .bck.pdf
-echo    file and do not display file.
-echo       sweave mydoc --pdf
-echo 5. Run sweave and pdflatex. Do not create .bck.pdf. Display .pdf file.
-echo       sweave mydoc --nobck
-goto:eof
-:continue
-
-call :process_arch %*
-
-:: argument processing
-:: - returns 'file' as file argument
-
-    :loop 
-    (set arg=%~1) 
-    shift 
-    if not defined arg goto :cont 
-    (set prefix1=%arg:~0,1%) 
-    if "%prefix1%"=="-" goto:switch
-    set file=%arg%
-    goto:loop
-	:switch
-	set switch0=%arg:-=%
-	set switch0=%switch0:~0,1%
-	rem architecture switch was previously handled so skip over it here
-	if "%switch0%"=="a" goto:loop
-	set switch=%switch0%
-    goto:loop
-    :cont
-
-if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-if exist "%file%.Rtex" set infile="%file%.Rtex"
-if exist "%file%.Snw" set infile="%file%.Snw"
-if exist "%file%.Rnw" set infile="%file%.Rnw"
-if exist "%file%" set infile="%file%" 
-set infilslsh=%infile:\=/%
-:: call sweave
-echo library('utils'); %cmd%(%infilslsh%) | %cmd0%.bat :Rterm --no-restore --slave
-if /i "%cmd%"=="stangle" goto:eof
-:: echo on
-if errorlevel 1 goto:eof
-if /i "%switch%"=="t" goto:eof
-
-:: echo %cd%
-for %%a in ("%file%") do set base=%%~sdpna
-if not exist "%base%.tex" goto:eof
-for /f "delims=" %%a in ('dir %infile% "%base%.tex" /od/b ^| more +1'
-) do set ext=%%~xa
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if "%ext%"==".tex" (pdflatex "%base%.tex") else goto:eof
-if errorlevel 1 goto:eof
-if /i "%switch%"=="p" goto:eof
-
-if not exist "%base%.pdf" goto:eof
-for /f "delims=" %%a in ('dir "%base%.pdf" "%base%.tex" /od/b ^| more +1'
-) do set ext=%%~xa
-if not "%ext%"==".pdf" goto:eof
-set pdffile=%base%.pdf
-if /i "%switch%"=="n" start "" "%pdffile%" && goto:eof
-set tmpfile=%date%-%time%
-set tmpfile=%tmpfile: =-%
-set tmpfile=%tmpfile::=.%
-set tmpfile=%tmpfile:/=.%
-set tmpfile=%base%-%tmpfile%.bck.pdf
-copy "%pdffile%" "%tmpfile%"
-start "" "%tmpfile%"
-echo *** delete *.bck.pdf files when done ***
-goto:eof
-
-
-
- at echo off
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else check for .\bin\R.exe
-:: else check registry
-:: else check for existence of bin\R.exe in each of the following:
-::   %ProgramFiles%\R\R\R-*
-:: where more recently created R-* directories would be matched over
-:: older ones.
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-if not defined R_HOME if exist bin\R.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-
-if not defined R_HOME for /f "delims=" %%a in (
-	'dir/b/od "%ProgramFiles%"\R\R-* 2^>NUL'
-) do if exist "%ProgramFiles%\R\%%a\bin\R.exe" (set R_HOME=%ProgramFiles%\R\%%a)
-
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^|
-findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    PATH %R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni 
-
-goto %cmd%
-goto:eof
-
-:: note that RguiStart sets cmd to rgui.exe and then 
-:: jumps to :Rgui.exe where processing is finished
-:RguiStart
-:RguiStart.exe
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:Rgui
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-
-:Rcmd2
-:Rcmd2.exe
-:Rcmd
-:Rcmd.exe
-(set cmd=rcmd.exe)&goto:main
-
-:Rterm
-:Rterm.exe
-(set cmd=rterm.exe)&goto:main
-
-:Rgui
-:Rgui.exe
-(set cmd=rgui.exe)&goto:main
-
-:R
-:R.exe
-(set cmd=r)&goto:main
-
-:Rjgr
-:Rjgr.exe
-(set cmd=rjgr)&goto:main
-
-:#Rscript
-:#Rscript.exe
-:Rscript
-:Rscript.exe
-(set cmd=rscript.exe)&goto:main
-
-# main portion of program
-:main
-set st=
-if /i %cmd%==rgui.exe set st=start
-:: if /i %cmd%==#rscript.exe set cmd=rscript.exe
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-rem set cmdpath
-
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-
-endlocal
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	rem set R_HOME
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    (set arg=%~1) 
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" (set R_ARCH=%1) & goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined R_ARCH goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal
-
-
-

Deleted: grass/trunk/mswindows/external/rbatch/THANKS
===================================================================
--- grass/trunk/mswindows/external/rbatch/THANKS	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/THANKS	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,35 +0,0 @@
-
-Thanks to the following for contributing code:
-
-  Nicholas Hirschey <<Nicholas.Hirschey at phd.mccombs.utexas.edu>
-  Dieter Menne <dieter.menne at menne-biomed.de>
-  Erich Neuwirth <erich.neuwirth at univie.ac.at>
-
-Thanks to the following for finding bugs:
-
-  Nicholas Hirschey <<Nicholas.Hirschey at phd.mccombs.utexas.edu>
-  Xiaohua Dai <ecoinformatics at gmail.com>
-
-Thanks to the following people for discussion related to R:
-
-  Henrik Bengtsson <henrikb at braju.com>
-  J. Hosking <jh910 at juno.com>
-  Uwe Ligges <ligges at statistik.uni-dortmund.de>
-  Duncan Murdoch <murdoch at stats.uwo.ca>
-  Tobias Verbeke <tobias.verbeke at telenet.be>
-
-Also thanks to the following for discussion related to Windows batch:
-
-  William Allen
-  billious
-  carlos
-  Clay Calvert
-  Ted Davis
-  Al Dunbar
-  foxidrive
-  Phil Robyn
-  Paul R. Sadowski
-  Timo Salmi
-  Tomek (T3X)
-  Matthias Tacke
-

Deleted: grass/trunk/mswindows/external/rbatch/WISHLIST
===================================================================
--- grass/trunk/mswindows/external/rbatch/WISHLIST	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/WISHLIST	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,11 +0,0 @@
-WISHLIST
-
-o Sweave.bat
-  - output file name
-  - commandArgs
-  - brew
-
-o clean up documentation
-
-o test latest version of XP (recent versions were tested only on Vista;
-  versions up to 0.3-2 tested only on XP)

Deleted: grass/trunk/mswindows/external/rbatch/clip2r.js
===================================================================
--- grass/trunk/mswindows/external/rbatch/clip2r.js	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/clip2r.js	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,27 +0,0 @@
-// (c) 2009.  Gabor Grothendieck. 
-// This is free software licensed under GPL.
-//
-// Based on TpR.bas by Philippe Grosjean.
-//
-// 1. To find the directory where _vimrc goes enter this in vim   :echo $HOME
-// 2. Place these two lines in your _vimrc file in which case F3 will 
-//    transmit current selection to the clipboard and then paste it into R
-//    e.g. ctrl-A F3 copies entire file to R
-//
-//    map <F3> <C-C><ESC>:!start clip2r.js<CR><CR>
-//    imap <F3> <ESC><C-C><ESC>:!start clip2r.js<CR><CR>
-//
-//    Alternately use these two lines copy entire file when F3 is pressed:
-// 
-//    map <F3> <C-A><C-C><ESC>:!start clip2r.js<CR><CR>
-//    imap <F3> <ESC><C-A><C-C><ESC>:!start clip2r.js<CR><CR>
-//
-// Note: In the wsh.SendKeys command the strings: 
-//       "% x" stands for Alt-space x and has the effect of maximizing Rgui
-//       "%{w}1" stands for Alt-w 1 and activates the R console
-// 		 "^{v}" stands for ctrl-v and pastes clipboard.
-
-var wsh = new ActiveXObject("Wscript.Shell");
-wsh.AppActivate("Rgui");
-wsh.SendKeys("% x%{w}1^{v}");
-

Deleted: grass/trunk/mswindows/external/rbatch/copydir.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/copydir.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/copydir.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,16 +0,0 @@
- at echo off
-setlocal
-if not "%2"=="" goto:run
-echo Usage: copydir fromdir todir
-echo All files/directories in fromdir that do not also exist in todir are 
-echo recurisvely copied.
-echo e.g. 
-echo      cd \Program Files\R
-echo      copydir R-2.2.0\library R-2.3.0\library
-goto:eof
-:run
-:: Notes on code:
-:: on xcopy command /e copies subdir/files incl empty ones
-:: on xcopy command /i causes target to be created
-for /D  %%a in ("%~1\*") do if not exist %2\%%~na xcopy /e/i "%%a" "%~2\%%~nxa"
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/el.js
===================================================================
--- grass/trunk/mswindows/external/rbatch/el.js	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/el.js	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,16 +0,0 @@
-// elevate.js -- runs target command line elevated
-if (WScript.Arguments.Length >= 1) {
-    Application = WScript.Arguments(0);
-    Arguments = "";
-    for (Index = 1; Index < WScript.Arguments.Length; Index += 1) {
-        if (Index > 1) {
-            Arguments += " ";
-        }
-        Arguments += WScript.Arguments(Index);
-    }
-    new ActiveXObject("Shell.Application").ShellExecute(Application, Arguments, "", "runas");
-} else {
-    WScript.Echo("Usage:");
-    WScript.Echo("elevate Application Arguments");
-}
-

Deleted: grass/trunk/mswindows/external/rbatch/find-miktex.hta
===================================================================
--- grass/trunk/mswindows/external/rbatch/find-miktex.hta	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/find-miktex.hta	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,29 +0,0 @@
-<head>
-<STYLE TYPE="text/css">
-.highlight {background:#ff00ff}
-.text {color:#ff00ff}
-.both {color:white;background:black}
-</STYLE> 
-<title>find-miktex</title>
-</head>
-<body onLoad="window.resizeTo(650,250);">
-<h1>Find MiKTeX</h1>
-<script type="text/jscript">
-
-fso = new ActiveXObject("Scripting.FileSystemObject");
-mik = new ActiveXObject("MiKTeX.Session");
-
-i = 0;
-while (true) {
-	try {
-		rt = mik.GetRootDirectory(i);
-		if (fso.FileExists(rt + "\\miktex\\bin\\latex.exe")) {
-			document.write(rt + "\\miktex\\bin<br>");
-		}
-		i++;
-	} catch(e) {break};
-}
-	
-</script>
-</body>
-</html>

Deleted: grass/trunk/mswindows/external/rbatch/movedir.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/movedir.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/movedir.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,21 +0,0 @@
- at echo off
-setlocal
-:: Usage:
-::   If arg1 and arg2 are the library subdirectories of two R distributions
-::   then all libraries in arg1 that are not already in arg2 are moved to 
-::   arg2.  Note that this is a fast way of upgrading to a new version of
-::   R but won't work if the versions of R have different library formats.
-:: Example:
-::   cd \Program Files\R
-::   movedir R-2.2.0\library R-2.2.0pat\library
-::
-if not "%2"=="" goto:run
-echo Usage: movedir fromdir todir
-echo All files/directories in fromdir that do not also exist in todir are moved.
-echo e.g. 
-echo      cd \Program Files\R
-echo      movedir R-2.2.0\library R-2.3.0\library
-goto:eof
-:run
-for /D  %%a in ("%~1\*") do if not exist %2\%%~na move "%%a" "%~2\%%~nxa"
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/rterm.bat
===================================================================
--- grass/trunk/mswindows/external/rbatch/rterm.bat	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/rterm.bat	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,239 +0,0 @@
-
- at echo off
-rem if /i "%1"==path (path %2) && goto:eof
-
-setlocal
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: Placing this file in your path will allow rcmd to be run anywhere
-:: without changing your path environment variable.  See comments
-:: below on how it finds where R is.  Your path can be listed by
-:: the Windows console command:  path
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-rem at one tine this script had only been tested on XP
-rem recent tests have only been on Vista
-rem ver | findstr XP >NUL
-rem if errorlevel 1 echo Warning: This script has only been tested on Windows XP.
-
-set scriptdir_=%~dp0
-set lookin=.;%userprofile%;%scriptdir_%
-if not defined R_BATCHFILES_RC (
-	for %%f in ("rbatchfilesrc.bat") do set "R_BATCHFILES_RC=%%~$lookin:f"
-)
-if defined R_BATCHFILES_RC (
-	if exist "%R_BATCHFILES_RC%" call %R_BATCHFILES_RC%
-)
-
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: use environment variable R_HOME if defined
-:: else current folder if bin\rcmd.exe exists 
-:: else most current R as determined by registry entry
-:: else error
-:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-if not defined R_HOME if exist bin\r.exe set R_HOME=%CD%
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\R /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\r-core\r /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_HOME=%%~b
-if not defined R_HOME echo "Error: R not found" & goto:eof
-
-call :process_arch %*
-
-:: add R_MIKTEX to PATH if defined.  Otherwise if its not 
-:: in the PATH already then check \Program Files\miktex* or \miktex* 
-:: and if found add that to PATH.
-
-:: if miktex found in PATH skip searching for it
-PATH | findstr /i miktex > nul
-if not errorlevel 1 goto:end_miktex
-
-:: check for presence of %ProgramFiles%\miktex* or \miktex*
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\miktex* 2^>NUL'
-) do set R_MIKTEX=%ProgramFiles%\%%a
-
-if not defined R_MIKTEX for /f "delims=" %%a in (
-    'dir /b /on %SystemDrive%:\miktex* 2^>NUL'
-) do set R_MIKTEX=%SystemDrive%:\miktex\%%a
-
-:end_miktex
-if defined R_MIKTEX PATH %R_MIKTEX%\miktex\bin;%PATH%
-
-if not defined MYSQL_HOME for /f "delims=" %%a in (
-    'dir /b /on "%ProgramFiles%"\MySQL\* 2^>NUL'
-) do set MYSQL_HOME=%ProgramFiles%\MySQL\%%a
-
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\R-core\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
- ) do set R_TOOLS=%%~b
-if not defined R_TOOLS for /f "tokens=2*" %%a in (
- 'reg query hklm\software\wow6432Node\Rtools /v InstallPath 2^>NUL ^| findstr InstallPath'
-  ) do set R_TOOLS=%%~b
-
-set PATHQ=%PATH%
-:WHILE
-    if "%PATHQ%"=="" goto WEND
-    for /F "delims=;" %%i in ("%PATHQ%") do if exist "%%~sfi" set PATH2=%PATH2%;%%~sfi
-    for /F "delims=; tokens=1,*" %%i in ("%PATHQ%") do set PATHQ=%%j
-    goto WHILE 
-:WEND
-
-set path2=%path2:~1%
-
-if defined R_TOOLS (
-    set path2=%R_TOOLS%\bin;%R_TOOLS%\perl\bin;%R_TOOLS%\MinGW\bin;%PATH2%
-)
-
-path %path2%
-
-set here=%CD%
-set args=%*
-
-:: get name by which this command was called
-:: this allows same file to be used for Rgui, Rterm, etc. by just renaming it
-for %%i in (%0) do set cmd=%%~ni.exe
-
-if /i %cmd%==rtools.exe (endlocal & set path=%path2%) && goto:eof
-
-cd %R_HOME%\bin
-if /i not %cmd%==rguistart.exe goto:notRguiStart
-  set cmd=rgui.exe
-  set firstArgument=%1
-  if defined firstArgument (
-    dir %1 | findstr "<DIR>" > nul
-    if errorlevel 1 goto:notRguiStart
-    set here=%~1
-    set firstArgument=
-  )
-  set args=
-  shift
-  :startloop
-  set firstArgument=%1
-  if defined firstArgument (
-     set args=%args% "%~1" 
-     shift
-     goto:startloop
-  )
-:notRguiStart
-
-set st=
-if /i %cmd%==rgui.exe set st=start
-
-if /i not %cmd%==#Rscript.exe goto:not#Rscript
-set cmd=Rscript.exe
-if [%1]==[] goto:help#Rscript
-call :rsarg1 %*
-goto:not#Rscript
-:rsarg1
-set args=%*
-set arg1=%~1
-set arg1=%arg1:.bat.bat=.bat%
-set last4=%arg1:~-4%
-if /i not "%last4%"==".bat" set arg1=%arg1%.bat
-for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-call set args=%%args:%1="%arg1%"%%
-rem call set args=%%args:%1=%%
-goto:eof
-:not#Rscript
-
-cd %here%
-
-:: Look in architecture specific subdirectory of bin. If not there look in bin.
-set cmdpath=%R_HOME%\bin\%R_ARCH0%\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-set cmdpath=%R_HOME%\bin\%cmd%
-if exist "%cmdpath%" goto:cmdpathfound
-echo "Error: %cmd% not found" & goto:eof
-:cmdpathfound
-
-:: if called as jgr.bat locate the JGR package to find jgr.exe
-if /i not %cmd%==jgr.exe goto:notJGR
-  set st=start
-  set cmdpath=jgr.exe
-  if not defined JGR_LIBS set JGR_LIBS=%R_LIBS%
-  for %%a in ("%R_HOME%\bin\Rscript.exe") do set RSCRIPT=%%~sfa
-  if not defined JGR_LIBS for /f "usebackq delims=" %%a in (
-		`%RSCRIPT% -e "cat(.libPaths(),sep=';')"`
-  ) do set JGR_LIBS=%%~a
-  if not defined JGR_LIBS (
-	echo "Error: JGR package not found in R library" & goto:eof
-  )
-  for %%f in ("JGR") do set "jgrpkg=%%~$JGR_LIBS:f"
-  set JGR_LIB=%jgrpkg:~0,-4%
-  for %%a in ("%JGR_LIB%") do set JGR_LIB_SHORT=%%~sfa
-  for %%a in ("%R_HOME%") do set R_HOME_SHORT=%%~sfa
-  set args=--libpath=%JGR_LIB_SHORT% --rhome=%R_HOME_SHORT%
-
-:notJGR
-
-rem set R_ARCH
-rem set R_ARCH0
-rem set cmdpath
-rem if defined st set st
-rem set args
-
-set cygwin=nodosfilewarning
-if not defined args goto:noargs
-if defined st (start "" "%cmdpath%" %args%) else "%cmdpath%" %args%
-goto:eof
-:noargs
-if defined st (start "" "%cmdpath%") else "%cmdpath%"
-goto:eof
-
-:help#Rscript
-echo Usage: #Rscript %%0 %%*
-echo If the above is the first line in a file 
-echo containing only R code and the file is 
-echo given a .bat extension then it can be 
-echo run as a batch file.
-goto:eof
-
-
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-:: processing of --arch= where value can be 32, 64, i386, x64, /i386, /x64
-
-:: Call it like this: call :process_arch %*
-:: On return R_ARCH will be set from --arch or R_ARCH or default
-:: and R_ARCH0 will be R_ARCH without the / prefix
-:: It will look for the architecture in these places in this order:
-:: - first arg if its --arch
-:: - environment variable R_ARCH
-:: - check if R_HOME\bin\i386 exists
-:: - if R_HOME\bin\x64 exists
-:: - if none of the above then use R_ARCH=/i386
-:: Note that R_HOME should be defined before calling this routine
-::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-
-:process_arch
-	if defined R_ARCH goto:process_arch_cont
-	:: The loop searches for --arch and sets R_ARCH to the next argument
-    :process_arch_loop 
-    set arg=%~1
-    shift 
-    if not defined arg goto :process_arch_cont 
-	if "%arg%"=="--arch" set R_ARCH=%1
-	if defined R_ARCH goto:process_arch_cont
-	goto:process_arch_loop
-    :process_arch_cont
-	if defined process_arg_arch goto:process_arch_defined
-	if exist %R_HOME%\bin\i386 (set R_ARCH=/i386) & goto:process_arch_defined
-	if exist %R_HOME%\bin\x64 (set R_ARCH=/x64) & goto:process_arch_defined
-	(set R_ARCH=/i386)
-	:process_arch_defined
-	if "%R_ARCH%"=="32" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="i386" (set R_ARCH=/i386)
-	if "%R_ARCH%"=="64" (set R_ARCH=/x64)
-	if "%R_ARCH%"=="x64" (set R_ARCH=/x64)
-	:: if R_ARCH does not begin with a slash add one as a prefix
-	(set first_char=%R_ARCH:~0,1%)
-	if not "%first_char%" == "/" (set R_ARCH=/%R_ARCH%)
-	:: R_ARCH0 is like R_ARCH but without the beginning /
-	(set R_ARCH0=%R_ARCH:~1%)
-	goto:eof
-
-endlocal

Deleted: grass/trunk/mswindows/external/rbatch/show-svn-info.hta
===================================================================
--- grass/trunk/mswindows/external/rbatch/show-svn-info.hta	2014-04-05 20:38:19 UTC (rev 59583)
+++ grass/trunk/mswindows/external/rbatch/show-svn-info.hta	2014-04-05 20:43:48 UTC (rev 59584)
@@ -1,45 +0,0 @@
-<head>
-<STYLE TYPE="text/css">
-.highlight {background:#ff00ff}
-.text {color:#ff00ff}
-.both {color:white;background:black}
-</STYLE> 
-<title>show-svn-info</title>
-</head>
-<body onLoad="window.resizeTo(650,450);">
-<h1>Tortoise SubVersion</h1>
-<A href="http://batchfiles.googlecode.com">batchfiles home page</a>
-<A href="http://cran.r-project.org/contrib/extra/batchfiles/">(CRAN)</a><br><br>
-<A href="http://tortoisesvn.net">Tortoise SVN home page</a>
-<A href="http://tortoisesvn.net/help">(Help)</a>
-<A href="http://groups.google.com/group/tortoisesvn">(Forum)</a> 
-<A href="http://groups.google.com/group/tortoisesvn-dev">(Devel Forum)</a><br><br>
-<script type="text/jscript">
-
-// based on code in section 6.4 of Tortoise SVN manual
-
-// testCOM.js - javascript file
-// test script for the SubWCRev COM/Automation-object
-
-filesystem = new ActiveXObject("Scripting.FileSystemObject");
-
-SubWCRev1 = new ActiveXObject("SubWCRev.object");
-SubWCRev2 = new ActiveXObject("SubWCRev.object");
-SubWCRev3 = new ActiveXObject("SubWCRev.object");
-
-SubWCRev1.GetWCInfo(filesystem.GetAbsolutePathName("."), 0, 0);
-SubWCRev2.GetWCInfo(filesystem.GetAbsolutePathName(".."), 1, 1);
-SubWCRev3.GetWCInfo(filesystem.GetAbsolutePathName("SubWCRev.cpp"), 
-                    0, 0);
-
-sInfo1 = "Revision = " + SubWCRev1.Revision + "<br>" +
-      "\nMin Revision = " + SubWCRev1.MinRev + "<br>" +
-      "\nMax Revision = " + SubWCRev1.MaxRev + "<br>" +
-      "\nDate = " + SubWCRev1.Date + "<br>" +
-      '\nURL = <a href="' + SubWCRev1.Url + '">' + SubWCRev1.Url + "</a><br>" +
-      "\nAuthor = " + SubWCRev1.Author + "<br>" +
-      "\nHasMods = " + SubWCRev1.HasModifications;
-document.write(sInfo1);
-</script>
-</body>
-</html>



More information about the grass-commit mailing list