Powered by ViewCVS 1.0-dev
| 1 : | pazsan | 1.4 | #!/bin/bash |
| 2 : | |||
| 3 : | #Copyright (C) 2000,2003 Free Software Foundation, Inc. | ||
| 4 : | |||
| 5 : | #This file is part of Gforth. | ||
| 6 : | |||
| 7 : | #Gforth is free software; you can redistribute it and/or | ||
| 8 : | #modify it under the terms of the GNU General Public License | ||
| 9 : | #as published by the Free Software Foundation; either version 2 | ||
| 10 : | #of the License, or (at your option) any later version. | ||
| 11 : | |||
| 12 : | #This program is distributed in the hope that it will be useful, | ||
| 13 : | #but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 14 : | #MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.#See the | ||
| 15 : | #GNU General Public License for more details. | ||
| 16 : | |||
| 17 : | #You should have received a copy of the GNU General Public License | ||
| 18 : | #along with this program; if not, write to the Free Software | ||
| 19 : | #Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. | ||
| 20 : | |||
| 21 : | # This is the horror shell script to create an automatic install for | ||
| 22 : | # Windoze. | ||
| 23 : | # Note that I use sed to create a setup file | ||
| 24 : | |||
| 25 : | # use iss.sh >iss.txt | ||
| 26 : | # copy the resulting iss.txt to the location of your Windows installation | ||
| 27 : | # of Gforth, and start the setup compiler there. | ||
| 28 : | |||
| 29 : | cat <<EOT | ||
| 30 : | ; This is the setup script for 4stack on Windows | ||
| 31 : | ; Setup program is Inno Setup | ||
| 32 : | |||
| 33 : | [Setup] | ||
| 34 : | Bits=32 | ||
| 35 : | AppName=Gforth | ||
| 36 : | AppVerName=$(./gforth -v 2>&1) | ||
| 37 : | AppCopyright=Copyright © 1995,1996,1997,1998,2000,2003 Free Software Foundation | ||
| 38 : | DefaultDirName=gforth | ||
| 39 : | DefaultGroupName=Gforth | ||
| 40 : | AllowNoIcons=1 | ||
| 41 : | LicenseFile=COPYING | ||
| 42 : | |||
| 43 : | [Dirs] | ||
| 44 : | $(make distfiles -f Makedist | tr ' ' '\n' | (while read i; do | ||
| 45 : | while [ ! -z "$i" ] | ||
| 46 : | do | ||
| 47 : | if [ -d $i ]; then echo $i; fi | ||
| 48 : | if [ "${i%/*}" != "$i" ]; then i="${i%/*}"; else i=""; fi | ||
| 49 : | done | ||
| 50 : | done) | sort -u | sed \ | ||
| 51 : | -e 's:/:\\:g' \ | ||
| 52 : | -e 's:^\(..*\)$:{app}\\\1:g') | ||
| 53 : | |||
| 54 : | [Files] | ||
| 55 : | ; Parameter quick reference: | ||
| 56 : | ; "Source filename", "Dest. filename", Copy mode, Flags | ||
| 57 : | "README.txt", "{app}\README.txt", copy_normal, flag_isreadme | ||
| 58 : | "cygwin1.dll", "{app}\cygwin1.dll", copy_normal, | ||
| 59 : | pazsan | 1.6 | "sh.exe", "{app}\sh.exe", copy_normal, |
| 60 : | pazsan | 1.4 | "gforth.fi", "{app}\gforth.fi", copy_normal, |
| 61 : | $(make distfiles -f Makedist EXE=.exe | tr ' ' '\n' | (while read i; do | ||
| 62 : | if [ ! -d $i ]; then echo $i; fi | ||
| 63 : | done) | sed \ | ||
| 64 : | -e 's:/:\\:g' \ | ||
| 65 : | -e 's:^\(..*\)$:"\1", "{app}\\\1", copy_normal,:g') | ||
| 66 : | |||
| 67 : | [Icons] | ||
| 68 : | ; Parameter quick reference: | ||
| 69 : | ; "Icon title", "File name", "Parameters", "Working dir (can leave blank)", | ||
| 70 : | ; "Custom icon filename (leave blank to use the default icon)", Icon index | ||
| 71 : | "Gforth", "{app}\gforth.exe", "", "{app}", , 0 | ||
| 72 : | "Gforth-fast", "{app}\gforth-fast.exe", "", "{app}", , 0 | ||
| 73 : | "Gforth-dict", "{app}\gforth-dict.exe", "", "{app}", , 0 | ||
| 74 : | "Gforth-itc", "{app}\gforth-itc.exe", "", "{app}", , 0 | ||
| 75 : | pazsan | 1.6 | "Gforth-prof", "{app}\gforth-prof.exe", "", "{app}", , 0 |
| 76 : | pazsan | 1.4 | |
| 77 : | [Run] | ||
| 78 : | pazsan | 1.6 | "{app}\gforth.exe", "-i {app}\gforth.fi {app}\fixpath.fs {app} gforth-fast.exe", |
| 79 : | "{app}\gforth.exe", "-i {app}\gforth.fi {app}\fixpath.fs {app} gforth-ditc.exe", | ||
| 80 : | "{app}\gforth.exe", "-i {app}\gforth.fi {app}\fixpath.fs {app} gforth-itc.exe", | ||
| 81 : | "{app}\gforth.exe", "-i {app}\gforth.fi {app}\fixpath.fs {app} gforth-prof.exe", | ||
| 82 : | "{app}\gforth-fast.exe", "-i {app}\gforth.fi {app}\fixpath.fs {app} gforth.exe", | ||
| 83 : | pazsan | 1.4 | |
| 84 : | pazsan | 1.5 | ;[Registry] |
| 85 : | ;registry commented out | ||
| 86 : | pazsan | 1.4 | ; Parameter quick reference: |
| 87 : | ; "Root key", "Subkey", "Value name", Data type, "Data", Flags | ||
| 88 : | pazsan | 1.5 | ;HKCR, ".fs", "", STRING, "forthstream", |
| 89 : | ;HKCR, ".fs", "Content Type", STRING, "application/forth", | ||
| 90 : | ;HKCR, ".fb", "", STRING, "forthblock", | ||
| 91 : | ;HKCR, ".fb", "Content Type", STRING, "application/forth-block", | ||
| 92 : | ;HKCR, "forthstream", "", STRING, "Forth Source", | ||
| 93 : | ;HKCR, "forthstream", "EditFlags", DWORD, "00000000", | ||
| 94 : | ;HKCR, "forthstream\DefaultIcon", "", STRING, "{sys}\System32\shell32.dll,61" | ||
| 95 : | ;HKCR, "forthstream\Shell", "", STRING, "" | ||
| 96 : | ;HKCR, "forthstream\Shell\Open\command", "", STRING, "{app}\gforth.exe %1" | ||
| 97 : | ;HKCR, "forthblock", "", STRING, "Forth Block", | ||
| 98 : | ;HKCR, "forthblock", "EditFlags", DWORD, "00000000", | ||
| 99 : | ;HKCR, "forthblock\DefaultIcon", "", STRING, "{sys}\System32\shell32.dll,61" | ||
| 100 : | pazsan | 1.4 | EOT |
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |