r1046 - in packages/libfont-ttf-perl/trunk: . debian lib/Font/TTF scripts

Gunnar Wolf gwolf@costa.debian.org
Wed, 25 May 2005 15:09:06 +0000


Author: gwolf
Date: 2005-05-25 15:09:05 +0000 (Wed, 25 May 2005)
New Revision: 1046

Added:
   packages/libfont-ttf-perl/trunk/debian/
   packages/libfont-ttf-perl/trunk/debian/changelog
   packages/libfont-ttf-perl/trunk/debian/control
   packages/libfont-ttf-perl/trunk/debian/copyright
   packages/libfont-ttf-perl/trunk/debian/dirs
   packages/libfont-ttf-perl/trunk/debian/docs
   packages/libfont-ttf-perl/trunk/debian/rules
   packages/libfont-ttf-perl/trunk/debian/watch
Modified:
   packages/libfont-ttf-perl/trunk/Setup.bat
   packages/libfont-ttf-perl/trunk/lib/Font/TTF/Anchor.pm
   packages/libfont-ttf-perl/trunk/lib/Font/TTF/Coverage.pm
   packages/libfont-ttf-perl/trunk/lib/Font/TTF/Delta.pm
   packages/libfont-ttf-perl/trunk/lib/Font/TTF/GPOS.pm
   packages/libfont-ttf-perl/trunk/lib/Font/TTF/Manual.pod
   packages/libfont-ttf-perl/trunk/pmake.bat
   packages/libfont-ttf-perl/trunk/scripts/check_attach.plx
   packages/libfont-ttf-perl/trunk/scripts/eurofix.plx
   packages/libfont-ttf-perl/trunk/scripts/hackos2.plx
   packages/libfont-ttf-perl/trunk/scripts/psfix.plx
   packages/libfont-ttf-perl/trunk/scripts/ttfbuilder.plx
   packages/libfont-ttf-perl/trunk/scripts/ttfname.plx
   packages/libfont-ttf-perl/trunk/scripts/ttfremap.plx
Log:
Load libfont-ttf-perl-0.34 into packages/libfont-ttf-perl/trunk.



Property changes on: packages/libfont-ttf-perl/trunk/Setup.bat
___________________________________________________________________
Name: svn:executable
   - 
   + *

Added: packages/libfont-ttf-perl/trunk/debian/changelog
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/changelog	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/changelog	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,39 @@
+libfont-ttf-perl (0.34-4) unstable; urgency=low
+
+  * Fixed a little rules ordering problem in debian/rules which led to a
+    FTBFS (Closes: #210308)
+
+ -- Gunnar Wolf <gwolf@debian.org>  Wed, 10 Sep 2003 14:22:57 -0500
+
+libfont-ttf-perl (0.34-3) unstable; urgency=low
+
+  * Now using Debhelper
+  * Bumped Standards-Version to 3.6.1
+
+ -- Gunnar Wolf <gwolf@debian.org>  Thu,  4 Sep 2003 01:26:20 -0500
+
+libfont-ttf-perl (0.34-2) unstable; urgency=low
+
+  * Section change (interpreters -> perl)
+
+ -- Gunnar Wolf <gwolf@debian.org>  Thu, 22 May 2003 09:19:11 -0500
+
+libfont-ttf-perl (0.34-1) unstable; urgency=low
+
+  * New upstream release
+
+ -- Gunnar Wolf <gwolf@debian.org>  Thu, 22 May 2003 00:21:33 -0500
+
+libfont-ttf-perl (0.32-2) unstable; urgency=low
+
+  * Fixed some debian/rules bugs.
+
+ -- Gunnar Eyal Wolf Iszaevich <gwolf@gwolf.cx>  Mon, 17 Feb 2003 8:54:10 -0600
+
+libfont-ttf-perl (0.32-1) unstable; urgency=low
+
+  * Initial Release.
+  * Closes: #180906.
+
+ -- Gunnar Eyal Wolf Iszaevich <gwolf@gwolf.cx>  Tue, 11 Feb 2003 17:18:07 -0600
+

Added: packages/libfont-ttf-perl/trunk/debian/control
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/control	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/control	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,15 @@
+Source: libfont-ttf-perl
+Section: perl
+Priority: optional
+Maintainer: Gunnar Wolf <gwolf@debian.org>
+Build-Depends-Indep: debhelper (>= 3.0.5), perl (>= 5.8.0-19)
+Standards-Version: 3.6.1
+
+Package: libfont-ttf-perl
+Architecture: all
+Depends: ${perl:Depends}
+Suggests: libxml-parser-perl
+Description: Perl module for TrueType font hacking
+ This module supports reading, processing and writing many different
+ table formats for TrueType fonts. You can do almost anything with a
+ TrueType font with this module.

Added: packages/libfont-ttf-perl/trunk/debian/copyright
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/copyright	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/copyright	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,14 @@
+This package was debianized by Gunnar Eyal Wolf Iszaevich <gwolf@gwolf.cx> on
+Tue, 11 Feb 2003 17:18:07 -0600.
+
+It was downloaded from http://www.cpan.org/modules/by-module/Font/
+
+Upstream Author: Martin Hosken L <Martin_Hosken@sil.org>
+
+Copyright: 
+ No warranty or expression of effectiveness for anything, least of all anyone's
+ safety, is implied in this software or documentation.
+
+ The Perl TTF module is licensed under the Perl Artistic License.
+ On Debian GNU/Linux systems, the complete text of the Artistic License can
+ be found in '/usr/share/common-licenses/Artistic'.

Added: packages/libfont-ttf-perl/trunk/debian/dirs
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/dirs	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/dirs	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,3 @@
+usr/share/doc/libfont-ttf-perl
+usr/share/perl5/Font/TTF
+

Added: packages/libfont-ttf-perl/trunk/debian/docs
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/docs	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/docs	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1 @@
+README.TXT

Added: packages/libfont-ttf-perl/trunk/debian/rules
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/rules	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/rules	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,68 @@
+#!/usr/bin/make -f
+# Sample debian/rules that uses debhelper.
+# GNU copyright 1997 to 1999 by Joey Hess.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+export DH_COMPAT=3
+
+ifndef PERL
+     PERL = /usr/bin/perl
+endif
+
+TMP=`pwd`/debian/libfont-ttf-perl
+config = INSTALLDIRS=vendor
+
+build: build-stamp
+build-stamp: 
+	dh_testdir
+	# Add here commands to compile the package
+	$(PERL) Makefile.PL $(config)
+	$(MAKE)
+	touch build-stamp
+
+clean: 
+	dh_testdir
+	dh_testroot
+	rm -f build-stamp debian/substvars debian/files
+	# Add here commands to clean up after the build process.
+	$(PERL) Makefile.PL
+	$(MAKE) distclean
+	dh_clean
+
+binary-arch: build
+# We have nothing to do by default.
+
+binary-indep: build
+	dh_testdir
+	dh_testroot
+	dh_clean
+	dh_installdirs
+	# Add here commands to install the files into debian/tmp
+	$(MAKE) install PREFIX=$(TMP)/usr
+	#-find `pwd`/debian/tmp -type f -name .packlist | xargs -r rm -f
+	#-find `pwd`/debian/tmp -type d -empty | xargs -r rmdir -p 
+	#-find `pwd`/debian/tmp -name perllocal.pod | xargs -r rm -f
+	dh_perl
+	# fix typo
+	#-mv debian/subtsvars debian/substvars
+	dh_installdocs README.TXT
+	dh_installexamples Examples/*
+	#      dh_installmenu
+	#      dh_installinit
+	#      dh_installcron
+	dh_installman
+	#      dh_undocumented
+	dh_installchangelogs
+	#dh_strip
+	dh_compress -XStripCmap -Xaddpclt -Xmakemono -Xsymbol -Xttfaddname -Xttfdeltable -Xttfenc -Xttfwidth -Xttfunadopter -Xxmldump -Xzerohyph
+	dh_fixperms
+	dh_installdeb
+	dh_shlibdeps
+	dh_gencontrol
+	#dh_makeshlibs
+	dh_md5sums
+	dh_builddeb
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary


Property changes on: packages/libfont-ttf-perl/trunk/debian/rules
___________________________________________________________________
Name: svn:executable
   + *

Added: packages/libfont-ttf-perl/trunk/debian/watch
===================================================================
--- packages/libfont-ttf-perl/trunk/debian/watch	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/debian/watch	2005-05-25 15:09:05 UTC (rev 1046)
@@ -0,0 +1,6 @@
+# Example watch control file for uscan
+# Rename this file to "watch" and then you can run the "uscan" command
+# to check for upstream updates and more.
+# Site		Directory		Pattern			Version	Script
+version=2
+http://www.cpan.org/modules/by-module/Font/Font-TTF-(.*)\.tar\.gz

Modified: packages/libfont-ttf-perl/trunk/lib/Font/TTF/Anchor.pm
===================================================================
--- packages/libfont-ttf-perl/trunk/lib/Font/TTF/Anchor.pm	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/lib/Font/TTF/Anchor.pm	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,6 +1,6 @@
 package Font::TTF::Anchor;
 
-=head1 TITLE
+=head1 NAME
 
 Font::TTF::Anchor - Anchor points for GPOS tables
 

Modified: packages/libfont-ttf-perl/trunk/lib/Font/TTF/Coverage.pm
===================================================================
--- packages/libfont-ttf-perl/trunk/lib/Font/TTF/Coverage.pm	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/lib/Font/TTF/Coverage.pm	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,6 +1,6 @@
 package Font::TTF::Coverage;
 
-=head1 TITLE
+=head1 NAME
 
 Font::TTF::Coverage - Opentype coverage and class definition objects
 

Modified: packages/libfont-ttf-perl/trunk/lib/Font/TTF/Delta.pm
===================================================================
--- packages/libfont-ttf-perl/trunk/lib/Font/TTF/Delta.pm	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/lib/Font/TTF/Delta.pm	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,6 +1,6 @@
 package Font::TTF::Delta;
 
-=head1 TITLE
+=head1 NAME
 
 SIL::TTF::Delta - Opentype Device tables
 

Modified: packages/libfont-ttf-perl/trunk/lib/Font/TTF/GPOS.pm
===================================================================
--- packages/libfont-ttf-perl/trunk/lib/Font/TTF/GPOS.pm	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/lib/Font/TTF/GPOS.pm	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,6 +1,6 @@
 package Font::TTF::GPOS;
 
-=head1 TITLE
+=head1 NAME
 
 Font::TTF::GPOS - Support for Opentype GPOS tables in conjunction with TTOpen
 

Modified: packages/libfont-ttf-perl/trunk/lib/Font/TTF/Manual.pod
===================================================================
--- packages/libfont-ttf-perl/trunk/lib/Font/TTF/Manual.pod	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/lib/Font/TTF/Manual.pod	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,5 +1,5 @@
 
-=head1 TITLE
+=head1 NAME
 
 Manual.pod - Information regarding the whole module set
 


Property changes on: packages/libfont-ttf-perl/trunk/pmake.bat
___________________________________________________________________
Name: svn:executable
   - 
   + *

Modified: packages/libfont-ttf-perl/trunk/scripts/check_attach.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/check_attach.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/check_attach.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,4 +1,27 @@
-#! perl
+#!/usr/bin/perl
+
+=head1 NAME
+
+check_attach - Checks an attachment point database against a font.
+
+=head1 DESCRIPTION
+
+Checks an attachment point database against a font, checking that any
+contours are single point and any locations tie up with their corresponding
+contour, or that there exists a single point contour at a given location.
+This program can also generate missing information and write it to a new
+attachment point database.
+
+=head1 SYNOPSIS
+
+check_attach [-z outfile.xml] infile.xml infile.ttf
+
+-z file     Output file to generate
+
+See ttfbuilder for details.
+
+=cut
+
 use Font::TTF::Font;
 use XML::Parser::Expat;
 use Getopt::Std;

Modified: packages/libfont-ttf-perl/trunk/scripts/eurofix.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/eurofix.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/eurofix.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,6 +1,39 @@
-#! perl
+#!/usr/bin/perl
 # 1.1   MJPH    13-AUG-1999     Add U+00B7 and reverse mappings as well
 
+=head1 NAME
+
+eurofix.plx - Fixes fonts created for Win95
+
+=head1 DESCRIPTION
+
+Fixes fonts created for Win95 so that they work in Win98 and NT4 sp4,
+    Win2K and so on.
+
+=head1 SYNOPSIS
+
+    EUROFIX [-m num] infile outfile
+Edits a font to account for the change in codepage 1252 definition in Win98,
+NT5 and all things new then. -m specifies that the Mac hack should also be
+done.
+
+The following changes are made to ensure that the glyphs at the two positions
+are the same, if possible:
+    U+0080 and U+20AC                Euro sign
+    U+008E and U+017D                Z caron
+    U+009E and U+017E                z caron
+    U+00B7 and U+2219                Middle dot
+For more details of which glyph is used where in Windows, see the POD which
+accompanies this program.
+
+For the Mac table
+    glyph at U+0080 (in MS table) copied to num             Euro sign
+    (-m may be for 240 or 211 depending on Apple or MS)
+
+Copies are only made if there is no glyph there already.    
+
+=cut
+
 use Font::TTF::Font;
 require 'getopts.pl';
 Getopts('m:');

Modified: packages/libfont-ttf-perl/trunk/scripts/hackos2.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/hackos2.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/hackos2.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -11,6 +11,46 @@
 # 1.5   MJPH    19-SEP-2000     Add -n, -x
 # 1.6   MJPH    10-NOV-2000     Add -v
 
+=head1 NAME
+
+eurofix.plx - Manipulates OS/2 font tables
+
+=head1 DESCRIPTION
+
+This old favourite lets you do unspeakable things to your OS/2 table,
+    including sorting Unicode range bits and codepage bits (Perl 4)
+
+=head1 SYNOPSIS
+
+HACKOS2 [-c hex] [-d directory] [-f fsSelection] [-p hex] [-q]
+        [-t num] [-u hex] <infile> <outfile>
+
+v1.6.0, 10-NOV-2000  (c) martin_hosken@sil.org
+
+Hacks the OS/2 table of a ttf file copying from infile to outfile.
+    -c      change codepage information (a 64 bit hex number)
+    -d      specifies output directory for processing multiple files. In which
+            case <outfile> is not used and <infile> may be a list including
+            wildcards.
+    -f      fsSelection value (16 bit hex) (e.g. 4240 for Thai fonts)
+    -n      sets usFirstCharIndex given a hex value
+    -p      change panose info
+                (10 bytes of hex in reverse order: 0A090807060504030201)
+    -q      Quiet mode (do not list names as they are processed)
+    -t      Sets fsType (embedding) information (decimal)
+    -u      change unicode info (a 128 bit hex number)
+    -v      sets vendor tag to the first 4 chars of the string
+    -x      sets usLastCharIndex given a hex value
+
+For example, to convert a Win3.1 ANSI font to Win95 use the following:
+    hackos2 -c01 -u03 old.ttf new.ttf
+or for a Symbol font use:
+    hackos2 -c80000000 -u0 old.ttf new.ttf
+Or to revert:
+    hackos2 -cnone other.ttf new.ttf
+
+=cut
+
 require 'ttfmod.pl';
 require 'getopts.pl';
 do Getopts("c:d:f:n:p:qt:u:v:x:");

Modified: packages/libfont-ttf-perl/trunk/scripts/psfix.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/psfix.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/psfix.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,4 +1,20 @@
-#! perl
+#!/usr/bin/perl
+
+=head1 NAME
+
+psfix.plx - Tidy up the postscript names in a font to be Postscript conformant
+
+=head1 DESCRIPTION
+
+Updates Postscript table to account for Postscript Unicode conventions
+
+=head1 SYNOPSIS
+
+    PSFIX infile outfile
+Updates Postscript table to account for Postscript Unicode conventions
+
+=cut
+
 use Font::TTF::Font;
 
 unless (defined $ARGV[1])

Modified: packages/libfont-ttf-perl/trunk/scripts/ttfbuilder.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/ttfbuilder.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/ttfbuilder.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 use Font::TTF::Font;
 use Font::TTF::Glyf;
 use Font::TTF::Glyph;
@@ -913,7 +914,7 @@
 
 __END__
 
-=head1 TITLE
+=head1 NAME
 
 ttfbuilder - assemble a font from another font
 

Modified: packages/libfont-ttf-perl/trunk/scripts/ttfname.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/ttfname.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/ttfname.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,4 +1,4 @@
-#! perl
+#!/usr/bin/perl
 #   Title:      TTFNAME.BAT
 #   Author:     M. Hosken
 #   Description: Change the family name of a font, thus changing full font
@@ -7,6 +7,34 @@
 #
 # 1.1   MJPH    20-MAR-1998     Add -l, -s
 
+=head1 NAME
+
+ttfname.plx - Renames a font and allows access to name strings
+
+=head1 DESCRIPTION
+
+Renames the TTF with the given name and outputs the newly named font
+    to <outfile>.
+
+=head1 SYNOPSIS
+
+TTFNAME [-f "new_full_name"] -n "new_name" [-t num] [-q] <infile> <outfile>
+
+v1.1.0, 20-Mar-1998  (c) Martin_Hosken@sil.org
+
+    Renames the TTF with the given name and outputs the newly named font to
+<outfile>.
+        -f "name"   specifies new full name (optional) as opposed to the
+                    default calculated form.
+        -l lang     language number to use (default all langs)
+        -n "name"   specifies new font family name (not optional)
+        -q          disable signon message
+        -s filename overrides -n and gets string from file. Useful for -t
+        -t num      overrides the normal naming areas to change another
+                    string -f becomes inactive.
+
+=cut
+
 require 'ttfmod.pl';
 require 'getopts.pl';
 do Getopts("f:l:n:qs:t:");

Modified: packages/libfont-ttf-perl/trunk/scripts/ttfremap.plx
===================================================================
--- packages/libfont-ttf-perl/trunk/scripts/ttfremap.plx	2005-05-25 15:08:27 UTC (rev 1045)
+++ packages/libfont-ttf-perl/trunk/scripts/ttfremap.plx	2005-05-25 15:09:05 UTC (rev 1046)
@@ -1,3 +1,40 @@
+#!/usr/bin/perl
+
+=head1 NAME
+
+ttfremap.plx - Simpler font subsetter than ttfbuilder
+
+
+=head1 DESCRIPTION
+
+Remaps the MS cmap of a font without removing any glyphs. Updates the OS/2
+table according to first and last char of new cmap.
+
+=head1 SYNOPSIS
+
+    TTFRemap -c file [-r] [-s | -u] <infile> <outfile>
+Remaps the MS cmap of a font without removing any glyphs. Updates the OS/2
+table according to first and last char of new cmap. The changes file consists
+of lines of any of the following forms:
+
+    uni_first, uni_to
+    uni_first, uni_last, uni_to
+    g, gid_first, uni_to
+    g, gid_first, gid_last, uni_to
+    
+where uni_first (gid_first) is the first of a range of Unicodes (glyph IDs) 
+in the source font, uni_last (gid_last) is the last of that range (if not
+specified, default is same as uni_first (gid_last)), and uni_to 
+is the start of the sequential set of Unicodes that will be altered in the 
+output cmap so they map to the specified range. NOTE: Unicode values
+should be in hex, glyph IDs are decimal.
+
+    -r      Replace (copy the old cmap before mapping)
+    -s      Convert to symbol encoding
+    -u      Convert to UGL encoding
+
+=cut
+
 use Font::TTF::Font;
 require 'getopts.pl';