/* * $Id: doc2html.c,v 1.10 1998/04/14 00:16:58 drd Exp $ * */ /* GNUPLOT - doc2html.c */ /*[ * Copyright 1986 - 1993, 1998 Thomas Williams, Colin Kelley * * Permission to use, copy, and distribute this software and its * documentation for any purpose with or without fee is hereby granted, * provided that the above copyright notice appear in all copies and * that both that copyright notice and this permission notice appear * in supporting documentation. * * Permission to modify the software is granted, but not the right to * distribute the complete modified source code. Modifications are to * be distributed as patches to the released version. Permission to * distribute binaries produced by compiling modified sources is granted, * provided you * 1. distribute the corresponding source modifications from the * released version in the form of a patch file along with the binaries, * 2. add special version identification to distinguish your version * in addition to the base release version number, * 3. provide your name and address as the primary contact for the * support of your modified version, and * 4. retain our contact information in regard to use of the base * software. * Permission to distribute the released version of the source code along * with corresponding source modifications in the form of a patch file is * granted with same provisions 2 through 4 for binary distributions. * * This software is provided "as is" without express or implied warranty * to the extent permitted by applicable law. ]*/ /* * doc2html.c -- program to convert Gnuplot .DOC format to * World Wide Web (WWW) HyperText Markup Language (HTML) format * * Created by Russell Lang from doc2ipf by Roger Fearick from * doc2rtf by M Castro from doc2gih by Thomas Williams. * 1994-11-03 * * usage: doc2html gnuplot.doc gnuplot.htm * */ /* note that tables must begin in at least the second column to */ /* be formatted correctly and tabs are forbidden */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #include "ansichek.h" #include "stdfn.h" #define MAX_LINE_LEN 1023 #include "doc2x.h" #include "xref.h" static boolean debug = FALSE; char title[256]; void convert __PROTO((FILE *, FILE *)); void process_line __PROTO((char *, FILE *)); /* From xref.c */ extern struct LIST *lookup __PROTO((char *)); int main(argc, argv) int argc; char **argv; { FILE *infile; FILE *outfile; if (argv[argc - 1][0] == '-' && argv[argc - 1][1] == 'd') { debug = TRUE; argc--; } if ((argc > 3) || (argc == 1)) { fprintf(stderr, "Usage: %s infile outfile\n", argv[0]); exit(EXIT_FAILURE); } if ((infile = fopen(argv[1], "r")) == (FILE *) NULL) { fprintf(stderr, "%s: Can't open %s for reading\n", argv[0], argv[1]); exit(EXIT_FAILURE); } if (argc == 3) { if ((outfile = fopen(argv[2], "w")) == (FILE *) NULL) { fprintf(stderr, "%s: Can't open %s for writing\n", argv[0], argv[2]); exit(EXIT_FAILURE); } safe_strncpy(title, argv[2], sizeof(title)); } else { outfile = stdout; safe_strncpy(title, argv[1], sizeof(title)); } strtok(title, "."); /* remove type */ parse(infile); convert(infile, outfile); exit(EXIT_SUCCESS); } void convert(a, b) FILE *a, *b; { static char line[MAX_LINE_LEN+1]; /* generate html header */ fprintf(b, "\n\
\n\\n", title, title); /* process each line of the file */ while (get_line(line, sizeof(line), a)) { process_line(line, b); } /* close final page and generate trailer */ fprintf(b, "\n
"); break; case ' ':{ /* normal text line */ if ((line2[1] == NUL) || (line2[1] == '\n')) { fprintf(b, "
"); para = 0; tabl = 0; } if (line2[1] == ' ') { if (!tabl) { fprintf(b, "
\n"); } fprintf(b, "%s\n", &line2[1]); tabl = 1; para = 0; } else { if (tabl) { fprintf(b, "\n
"); /* rjl */ } tabl = 0; if (!para) para = 1; /* not in para so start one */ fprintf(b, "%s \n", &line2[1]); } break; } default:{ if (isdigit((int)line[0])) { /* start of section */ if (tabl) fprintf(b, "\n"); /* rjl */ if (startpage) { /* use the new level 0 */ refs(0, b, "
\n", "
\n", "%s
\n");
} else {
refs(last_line, b, "
\n", "
\n", "%s
\n");
}
para = 0; /* not in a paragraph */
tabl = 0;
last_line = line_count;
startpage = 0;
if (debug)
fprintf(stderr, "%d: %s\n", line_count, &line2[1]);
klist = lookup(&line2[1]);
if (klist)
k = klist->line;
else
k = -1;
/* output unique ID and section title */
fprintf(b, "
", line[0] == '1' ? line[0] : line[0] - 1); } else fprintf(stderr, "unknown control code '%c' in column 1, line %d\n", line[0], line_count); break; } } }