← Back to branch summary

~ubuntu-branches/ubuntu/karmic/xpuzzles/karmic

« back to all changes in this revision

Viewing changes to xskewb/make.com

  • Committer: Bazaar Package Importer
  • Author(s): Adam Conrad
  • Date: 2005-08-22 16:29:42 UTC
  • mfrom: (2.1.1 sarge)
  • Revision ID: james.westby@ubuntu.com-20050822162942-tdtf178zkpd3xxdg
Tags: 7.1.3-1ubuntu1
Update {build-,}depends for xorg -> mesa transition.

Show diffs side-by-side

added added

removed removed

Lines of Context:
xskewb/make.com
1
 
$ save_verify='f$verify(0)
2
 
$! set ver
3
 
$!
4
 
$!      Compile and link for xskewb
5
 
$!
6
 
$! USAGE:
7
 
$! @make [debug clobber clean]
8
 
$!       debug : compile with debugger switch
9
 
$!       clean : clean all except executable
10
 
$!       clobber : clean all
11
 
$!
12
 
$! If you have
13
 
$!              XVMSUTILS library (VMS6.2 or lower)
14
 
$!              XPM library
15
 
$!              Mesa GL library
16
 
$! insert the correct directory instead of X11:
17
 
$ xvmsutilsf="X11:XVMSUTILS.OLB"
18
 
$ xpmf="SYS$LIBRARY:LIBXPM.OLB"
19
 
$ glf="GL:LIBMESAGL.OLB"
20
 
$ glf_share="GL:LIBMESAGL.EXE"
21
 
$!
22
 
$! Already assumes DEC C on Alpha.
23
 
$! Assume VAX C on VAX.
24
 
$ decc=0
25
 
$! Assume DEC C on VAX.
26
 
$! decc=1
27
 
$!
28
 
$ QUOTE = """""""""
29
 
$ QUOTE = QUOTE + QUOTE + QUOTE
30
 
$ scorepath = "SCOREPATH=" + QUOTE + "[]" + QUOTE
31
 
$ scorefile = "SCOREFILE=" + QUOTE + "skewb.scores" + QUOTE
32
 
$ logpath = "LOGPATH=" + QUOTE + "[]" + QUOTE
33
 
$ logfile = "LOGFILE=" + QUOTE + "skewb.log" + QUOTE
34
 
$ defscore=="''scorepath',''scorefile'"
35
 
$ deflog=="''logpath',''logfile'"
36
 
$!
37
 
$! NOTHING SHOULD BE MODIFIED BELOW
38
 
$!
39
 
$ if p1 .eqs. "CLEAN" then goto Clean
40
 
$ if p1 .eqs. "CLOBBER" then goto Clobber
41
 
$!
42
 
$ axp=f$getsyi("HW_MODEL") .ge. 1024
43
 
$ sys_ver=f$edit(f$getsyi("version"),"compress")
44
 
$ if f$extract(0,1,sys_ver) .nes. "V"
45
 
$ then
46
 
$   type sys$input
47
 
This script will assume that the operating system version is at least V7.0.
48
 
$!
49
 
$   sys_ver="V7.0"
50
 
$ endif
51
 
$ sys_maj=0+f$extract(1,1,sys_ver)
52
 
$ if sys_maj .lt. 7
53
 
$ then
54
 
$   xvmsutils=f$search("''xvmsutilsf'") .nes. ""
55
 
$ endif
56
 
$ xpm=f$search("''xpmf'") .nes. ""
57
 
$ gl=f$search("''glf'") .nes. ""
58
 
$ gl_share=f$search("''glf_share'") .nes. ""
59
 
$!
60
 
$!
61
 
$! Create .opt file
62
 
$ close/nolog optf
63
 
$ open/write optf xskewb.opt
64
 
$!
65
 
$ defs=="VMS"
66
 
$ defs=="''defs',HAVE_MOTIF"
67
 
$ if xpm then defs=="''defs',HAVE_XPM"
68
 
$ if gl .or. gl_share then defs=="''defs',HAVE_OPENGL,HAVE_GLBINDTEXTURE"
69
 
$ if sys_maj .lt. 7
70
 
$ then
71
 
$   if xvmsutils then defs=="''defs',USE_XVMSUTILS"
72
 
$ else
73
 
$   defs=="''defs',SRAND=srand48,LRAND=lrand48,MAXRAND=2147483648.0"
74
 
$ endif
75
 
$ defs=="''defscore',''deflog',''defs'"
76
 
$!
77
 
$!
78
 
$! Establish the Compiling Environment
79
 
$!
80
 
$! Set compiler command
81
 
$ if axp
82
 
$ then
83
 
$   cc=="cc/standard=vaxc/define=(''defs')"
84
 
$ else
85
 
$   if decc
86
 
$   then
87
 
$     cc=="cc/decc/standard=vaxc/define=(''defs')"
88
 
$   else ! VAX C
89
 
$     cc=="cc/define=(''defs')"
90
 
$   endif
91
 
$ endif
92
 
$ if p1 .eqs. "DEBUG" .or. p2 .eqs. "DEBUG" .or. p3 .eqs. "DEBUG"
93
 
$ then
94
 
$   if axp
95
 
$   then
96
 
$     cc=="cc/deb/noopt/standard=vaxc/define=(''defs')/list"
97
 
$   else
98
 
$     if decc
99
 
$     then
100
 
$       cc=="cc/deb/noopt/decc/standard=vaxc/define=(''defs')/list"
101
 
$     else ! VAX C
102
 
$       cc=="cc/deb/noopt/define=(''defs')/list"
103
 
$     endif
104
 
$   endif
105
 
$   link=="link/deb"
106
 
$ endif
107
 
$!
108
 
$ if axp .or. .not. decc
109
 
$ then
110
 
$   define/nolog sys sys$library
111
 
$ endif
112
 
$!
113
 
$ write sys$output "Compiling xskewb with ''defs'"
114
 
$ call make Skewb.obj   "cc Skewb.c"   Skewb.c SkewbP.h Skewb.h
115
 
$ call make Skewb2d.obj "cc Skewb2d.c" Skewb2d.c SkewbP.h Skewb.h Skewb2dP.h Skewb2d.h
116
 
$ call make Skewb3d.obj "cc Skewb3d.c" Skewb3d.c SkewbP.h Skewb.h Skewb3dP.h Skewb3d.h
117
 
$ if gl .or. gl_share
118
 
$ then
119
 
$   call make SkewbGL.obj "cc SkewbGL.c" SkewbGL.c SkewbP.h Skewb.h SkewbGLP.h SkewbGL.h
120
 
$ endif
121
 
$ call make SkewbU.obj  "cc SkewbU.c"  SkewbU.c SkewbP.h Skewb.h
122
 
$ call make rngs.obj    "cc rngs.c"    rngs.c
123
 
$ call make xskewb.obj  "cc xskewb.c"  xskewb.c Skewb.h
124
 
$!
125
 
$! Get libraries
126
 
$ if xpm then write optf "''xpmf'/lib"
127
 
$ if gl then write optf "''glf'/lib"
128
 
$ if gl_share then write optf "''glf_share'/share"
129
 
$ if sys_maj .lt. 7
130
 
$ then
131
 
$   if xvmsutils then write optf "''xvmsutilsf'/lib"
132
 
$ endif
133
 
$! if .not. axp then write optf "sys$library:vaxcrtl/lib"
134
 
$ write optf "sys$library:vaxcrtl/lib"
135
 
$ if axp then write optf "sys$library:ucx$ipc_shr/share"
136
 
$ if axp then write optf "sys$share:decw$xextlibshr/share"
137
 
$ if axp then write optf "sys$share:decw$xtlibshrr5/share"
138
 
$ if .not. axp then write optf "sys$library:ucx$ipc/lib"
139
 
$! write optf "sys$share:decw$dxmlibshr/share"
140
 
$ write optf "sys$share:decw$xmlibshr12/share"
141
 
$ write optf "sys$share:decw$xlibshr/share"
142
 
$ close optf
143
 
$!
144
 
$! LINK
145
 
$ write sys$output "Linking xskewb"
146
 
$ link/map xskewb/opt
147
 
$!
148
 
$ set noverify
149
 
$ exit
150
 
$!
151
 
$Clobber:      ! Delete executables, Purge directory and clean up object files
152
 
$!                and listings
153
 
$ delete/noconfirm/log xskewb.exe;*
154
 
$!
155
 
$Clean:        ! Purge directory, clean up object files and listings
156
 
$ close/nolog optf
157
 
$ purge
158
 
$ delete/noconfirm/log *.lis;*
159
 
$ delete/noconfirm/log *.obj;*
160
 
$ delete/noconfirm/log *.opt;*
161
 
$ delete/noconfirm/log *.map;*
162
 
$!
163
 
$ exit
164
 
$!
165
 
! SUBROUTINE TO CHECK DEPENDENCIES
166
 
$ make: subroutine
167
 
$   v='f$verify(0)
168
 
$!   p1       What we are trying to make
169
 
$!   p2       Command to make it
170
 
$!   p3 - p8  What it depends on
171
 
$
172
 
$   if (f$extract(0,3,p2) .eqs. "cc ") then write optf "''p1'"
173
 
$   if (f$extract(0,3,p2) .eqs. "CC ") then write optf "''p1'"
174
 
$
175
 
$   if f$search(p1) .eqs. "" then goto MakeIt
176
 
$   time=f$cvtime(f$file(p1,"RDT"))
177
 
$   arg=3
178
 
$Loop:
179
 
$   argument=p'arg
180
 
$   if argument .eqs. "" then goto Exit
181
 
$   el=0
182
 
$Loop2:
183
 
$   file=f$element(el," ",argument)
184
 
$   if file .eqs. " " then goto Endl
185
 
$   afile=""
186
 
$Loop3:
187
 
$   ofile=afile
188
 
$   afile=f$search(file)
189
 
$   if afile .eqs. "" .or. afile .eqs. ofile then goto NextEl
190
 
$   if f$cvtime(f$file(afile,"RDT")) .gts. time then goto MakeIt
191
 
$   goto Loop3
192
 
$NextEL:
193
 
$   el=el+1
194
 
$   goto Loop2
195
 
$EndL:
196
 
$   arg=arg+1
197
 
$   if arg .le. 8 then goto Loop
198
 
$   goto Exit
199
 
$
200
 
$MakeIt:
201
 
$   set verify
202
 
$   'p2
203
 
$   vv='f$verify(0)
204
 
$Exit:
205
 
$   if v then set verify
206
 
$ endsubroutine