summaryrefslogtreecommitdiff
path: root/Build/source/texk/makejvf/main.c
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-04-11 00:28:06 +0000
committerKarl Berry <karl@freefriends.org>2010-04-11 00:28:06 +0000
commit001b7975ce276ec6e72bf2b317cef8afe92c2948 (patch)
tree3c73cdd11c93462911cb416a231af743f48d5368 /Build/source/texk/makejvf/main.c
parent22d2dd3a9e8cc227f8d51b2fe8cf1734c2844959 (diff)
add ptex from Akira, Norbert, and jTeX group; ptex not actually built by default yet
git-svn-id: svn://tug.org/texlive/trunk@17797 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/makejvf/main.c')
-rw-r--r--Build/source/texk/makejvf/main.c139
1 files changed, 139 insertions, 0 deletions
diff --git a/Build/source/texk/makejvf/main.c b/Build/source/texk/makejvf/main.c
new file mode 100644
index 00000000000..132fb35b13a
--- /dev/null
+++ b/Build/source/texk/makejvf/main.c
@@ -0,0 +1,139 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <kpathsea/config.h>
+#include <ptexenc/ptexenc.h>
+#include "makejvf.h"
+
+FILE *vfp,*afp=NULL;
+char *atfmname,*vtfmname,*afmname,*vfname,*kanatfm;
+int kanatume=-1,chotai=0,baseshift=0,minute=0;
+
+int main(int argc, char ** argv)
+{
+ int i,j;
+
+ set_enc_string(NULL, "EUC");
+ if (argc < 3) {
+ usage();
+ exit(0);
+ }
+
+ argv++;
+
+ for (;**argv=='-';argv++) {
+ switch ((*argv)[1]) {
+ case 'k':
+ if ((*argv)[2]!='\0') {
+ kanatume = atoi(&(*argv)[2]);
+ }
+ else {
+ kanatume = atoi(*(++argv));
+ }
+ break;
+ case 'K':
+ if ((*argv)[2]!='\0') {
+ kanatfm = strdup(&(*argv)[2]);
+ }
+ else {
+ kanatfm = strdup(*(++argv));
+ }
+ break;
+ case 'C':
+ chotai=1;
+ break;
+ case 'a':
+ if ((*argv)[2]!='\0') {
+ afmname = strdup(&(*argv)[2]);
+ }
+ else {
+ afmname = strdup(*(++argv));
+ }
+ if ((afp = fopen(afmname,"r"))==NULL) {
+ fprintf(stderr,"no AFM file, %s.\n",afmname);
+ exit(-1);
+ }
+ break;
+ case 'b':
+ if ((*argv)[2]!='\0') {
+ baseshift = atoi(&(*argv)[2]);
+ }
+ else {
+ baseshift = atoi(*(++argv));
+ }
+ break;
+ case 'm':
+ minute=1;
+ break;
+ default:
+ usage();
+ exit(0);
+ }
+ }
+
+ if (kanatume>=0 && !afp) {
+ fprintf(stderr,"No AFM file for kanatume.\n");
+ exit(-1);
+ }
+
+ atfmname = malloc(strlen(*argv)+4);
+ strcpy(atfmname,*argv);
+
+ vfname = malloc(strlen(*argv)+4);
+ strcpy(vfname,*argv);
+ for (i = strlen(vfname)-1 ; i >= 0 ; i--) {
+ if (vfname[i] == '/') {
+ vfname = &vfname[i+1];
+ break;
+ }
+ }
+ if (!strcmp(&vfname[strlen(vfname)-4],".tfm")) {
+ vfname[strlen(vfname)-4] = '\0';
+ }
+ strcat(vfname,".vf");
+
+ argv++;
+
+ vtfmname = strdup(*argv);
+ if (!strcmp(&vtfmname[strlen(vtfmname)-4],".tfm")) {
+ vtfmname[strlen(vtfmname)-4] = '\0';
+ }
+
+ tfmget(atfmname);
+
+ maketfm(vtfmname);
+
+ if (kanatfm) {
+ if (!strcmp(&kanatfm[strlen(kanatfm)-4],".tfm")) {
+ kanatfm[strlen(kanatfm)-4] = '\0';
+ }
+ maketfm(kanatfm);
+ }
+
+ vfp = vfopen(vfname);
+
+ for (i=0;i<94;i++)
+ for (j=0;j<94;j++)
+ writevf((0x21+i)*256+(0x21+j),vfp);
+
+ vfclose(vfp);
+
+ exit(0);
+}
+
+void usage(void)
+{
+ fputs2("MAKEJVF ver.1.1a -- make Japanese VF file.\n", stderr);
+ fputs2("%% makejvf [<options>] <TFMfile> <PSfontTFM>\n", stderr);
+ fputs2("options:\n", stderr);
+ fputs2("-C 長体モード\n", stderr);
+ fputs2("-K <TFMfile> 非漢字部用に作成するPSフォントTFM名\n", stderr);
+ fputs2("-b <数値> ベースライン補正\n", stderr);
+ fputs2(" 文字の高さを1000として整数で指定\n", stderr);
+ fputs2(" プラスで文字が下がり、マイナスで文字が上がる\n", stderr);
+ fputs2("-m 縦書き時にクオート(’”)の代わりにミニュート(′″)を使用\n", stderr);
+ fputs2("-a <AFMfile> AFMファイル名(かな詰め時に使用)\n", stderr);
+ fputs2("-k <数値> かな詰めマージン指定\n", stderr);
+ fputs2(" 文字幅を1000として整数で指定。-aオプションと共に使用\n", stderr);
+}