← Back to branch summary

~baltix/+junk/irrlicht-test

« back to all changes in this revision

Viewing changes to source/Irrlicht/libpng/contrib/gregbook/makevms.com

  • Committer: Mantas Kriaučiūnas
  • Date: 2011-07-18 13:06:25 UTC
  • Revision ID: mantas@akl.lt-20110718130625-c5pvifp61e7kj1ol
Included whole irrlicht SVN libraries to work around launchpad recipe issue with quilt, see https://answers.launchpad.net/launchpad/+question/165193

Show diffs side-by-side

added added

removed removed

Lines of Context:
source/Irrlicht/libpng/contrib/gregbook/makevms.com
 
1
$!------------------------------------------------------------------------------
 
2
$! make "PNG: The Definitive Guide" demo programs (for X) under OpenVMS
 
3
$!
 
4
$! Script created by Martin Zinser for libpng; modified by Greg Roelofs
 
5
$! for standalone pngbook source distribution.
 
6
$!
 
7
$!
 
8
$!    Set locations where zlib and libpng sources live.
 
9
$!
 
10
$ zpath   = ""
 
11
$ pngpath = ""
 
12
$!
 
13
$ if f$search("[---.zlib]zlib.h").nes."" then zpath = "[---.zlib]"
 
14
$ if f$search("[--]png.h").nes."" then pngpath = "[--]"
 
15
$!
 
16
$ if f$search("[-.zlib]zlib.h").nes."" then zpath = "[-.zlib]"
 
17
$ if f$search("[-.libpng]png.h").nes."" then pngpath = "[-.libpng]"
 
18
$!
 
19
$ if zpath .eqs. ""
 
20
$ then
 
21
$   write sys$output "zlib include not found. Exiting..."
 
22
$   exit 2
 
23
$ endif 
 
24
$!
 
25
$ if pngpath .eqs. ""
 
26
$ then
 
27
$   write sys$output "libpng include not found. Exiting..."
 
28
$   exit 2
 
29
$ endif 
 
30
$!
 
31
$!    Look for the compiler used.
 
32
$!
 
33
$ ccopt="/include=(''zpath',''pngpath')"
 
34
$ if f$getsyi("HW_MODEL").ge.1024
 
35
$ then
 
36
$  ccopt = "/prefix=all"+ccopt
 
37
$  comp  = "__decc__=1"
 
38
$  if f$trnlnm("SYS").eqs."" then define sys sys$library:
 
39
$ else
 
40
$  if f$search("SYS$SYSTEM:DECC$COMPILER.EXE").eqs.""
 
41
$   then
 
42
$    if f$trnlnm("SYS").eqs."" then define sys sys$library:
 
43
$    if f$search("SYS$SYSTEM:VAXC.EXE").eqs.""
 
44
$     then
 
45
$      comp  = "__gcc__=1"
 
46
$      CC :== GCC
 
47
$     else
 
48
$      comp = "__vaxc__=1"
 
49
$     endif
 
50
$   else
 
51
$    if f$trnlnm("SYS").eqs."" then define sys decc$library_include:
 
52
$    ccopt = "/decc/prefix=all"+ccopt
 
53
$    comp  = "__decc__=1"
 
54
$  endif
 
55
$ endif
 
56
$ open/write lopt lib.opt
 
57
$ write lopt "''pngpath'libpng.olb/lib"
 
58
$ write lopt "''zpath'libz.olb/lib"
 
59
$ close lopt
 
60
$ open/write xopt x11.opt
 
61
$ write xopt "sys$library:decw$xlibshr.exe/share"
 
62
$ close xopt
 
63
$!
 
64
$!    Build 'em.
 
65
$!
 
66
$ write sys$output "Compiling PNG book programs ..."
 
67
$   CALL MAKE readpng.OBJ "cc ''CCOPT' readpng" -
 
68
        readpng.c readpng.h
 
69
$   CALL MAKE readpng2.OBJ "cc ''CCOPT' readpng2" -
 
70
        readpng2.c readpng2.h
 
71
$   CALL MAKE writepng.OBJ "cc ''CCOPT' writepng" -
 
72
        writepng.c writepng.h
 
73
$   write sys$output "Building rpng-x..."
 
74
$   CALL MAKE rpng-x.OBJ "cc ''CCOPT' rpng-x" -
 
75
        rpng-x.c readpng.h
 
76
$   call make rpng-x.exe -
 
77
        "LINK rpng-x,readpng,lib.opt/opt,x11.opt/opt" -
 
78
        rpng-x.obj readpng.obj
 
79
$   write sys$output "Building rpng2-x..."
 
80
$   CALL MAKE rpng2-x.OBJ "cc ''CCOPT' rpng2-x" -
 
81
        rpng2-x.c readpng2.h
 
82
$   call make rpng2-x.exe -
 
83
        "LINK rpng2-x,readpng2,lib.opt/opt,x11.opt/opt" -
 
84
        rpng2-x.obj readpng2.obj
 
85
$   write sys$output "Building wpng..."
 
86
$   CALL MAKE wpng.OBJ "cc ''CCOPT' wpng" -
 
87
        wpng.c writepng.h
 
88
$   call make wpng.exe -
 
89
        "LINK wpng,writepng,lib.opt/opt" -
 
90
        wpng.obj writepng.obj
 
91
$ exit
 
92
$!
 
93
$!
 
94
$MAKE: SUBROUTINE   !SUBROUTINE TO CHECK DEPENDENCIES
 
95
$ V = 'F$Verify(0)
 
96
$! P1 = What we are trying to make
 
97
$! P2 = Command to make it
 
98
$! P3 - P8  What it depends on
 
99
$
 
100
$ If F$Search(P1) .Eqs. "" Then Goto Makeit
 
101
$ Time = F$CvTime(F$File(P1,"RDT"))
 
102
$arg=3
 
103
$Loop:
 
104
$       Argument = P'arg
 
105
$       If Argument .Eqs. "" Then Goto Exit
 
106
$       El=0
 
107
$Loop2:
 
108
$       File = F$Element(El," ",Argument)
 
109
$       If File .Eqs. " " Then Goto Endl
 
110
$       AFile = ""
 
111
$Loop3:
 
112
$       OFile = AFile
 
113
$       AFile = F$Search(File)
 
114
$       If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl
 
115
$       If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit
 
116
$       Goto Loop3
 
117
$NextEL:
 
118
$       El = El + 1
 
119
$       Goto Loop2
 
120
$EndL:
 
121
$ arg=arg+1
 
122
$ If arg .Le. 8 Then Goto Loop
 
123
$ Goto Exit
 
124
$
 
125
$Makeit:
 
126
$ VV=F$VERIFY(0)
 
127
$ write sys$output P2
 
128
$ 'P2
 
129
$ VV='F$Verify(VV)
 
130
$Exit:
 
131
$ If V Then Set Verify
 
132
$ENDSUBROUTINE