static void write_texman(FILE *out,const char *program,
int nldesc,const char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,const char **bugs,
t_linkdata *links)
{
int i;
char tmp[256];
fprintf(out,"\\section{\\normindex{%s}}\\label{%s}\n\n",check_tex(program),check_tex(program));
if (nldesc > 0)
for(i=0; (i<nldesc); i++)
fprintf(out,"%s\n",check_tex(desc[i]));
if (nfile > 0) {
fprintf(out,"\\vspace{-2ex}\\begin{tabbing}\n");
fprintf(out,"\n{\\normalsize \\bf Files}\\nopagebreak\\\\\n");
fprintf(out,"{\\tt ~~~~~~~} \\= {\\tt ~~~~~~~~~~~~~~} \\= "
"~~~~~~~~~~~~~~~~~~~~~~ \\= \\nopagebreak\\kill\n");
for(i=0; (i<nfile); i++)
fprintf(out,"\\>{\\tt %s} \\'\\> {\\tt %s} \\' %s \\> "
"\\parbox[t]{0.55\\linewidth}{%s} \\\\\n",
check_tex(fnm[i].opt),check_tex(fnm[i].fns[0]),
check_tex(fileopt(fnm[i].flag,tmp,255)),
check_tex(ftp2desc(fnm[i].ftp)));
fprintf(out,"\\end{tabbing}\\vspace{-4ex}\n");
}
if (npargs > 0) {
fprintf(out,"\\vspace{-2ex}\\begin{tabbing}\n");
fprintf(out,"\n{\\normalsize \\bf Other options}\\nopagebreak\\\\\n");
fprintf(out,"{\\tt ~~~~~~~~~~} \\= vector \\= "
"{\\tt ~~~~~~~} \\= \\nopagebreak\\kill\n");
for(i=0; (i<npargs); i++) {
if (strlen(check_tex(pa_val(&(pa[i]),tmp,255))) <= 8)
fprintf(out,"\\> {\\tt %s} \\'\\> %s \\'\\> {\\tt %s} \\' "
"\\parbox[t]{0.68\\linewidth}{%s}\\\\\n",
check_tex(pa[i].option),argtp[pa[i].type],
check_tex(pa_val(&(pa[i]),tmp,255)),
check_tex(pa[i].desc));
else
fprintf(out,"\\> {\\tt %s} \\'\\> %s \\'\\>\\\\\n"
"\\> \\'\\> \\'\\> {\\tt %s} \\' "
"\\parbox[t]{0.7\\linewidth}{%s}\\\\\n",
check_tex(pa[i].option),argtp[pa[i].type],
check_tex(pa_val(&(pa[i]),tmp,255)),
check_tex(pa[i].desc));
}
fprintf(out,"\\end{tabbing}\\vspace{-4ex}\n");
}
if (nbug > 0) {
fprintf(out,"\n");
fprintf(out,"\\begin{itemize}\n");
for(i=0; (i<nbug); i++)
fprintf(out,"\\item %s\n",check_tex(bugs[i]));
fprintf(out,"\\end{itemize}\n");
}
/* fprintf(out,"\n\\newpage\n"); */
}
char *pargs_print_line(t_pargs *pa,bool bLeadingSpace)
{
char buf[LONGSTR],*buf2,*tmp;
snew(buf2,LONGSTR+strlen(pa->desc));
snew(tmp,LONGSTR+strlen(pa->desc));
if (pa->type == etBOOL)
sprintf(buf,"-[no]%s",pa->option+1);
else
strcpy(buf,pa->option);
if (strlen(buf)>((OPTLEN+TYPELEN)-max(strlen(argtp[pa->type]),4))) {
sprintf(buf2,"%s%s %-6s %-6s %-s\n",
bLeadingSpace ? " " : "",buf,
argtp[pa->type],pa_val(pa,tmp,LONGSTR-1),check_tty(pa->desc));
} else if (strlen(buf)>OPTLEN) {
/* so type can be 3 or 4 char's, this fits in the %4s */
sprintf(buf2,"%s%-14s %-4s %-6s %-s\n",
bLeadingSpace ? " " : "",buf,argtp[pa->type],
pa_val(pa,tmp,LONGSTR-1),check_tty(pa->desc));
} else
sprintf(buf2,"%s%-12s %-6s %-6s %-s\n",
bLeadingSpace ? " " : "",buf,argtp[pa->type],
pa_val(pa,tmp,LONGSTR-1),check_tty(pa->desc));
sfree(tmp);
tmp = wrap_lines(buf2,78,28,FALSE);
sfree(buf2);
return tmp;
}
static void write_xmlman(FILE *out,
const char *program,
int nldesc,const char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,const char **bugs,
t_linkdata *links)
{
int i;
char link[10],buf[256],opt[10];
#define NSR2(s) check_xml(s,program,links)
#define FLAG(w,f) (((w) & (f))==(f))
fprintf(out,"<gromacs-manual version=\"%s\" date=\"%s\" www=\"http://www.gromacs.org\">\n",GromacsVersion(),mydate(buf,255,FALSE));
/* fprintf(out,"<LINK rel=stylesheet href=\"style.css\" type=\"text/css\">\n"); */
fprintf(out,"<program name=\"%s\">",program);
if (nldesc > 0) {
fprintf(out,"\n<description>\n<par>\n");
for(i=0; (i<nldesc); i++)
fprintf(out,"%s\n",NSR2(desc[i]));
}
fprintf(out,"</par>\n</description>\n");
if (nfile > 0) {
fprintf(out,"\n<files>\n");
for(i=0; (i<nfile); i++) {
strcpy(link,ftp2ext(fnm[i].ftp));
if (strcmp(link,"???")==0)
strcpy(link,"files");
if (fnm[i].opt[0]=='-') strcpy(opt,fnm[i].opt+1);
else strcpy(opt,fnm[i].opt);
fprintf(out,
"<file type=\"%s\" typeid=\"%d\">\n"
"\t<flags read=\"%d\" write=\"%d\" optional=\"%d\"/>\n"
"\t<option>%s</option>\n"
"\t<default-name link=\"%s.html\">%s</default-name>\n"
"\t<description>%s</description>\n"
"</file>\n",
ftp2defnm(fnm[i].ftp), /* from gmxlib/filenm.c */
fnm[i].ftp,
FLAG(fnm[i].flag,ffREAD), FLAG(fnm[i].flag,ffWRITE), FLAG(fnm[i].flag,ffOPT),
opt,link,fnm[i].fn,/*fileopt(fnm[i].flag),*/
NSR(ftp2desc(fnm[i].ftp)));
}
fprintf(out,"</files>\n");
}
if (npargs > 0) {
fprintf(out,"\n<options>\n");
for(i=0; (i<npargs); i++)
fprintf(out,
"<option type=\"%s\" hidden=\"%d\">\n"
"\t<name >%s</name>\n"
"\t<default-value>%s</default-value>\n"
"\t<description>%s</description>\n"
"</option>\n",
argtp[pa[i].type], is_hidden(&pa[i]),
pa[i].option+1, /* +1 - with no trailing '-' */
pa_val(&(pa[i]),buf,255),pa[i].desc); /*argtp[pa[i].type],*/
fprintf(out,"</options>\n");
}
if (nbug > 0) {
fprintf(out,"\n<bugs>\n");
for(i=0; (i<nbug); i++)
fprintf(out,"\t<bug>%s</bug>\n",NSR(bugs[i]));
fprintf(out,"</bugs>\n");
}
fprintf(out,"\n</program>\n</gromacs-manual>\n");
#undef FLAG
}
static void write_htmlman(FILE *out,
const char *program,
int nldesc,const char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,const char **bugs,
t_linkdata *links)
{
int i;
char link[10],tmp[255];
fprintf(out,"<HTML>\n<HEAD>\n<TITLE>%s</TITLE>\n",program);
fprintf(out,"<LINK rel=stylesheet href=\"style.css\" type=\"text/css\">\n");
fprintf(out,"<BODY text=\"#000000\" bgcolor=\"#FFFFFF\" link=\"#0000FF\" vlink=\"#990000\" alink=\"#FF0000\">\n");
fprintf(out,"<TABLE WIDTH=\"98%%\" NOBORDER >\n<TR><TD WIDTH=400>\n");
fprintf(out,"<TABLE WIDTH=400 NOBORDER>\n<TD WIDTH=116>\n");
fprintf(out,"<a href=\"http://www.gromacs.org/\">"
"<img SRC=\"../images/gmxlogo_small.png\""
"BORDER=0 </a></td>\n");
fprintf(out,"<td ALIGN=LEFT VALIGN=TOP WIDTH=280>"
"<br><h2>%s</h2>",program);
fprintf(out,"<font size=-1><A HREF=\"../online.html\">Main Table of Contents</A></font><br>");
fprintf(out,"<br></td>\n</TABLE></TD><TD WIDTH=\"*\" ALIGN=RIGHT VALIGN=BOTTOM><p><B>%s<br>\n",GromacsVersion());
fprintf(out,"%s</B></td></tr></TABLE>\n<HR>\n",mydate(tmp,255,FALSE));
if (nldesc > 0) {
fprintf(out,"<H3>Description</H3>\n<p>\n");
for(i=0; (i<nldesc); i++)
fprintf(out,"%s\n",NSR(desc[i]));
}
if (nfile > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<H3>Files</H3>\n");
pr_html_files(out,nfile,fnm,program,links,FALSE);
}
if (npargs > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<H3>Other options</H3>\n");
fprintf(out,
"<TABLE BORDER=1 CELLSPACING=0 CELLPADDING=2>\n"
"<TR>"
"<TH>option</TH>"
"<TH>type</TH>"
"<TH>default</TH>"
"<TH>description</TH>"
"</TR>\n");
for(i=0; (i<npargs); i++)
fprintf(out,
"<TR>"
"<TD ALIGN=RIGHT> <b><tt>%s%s</tt></b> </TD>"
"<TD ALIGN=RIGHT> %s </TD>"
"<TD ALIGN=RIGHT> <tt>%s</tt> </TD>"
"<TD> %s </TD>"
"</TD>\n",
(pa[i].type == etBOOL)?"-[no]":"-",pa[i].option+1,
argtp[pa[i].type],pa_val(&(pa[i]),tmp,255),NSR(pa[i].desc));
fprintf(out,"</TABLE>\n");
}
if (nbug > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<H3>Known problems</H3>\n");
fprintf(out,"<UL>\n");
for(i=0; (i<nbug); i++)
fprintf(out,"<LI>%s\n",NSR(bugs[i]));
fprintf(out,"</UL>\n");
}
fprintf(out,"<P>\n");
fprintf(out,"<hr>\n<div ALIGN=RIGHT>\n");
fprintf(out,"<font size=\"-1\"><a href=\"http://www.gromacs.org\">"
"http://www.gromacs.org</a></font><br>\n");
fprintf(out,"<font size=\"-1\"><a href=\"mailto:[email protected]\">"
"[email protected]</a></font><br>\n");
fprintf(out,"</div>\n");
fprintf(out,"</BODY>\n");
}
static void write_nroffman(FILE *out,
const char *program,
int nldesc,const char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,const char **bugs,
t_linkdata *links)
{
int i;
char tmp[256];
fprintf(out,".TH %s 1 \"%s\" \"\" \"GROMACS suite, %s\"\n",program,mydate(tmp,255,FALSE),GromacsVersion());
fprintf(out,".SH NAME\n");
fprintf(out,"%s\n",program);
fprintf(out,".B %s\n",GromacsVersion());
fprintf(out,".SH SYNOPSIS\n");
fprintf(out,"\\f3%s\\fP\n",program);
/* command line arguments */
if (nfile > 0) {
for(i=0; (i<nfile); i++)
fprintf(out,".BI \"%s\" \" %s \"\n",check_nroff(fnm[i].opt),
check_nroff(fnm[i].fns[0]));
}
if (npargs > 0) {
for(i=0; (i<npargs); i++)
if (pa[i].type == etBOOL)
fprintf(out,".BI \"\\-[no]%s\" \"\"\n",check_nroff(pa[i].option+1));
else
fprintf(out,".BI \"%s\" \" %s \"\n",check_nroff(pa[i].option),
check_nroff(argtp[pa[i].type]));
}
/* description */
if (nldesc > 0) {
fprintf(out,".SH DESCRIPTION\n");
for(i=0; (i<nldesc); i++)
fprintf(out,"\\&%s\n",check_nroff(desc[i]));
}
/* FILES */
if (nfile > 0) {
fprintf(out,".SH FILES\n");
for(i=0; (i<nfile); i++)
fprintf(out,".BI \"%s\" \" %s\" \n.B %s\n %s \n\n",
check_nroff(fnm[i].opt),
check_nroff(fnm[i].fns[0]),
check_nroff(fileopt(fnm[i].flag,tmp,255)),
check_nroff(ftp2desc(fnm[i].ftp)));
}
/* other options */
fprintf(out,".SH OTHER OPTIONS\n");
if ( npargs > 0 ) {
for(i=0; (i<npargs); i++) {
if (pa[i].type == etBOOL)
fprintf(out,".BI \"\\-[no]%s\" \"%s\"\n %s\n\n",
check_nroff(pa[i].option+1),
check_nroff(pa_val(&(pa[i]),tmp,255)),
check_nroff(pa[i].desc));
else
fprintf(out,".BI \"%s\" \" %s\" \" %s\" \n %s\n\n",
check_nroff(pa[i].option),
check_nroff(argtp[pa[i].type]),
check_nroff(pa_val(&(pa[i]),tmp,255)),
check_nroff(pa[i].desc));
}
}
if (nbug > 0) {
fprintf(out,".SH KNOWN PROBLEMS\n");
for(i=0; (i<nbug); i++)
fprintf(out,"\\- %s\n\n",check_nroff(bugs[i]));
}
fprintf(out,".SH SEE ALSO\n.BR gromacs(7)\n\n");
fprintf(out,"More information about \\fBGROMACS\\fR is available at <\\fIhttp://www.gromacs.org/\\fR>.\n");
}
static void write_htmlman(FILE *out,
char *program,
int nldesc,char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,char **bugs)
{
int i;
char link[10];
#define NSR(s) check_html(s,program)
fprintf(out,"<HTML>\n<HEAD>\n<TITLE>%s</TITLE>\n",program);
fprintf(out,"<LINK rel=stylesheet href=\"style.css\" type=\"text/css\">\n");
fprintf(out,"<BODY text=\"#000000\" bgcolor=\"#FFFFFF\" link=\"#0000FF\" vlink=\"#990000\" alink=\"#FF0000\">\n");
fprintf(out,"<TABLE WIDTH=\"98%%\" NOBORDER >\n<TR><TD WIDTH=400>\n");
fprintf(out,"<TABLE WIDTH=400 NOBORDER>\n<TD WIDTH=116>\n");
fprintf(out,"<a href=\"http://www.gromacs.org/\">"
"<img SRC=\"../images/gmxlogo_small.jpg\""
"BORDER=0 height=133 width=116></a></td>\n");
fprintf(out,"<td ALIGN=LEFT VALIGN=TOP WIDTH=280>"
"<br><h2>%s</h2>",program);
fprintf(out,"<font size=-1><A HREF=\"../online.html\">Main Table of Contents</A></font><br>");
fprintf(out,"<br></td>\n</TABLE></TD><TD WIDTH=\"*\" ALIGN=RIGHT VALIGN=BOTTOM><p><B>%s<br>\n",GromacsVersion());
fprintf(out,"%s</B></td></tr></TABLE>\n<HR>\n",mydate());
if (nldesc > 0) {
fprintf(out,"<H3>Description</H3>\n<p>\n");
for(i=0; (i<nldesc); i++)
fprintf(out,"%s\n",NSR(desc[i]));
}
if (nfile > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<H3>Files</H3>\n");
fprintf(out,
"<TABLE BORDER=1 CELLSPACING=0 CELLPADDING=2>\n"
"<TR>"
"<TH>option</TH>"
"<TH>filename</TH>"
"<TH>type</TH>"
"<TH>description</TH>"
"</TR>\n");
for(i=0; (i<nfile); i++) {
strcpy(link,ftp2ext(fnm[i].ftp));
if (strcmp(link,"???")==0)
strcpy(link,"files");
fprintf(out,
"<TR>"
"<TD ALIGN=RIGHT> <b><tt>%s</tt></b> </TD>"
"<TD ALIGN=RIGHT> <tt><a href=\"%s.html\">%12s</a></tt> </TD>"
"<TD> %s </TD>"
"<TD> %s </TD>"
"</TR>\n",
fnm[i].opt,link,fnm[i].fn,fileopt(fnm[i].flag),
NSR(ftp2desc(fnm[i].ftp)));
}
fprintf(out,"</TABLE>\n");
}
if (npargs > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<H3>Other options</H3>\n");
fprintf(out,
"<TABLE BORDER=1 CELLSPACING=0 CELLPADDING=2>\n"
"<TR>"
"<TH>option</TH>"
"<TH>type</TH>"
"<TH>default</TH>"
"<TH>description</TH>"
"</TR>\n");
for(i=0; (i<npargs); i++)
fprintf(out,
"<TR>"
"<TD ALIGN=RIGHT> <b><tt>%s%s</tt></b> </TD>"
"<TD ALIGN=RIGHT> %s </TD>"
"<TD ALIGN=RIGHT> <tt>%s</tt> </TD>"
"<TD> %s </TD>"
"</TD>\n",
(pa[i].type == etBOOL)?"-[no]":"-",pa[i].option+1,
argtp[pa[i].type],pa_val(&(pa[i])),NSR(pa[i].desc));
fprintf(out,"</TABLE>\n");
}
if (nbug > 0) {
fprintf(out,"<P>\n");
fprintf(out,"<UL>\n");
for(i=0; (i<nbug); i++)
fprintf(out,"<LI>%s\n",NSR(bugs[i]));
fprintf(out,"</UL>\n");
}
fprintf(out,"<P>\n");
fprintf(out,"<hr>\n<div ALIGN=RIGHT>\n");
fprintf(out,"<font size=\"-1\"><a href=\"http://www.gromacs.org\">"
"http://www.gromacs.org</a></font><br>\n");
fprintf(out,"</div>\n");
fprintf(out,"</BODY>\n");
}
static void write_nroffman(FILE *out,
char *program,
int nldesc,char **desc,
int nfile,t_filenm *fnm,
int npargs,t_pargs *pa,
int nbug,char **bugs)
{
int i;
fprintf(out,".TH %s 1 \"%s\"\n",program,mydate());
fprintf(out,".SH NAME\n");
fprintf(out,"%s\n",program);
fprintf(out,".B %s\n",GromacsVersion());
fprintf(out,".SH SYNOPSIS\n");
fprintf(out,"\\f3%s\\fP\n",program);
/* command line arguments */
if (nfile > 0) {
for(i=0; (i<nfile); i++)
fprintf(out,".BI \"%s\" \" %s \"\n",fnm[i].opt,
fnm[i].fn);
}
if (npargs > 0) {
for(i=0; (i<npargs); i++)
if (pa[i].type == etBOOL)
fprintf(out,".BI \"-[no]%s\" \"\"\n",pa[i].option+1);
else
fprintf(out,".BI \"%s\" \" %s \"\n",pa[i].option,
argtp[pa[i].type]);
}
/* description */
if (nldesc > 0) {
fprintf(out,".SH DESCRIPTION\n");
for(i=0; (i<nldesc); i++)
fprintf(out,"%s\n",check_nroff(desc[i]));
}
/* FILES */
if (nfile > 0) {
fprintf(out,".SH FILES\n");
for(i=0; (i<nfile); i++)
fprintf(out,".BI \"%s\" \" %s\" \n.B %s\n %s \n\n",
fnm[i].opt,fnm[i].fn,fileopt(fnm[i].flag),
check_nroff(ftp2desc(fnm[i].ftp)));
}
/* other options */
fprintf(out,".SH OTHER OPTIONS\n");
if ( npargs > 0 ) {
for(i=0; (i<npargs); i++) {
if (pa[i].type == etBOOL)
fprintf(out,".BI \"-[no]%s\" \"%s\"\n %s\n\n",
check_nroff(pa[i].option+1),
pa_val(&(pa[i])),check_nroff(pa[i].desc));
else
fprintf(out,".BI \"%s\" \" %s\" \" %s\" \n %s\n\n",
check_nroff(pa[i].option),argtp[pa[i].type],
pa_val(&(pa[i])),check_nroff(pa[i].desc));
}
}
if (nbug > 0) {
for(i=0; (i<nbug); i++)
fprintf(out,"\\- %s\n\n",check_nroff(bugs[i]));
}
}
