Index: freexp/gendate.pas
===================================================================
RCS file: /server/cvs/freexp/gendate.pas,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- freexp/gendate.pas 2 Jan 2006 12:28:50 -0000 1.7
+++ freexp/gendate.pas 13 Jan 2006 17:05:36 -0000 1.8
@@ -6,7 +6,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: gendate.pas,v 1.7 2006/01/02 12:28:50 mw Exp $ }
+{ $Id: gendate.pas,v 1.8 2006/01/13 17:05:36 mw Exp $ }
program gendate;
uses dos,crt,typeform;
@@ -17,8 +17,24 @@
tp:longint;
begin
- Gettime(t.Hour,t.Min,t.Sec,hund);
- Getdate(t.Year,t.Month,t.Day,dow);
+ {BEGIN TOUCH.CTL}
+ filemode:=0;
+ Assign(f,'BUILD\ALL\TOUCH.CTL');
+ {$I-}
+ Reset(f);
+ {$I+}
+ if Ioresult<>0 then begin
+ {keine TOUCH.CTL also Systemzeit nehmen}
+ Gettime(t.Hour,t.Min,t.Sec,hund);
+ Getdate(t.Year,t.Month,t.Day,dow);
+ end else begin
+ {TOUCH.CTL, also deren Zeitstempel nehmen}
+ Getftime(f,tp);
+ UnpackTime(tp,t);
+ Close(f);
+ end;
+ filemode:=2;
+ {END TOUCH.CTL}
Assign(f,'compdate.pas');
Rewrite(f);
writeln(f,'{ ---------------------------------------------------------------
}');
@@ -54,6 +70,14 @@
end.
{
$Log: gendate.pas,v $
+ Revision 1.8 2006/01/13 17:05:36 mw
+ MW: - Neues Feature:
+ Gendate kann jetzt eine Referenzdatei benutzen.
+ Existiert die Datei BUILD\ALL\TOUCH.CTL, so benutzt
+ Gendate den Zeitstempel dieser Datei, ansonsten wie
+ bisher die Systemzeit, um den Compilierzeitstempel
+ anzulegen.
+
Revision 1.7 2006/01/02 12:28:50 mw
MW: - Frohes neues Jahr 2006
Index: freexp/ihs.pas
===================================================================
RCS file: /server/cvs/freexp/ihs.pas,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -r1.16 -r1.17
--- freexp/ihs.pas 2 Jan 2006 12:28:50 -0000 1.16
+++ freexp/ihs.pas 13 Jan 2006 19:11:21 -0000 1.17
@@ -13,18 +13,20 @@
{ 1.02 (c) 03/90 }
{ 1.1 (c) 01/91 }
{ 1.3 (c) 01/2003 FreeXP }
+{ 1.4 (c) 01/2006 FreeXP }
-{ $Id: ihs.pas,v 1.16 2006/01/02 12:28:50 mw Exp $ }
+{ $Id: ihs.pas,v 1.17 2006/01/13 19:11:21 mw Exp $ }
{$R-,S-}
uses crt,dos,typeform,fileio,xpglobal;
const maxpages = 4096;
- version = '1.3';
+ version = '1.4';
obufsize = 16384;
var fname : pathstr;
+ outpath : dirstr;
dir : dirstr;
name : namestr;
ext : extstr;
@@ -365,7 +367,14 @@
assign(t,fname);
settextbuf(t,p^,20000);
reset(t);
- assign(f,name+'.HLP'); rewrite(f,1);
+ outpath:='';
+ if (paramcount=2) then begin
+ outpath:=paramstr(2);
+ if outpath<>'' then
+ if outpath[length(outpath)]<>'\' then
+ outpath:=outpath+'\';
+ end;
+ assign(f,outpath+name+'.HLP'); rewrite(f,1);
create_header;
qvwun:=0;
@@ -400,6 +409,10 @@
}
{
$Log: ihs.pas,v $
+ Revision 1.17 2006/01/13 19:11:21 mw
+ MW: - IHS.EXE unterstützt jetzt als zweiten Parameter einen
+ Ausgabepfad.
+
Revision 1.16 2006/01/02 12:28:50 mw
MW: - Frohes neues Jahr 2006
Index: freexp/build/build.txt
===================================================================
RCS file: /server/cvs/freexp/build/build.txt,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- freexp/build/build.txt 31 Oct 2005 12:25:56 -0000 1.6
+++ freexp/build/build.txt 13 Jan 2006 17:19:31 -0000 1.7
@@ -1,4 +1,4 @@
-{ $Id: build.txt,v 1.6 2005/10/31 12:25:56 mw Exp $ }
+{ $Id: build.txt,v 1.7 2006/01/13 17:19:31 mw Exp $ }
build\$TARGET\build.bat erstellt in Build\$TARGET\XPDIR alle Dateien, die zur
Distribution von FreeXP gehören und anschließend in
@@ -11,17 +11,29 @@
1. Distributionsdiskette enthalten sein sollen und
somit nicht auf der 2.
-build\exclude.lst enthält alle Dateinamen der Dateien, die nicht ins
+build\ALL\exclude.lst enthält alle Dateinamen der Dateien, die nicht ins
Source-Archiv aufgenommen werden sollen.
-build\update.lst enthält alle Dateinamen der Dateien im Update-Archiv.
+build\ALL\update.lst enthält alle Dateinamen der Dateien im Update-Archiv.
-build\sdisk.lst enthält alle Dateinamen, die zu Dateien gehören, die
+build\ALL\sdisk.lst enthält alle Dateinamen, die zu Dateien gehören, die
nicht auf der 1. Sourcediskette enthalten sein
sollen, sondern auf der 2.
+
+build\ALL\TOUCH.CTL Steuerdatei, die wenn sie existiert, als Referenz-
+ Datei für den Compilierzeitstempel verwendet wird.
+ Bei Nichtexistens wird die Systemzeit verwendet.
+ Ebenso wird bei IDE-Compilaten die Systemzeit
+ verwendet.
+
+
{
$Log: build.txt,v $
+ Revision 1.7 2006/01/13 17:19:31 mw
+ MW: - Anpassung an neue Verzeichnisstruktur
+ - Kurzdoku zu TOUCH.CTL
+
Revision 1.6 2005/10/31 12:25:56 mw
MW: - Ausleeren der CVS-History
Index: freexp/build/exclude.lst
===================================================================
RCS file: freexp/build/exclude.lst
diff -N freexp/build/exclude.lst
--- freexp/build/exclude.lst 25 Dec 2003 20:48:03 -0000 1.8
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,12 +0,0 @@
-AUTO\*.*
-CVS\*.*
-BEISPIEL\CVS\*.*
-BUILD\CVS\*.*
-BUILD\DOS16\CVS\*.*
-BUILD\DOS16\DISTRI\*.*
-BUILD\DOS16\XPDIR\*.*
-DOC\CVS\*.*
-SAMPLES\CVS\*.*
-TRIAL\*.*
-BINARIES\CVS\*.*
-HOMEPAGE\*.*
Index: freexp/build/sdisk.lst
===================================================================
RCS file: freexp/build/sdisk.lst
diff -N freexp/build/sdisk.lst
--- freexp/build/sdisk.lst 30 Sep 2005 09:28:38 -0000 1.5
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,13 +0,0 @@
-DOC\*.*
-BINARIES\*.*
-BUILD\*.*
-LOGO\*.*
-BEISPIEL\*.*
-SAMPLES\*.*
-XP-D.RQ
-XPFM-D.RQ
-XPFM-E.RQ
-XPUU-D.RQ
-XPUU-E.RQ
-M*.PAS
-U*.PAS
Index: freexp/build/update.lst
===================================================================
RCS file: freexp/build/update.lst
diff -N freexp/build/update.lst
--- freexp/build/update.lst 22 Sep 2004 16:10:13 -0000 1.6
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,15 +0,0 @@
-FILE_ID.DIZ
-MAGGI.EXE
-NDIFF.EXE
-UUZ.EXE
-XP.EXE
-XP-FM.EXE
-XPME.EXE
-YUP2PKT.EXE
-ZFIDO.EXE
-ZPR.EXE
-XP.HLP
-XP-E.HLP
-XP-D.RES
-XP-E.RES
-DOC\VERSION.TXT
Index: freexp/build/ALL/exclude.lst
===================================================================
RCS file: freexp/build/ALL/exclude.lst
diff -N freexp/build/ALL/exclude.lst
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ freexp/build/ALL/exclude.lst 13 Jan 2006 17:02:37 -0000 1.2
@@ -0,0 +1,13 @@
+AUTO\*.*
+CVS\*.*
+BEISPIEL\CVS\*.*
+BUILD\CVS\*.*
+BUILD\DOS16\CVS\*.*
+BUILD\DOS16\DISTRI\*.*
+BUILD\DOS16\XPDIR\*.*
+BUILD\ALL\CVS\*.*
+DOC\CVS\*.*
+SAMPLES\CVS\*.*
+TRIAL\*.*
+BINARIES\CVS\*.*
+HOMEPAGE\*.*
Index: freexp/build/ALL/sdisk.lst
===================================================================
RCS file: freexp/build/ALL/sdisk.lst
diff -N freexp/build/ALL/sdisk.lst
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ freexp/build/ALL/sdisk.lst 13 Jan 2006 17:00:16 -0000 1.1
@@ -0,0 +1,13 @@
+DOC\*.*
+BINARIES\*.*
+BUILD\*.*
+LOGO\*.*
+BEISPIEL\*.*
+SAMPLES\*.*
+XP-D.RQ
+XPFM-D.RQ
+XPFM-E.RQ
+XPUU-D.RQ
+XPUU-E.RQ
+M*.PAS
+U*.PAS
Index: freexp/build/ALL/update.lst
===================================================================
RCS file: freexp/build/ALL/update.lst
diff -N freexp/build/ALL/update.lst
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ freexp/build/ALL/update.lst 13 Jan 2006 17:00:17 -0000 1.1
@@ -0,0 +1,15 @@
+FILE_ID.DIZ
+MAGGI.EXE
+NDIFF.EXE
+UUZ.EXE
+XP.EXE
+XP-FM.EXE
+XPME.EXE
+YUP2PKT.EXE
+ZFIDO.EXE
+ZPR.EXE
+XP.HLP
+XP-E.HLP
+XP-D.RES
+XP-E.RES
+DOC\VERSION.TXT
Index: freexp/build/DOS16/build.bat
===================================================================
RCS file: /server/cvs/freexp/build/DOS16/build.bat,v
retrieving revision 1.36
retrieving revision 1.38
diff -u -r1.36 -r1.38
--- freexp/build/DOS16/build.bat 3 Jan 2006 19:32:13 -0000 1.36
+++ freexp/build/DOS16/build.bat 13 Jan 2006 19:35:30 -0000 1.38
@@ -1,5 +1,5 @@
@ECHO OFF
-:REM $Id: build.bat,v 1.36 2006/01/03 19:32:13 mw Exp $
+:REM $Id: build.bat,v 1.38 2006/01/13 19:35:30 mw Exp $
:REM
:REM ╔══════════ BUILD.BAT ═════════════════════════════════════════════════╗
:REM ║ ║
@@ -196,35 +196,35 @@
%BP_PATH%\BPC.EXE %BP_OPT% -EBUILD\DOS16\XPDIR ZPR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XP-D
+RC.EXE XP-D BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XP-E
+RC.EXE XP-E BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XPFM-D
+RC.EXE XPFM-D BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XPFM-E
+RC.EXE XPFM-E BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XPUU-D
+RC.EXE XPUU-D BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
-RC.EXE XPUU-E
+RC.EXE XPUU-E BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_1
CD DOC
-IHS.EXE XP
+IHS.EXE XP ..\BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_2
-IHS.EXE XP-E
+IHS.EXE XP-E ..\BUILD\DOS16\XPDIR
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE xpoint.dq xpoint.txt 71 3 -p -x
+DOCFORM.EXE xpoint.dq ..\BUILD\DOS16\XPDIR\DOC\xpoint.txt 71 3 -p -x
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE fido.dq fido.txt 71 3 -p -tI\Grundlagen -kFido
+DOCFORM.EXE fido.dq ..\BUILD\DOS16\XPDIR\DOC\fido.txt 71 3 -p -tI\Grundlagen
-kFido
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE uucp.dq uucp.txt 71 3 -p -tI\Grundlagen -kUUCP
+DOCFORM.EXE uucp.dq ..\BUILD\DOS16\XPDIR\DOC\uucp.txt 71 3 -p -tI\Grundlagen
-kUUCP
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE xpme.dq xpme.txt 71 3 -p -t### -kXPME
+DOCFORM.EXE xpme.dq ..\BUILD\DOS16\XPDIR\DOC\xpme.txt 71 3 -p -t### -kXPME
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE zpr.dq zpr.txt 71 3 -p -t### -kZPR
+DOCFORM.EXE zpr.dq ..\BUILD\DOS16\XPDIR\DOC\zpr.txt 71 3 -p -t### -kZPR
IF ERRORLEVEL 1 GOTO FEHLER_2
-DOCFORM.EXE snapshot.dq snapshot.txt 71 3 -p -t### -kSnapshot
+DOCFORM.EXE snapshot.dq ..\BUILD\DOS16\XPDIR\DOC\snapshot.txt 71 3 -p -t###
-kSnapshot
IF ERRORLEVEL 1 GOTO FEHLER_2
:REM Nach CLEAN_1 kommen wir zu MOVE_RES wieder zurück!
@@ -233,12 +233,9 @@
:MOVE_RES
ECHO.
ECHO ┌────────────────────────────────────────────────────────────────────────┐
-ECHO │ Schritt 4: Ressourcen verschieben, Hilfe-/Beispieldateien kopieren ... │
+ECHO │ Schritt 4: Hilfe-/Beispieldateien kopieren ... │
ECHO └────────────────────────────────────────────────────────────────────────┘
-:REM Ressourcen verschieben
-MOVE *.RES BUILD\DOS16\XPDIR
-
:REM Dokumentation kopieren
IF EXIST DOC\COPYING COPY DOC\COPYING BUILD\DOS16\XPDIR\DOC
@@ -252,13 +249,6 @@
IF EXIST DOC\VERSION.TXT COPY DOC\VERSION.TXT BUILD\DOS16\XPDIR\DOC
IF EXIST DOC\VERSIONS.FAQ COPY DOC\VERSIONS.FAQ BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\UUCP.TXT MOVE DOC\UUCP.TXT BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\FIDO.TXT MOVE DOC\FIDO.TXT BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\XPOINT.TXT MOVE DOC\XPOINT.TXT BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\XPME.TXT MOVE DOC\XPME.TXT BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\ZPR.TXT MOVE DOC\ZPR.TXT BUILD\DOS16\XPDIR\DOC
-IF EXIST DOC\SNAPSHOT.TXT MOVE DOC\SNAPSHOT.TXT BUILD\DOS16\XPDIR\DOC
-
:REM Beispieldateien kopieren
IF EXIST BEISPIEL\*.* COPY BEISPIEL\*.* BUILD\DOS16\XPDIR\BEISPIEL
IF EXIST SAMPLES\*.* COPY SAMPLES\*.* BUILD\DOS16\XPDIR\SAMPLES
@@ -327,7 +317,7 @@
%ZIP_PATH%\%ZIP_PROG% -ex -rP ..\DISTRI\FXP345.ZIP *.*
:REM Update-Archiv
-REM %ZIP_PATH%\%ZIP_PROG% -ex -rP ..\DISTRI\FXP345UP.ZIP @..\..\UPDATE.LST
+REM %ZIP_PATH%\%ZIP_PROG% -ex -rP ..\DISTRI\FXP345UP.ZIP @..\..\ALL\UPDATE.LST
:REM 2-Disketten-Distribution
%ZIP_PATH%\%ZIP_PROG% -ex -rP ..\DISTRI\FXP345-1.ZIP @..\MDISK.LST
@@ -339,11 +329,11 @@
CD ..
:REM Source-Komplettarchiv
-%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED] BUILD\DOS16\DISTRI\FXP345S.ZIP
*.*
+%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED] BUILD\DOS16\DISTRI\FXP345S.ZIP
*.*
:REM 2-Disketten-Source
-%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED] [EMAIL PROTECTED]
BUILD\DOS16\DISTRI\FXP345S1.ZIP *.*
-%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED]
BUILD\DOS16\DISTRI\FXP345S2.ZIP @BUILD\SDISK.LST
+%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED] [EMAIL PROTECTED]
BUILD\DOS16\DISTRI\FXP345S1.ZIP *.*
+%ZIP_PATH%\%ZIP_PROG% -ex -rP [EMAIL PROTECTED]
BUILD\DOS16\DISTRI\FXP345S2.ZIP @BUILD\ALL\SDISK.LST
:REM Ein letzter Touch auf die Archive
ECHO.
@@ -396,10 +386,6 @@
IF EXIST IHS.EXE DEL IHS.EXE
IF EXIST DOCFORM.EXE DEL DOCFORM.EXE
-:REM Hilfedateien verschieben
-IF EXIST XP.HLP MOVE XP.HLP ..\BUILD\DOS16\XPDIR
-IF EXIST XP-E.HLP MOVE XP-E.HLP ..\BUILD\DOS16\XPDIR
-
:REM Ressourcen-Compiler entfernen
CD ..
IF EXIST RC.EXE DEL RC.EXE
@@ -448,6 +434,15 @@
{
$Log: build.bat,v $
+ Revision 1.38 2006/01/13 19:35:30 mw
+ MW: - Alle Resourcen, Hilfedateien und Dokumente werden jetzt
+ direkt dort erstellt, wo sie benötigt werden und brauchen
+ daher nicht mehr gemoved werden.
+
+ Revision 1.37 2006/01/13 17:11:48 mw
+ MW: - Anpassung an neue Verzeichnisstruktur (Verzeichnis ALL für
+ platformübergreifende Dateien)
+
Revision 1.36 2006/01/03 19:32:13 mw
MW: - Frohes neues Jahr 2006
------------------------------------------------------------------------
FreeXP CVS-Mailingliste
CVS-List@freexp.de
http://www.freexp.de/cgi-bin/mailman/listinfo/cvs-list
