version 1.6, 2005/04/06 09:26:29 |
version 1.18, 2017/03/28 12:00:04 |
|
|
/* $OpenXM: OpenXM/src/util/oxgentexi.c,v 1.5 2005/04/06 05:08:11 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/util/oxgentexi.c,v 1.17 2017/03/19 00:22:16 takayama Exp $ */ |
|
|
#include <stdio.h> |
#include <stdio.h> |
|
#include <stdlib.h> |
|
#include <string.h> |
int Debug = 0; |
int Debug = 0; |
#define VMAX 20 |
#define VMAX 20 |
#define LIMIT 65536 |
#define LIMIT 65536 |
|
|
char *shortDescription; |
char *shortDescription; |
char *description; |
char *description; |
char *algorithm; |
char *algorithm; |
|
char *changelog; |
char *examplev[VMAX]; |
char *examplev[VMAX]; |
char *exampleDescv[VMAX]; |
char *exampleDescv[VMAX]; |
|
char *options; |
int examplec; |
int examplec; |
int refc; |
int refc; |
char *refv[VMAX]; |
char *refv[VMAX]; |
Line 29 struct item *getItem(void); |
|
Line 33 struct item *getItem(void); |
|
char *str(char *key); |
char *str(char *key); |
char *str2(char *key,int size); |
char *str2(char *key,int size); |
int cmpItem(struct item *it,struct item *it2); |
int cmpItem(struct item *it,struct item *it2); |
|
void printItem(struct item *it); |
|
void shell(struct item *v[],int n); |
|
void printMenu(FILE *fp, struct item **it, int n); |
|
void printBye(); |
|
void printTitlePage(char *title, char *author,char *infoName); |
|
void printItem(struct item *it); |
|
void printTexi(FILE *fp, struct item *it); |
|
void printTexi_common(FILE *fp,struct item *it); |
|
void printTexi0(FILE *fp, struct item *it); |
|
void printTexi1(FILE *fp, struct item *it); |
|
void outputExample(FILE *fp,char *s); |
|
void outputOfExample(char *com); |
|
|
char *S; |
char *S; |
int Ssize = 256; |
int Ssize = 256; |
Line 41 int GenExample = 0; |
|
Line 57 int GenExample = 0; |
|
int DebugItem = 0; |
int DebugItem = 0; |
char *Title = NULL; |
char *Title = NULL; |
char *Author = NULL; |
char *Author = NULL; |
|
char *InfoName = NULL; |
int NoSorting = 0; |
int NoSorting = 0; |
|
|
|
int |
main(int argc,char *argv[]) { |
main(int argc,char *argv[]) { |
char *t; |
char *t; |
int p,c,n,i; |
int c,n,i; |
struct item *tt; |
struct item *tt; |
struct item *items[ITEMMAX]; |
struct item *items[ITEMMAX]; |
|
|
Line 71 main(int argc,char *argv[]) { |
|
Line 89 main(int argc,char *argv[]) { |
|
DebugItem = 1; |
DebugItem = 1; |
}else if (strcmp(argv[i],"--title") == 0) { |
}else if (strcmp(argv[i],"--title") == 0) { |
i++; Title = str(argv[i]); |
i++; Title = str(argv[i]); |
|
}else if (strcmp(argv[i],"--infoName") == 0) { |
|
i++; InfoName = str(argv[i]); |
}else if (strcmp(argv[i],"--author") == 0) { |
}else if (strcmp(argv[i],"--author") == 0) { |
i++; Author = str(argv[i]); |
i++; Author = str(argv[i]); |
}else if (strcmp(argv[i],"--noSorting") == 0) { |
}else if (strcmp(argv[i],"--noSorting") == 0) { |
Line 125 main(int argc,char *argv[]) { |
|
Line 145 main(int argc,char *argv[]) { |
|
exit(0); |
exit(0); |
} |
} |
|
|
if (Title) printTitlePage(Title,Author); |
if (Title) printTitlePage(Title,Author,InfoName); |
|
|
printMenu(stdout,items,n); |
printMenu(stdout,items,n); |
|
|
Line 137 main(int argc,char *argv[]) { |
|
Line 157 main(int argc,char *argv[]) { |
|
exit(0); |
exit(0); |
} |
} |
|
|
|
int |
genInclude(char *name) { |
genInclude(char *name) { |
char fname[4098]; |
char fname[4098]; |
FILE *fp; |
FILE *fp; |
Line 156 genInclude(char *name) { |
|
Line 177 genInclude(char *name) { |
|
return 0; |
return 0; |
} |
} |
|
|
|
int |
cmpItem(struct item *it,struct item *it2) { |
cmpItem(struct item *it,struct item *it2) { |
return strcmp(it->sortKey,it2->sortKey); |
return strcmp(it->sortKey,it2->sortKey); |
} |
} |
Line 166 struct item * newItem(){ |
|
Line 188 struct item * newItem(){ |
|
fprintf(stderr,"newItem: No more memory.\n"); |
fprintf(stderr,"newItem: No more memory.\n"); |
exit(20); |
exit(20); |
} |
} |
a->argc = 0; a->optc = 0; a->refc=0; a->examplec = 0; |
memset(a, 0, sizeof(struct item)); |
a->type=0; |
|
a->category = a->category2 = a->name = a->shortDescription |
|
= a->description = a->author = a->algorithm = a->sortKey = NULL; |
|
return a; |
return a; |
} |
} |
|
|
|
int |
nextToken(char *key,int n) { |
nextToken(char *key,int n) { |
static int pos = 0; |
static int pos = 0; |
int i = 0; |
int i = 0; |
Line 210 nextToken(char *key,int n) { |
|
Line 230 nextToken(char *key,int n) { |
|
return pos; |
return pos; |
} |
} |
|
|
|
void |
printItem(struct item *it) { |
printItem(struct item *it) { |
int i; |
int i; |
if (it == NULL) return; |
if (it == NULL) return; |
Line 233 printItem(struct item *it) { |
|
Line 254 printItem(struct item *it) { |
|
printf("examplev[%d]=%s\n",i,it->examplev[i]); |
printf("examplev[%d]=%s\n",i,it->examplev[i]); |
for (i=0; i <it->examplec; i++) |
for (i=0; i <it->examplec; i++) |
printf("exampleDescv[%d]=%s\n",i,it->exampleDescv[i]); |
printf("exampleDescv[%d]=%s\n",i,it->exampleDescv[i]); |
|
if (it->changelog != NULL) |
|
printf("changelog=%s\n",it->changelog); |
|
if (it->options != NULL) |
|
printf("options=%s\n",it->options); |
for (i=0; i<it->refc; i++) |
for (i=0; i<it->refc; i++) |
printf(" refv[%d]=%s\n",i,it->refv[i]); |
printf(" refv[%d]=%s\n",i,it->refv[i]); |
if (it->author != NULL) |
if (it->author != NULL) |
Line 266 char *str2(char *key,int size) { |
|
Line 291 char *str2(char *key,int size) { |
|
return s; |
return s; |
} |
} |
char *getCategory(char *key) { |
char *getCategory(char *key) { |
int i,n; |
int i; |
char *s; |
char *s; |
s = str(key); |
s = str(key); |
for (i=0; i<strlen(s); i++) { |
for (i=0; i<strlen(s); i++) { |
Line 278 char *getCategory(char *key) { |
|
Line 303 char *getCategory(char *key) { |
|
return s; |
return s; |
} |
} |
char *getCategory2(char *key) { |
char *getCategory2(char *key) { |
int i,n; |
int i; |
char *s; |
char *s; |
int count; |
int count=0; |
s = str(key); |
s = str(key); |
for (i=0; i<strlen(s); i++) { |
for (i=0; i<strlen(s); i++) { |
if ((s[i] == '_') || (s[i] == '.')) count++; |
if ((s[i] == '_') || (s[i] == '.')) count++; |
Line 372 struct item *getItem() { |
|
Line 397 struct item *getItem() { |
|
if (strcmp(key,"description:") == 0 || |
if (strcmp(key,"description:") == 0 || |
strcmp(key,"algorithm:") == 0 || |
strcmp(key,"algorithm:") == 0 || |
strcmp(key,"author:") == 0 || |
strcmp(key,"author:") == 0 || |
|
strcmp(key,"changelog:") == 0 || |
strcmp(key,"sortKey:") == 0 || |
strcmp(key,"sortKey:") == 0 || |
strcmp(key,"example:") == 0 || |
strcmp(key,"example:") == 0 || |
strcmp(key,"example_description:") ==0 ) { |
strcmp(key,"example_description:") ==0 || |
|
strcmp(key,"options:") ==0 || |
|
strcmp(key,"Options:") ==0 || |
|
strcmp(key,"Example:") ==0 |
|
) { |
pp = p; |
pp = p; |
strcpy(key2,key); |
strcpy(key2,key); |
do { |
do { |
Line 389 struct item *getItem() { |
|
Line 419 struct item *getItem() { |
|
if (strcmp(key2,"description:") == 0) { |
if (strcmp(key2,"description:") == 0) { |
it->description = str2(&(S[pp]),pOld-pp); |
it->description = str2(&(S[pp]),pOld-pp); |
} |
} |
if (strcmp(key2,"example:") == 0) { |
if ((strcmp(key2,"example:") == 0) || (strcmp(key2,"Example:") == 0)) { |
it->examplev[examplec++] = str2(&(S[pp]),pOld-pp); |
it->examplev[examplec++] = str2(&(S[pp]),pOld-pp); |
it->exampleDescv[examplec-1] = ""; |
it->exampleDescv[examplec-1] = ""; |
it->examplec = examplec; |
it->examplec = examplec; |
Line 411 struct item *getItem() { |
|
Line 441 struct item *getItem() { |
|
if (strcmp(key2,"algorithm:") == 0) { |
if (strcmp(key2,"algorithm:") == 0) { |
it->algorithm = str2(&(S[pp]),pOld-pp); |
it->algorithm = str2(&(S[pp]),pOld-pp); |
} |
} |
|
if (strcmp(key2,"changelog:") == 0) { |
|
it->changelog = str2(&(S[pp]),pOld-pp); |
|
} |
|
if ((strcmp(key2,"options:") == 0) || (strcmp(key2,"Options:")==0)) { |
|
it->options = str2(&(S[pp]),pOld-pp); |
|
} |
}else if (strcmp(key,"ref:") == 0) { |
}else if (strcmp(key,"ref:") == 0) { |
argc = 0; |
argc = 0; |
while ((pp=nextToken(key,LIMIT)) >= 0) { |
while ((pp=nextToken(key,LIMIT)) >= 0) { |
Line 426 struct item *getItem() { |
|
Line 462 struct item *getItem() { |
|
} |
} |
} |
} |
}else{ |
}else{ |
fprintf(stderr,"Error: unknown keyword << %s >> at %s.\n",key, it->name); |
fprintf(stderr,"Warning: unknown keyword << %s >> at %s.\n",key, it->name); |
fprintf(stderr," The error occurs around "); |
fprintf(stderr," The error occurs around "); |
for (i=pp ; i < p; i++) fputc(S[i],stderr); |
for (i=pp ; i < p; i++) fputc(S[i],stderr); |
fprintf(stderr,"\n\n"); |
fprintf(stderr,"\n\n"); |
exit(1); |
|
p = nextToken(key,LIMIT); |
p = nextToken(key,LIMIT); |
} |
} |
}while (p >= 0); |
}while (p >= 0); |
Line 438 struct item *getItem() { |
|
Line 473 struct item *getItem() { |
|
return it; |
return it; |
} |
} |
|
|
|
void |
shell(struct item *v[],int n) { |
shell(struct item *v[],int n) { |
int gap,i,j; |
int gap,i,j; |
struct item *temp; |
struct item *temp; |
Line 453 shell(struct item *v[],int n) { |
|
Line 489 shell(struct item *v[],int n) { |
|
} |
} |
} |
} |
|
|
|
void |
printMenu(FILE *fp, struct item **it, int n) { |
printMenu(FILE *fp, struct item **it, int n) { |
int i,m; |
int i,m; |
|
|
Line 467 printMenu(FILE *fp, struct item **it, int n) { |
|
Line 504 printMenu(FILE *fp, struct item **it, int n) { |
|
} |
} |
} |
} |
|
|
|
void |
printTexi(FILE *fp, struct item *it) { |
printTexi(FILE *fp, struct item *it) { |
int i; |
if (it->type == 1) printTexi1(fp,it); |
if (it->type == 1) return printTexi1(fp,it); |
else printTexi0(fp,it); |
else return printTexi0(fp,it); |
return; |
} |
} |
|
|
|
void |
printTexi_common(FILE *fp,struct item *it) { |
printTexi_common(FILE *fp,struct item *it) { |
int i; |
int i; |
if (it->description != NULL) { |
int elen; |
fprintf(fp,"%s\n\n",it->description); |
if ((it->shortDescription != NULL) || (it->refc >0) |
|
|| (it->examplec > 0)) { |
|
if (it->description != NULL) { |
|
fprintf(fp,"\nDescription:\n"); |
|
fprintf(fp,"@quotation\n%s\n@end quotation\n\n",it->description); |
|
} |
|
}else { |
|
if (it->description != NULL) { |
|
fprintf(fp,"%s\n\n",it->description); |
|
} |
} |
} |
|
|
if (it->algorithm != NULL) { |
if (it->algorithm != NULL) { |
fprintf(fp,"\n\n@noindent\nAlgorithm: \n"); |
fprintf(fp,"\n\n@noindent\nAlgorithm: \n@quotation\n"); |
fprintf(fp,"%s\n\n",it->algorithm); |
fprintf(fp,"%s\n@end quotation\n",it->algorithm); |
} |
} |
|
|
if (it->examplec > 0) { |
if (it->examplec > 0) { |
Line 496 printTexi_common(FILE *fp,struct item *it) { |
|
Line 544 printTexi_common(FILE *fp,struct item *it) { |
|
if (GenExample) { |
if (GenExample) { |
outputOfExample(it->examplev[i]); |
outputOfExample(it->examplev[i]); |
} |
} |
fprintf(fp,"@end example\n"); |
elen=strlen(it->examplev[i]); |
|
if ((it->examplev[i])[elen-1] == '\n') fprintf(fp,"@end example\n"); |
|
else fprintf(fp,"\n@end example\n"); |
if (it->exampleDescv[i] != NULL && strlen(it->exampleDescv[i]) > 0) { |
if (it->exampleDescv[i] != NULL && strlen(it->exampleDescv[i]) > 0) { |
fprintf(fp,"%s\n\n",it->exampleDescv[i]); |
fprintf(fp,"%s\n\n",it->exampleDescv[i]); |
} |
} |
Line 505 printTexi_common(FILE *fp,struct item *it) { |
|
Line 555 printTexi_common(FILE *fp,struct item *it) { |
|
if (it->author != NULL) { |
if (it->author != NULL) { |
fprintf(fp,"Author : %s\n\n",it->author); |
fprintf(fp,"Author : %s\n\n",it->author); |
} |
} |
|
if (it->changelog != NULL) { |
|
fprintf(fp,"\n\nChange Log:\n@quotation\n"); |
|
fprintf(fp,"%s\n@end quotation\n",it->changelog); |
|
} |
|
if (it->options != NULL) { |
|
fprintf(fp,"\nOptinal variabes:"); |
|
fprintf(fp,"%s\n\n",it->options); |
|
} |
if (it->refc > 0) { |
if (it->refc > 0) { |
fprintf(fp,"@table @t\n"); |
fprintf(fp,"\n\nReferences:\n@quotation\n"); |
fprintf(fp,"@item References\n"); |
|
for (i=0; i <it->refc; i++) { |
for (i=0; i <it->refc; i++) { |
fprintf(fp,"@code{%s} ",it->refv[i]); |
fprintf(fp," @code{%s} ",it->refv[i]); |
if (i != it->refc-1) fprintf(fp,", "); |
if (i != it->refc-1) fprintf(fp,", \n"); |
} |
} |
fprintf(fp,"\n@end table\n"); |
fprintf(fp,"\n@end quotation\n"); |
} |
} |
fprintf(fp,"\n"); |
fprintf(fp,"\n"); |
} |
} |
|
|
|
void |
printTexi0(FILE *fp, struct item *it) { |
printTexi0(FILE *fp, struct item *it) { |
int i; |
int i; |
|
|
Line 590 printTexi0(FILE *fp, struct item *it) { |
|
Line 648 printTexi0(FILE *fp, struct item *it) { |
|
printTexi_common(fp,it); |
printTexi_common(fp,it); |
} |
} |
|
|
|
void |
printTexi1(FILE *fp, struct item *it) { |
printTexi1(FILE *fp, struct item *it) { |
int i; |
int i; |
/* For it->type == 1 */ |
/* For it->type == 1 */ |
Line 617 printTexi1(FILE *fp, struct item *it) { |
|
Line 676 printTexi1(FILE *fp, struct item *it) { |
|
printTexi_common(fp,it); |
printTexi_common(fp,it); |
} |
} |
|
|
|
void |
outputExample(FILE *fp,char *s) { |
outputExample(FILE *fp,char *s) { |
int i; |
int i; |
|
/* Remove unnecessary spaces at the tail. */ |
|
for (i=strlen(s)-1; i>=0; i--) { |
|
if (s[i] == '\n') break; |
|
else if (s[i] <= ' ') {s[i] = 0;} |
|
else break; |
|
} |
for (i=0; s[i] != 0; i++) { |
for (i=0; s[i] != 0; i++) { |
if (s[i] == '@') { |
if (s[i] == '@') { |
if (s[i+1] == '{') {fprintf(fp,"%s","@{"); i += 1;} |
if (s[i+1] == '{') {fprintf(fp,"%s","@{"); i += 1;} |
Line 635 outputExample(FILE *fp,char *s) { |
|
Line 701 outputExample(FILE *fp,char *s) { |
|
} |
} |
} |
} |
|
|
|
void |
outputOfExample(char *com) { |
outputOfExample(char *com) { |
FILE *fp2; |
FILE *fp2; |
int c; |
int c; |
Line 662 outputOfExample(char *com) { |
|
Line 729 outputOfExample(char *com) { |
|
putchar('\n'); |
putchar('\n'); |
} |
} |
|
|
printTitlePage(char *title, char *author) { |
void |
|
printTitlePage(char *title, char *author,char *infoName) { |
printf("\\input texinfo\n"); |
printf("\\input texinfo\n"); |
printf("@def@colon{:}\n\n"); |
printf("@def@colon{:}\n\n"); |
printf("@iftex\n"); |
printf("@iftex\n"); |
Line 672 printTitlePage(char *title, char *author) { |
|
Line 740 printTitlePage(char *title, char *author) { |
|
printf("@end iftex\n"); |
printf("@end iftex\n"); |
printf("@overfullrule=0pt\n"); |
printf("@overfullrule=0pt\n"); |
|
|
printf("@setfilename %s\n",Title); |
if (infoName != NULL) printf("@setfilename %s\n",infoName); |
|
else printf("@setfilename asir-contrib-infoName-is-not-set\n"); |
printf("@settitle %s\n",Title); |
printf("@settitle %s\n",Title); |
|
|
printf("@titlepage\n"); |
printf("@titlepage\n"); |
Line 684 printTitlePage(char *title, char *author) { |
|
Line 753 printTitlePage(char *title, char *author) { |
|
printf("@node Top,, (dir), (dir)\n\n"); |
printf("@node Top,, (dir), (dir)\n\n"); |
} |
} |
|
|
|
void |
printBye() { |
printBye() { |
|
printf("@node Index,,, Top\n"); |
|
printf("@unnumbered Index\n"); |
|
printf("@printindex fn\n"); |
|
printf("@printindex cp\n"); |
|
printf("@iftex\n"); |
|
printf("@vfill @eject\n"); |
|
printf("@end iftex\n"); |
|
printf("@summarycontents\n"); |
|
printf("@contents\n"); |
printf("\n@bye\n"); |
printf("\n@bye\n"); |
} |
} |
/* Old file was OpenXM/src/asir-contrib/packages/doc/gentexi.c */ |
/* Old file was OpenXM/src/asir-contrib/packages/doc/gentexi.c */ |