]>
Commit | Line | Data |
---|---|---|
c801d85f KB |
1 | $! make libpng under VMS |
2 | $! | |
3 | $! | |
9dfaa473 GD |
4 | $! Check for MMK/MMS |
5 | $! | |
6 | $! This procedure accepts one parameter (contrib), which causes it to build | |
7 | $! the programs from the contrib directory instead of libpng. | |
8 | $! | |
9 | $ p1 = f$edit(p1,"UPCASE") | |
10 | $ if p1 .eqs. "CONTRIB" | |
11 | $ then | |
12 | $ set def [.contrib.gregbook] | |
13 | $ @makevms | |
14 | $ set def [-.pngminus] | |
15 | $ @makevms | |
16 | $ set def [--] | |
17 | $ exit | |
18 | $ endif | |
19 | $ Make = "" | |
20 | $ If F$Search ("Sys$System:MMS.EXE") .nes. "" Then Make = "MMS" | |
21 | $ If F$Type (MMK) .eqs. "STRING" Then Make = "MMK" | |
22 | $! | |
c801d85f KB |
23 | $! Look for the compiler used |
24 | $! | |
25 | $ zlibsrc = "[-.zlib]" | |
26 | $ ccopt="/include=''zlibsrc'" | |
27 | $ if f$getsyi("HW_MODEL").ge.1024 | |
28 | $ then | |
29 | $ ccopt = "/prefix=all"+ccopt | |
30 | $ comp = "__decc__=1" | |
31 | $ if f$trnlnm("SYS").eqs."" then define sys sys$library: | |
32 | $ else | |
33 | $ if f$search("SYS$SYSTEM:DECC$COMPILER.EXE").eqs."" | |
34 | $ then | |
35 | $ if f$trnlnm("SYS").eqs."" then define sys sys$library: | |
36 | $ if f$search("SYS$SYSTEM:VAXC.EXE").eqs."" | |
37 | $ then | |
38 | $ comp = "__gcc__=1" | |
39 | $ CC :== GCC | |
40 | $ else | |
41 | $ comp = "__vaxc__=1" | |
42 | $ endif | |
43 | $ else | |
44 | $ if f$trnlnm("SYS").eqs."" then define sys decc$library_include: | |
45 | $ ccopt = "/decc/prefix=all"+ccopt | |
46 | $ comp = "__decc__=1" | |
47 | $ endif | |
48 | $ endif | |
49 | $! | |
9dfaa473 | 50 | $! Build the thing plain or with mms/mmk |
c801d85f KB |
51 | $! |
52 | $ write sys$output "Compiling Libpng sources ..." | |
9dfaa473 | 53 | $ if make.eqs."" |
c801d85f KB |
54 | $ then |
55 | $ dele pngtest.obj;* | |
56 | $ CALL MAKE png.OBJ "cc ''CCOPT' png" - | |
9dfaa473 | 57 | png.c png.h pngconf.h |
c801d85f KB |
58 | $ CALL MAKE pngpread.OBJ "cc ''CCOPT' pngpread" - |
59 | pngpread.c png.h pngconf.h | |
60 | $ CALL MAKE pngset.OBJ "cc ''CCOPT' pngset" - | |
9dfaa473 | 61 | pngset.c png.h pngconf.h |
c801d85f | 62 | $ CALL MAKE pngget.OBJ "cc ''CCOPT' pngget" - |
9dfaa473 | 63 | pngget.c png.h pngconf.h |
c801d85f | 64 | $ CALL MAKE pngread.OBJ "cc ''CCOPT' pngread" - |
9dfaa473 | 65 | pngread.c png.h pngconf.h |
c801d85f KB |
66 | $ CALL MAKE pngpread.OBJ "cc ''CCOPT' pngpread" - |
67 | pngpread.c png.h pngconf.h | |
68 | $ CALL MAKE pngrtran.OBJ "cc ''CCOPT' pngrtran" - | |
9dfaa473 | 69 | pngrtran.c png.h pngconf.h |
c801d85f | 70 | $ CALL MAKE pngrutil.OBJ "cc ''CCOPT' pngrutil" - |
9dfaa473 | 71 | pngrutil.c png.h pngconf.h |
c801d85f | 72 | $ CALL MAKE pngerror.OBJ "cc ''CCOPT' pngerror" - |
9dfaa473 | 73 | pngerror.c png.h pngconf.h |
c801d85f | 74 | $ CALL MAKE pngmem.OBJ "cc ''CCOPT' pngmem" - |
9dfaa473 | 75 | pngmem.c png.h pngconf.h |
c801d85f | 76 | $ CALL MAKE pngrio.OBJ "cc ''CCOPT' pngrio" - |
9dfaa473 | 77 | pngrio.c png.h pngconf.h |
c801d85f | 78 | $ CALL MAKE pngwio.OBJ "cc ''CCOPT' pngwio" - |
9dfaa473 | 79 | pngwio.c png.h pngconf.h |
c801d85f | 80 | $ CALL MAKE pngtrans.OBJ "cc ''CCOPT' pngtrans" - |
9dfaa473 | 81 | pngtrans.c png.h pngconf.h |
c801d85f | 82 | $ CALL MAKE pngwrite.OBJ "cc ''CCOPT' pngwrite" - |
9dfaa473 | 83 | pngwrite.c png.h pngconf.h |
c801d85f | 84 | $ CALL MAKE pngwtran.OBJ "cc ''CCOPT' pngwtran" - |
9dfaa473 | 85 | pngwtran.c png.h pngconf.h |
c801d85f | 86 | $ CALL MAKE pngwutil.OBJ "cc ''CCOPT' pngwutil" - |
9dfaa473 | 87 | pngwutil.c png.h pngconf.h |
c801d85f KB |
88 | $ write sys$output "Building Libpng ..." |
89 | $ CALL MAKE libpng.OLB "lib/crea libpng.olb *.obj" *.OBJ | |
90 | $ write sys$output "Building pngtest..." | |
91 | $ CALL MAKE pngtest.OBJ "cc ''CCOPT' pngtest" - | |
9dfaa473 GD |
92 | pngtest.c png.h pngconf.h |
93 | $ call make pngtest.exe - | |
94 | "LINK pngtest,libpng.olb/lib,''zlibsrc'libz.olb/lib" - | |
95 | pngtest.obj libpng.olb | |
c801d85f KB |
96 | $ write sys$output "Testing Libpng..." |
97 | $ run pngtest | |
98 | $ else | |
9dfaa473 GD |
99 | $ if f$search("DESCRIP.MMS") .eqs. "" then copy/nolog [.SCRIPTS]DESCRIP.MMS [] |
100 | $ 'make'/macro=('comp',zlibsrc='zlibsrc') | |
c801d85f KB |
101 | $ endif |
102 | $ write sys$output "Libpng build completed" | |
103 | $ exit | |
104 | $! | |
105 | $! | |
106 | $MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES | |
107 | $ V = 'F$Verify(0) | |
108 | $! P1 = What we are trying to make | |
109 | $! P2 = Command to make it | |
110 | $! P3 - P8 What it depends on | |
111 | $ | |
112 | $ If F$Search(P1) .Eqs. "" Then Goto Makeit | |
113 | $ Time = F$CvTime(F$File(P1,"RDT")) | |
114 | $arg=3 | |
115 | $Loop: | |
116 | $ Argument = P'arg | |
117 | $ If Argument .Eqs. "" Then Goto Exit | |
118 | $ El=0 | |
119 | $Loop2: | |
120 | $ File = F$Element(El," ",Argument) | |
121 | $ If File .Eqs. " " Then Goto Endl | |
122 | $ AFile = "" | |
123 | $Loop3: | |
124 | $ OFile = AFile | |
125 | $ AFile = F$Search(File) | |
126 | $ If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl | |
127 | $ If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit | |
128 | $ Goto Loop3 | |
129 | $NextEL: | |
130 | $ El = El + 1 | |
131 | $ Goto Loop2 | |
132 | $EndL: | |
133 | $ arg=arg+1 | |
134 | $ If arg .Le. 8 Then Goto Loop | |
135 | $ Goto Exit | |
136 | $ | |
137 | $Makeit: | |
138 | $ VV=F$VERIFY(0) | |
139 | $ write sys$output P2 | |
140 | $ 'P2 | |
141 | $ VV='F$Verify(VV) | |
142 | $Exit: | |
143 | $ If V Then Set Verify | |
144 | $ENDSUBROUTINE |