$! make Freetype2 under OpenVMS

$!

$! Copyright 2003, 2004, 2006, 2007 by

$! David Turner, Robert Wilhelm, and Werner Lemberg.

$!

$! This file is part of the FreeType project, and may only be used, modified,

$! and distributed under the terms of the FreeType project license,

$! LICENSE.TXT.  By continuing to use, modify, or distribute this file you

$! indicate that you have read the license and understand and accept it

$! fully.

$!

$!

$! External libraries (like Freetype, XPM, etc.) are supported via the

$! config file VMSLIB.DAT. Please check the sample file, which is part of this

$! distribution, for the information you need to provide

$!

$! This procedure currently does support the following commandline options

$! in arbitrary order

$!

$! * DEBUG - Compile modules with /noopt/debug and link shareable image

$!           with /debug

$! * LOPTS - Options to be passed to the link command

$! * CCOPT - Options to be passed to the C compiler

$!

$! In case of problems with the install you might contact me at

$! zinser@zinser.no-ip.info(preferred) or

$! zinser@sysdev.deutsche-boerse.com (work)

$!

$! Make procedure history for Freetype2

$!

$!------------------------------------------------------------------------------

$! Version history

$! 0.01 20040401 First version to receive a number

$! 0.02 20041030 Add error handling, Freetype 2.1.9

$!

$ on error then goto err_exit

$ true  = 1

$ false = 0

$ tmpnam = "temp_" + f$getjpi("","pid")

$ tt = tmpnam + ".txt"

$ tc = tmpnam + ".c"

$ th = tmpnam + ".h"

$ its_decc = false

$ its_vaxc = false

$ its_gnuc = false

$!

$! Setup variables holding "config" information

$!

$ Make    = ""

$ ccopt   = "/name=as_is/float=ieee"

$ lopts   = ""

$ dnsrl   = ""

$ aconf_in_file = "config.hin"

$ name    = "Freetype2"

$ mapfile =  name + ".map"

$ optfile =  name + ".opt"

$ s_case  = false

$ liblist = ""

$!

$ whoami = f$parse(f$environment("Procedure"),,,,"NO_CONCEAL")

$ mydef  = F$parse(whoami,,,"DEVICE")

$ mydir  = f$parse(whoami,,,"DIRECTORY") - "]["

$ myproc = f$parse(whoami,,,"Name") + f$parse(whoami,,,"type")

$!

$! Check for MMK/MMS

$!

$ If F$Search ("Sys$System:MMS.EXE") .nes. "" Then Make = "MMS"

$ If F$Type (MMK) .eqs. "STRING" Then Make = "MMK"

$!

$! Which command parameters were given

$!

$ gosub check_opts

$!

$! Create option file

$!

$ open/write optf 'optfile'

$!

$! Pull in external libraries

$!

$ create libs.opt

$ open/write libsf libs.opt

$ gosub check_create_vmslib

$!

$! Create objects

$!

$ if libdefs .nes. ""

$ then

$   ccopt = ccopt + "/define=(" + f$extract(0,f$length(libdefs)-1,libdefs) + ")"

$ endif

$!

$ if f$locate("AS_IS",f$edit(ccopt,"UPCASE")) .lt. f$length(ccopt) -

    then s_case = true

$ gosub crea_mms

$!

$ 'Make' /macro=(comp_flags="''ccopt'")

$ purge/nolog [...]descrip.mms

$!

$! Add them to options

$!

$FLOOP:

$  file = f$edit(f$search("[...]*.obj"),"UPCASE")

$  if (file .nes. "")

$  then

$    if f$locate("DEMOS",file) .eqs. f$length(file) then write optf file

$    goto floop

$  endif

$!

$ close optf

$!

$!

$! Alpha gets a shareable image

$!

$ If f$getsyi("HW_MODEL") .gt. 1024

$ Then

$   write sys$output "Creating freetype2shr.exe"

$   call anal_obj_axp 'optfile' _link.opt

$   open/append  optf 'optfile'

$   if s_case then WRITE optf "case_sensitive=YES"

$   close optf

$   LINK_/NODEB/SHARE=[.lib]freetype2shr.exe -

                            'optfile'/opt,libs.opt/opt,_link.opt/opt

$ endif

$!

$ exit

$!

$

$ERR_LIB:

$ write sys$output "Error reading config file vmslib.dat"

$ goto err_exit

$FT2_ERR:

$ write sys$output "Could not locate Freetype 2 include files"

$ goto err_exit

$ERR_EXIT:

$ set message/facil/ident/sever/text

$ close/nolog optf

$ close/nolog out

$ close/nolog libdata

$ close/nolog in

$ close/nolog atmp

$ close/nolog xtmp

$ write sys$output "Exiting..."

$ exit 2

$!

$!------------------------------------------------------------------------------

$!

$! If MMS/MMK are available dump out the descrip.mms if required

$!

$CREA_MMS:

$ write sys$output "Creating descrip.mms files ..."

$ write sys$output "... Main directory"

$ create descrip.mms

$ open/append out descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 build system -- top-level Makefile for OpenVMS

#

# Copyright 2001 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

$ EOD

$ write out "CFLAGS = ", ccopt

$ copy sys$input: out

$ deck

all :

        define freetype [--.include.freetype]

        define psaux [-.psaux]

        define autofit [-.autofit]

        define autohint [-.autohint]

        define base [-.base]

        define cache [-.cache]

        define cff [-.cff]

        define cid [-.cid]

        define pcf [-.pcf]

        define psnames [-.psnames]

        define raster [-.raster]

        define sfnt [-.sfnt]

        define smooth [-.smooth]

        define truetype [-.truetype]

        define type1 [-.type1]

        define winfonts [-.winfonts]

        if f$search("lib.dir") .eqs. "" then create/directory [.lib]

        set default [.builds.vms]

        $(MMS)$(MMSQUALIFIERS)

#        set default [--.src.autofit]

#        $(MMS)$(MMSQUALIFIERS)

        set default [--.src.autohint]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.base]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.bdf]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.cache]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.cff]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.cid]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.gzip]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.lzw]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.otvalid]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.pcf]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.pfr]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.psaux]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.pshinter]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.psnames]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.raster]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.sfnt]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.smooth]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.truetype]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.type1]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.type42]

        $(MMS)$(MMSQUALIFIERS)

        set default [-.winfonts]

        $(MMS)$(MMSQUALIFIERS)

        set default [--]

# EOF

$ eod

$ close out

$ write sys$output "... [.builds.vms] directory"

$ create [.builds.vms]descrip.mms

$ open/append out [.builds.vms]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 system rules for VMS

#

# Copyright 2001 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([],[--.include],[--.src.base])

OBJS=ftsystem.obj

all : $(OBJS)

        library/create [--.lib]freetype.olb $(OBJS)

ftsystem.obj : ftsystem.c ftconfig.h

# EOF

$ eod

$ close out

$ write sys$output "... [.src.autofit] directory"

$ create [.src.autofit]descrip.mms

$ open/append out [.src.autofit]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 auto-fit module compilation rules for VMS

#

# Copyright 2002 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.include],[--.src.autofit])

OBJS=afangles.obj,afhints.obj,aflatin.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.autohint] directory"

$ create [.src.autohint]descrip.mms

$ open/append out [.src.autohint]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 auto-hinter module compilation rules for VMS

#

# Copyright 2001, 2002 Catharon Productions Inc.

#

# This file is part of the Catharon Typography Project and shall only

# be used, modified, and distributed under the terms of the Catharon

# Open Source License that should come with this file under the name

# `CatharonLicense.txt'.  By continuing to use, modify, or distribute

# this file you indicate that you have read the license and

# understand and accept it fully.

#

# Note that this license is compatible with the FreeType license.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/incl=([--.include],[--.src.autohint])

OBJS=autohint.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.base] directory"

$ create [.src.base]descrip.mms

$ open/append out [.src.base]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 base layer compilation rules for VMS

#

# Copyright 2001, 2003 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.builds.vms],[--.include],[--.src.base])

OBJS=ftbase.obj,ftinit.obj,ftglyph.obj,ftdebug.obj,ftbdf.obj,ftmm.obj,\

     fttype1.obj,ftxf86.obj,ftpfr.obj,ftstroke.obj,ftwinfnt.obj,ftbbox.obj,\

     ftbitmap.obj ftlcdfil.obj ftgasp.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.bdf] directory"

$ create [.src.bdf]descrip.mms

$ open/append out [.src.bdf]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 BDF driver compilation rules for VMS

#

# Copyright 2002 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.include],[--.src.bdf])

OBJS=bdf.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.cache] directory"

$ create [.src.cache]descrip.mms

$ open/append out [.src.cache]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 Cache compilation rules for VMS

#

# Copyright 2001, 2002, 2003, 2004 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.include],[--.src.cache])

OBJS=ftcache.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

ftcache.obj : ftcache.c ftcbasic.c ftccache.c ftccmap.c ftcglyph.c ftcimage.c \

              ftcmanag.c ftcmru.c ftcsbits.c

# EOF

$ eod

$ close out

$ write sys$output "... [.src.cff] directory"

$ create [.src.cff]descrip.mms

$ open/append out [.src.cff]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 OpenType/CFF driver compilation rules for VMS

#

# Copyright 2001, 2002 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.include],[--.src.cff])

OBJS=cff.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.cid] directory"

$ create [.src.cid]descrip.mms

$ open/append out [.src.cid]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 CID driver compilation rules for VMS

#

# Copyright 2001 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=([--.include],[--.src.cid])

OBJS=type1cid.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.gzip] directory"

$ create [.src.gzip]descrip.mms

$ open/append out [.src.gzip]descrip.mms

$ copy sys$input: out

$ deck

#

# FreeType 2 GZip support compilation rules for VMS

#

# Copyright 2002 by

# David Turner, Robert Wilhelm, and Werner Lemberg.

#

# This file is part of the FreeType project, and may only be used, modified,

# and distributed under the terms of the FreeType project license,

# LICENSE.TXT.  By continuing to use, modify, or distribute this file you

# indicate that you have read the license and understand and accept it

# fully.

$EOD

$ if libincs .nes. "" then write out "LIBINCS = ", libincs - ",", ","

$ write out "COMP_FLAGS = ", ccopt

$ copy sys$input: out

$ deck

CFLAGS=$(COMP_FLAGS)$(DEBUG)/include=($(LIBINCS)[--.include],[--.src.gzip])

OBJS=ftgzip.obj

all : $(OBJS)

        library [--.lib]freetype.olb $(OBJS)

# EOF

$ eod

$ close out

$ write sys$output "... [.src.lzw] directory"

$ create [.src.lzw]descrip.mms

$ open/append out [.src.lzw]descrip.mms

$ copy sys$input: out

$ deck