head	1.4;
access;
symbols
	groff-1_20_1_real:1.4
	groff-1_20_1:1.4
	groff-1_20:1.4;
locks; strict;
comment	@# @;


1.4
date	2009.01.05.20.10.53;	author wl;	state Exp;
branches;
next	1.3;
commitid	LOYcfESGVCXMFixt;

1.3
date	2009.01.04.14.51.00;	author wl;	state Exp;
branches;
next	1.2;
commitid	RfDBP1nYqohhW8xt;

1.2
date	2006.03.12.19.18.51;	author wl;	state Exp;
branches;
next	1.1;

1.1
date	2006.03.09.07.25.41;	author wl;	state Exp;
branches;
next	;


desc
@@


1.4
log
@Update copyright year.
@
text
@#! /bin/sh
#
# make-zapfdr -- script for creating the file zapfdr.ps
#
# Copyright (C) 2006, 2009
# Free Software Foundation, Inc.
#      Written by Werner Lemberg <wl@@gnu.org>
#
# This file is part of groff.
#
# groff is free software; you can redistribute it and/or modify it under
# the terms of the GNU General Public License as published by the Free
# Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# groff is distributed in the hope that it will be useful, but WITHOUT ANY
# WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
# for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.

#
# usage:
#
#   make-zapfdr < ZapfDingbats.afm > zapfdr.ps
#


# Write preamble.
cat <<END
%!PS-Adobe-3.0 Resource-Font
%%DocumentNeededResources: font ZapfDingbats
%%EndComments
%%IncludeResource: font ZapfDingbats

/ZapfDingbats findfont [-1 0 0 1 0 0] makefont

dup length 1 add dict begin
{
	exch dup dup /FID ne exch /UniqueID ne and {
		exch def
	} {
		pop pop
	} ifelse
} forall

/FontName /ZapfDingbats-Reverse def
END


# Emit reverse metrics.
sed '
  /^StartCharMetrics/ {
    s|StartCharMetrics \([0-9]*\)|/Metrics \1 dict dup begin|
    H
    d
  }

  /^C / {
    s|^.*$|&@@|
    s|^.* N \([^ ]*\) ;.*$|&/\1 [|
    s|^.* B [0-9-]* [0-9-]* \([0-9]*\) [0-9-]* ;.*$|&-\1 |
    s|^.* B [0-9-]* [0-9-]* -\([0-9]*\) [0-9-]* ;.*$|&\1 |
    s|^.* WX \([0-9]*\) ;.*$|&-\1] def|
    s|^.* WX -\([0-9]*\) ;.*$|&\1] def|
    s|^.*@@|	|
    H
    d
  }

  $ {
    g
    p
  }

  d
'


# Write postamble.
cat <<END

end def

/ZapfDingbats-Reverse currentdict end definefont pop
END

# EOF
@


1.3
log
@

* */*: Update GPL2 to GPL3.
@
text
@d5 1
a5 1
# Copyright (C) 2006
@


1.2
log
@

* fonts/devps/generate/make-zapfdr, fonts/devps/symbolsl.ps,
fonts/devps/zapfdr.ps: Add `%%EndComments' line.
@
text
@d13 2
a14 2
# Software Foundation; either version 2, or (at your option) any later
# version.
d21 2
a22 3
# You should have received a copy of the GNU General Public License along
# with groff; see the file COPYING.  If not, write to the Free Software
# Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301, USA.
@


1.1
log
@

* font/devps/generate/make-zapfdr: New script for generating
`zapfdr.ps'.
@
text
@d36 1
a36 1

@

