/*
- *
+ *
* This source code is part of
- *
+ *
* G R O M A C S
- *
+ *
* GROningen MAchine for Chemical Simulations
- *
+ *
* VERSION 3.2.0
* Written by David van der Spoel, Erik Lindahl, Berk Hess, and others.
* Copyright (c) 1991-2000, University of Groningen, The Netherlands.
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
- *
+ *
* If you want to redistribute modifications, please consider that
* scientific software is very special. Version control is crucial -
* bugs must be traceable. We will be happy to consider code for
* inclusion in the official distribution, but derived work must not
* be called official GROMACS. Details are found in the README & COPYING
* files - if they are missing, get the official version at www.gromacs.org.
- *
+ *
* To help us fund GROMACS development, we humbly ask that you cite
* the papers on the package - you can find them in the top README file.
- *
+ *
* For more info, check our website at http://www.gromacs.org
- *
+ *
* And Hey:
* GROningen Mixture of Alchemy and Childrens' Stories
*/
#include "strdb.h"
#include "readinp.h"
-/* The source code in this file should be thread-safe.
+/* The source code in this file should be thread-safe.
Please keep it that way. */
typedef struct {
- const char *search,*replace;
+ const char *search, *replace;
} t_sandr_const;
typedef struct {
- char *search,*replace;
+ char *search, *replace;
} t_sandr;
/* The order of these arrays is significant. Text search and replace
* to invoke the latter changes. */
const t_sandr_const sandrTeX[] = {
- { "[TT]", "{\\tt " },
- { "[tt]", "}" },
- { "[BB]", "{\\bf " },
- { "[bb]", "}" },
- { "[IT]", "{\\em " },
- { "[it]", "}" },
- { "[PAR]","\n\n" },
- /* Escaping underscore for LaTeX is no longer necessary, and it breaks
- * text searching and the index if you do. */
- /*
- { "_", "\\_" },
- */
- { "$", "\\$" },
- { "<=", "\\ensuremath{\\leq{}}"},
- { ">=", "\\ensuremath{\\geq{}}"},
- { "<", "\\textless{}" },
- { ">", "\\textgreater{}" },
- { "^", "\\^{}" },
- { "\\^{}t", "\\ensuremath{^t}" },
- { "\\^{}a", "\\ensuremath{^a}" },
- { "\\^{}b", "\\ensuremath{^b}" },
- { "\\^{}2", "\\ensuremath{^2}" },
- { "\\^{}3", "\\ensuremath{^3}" },
- { "\\^{}6", "\\ensuremath{^6}" },
- { "#", "\\#" },
- { "[BR]", "\\\\" },
- { "%", "\\%" },
- { "&", "\\&" },
- /* The next couple of lines allow true Greek symbols to be written to the
- manual, which makes it look pretty */
- { "[GRK]", "\\ensuremath{\\" },
- { "[grk]", "}" },
- { "[MATH]","\\ensuremath{" },
- { "[math]","}" },
- { "[CHEVRON]", "\\ensuremath{<}" },
- { "[chevron]", "\\ensuremath{>}" },
- { "[MAG]", "\\ensuremath{|}" },
- { "[mag]", "\\ensuremath{|}" },
- { "[INT]","\\ensuremath{\\int" },
- { "[FROM]","_" },
- { "[from]","" },
- { "[TO]", "^" },
- { "[to]", "" },
- { "[int]","}" },
- { "[SUM]","\\ensuremath{\\sum" },
- { "[sum]","}" },
- { "[SUB]","\\ensuremath{_{" },
- { "[sub]","}}" },
- { "[SQRT]","\\ensuremath{\\sqrt{" },
- { "[sqrt]","}}" },
- { "[EXP]","\\ensuremath{\\exp{(" },
- { "[exp]",")}}" },
- { "[LN]","\\ensuremath{\\ln{(" },
- { "[ln]",")}}" },
- { "[LOG]","\\ensuremath{\\log{(" },
- { "[log]",")}}" },
- { "[COS]","\\ensuremath{\\cos{(" },
- { "[cos]",")}}" },
- { "[SIN]","\\ensuremath{\\sin{(" },
- { "[sin]",")}}" },
- { "[TAN]","\\ensuremath{\\tan{(" },
- { "[tan]",")}}" },
- { "[COSH]","\\ensuremath{\\cosh{(" },
- { "[cosh]",")}}" },
- { "[SINH]","\\ensuremath{\\sinh{(" },
- { "[sinh]",")}}" },
- { "[TANH]","\\ensuremath{\\tanh{(" },
- { "[tanh]",")}}" }
+ { "[TT]", "{\\tt " },
+ { "[tt]", "}" },
+ { "[BB]", "{\\bf " },
+ { "[bb]", "}" },
+ { "[IT]", "{\\em " },
+ { "[it]", "}" },
+ { "[PAR]", "\n\n" },
+ /* Escaping underscore for LaTeX is no longer necessary, and it breaks
+ * text searching and the index if you do. */
+ /*
+ { "_", "\\_" },
+ */
+ { "$", "\\$" },
+ { "<=", "\\ensuremath{\\leq{}}"},
+ { ">=", "\\ensuremath{\\geq{}}"},
+ { "<", "\\textless{}" },
+ { ">", "\\textgreater{}" },
+ { "^", "\\^{}" },
+ { "\\^{}t", "\\ensuremath{^t}" },
+ { "\\^{}a", "\\ensuremath{^a}" },
+ { "\\^{}b", "\\ensuremath{^b}" },
+ { "\\^{}2", "\\ensuremath{^2}" },
+ { "\\^{}3", "\\ensuremath{^3}" },
+ { "\\^{}6", "\\ensuremath{^6}" },
+ { "#", "\\#" },
+ { "[BR]", "\\\\" },
+ { "%", "\\%" },
+ { "&", "\\&" },
+ /* The next couple of lines allow true Greek symbols to be written to the
+ manual, which makes it look pretty */
+ { "[GRK]", "\\ensuremath{\\" },
+ { "[grk]", "}" },
+ { "[MATH]", "\\ensuremath{" },
+ { "[math]", "}" },
+ { "[CHEVRON]", "\\ensuremath{<}" },
+ { "[chevron]", "\\ensuremath{>}" },
+ { "[MAG]", "\\ensuremath{|}" },
+ { "[mag]", "\\ensuremath{|}" },
+ { "[INT]", "\\ensuremath{\\int" },
+ { "[FROM]", "_" },
+ { "[from]", "" },
+ { "[TO]", "^" },
+ { "[to]", "" },
+ { "[int]", "}" },
+ { "[SUM]", "\\ensuremath{\\sum" },
+ { "[sum]", "}" },
+ { "[SUB]", "\\ensuremath{_{" },
+ { "[sub]", "}}" },
+ { "[SQRT]", "\\ensuremath{\\sqrt{" },
+ { "[sqrt]", "}}" },
+ { "[EXP]", "\\ensuremath{\\exp{(" },
+ { "[exp]", ")}}" },
+ { "[LN]", "\\ensuremath{\\ln{(" },
+ { "[ln]", ")}}" },
+ { "[LOG]", "\\ensuremath{\\log{(" },
+ { "[log]", ")}}" },
+ { "[COS]", "\\ensuremath{\\cos{(" },
+ { "[cos]", ")}}" },
+ { "[SIN]", "\\ensuremath{\\sin{(" },
+ { "[sin]", ")}}" },
+ { "[TAN]", "\\ensuremath{\\tan{(" },
+ { "[tan]", ")}}" },
+ { "[COSH]", "\\ensuremath{\\cosh{(" },
+ { "[cosh]", ")}}" },
+ { "[SINH]", "\\ensuremath{\\sinh{(" },
+ { "[sinh]", ")}}" },
+ { "[TANH]", "\\ensuremath{\\tanh{(" },
+ { "[tanh]", ")}}" }
};
#define NSRTEX asize(sandrTeX)
const t_sandr_const sandrTty[] = {
- { "[TT]", "" },
- { "[tt]", "" },
- { "[BB]", "" },
- { "[bb]", "" },
- { "[IT]", "" },
- { "[it]", "" },
- { "[MATH]","" },
- { "[math]","" },
- { "[CHEVRON]","<" },
- { "[chevron]",">" },
- { "[MAG]", "|" },
- { "[mag]", "|" },
- { "[INT]","integral" },
- { "[FROM]"," from " },
- { "[from]","" },
- { "[TO]", " to " },
- { "[to]", " of" },
- { "[int]","" },
- { "[SUM]","sum" },
- { "[sum]","" },
- { "[SUB]","_" },
- { "[sub]","" },
- { "[SQRT]","sqrt(" },
- { "[sqrt]",")" },
- { "[EXP]","exp(" },
- { "[exp]",")" },
- { "[LN]","ln(" },
- { "[ln]",")" },
- { "[LOG]","log(" },
- { "[log]",")" },
- { "[COS]","cos(" },
- { "[cos]",")" },
- { "[SIN]","sin(" },
- { "[sin]",")" },
- { "[TAN]","tan(" },
- { "[tan]",")" },
- { "[COSH]","cosh(" },
- { "[cosh]",")" },
- { "[SINH]","sinh(" },
- { "[sinh]",")" },
- { "[TANH]","tanh(" },
- { "[tanh]",")" },
- { "[PAR]","\n\n" },
- { "[BR]", "\n"},
- { "[GRK]", "" },
- { "[grk]", "" }
+ { "[TT]", "" },
+ { "[tt]", "" },
+ { "[BB]", "" },
+ { "[bb]", "" },
+ { "[IT]", "" },
+ { "[it]", "" },
+ { "[MATH]", "" },
+ { "[math]", "" },
+ { "[CHEVRON]", "<" },
+ { "[chevron]", ">" },
+ { "[MAG]", "|" },
+ { "[mag]", "|" },
+ { "[INT]", "integral" },
+ { "[FROM]", " from " },
+ { "[from]", "" },
+ { "[TO]", " to " },
+ { "[to]", " of" },
+ { "[int]", "" },
+ { "[SUM]", "sum" },
+ { "[sum]", "" },
+ { "[SUB]", "_" },
+ { "[sub]", "" },
+ { "[SQRT]", "sqrt(" },
+ { "[sqrt]", ")" },
+ { "[EXP]", "exp(" },
+ { "[exp]", ")" },
+ { "[LN]", "ln(" },
+ { "[ln]", ")" },
+ { "[LOG]", "log(" },
+ { "[log]", ")" },
+ { "[COS]", "cos(" },
+ { "[cos]", ")" },
+ { "[SIN]", "sin(" },
+ { "[sin]", ")" },
+ { "[TAN]", "tan(" },
+ { "[tan]", ")" },
+ { "[COSH]", "cosh(" },
+ { "[cosh]", ")" },
+ { "[SINH]", "sinh(" },
+ { "[sinh]", ")" },
+ { "[TANH]", "tanh(" },
+ { "[tanh]", ")" },
+ { "[PAR]", "\n\n" },
+ { "[BR]", "\n"},
+ { "[GRK]", "" },
+ { "[grk]", "" }
};
#define NSRTTY asize(sandrTty)
const t_sandr_const sandrWiki[] = {
- { "&", "&" },
- { "<", "<" },
- { ">", ">" },
- { "[TT]", "<code>" },
- { "[tt]", "</code>" },
- { "[BB]", "'''" },
- { "[bb]", "'''" },
- { "[IT]", "''" },
- { "[it]", "''" },
- { "[MATH]","" },
- { "[math]","" },
- { "[CHEVRON]","<" },
- { "[chevron]",">" },
- { "[MAG]", "|" },
- { "[mag]", "|" },
- { "[INT]","integral" },
- { "[FROM]"," from " },
- { "[from]","" },
- { "[TO]", " to " },
- { "[to]", " of" },
- { "[int]","" },
- { "[SUM]","sum" },
- { "[sum]","" },
- { "[SUB]","_" },
- { "[sub]","" },
- { "[SQRT]","sqrt(" },
- { "[sqrt]",")", },
- { "[EXP]","exp(" },
- { "[exp]",")" },
- { "[LN]","ln(" },
- { "[ln]",")" },
- { "[LOG]","log(" },
- { "[log]",")" },
- { "[COS]","cos(" },
- { "[cos]",")" },
- { "[SIN]","sin(" },
- { "[sin]",")" },
- { "[TAN]","tan(" },
- { "[tan]",")" },
- { "[COSH]","cosh(" },
- { "[cosh]",")" },
- { "[SINH]","sinh(" },
- { "[sinh]",")" },
- { "[TANH]","tanh(" },
- { "[tanh]",")" },
- { "[PAR]","\n\n" },
- { "[BR]", "\n" },
- { "[GRK]", "&" },
- { "[grk]", ";" }
+ { "&", "&" },
+ { "<", "<" },
+ { ">", ">" },
+ { "[TT]", "<code>" },
+ { "[tt]", "</code>" },
+ { "[BB]", "'''" },
+ { "[bb]", "'''" },
+ { "[IT]", "''" },
+ { "[it]", "''" },
+ { "[MATH]", "" },
+ { "[math]", "" },
+ { "[CHEVRON]", "<" },
+ { "[chevron]", ">" },
+ { "[MAG]", "|" },
+ { "[mag]", "|" },
+ { "[INT]", "integral" },
+ { "[FROM]", " from " },
+ { "[from]", "" },
+ { "[TO]", " to " },
+ { "[to]", " of" },
+ { "[int]", "" },
+ { "[SUM]", "sum" },
+ { "[sum]", "" },
+ { "[SUB]", "_" },
+ { "[sub]", "" },
+ { "[SQRT]", "sqrt(" },
+ { "[sqrt]", ")", },
+ { "[EXP]", "exp(" },
+ { "[exp]", ")" },
+ { "[LN]", "ln(" },
+ { "[ln]", ")" },
+ { "[LOG]", "log(" },
+ { "[log]", ")" },
+ { "[COS]", "cos(" },
+ { "[cos]", ")" },
+ { "[SIN]", "sin(" },
+ { "[sin]", ")" },
+ { "[TAN]", "tan(" },
+ { "[tan]", ")" },
+ { "[COSH]", "cosh(" },
+ { "[cosh]", ")" },
+ { "[SINH]", "sinh(" },
+ { "[sinh]", ")" },
+ { "[TANH]", "tanh(" },
+ { "[tanh]", ")" },
+ { "[PAR]", "\n\n" },
+ { "[BR]", "\n" },
+ { "[GRK]", "&" },
+ { "[grk]", ";" }
};
#define NSRWIKI asize(sandrWiki)
const t_sandr_const sandrNROFF[] = {
- { "[TT]", "\\fB " },
- { "[tt]", "\\fR" },
- { "[BB]", "\\fB " },
- { "[bb]", "\\fR" },
- { "[IT]", "\\fI " },
- { "[it]", "\\fR" },
- { "[MATH]","" },
- { "[math]","" },
- { "[CHEVRON]","<" },
- { "[chevron]",">" },
- { "[MAG]", "|" },
- { "[mag]", "|" },
- { "[INT]","integral" },
- { "[FROM]"," from " },
- { "[from]","" },
- { "[TO]", " to " },
- { "[to]", " of" },
- { "[int]","" },
- { "[SUM]","sum" },
- { "[sum]","" },
- { "[SUB]","_" },
- { "[sub]","" },
- { "[SQRT]","sqrt(" },
- { "[sqrt]",")", },
- { "[EXP]","exp(" },
- { "[exp]",")" },
- { "[LN]","ln(" },
- { "[ln]",")" },
- { "[LOG]","log(" },
- { "[log]",")" },
- { "[COS]","cos(" },
- { "[cos]",")" },
- { "[SIN]","sin(" },
- { "[sin]",")" },
- { "[TAN]","tan(" },
- { "[tan]",")" },
- { "[COSH]","cosh(" },
- { "[cosh]",")" },
- { "[SINH]","sinh(" },
- { "[sinh]",")" },
- { "[TANH]","tanh(" },
- { "[tanh]",")" },
- { "[PAR]","\n\n" },
- { "\n ", "\n" },
- { "<", "" },
- { ">", "" },
- { "^", "" },
- { "#", "" },
- { "[BR]", "\n"},
- { "-", "\\-"},
- { "[GRK]", "" },
- { "[grk]", "" }
+ { "[TT]", "\\fB " },
+ { "[tt]", "\\fR" },
+ { "[BB]", "\\fB " },
+ { "[bb]", "\\fR" },
+ { "[IT]", "\\fI " },
+ { "[it]", "\\fR" },
+ { "[MATH]", "" },
+ { "[math]", "" },
+ { "[CHEVRON]", "<" },
+ { "[chevron]", ">" },
+ { "[MAG]", "|" },
+ { "[mag]", "|" },
+ { "[INT]", "integral" },
+ { "[FROM]", " from " },
+ { "[from]", "" },
+ { "[TO]", " to " },
+ { "[to]", " of" },
+ { "[int]", "" },
+ { "[SUM]", "sum" },
+ { "[sum]", "" },
+ { "[SUB]", "_" },
+ { "[sub]", "" },
+ { "[SQRT]", "sqrt(" },
+ { "[sqrt]", ")", },
+ { "[EXP]", "exp(" },
+ { "[exp]", ")" },
+ { "[LN]", "ln(" },
+ { "[ln]", ")" },
+ { "[LOG]", "log(" },
+ { "[log]", ")" },
+ { "[COS]", "cos(" },
+ { "[cos]", ")" },
+ { "[SIN]", "sin(" },
+ { "[sin]", ")" },
+ { "[TAN]", "tan(" },
+ { "[tan]", ")" },
+ { "[COSH]", "cosh(" },
+ { "[cosh]", ")" },
+ { "[SINH]", "sinh(" },
+ { "[sinh]", ")" },
+ { "[TANH]", "tanh(" },
+ { "[tanh]", ")" },
+ { "[PAR]", "\n\n" },
+ { "\n ", "\n" },
+ { "<", "" },
+ { ">", "" },
+ { "^", "" },
+ { "#", "" },
+ { "[BR]", "\n"},
+ { "-", "\\-"},
+ { "[GRK]", "" },
+ { "[grk]", "" }
};
#define NSRNROFF asize(sandrNROFF)
const t_sandr_const sandrHTML[] = {
- { "<", "<" },
- { ">", ">" },
- { "[TT]", "<tt>" },
- { "[tt]", "</tt>" },
- { "[BB]", "<b>" },
- { "[bb]", "</b>" },
- { "[IT]", "<it>" },
- { "[it]", "</it>" },
- { "[MATH]","" },
- { "[math]","" },
- { "[CHEVRON]","<" },
- { "[chevron]",">" },
- { "[MAG]", "|" },
- { "[mag]", "|" },
- { "[INT]","integral" },
- { "[FROM]"," from " },
- { "[from]","" },
- { "[TO]", " to " },
- { "[to]", " of" },
- { "[int]","" },
- { "[SUM]","sum" },
- { "[sum]","" },
- { "[SUB]","_" },
- { "[sub]","" },
- { "[SQRT]","sqrt(" },
- { "[sqrt]",")", },
- { "[EXP]","exp(" },
- { "[exp]",")" },
- { "[LN]","ln(" },
- { "[ln]",")" },
- { "[LOG]","log(" },
- { "[log]",")" },
- { "[COS]","cos(" },
- { "[cos]",")" },
- { "[SIN]","sin(" },
- { "[sin]",")" },
- { "[TAN]","tan(" },
- { "[tan]",")" },
- { "[COSH]","cosh(" },
- { "[cosh]",")" },
- { "[SINH]","sinh(" },
- { "[sinh]",")" },
- { "[TANH]","tanh(" },
- { "[tanh]",")" },
- { "[BR]", "<br>" },
- { "[GRK]", "&" },
- { "[grk]", ";" }
+ { "<", "<" },
+ { ">", ">" },
+ { "[TT]", "<tt>" },
+ { "[tt]", "</tt>" },
+ { "[BB]", "<b>" },
+ { "[bb]", "</b>" },
+ { "[IT]", "<it>" },
+ { "[it]", "</it>" },
+ { "[MATH]", "" },
+ { "[math]", "" },
+ { "[CHEVRON]", "<" },
+ { "[chevron]", ">" },
+ { "[MAG]", "|" },
+ { "[mag]", "|" },
+ { "[INT]", "integral" },
+ { "[FROM]", " from " },
+ { "[from]", "" },
+ { "[TO]", " to " },
+ { "[to]", " of" },
+ { "[int]", "" },
+ { "[SUM]", "sum" },
+ { "[sum]", "" },
+ { "[SUB]", "_" },
+ { "[sub]", "" },
+ { "[SQRT]", "sqrt(" },
+ { "[sqrt]", ")", },
+ { "[EXP]", "exp(" },
+ { "[exp]", ")" },
+ { "[LN]", "ln(" },
+ { "[ln]", ")" },
+ { "[LOG]", "log(" },
+ { "[log]", ")" },
+ { "[COS]", "cos(" },
+ { "[cos]", ")" },
+ { "[SIN]", "sin(" },
+ { "[sin]", ")" },
+ { "[TAN]", "tan(" },
+ { "[tan]", ")" },
+ { "[COSH]", "cosh(" },
+ { "[cosh]", ")" },
+ { "[SINH]", "sinh(" },
+ { "[sinh]", ")" },
+ { "[TANH]", "tanh(" },
+ { "[tanh]", ")" },
+ { "[BR]", "<br>" },
+ { "[GRK]", "&" },
+ { "[grk]", ";" }
};
#define NSRHTML asize(sandrHTML)
const t_sandr_const sandrXML[] = {
- { "<", "<" },
- { ">", ">" },
- { "[TT]", "<arg>" },
- { "[tt]", "</arg>" },
- { "[BB]", "<emp>" },
- { "[bb]", "</emp>" },
- { "[IT]", "<it>" },
- { "[it]", "</it>" },
- { "[MATH]","" },
- { "[math]","" },
- { "[CHEVRON]","<" },
- { "[chevron]",">" },
- { "[MAG]", "|" },
- { "[mag]", "|" },
- { "[INT]","integral" },
- { "[FROM]"," from " },
- { "[from]","" },
- { "[TO]", " to " },
- { "[to]", " of" },
- { "[int]","" },
- { "[SUM]","sum" },
- { "[sum]","" },
- { "[SUB]","_" },
- { "[sub]","" },
- { "[SQRT]","sqrt(" },
- { "[sqrt]",")", },
- { "[EXP]","exp(" },
- { "[exp]",")" },
- { "[LN]","ln(" },
- { "[ln]",")" },
- { "[LOG]","log(" },
- { "[log]",")" },
- { "[COS]","cos(" },
- { "[cos]",")" },
- { "[SIN]","sin(" },
- { "[sin]",")" },
- { "[TAN]","tan(" },
- { "[tan]",")" },
- { "[COSH]","cosh(" },
- { "[cosh]",")" },
- { "[SINH]","sinh(" },
- { "[sinh]",")" },
- { "[TANH]","tanh(" },
- { "[tanh]",")" },
-
{ "[PAR]","</par>\n<par>" },
- { "[BR]", "<br />" },
- { "[GRK]", "" },
- { "[grk]", "" }
+ { "<", "<" },
+ { ">", ">" },
+ { "[tt]", "</arg>" },
+ { "[BB]", "<emp>" },
+ { "[bb]", "</emp>" },
+ { "[IT]", "<it>" },
+ { "[it]", "</it>" },
+ { "[MATH]", "" },
+ { "[math]", "" },
+ { "[CHEVRON]", "<" },
+ { "[chevron]", ">" },
+ { "[MAG]", "|" },
+ { "[mag]", "|" },
+ { "[INT]", "integral" },
+ { "[FROM]", " from " },
+ { "[from]", "" },
+ { "[TO]", " to " },
+ { "[to]", " of" },
+ { "[int]", "" },
+ { "[SUM]", "sum" },
+ { "[sum]", "" },
+ { "[SUB]", "_" },
+ { "[sub]", "" },
+ { "[SQRT]", "sqrt(" },
+ { "[sqrt]", ")", },
+ { "[EXP]", "exp(" },
+ { "[exp]", ")" },
+ { "[LN]", "ln(" },
+ { "[ln]", ")" },
+ { "[LOG]", "log(" },
+ { "[log]", ")" },
+ { "[COS]", "cos(" },
+ { "[cos]", ")" },
+ { "[SIN]", "sin(" },
+ { "[sin]", ")" },
+ { "[TAN]", "tan(" },
+ { "[tan]", ")" },
+ { "[COSH]", "cosh(" },
+ { "[cosh]", ")" },
+ { "[SINH]", "sinh(" },
+ { "[sinh]", ")" },
+ { "[TANH]", "tanh(" },
+ { "[tanh]", ")" },
+
{ "[PAR]", "</par>\n<par>" },
+ { "[BR]", "<br />" },
+ { "[GRK]", "" },
+ { "[grk]", "" }
};
#define NSRXML asize(sandrXML)
-static void mynum(char *buf,int n)
+static void mynum(char *buf, int n)
{
- if (n >= 10)
- sprintf(buf,"%2d",n);
- else
- sprintf(buf,"0%1d",n);
+ if (n >= 10)
+ {
+ sprintf(buf, "%2d", n);
+ }
+ else
+ {
+ sprintf(buf, "0%1d", n);
+ }
}
-static char *mydate(char buf[], int maxsize,gmx_bool bWiki)
+static char *mydate(char buf[], int maxsize, gmx_bool bWiki)
{
- const char *mon[] = { "Jan", "Feb", "Mar", "Apr", "May", "Jun",
- "Jul", "Aug", "Sep", "Oct", "Nov", "Dec" };
- const char *day[] = { "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat" };
- time_t now;
- struct tm tm;
-
- time(&now);
+ const char *mon[] = {
+ "Jan", "Feb", "Mar", "Apr", "May", "Jun",
+ "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
+ };
+ const char *day[] = { "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat" };
+ time_t now;
+ struct tm tm;
+
+ time(&now);
#ifdef GMX_NATIVE_WINDOWS
- /* Native windows */
- localtime_s(&tm,&now);
+ /* Native windows */
+ localtime_s(&tm, &now);
#else
- localtime_r(&now,&tm);
+ localtime_r(&now, &tm);
#endif
- /* subtract one from maxsize, so we have room for \0. */
- if (bWiki) {
- char dd[8],mm[8],ss[8],hh[8],mn[8];
-
- mynum(dd,tm.tm_mday);
- mynum(mm,tm.tm_mon);
- mynum(ss,tm.tm_sec);
- mynum(hh,tm.tm_hour);
- mynum(mn,tm.tm_min);
- sprintf(buf,"%4d-%2s-%2sT%2s:%2s:%2sZ",
- tm.tm_year+1900,mm,dd,hh,mn,ss);
- }
- else
- sprintf(buf,"%s %d %s %d",day[tm.tm_wday],tm.tm_mday,
- mon[tm.tm_mon],tm.tm_year+1900);
-
- return buf;
+ /* subtract one from maxsize, so we have room for \0. */
+ if (bWiki)
+ {
+ char dd[8], mm[8], ss[8], hh[8], mn[8];
+
+ mynum(dd, tm.tm_mday);
+ mynum(mm, tm.tm_mon);
+ mynum(ss, tm.tm_sec);
+ mynum(hh, tm.tm_hour);
+ mynum(mn, tm.tm_min);
+ sprintf(buf, "%4d-%2s-%2sT%2s:%2s:%2sZ",
+ tm.tm_year+1900, mm, dd, hh, mn, ss);
+ }
+ else
+ {
+ sprintf(buf, "%s %d %s %d", day[tm.tm_wday], tm.tm_mday,
+ mon[tm.tm_mon], tm.tm_year+1900);
+ }
+
+ return buf;
}
/* Data structure for saved HTML links */
typedef struct t_linkdata {
- int nsr;
- t_sandr *sr;
+ int nsr;
+ t_sandr *sr;
} t_linkdata;
static t_linkdata *init_linkdata()
{
- t_linkdata *p;
- snew(p,1);
- p->sr=NULL;
- p->nsr=0;
+ t_linkdata *p;
+ snew(p, 1);
+ p->sr = NULL;
+ p->nsr = 0;
- return p;
+ return p;
}
static void finish_linkdata(t_linkdata *p)
{
- int i;
-
- for(i=0;i<p->nsr;i++) {
- sfree(p->sr[i].search);
- sfree(p->sr[i].replace);
- }
- sfree(p->sr);
- sfree(p);
+ int i;
+
+ for (i = 0; i < p->nsr; i++)
+ {
+ sfree(p->sr[i].search);
+ sfree(p->sr[i].replace);
+ }
+ sfree(p->sr);
+ sfree(p);
}
-static char *repall(const char *s,int nsr,const t_sandr_const sa[])
+static char *repall(const char *s, int nsr, const t_sandr_const sa[])
{
try
{
GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR;
}
-static char *repallww(const char *s,int nsr,const t_sandr sa[])
+static char *repallww(const char *s, int nsr, const t_sandr sa[])
{
try
{
GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR;
}
-static char *html_xref(char *s,const char *program, t_linkdata *links,gmx_bool bWiki)
+static char *html_xref(char *s, const char *program, t_linkdata *links, gmx_bool bWiki)
{
- char buf[256],**filestr;
- int i,j,n;
-
- if (links->sr == NULL) {
- n=get_file("links.dat",&(filestr));
- links->nsr=n;
- snew(links->sr,n);
- for(i=0,j=0; (i<n); i++) {
- if (!program || (gmx_strcasecmp(program,filestr[i]) != 0)) {
- links->sr[j].search=gmx_strdup(filestr[i]);
- if (bWiki)
- sprintf(buf,"[[%s]]",filestr[i]);
- else
- sprintf(buf,"<a href=\"%s.html\">%s</a>",filestr[i],filestr[i]);
- links->sr[j].replace=gmx_strdup(buf);
- j++;
- }
- }
- links->nsr=j;
- for(i=0;i<n;i++)
- sfree(filestr[i]);
- sfree(filestr);
- }
- return repallww(s,links->nsr,links->sr);
+ char buf[256], **filestr;
+ int i, j, n;
+
+ if (links->sr == NULL)
+ {
+ n = get_file("links.dat", &(filestr));
+ links->nsr = n;
+ snew(links->sr, n);
+ for (i = 0, j = 0; (i < n); i++)
+ {
+ if (!program || (gmx_strcasecmp(program, filestr[i]) != 0))
+ {
+ links->sr[j].search = gmx_strdup(filestr[i]);
+ if (bWiki)
+ {
+ sprintf(buf, "[[%s]]", filestr[i]);
+ }
+ else
+ {
+ sprintf(buf, "<a href=\"%s.html\">%s</a>", filestr[i], filestr[i]);
+ }
+ links->sr[j].replace = gmx_strdup(buf);
+ j++;
+ }
+ }
+ links->nsr = j;
+ for (i = 0; i < n; i++)
+ {
+ sfree(filestr[i]);
+ }
+ sfree(filestr);
+ }
+ return repallww(s, links->nsr, links->sr);
}
char *check_tex(const char *s)
{
- return repall(s,NSRTEX,sandrTeX);
+ return repall(s, NSRTEX, sandrTeX);
}
static char *check_nroff(const char *s)
{
- return repall(s,NSRNROFF,sandrNROFF);
+ return repall(s, NSRNROFF, sandrNROFF);
}
-static char *check_wiki(const char *s,const char *program, t_linkdata *links)
+static char *check_wiki(const char *s, const char *program, t_linkdata *links)
{
- char *buf;
-
- buf = repall(s,NSRWIKI,sandrWiki);
- buf = html_xref(buf,program,links,TRUE);
-
- return buf;
+ char *buf;
+
+ buf = repall(s, NSRWIKI, sandrWiki);
+ buf = html_xref(buf, program, links, TRUE);
+
+ return buf;
}
-static char *check_html(const char *s,const char *program, t_linkdata *links)
+static char *check_html(const char *s, const char *program, t_linkdata *links)
{
- char *buf;
-
- buf = repall(s,NSRHTML,sandrHTML);
- buf = html_xref(buf,program,links,FALSE);
-
- return buf;
+ char *buf;
+
+ buf = repall(s, NSRHTML, sandrHTML);
+ buf = html_xref(buf, program, links, FALSE);
+
+ return buf;
}
-#define NWR(s) check_wiki(s,program,links)
-#define NSR(s) check_html(s,program,links)
-
-#define FLAG_SET(flag, mask) ((flag & mask) == mask)
-char *fileopt(unsigned long flag,char buf[],int maxsize)
+#define NWR(s) check_wiki(s, program, links)
+#define NSR(s) check_html(s, program, links)
+
+#define FLAG_SET(flag, mask) ((flag &mask) == mask)
+char *fileopt(unsigned long flag, char buf[], int maxsize)
{
- char tmp[256];
-
- if (FLAG_SET(flag, ffRW))
- sprintf(tmp,"In/Out");
- else if (FLAG_SET(flag, ffREAD))
- sprintf(tmp,"Input");
- else if (FLAG_SET(flag, ffWRITE))
- sprintf(tmp,"Output");
- else
- sprintf(tmp,"Dunno");
-
- if (FLAG_SET(flag, ffOPT)) {
- strcat(tmp,", Opt");
- if (FLAG_SET(flag, ffSET))
- strcat(tmp,"!");
+ char tmp[256];
+
+ if (FLAG_SET(flag, ffRW))
+ {
+ sprintf(tmp, "In/Out");
+ }
+ else if (FLAG_SET(flag, ffREAD))
+ {
+ sprintf(tmp, "Input");
+ }
+ else if (FLAG_SET(flag, ffWRITE))
+ {
+ sprintf(tmp, "Output");
+ }
else
- strcat(tmp,".");
- }
- if (FLAG_SET(flag, ffLIB))
- strcat(tmp,", Lib.");
- if (FLAG_SET(flag, ffMULT))
- strcat(tmp,", Mult.");
-
- sprintf(buf,"%s",tmp);
-
- return buf;
+ {
+ sprintf(tmp, "Dunno");
+ }
+
+ if (FLAG_SET(flag, ffOPT))
+ {
+ strcat(tmp, ", Opt");
+ if (FLAG_SET(flag, ffSET))
+ {
+ strcat(tmp, "!");
+ }
+ else
+ {
+ strcat(tmp, ".");
+ }
+ }
+ if (FLAG_SET(flag, ffLIB))
+ {
+ strcat(tmp, ", Lib.");
+ }
+ if (FLAG_SET(flag, ffMULT))
+ {
+ strcat(tmp, ", Mult.");
+ }
+
+ sprintf(buf, "%s", tmp);
+
+ return buf;
}
-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)
+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),get_arg_desc(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),get_arg_desc(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");
- }
+ 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), get_arg_desc(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), get_arg_desc(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"); */
}
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)
+ 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@DESC@\n\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(get_arg_desc(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(get_arg_desc(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");
+ 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@DESC@\n\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(get_arg_desc(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(get_arg_desc(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");
}
char *check_tty(const char *s)
{
- return repall(s,NSRTTY,sandrTty);
+ return repall(s, NSRTTY, sandrTty);
}
void
-print_tty_formatted(FILE *out, int nldesc, const char **desc,int indent,
- t_linkdata *links,const char *program,gmx_bool bWiki)
+print_tty_formatted(FILE *out, int nldesc, const char **desc, int indent,
+ t_linkdata *links, const char *program, gmx_bool bWiki)
{
- char *buf;
- char *temp;
- int buflen,i;
-
- buflen = 80*nldesc;
- snew(buf,buflen);
- for(i=0; (i<nldesc); i++) {
- if ((strlen(buf)>0) &&
- (buf[strlen(buf)-1] !=' ') && (buf[strlen(buf)-1] !='\n'))
- strcat(buf," ");
- if (bWiki)
- temp=NWR(desc[i]);
- else
- temp=check_tty(desc[i]);
- if (strlen(buf) + strlen(temp) >= (size_t)(buflen-2)) {
- buflen += strlen(temp);
- srenew(buf,buflen);
+ char *buf;
+ char *temp;
+ int buflen, i;
+
+ buflen = 80*nldesc;
+ snew(buf, buflen);
+ for (i = 0; (i < nldesc); i++)
+ {
+ if ((strlen(buf) > 0) &&
+ (buf[strlen(buf)-1] != ' ') && (buf[strlen(buf)-1] != '\n'))
+ {
+ strcat(buf, " ");
+ }
+ if (bWiki)
+ {
+ temp = NWR(desc[i]);
+ }
+ else
+ {
+ temp = check_tty(desc[i]);
+ }
+ if (strlen(buf) + strlen(temp) >= (size_t)(buflen-2))
+ {
+ buflen += strlen(temp);
+ srenew(buf, buflen);
+ }
+ strcat(buf, temp);
+ sfree(temp);
}
- strcat(buf,temp);
+ /* Make lines of at most 79 characters */
+ temp = wrap_lines(buf, 78, indent, FALSE);
+ fprintf(out, "%s\n", temp);
sfree(temp);
- }
- /* Make lines of at most 79 characters */
- temp = wrap_lines(buf,78,indent,FALSE);
- fprintf(out,"%s\n",temp);
- sfree(temp);
- sfree(buf);
+ sfree(buf);
}
static void write_ttyman(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,gmx_bool bHeader,
- t_linkdata *links)
+ const char *program,
+ int nldesc, const char **desc,
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa,
+ int nbug, const char **bugs, gmx_bool bHeader,
+ t_linkdata *links)
{
- int i;
- char buf[256];
- char *tmp;
-
- if (bHeader) {
- fprintf(out,"%s\n\n",check_tty(program));
- fprintf(out,"%s\n%s\n",GromacsVersion(),mydate(buf,255,FALSE));
- }
- if (nldesc > 0) {
- fprintf(out,"DESCRIPTION\n-----------\n");
- print_tty_formatted(out,nldesc,desc,0,links,program,FALSE);
- }
- if (nbug > 0) {
- fprintf(out,"\n");
- fprintf(out,"KNOWN PROBLEMS\n----------\n");
- for(i=0; i<nbug; i++) {
- snew(tmp,strlen(bugs[i])+3);
- strcpy(tmp,"* ");
- strcpy(tmp+2,check_tty(bugs[i]));
- fprintf(out,"%s\n",wrap_lines(tmp,78,2,FALSE));
- sfree(tmp);
- }
- }
- if (nfile > 0) {
- fprintf(out,"\n");
- pr_fns(out,nfile,fnm);
- }
- if (npargs > 0) {
- print_pargs(out,npargs,pa,FALSE);
- }
+ int i;
+ char buf[256];
+ char *tmp;
+
+ if (bHeader)
+ {
+ fprintf(out, "%s\n\n", check_tty(program));
+ fprintf(out, "%s\n%s\n", GromacsVersion(), mydate(buf, 255, FALSE));
+ }
+ if (nldesc > 0)
+ {
+ fprintf(out, "DESCRIPTION\n-----------\n");
+ print_tty_formatted(out, nldesc, desc, 0, links, program, FALSE);
+ }
+ if (nbug > 0)
+ {
+ fprintf(out, "\n");
+ fprintf(out, "KNOWN PROBLEMS\n----------\n");
+ for (i = 0; i < nbug; i++)
+ {
+ snew(tmp, strlen(bugs[i])+3);
+ strcpy(tmp, "* ");
+ strcpy(tmp+2, check_tty(bugs[i]));
+ fprintf(out, "%s\n", wrap_lines(tmp, 78, 2, FALSE));
+ sfree(tmp);
+ }
+ }
+ if (nfile > 0)
+ {
+ fprintf(out, "\n");
+ pr_fns(out, nfile, fnm);
+ }
+ if (npargs > 0)
+ {
+ print_pargs(out, npargs, pa, FALSE);
+ }
}
-static void pr_html_files(FILE *out,int nfile,t_filenm fnm[],
- const char *program,t_linkdata *links,gmx_bool bWiki)
-{
- int i;
- char link[10],tmp[255];
-
- if (bWiki)
- fprintf(out," %-10s %-12s %-12s %-s\n"
- " -----------------------------------------------------\n",
- "Option","Filename","Type","Description");
- else
- 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");
+static void pr_html_files(FILE *out, int nfile, t_filenm fnm[],
+ const char *program, t_linkdata *links, gmx_bool bWiki)
+{
+ int i;
+ char link[10], tmp[255];
+
if (bWiki)
- fprintf(out," %-10s %-16s %-12s %-s\n",
- fnm[i].opt,
- NWR(fnm[i].fns[0]),
- fileopt(fnm[i].flag,tmp,255),
- NWR(ftp2desc(fnm[i].ftp)));
+ {
+ fprintf(out, " %-10s %-12s %-12s %-s\n"
+ " -----------------------------------------------------\n",
+ "Option", "Filename", "Type", "Description");
+ }
else
- 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].fns[0],fileopt(fnm[i].flag,tmp,255),
- NSR(ftp2desc(fnm[i].ftp)));
- }
- if (!bWiki)
- fprintf(out,"</TABLE>\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");
+ }
+ if (bWiki)
+ {
+ fprintf(out, " %-10s %-16s %-12s %-s\n",
+ fnm[i].opt,
+ NWR(fnm[i].fns[0]),
+ fileopt(fnm[i].flag, tmp, 255),
+ NWR(ftp2desc(fnm[i].ftp)));
+ }
+ else
+ {
+ 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].fns[0], fileopt(fnm[i].flag, tmp, 255),
+ NSR(ftp2desc(fnm[i].ftp)));
+ }
+ }
+ if (!bWiki)
+ {
+ fprintf(out, "</TABLE>\n");
+ }
}
static void write_wikiman(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,gmx_bool bHeader,
- t_linkdata *links)
+ const char *program,
+ int nldesc, const char **desc,
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa,
+ int nbug, const char **bugs, gmx_bool bHeader,
+ t_linkdata *links)
{
- int i;
- char buf[256];
- char *tmp;
- fprintf(out,"<page>\n<title>Manual:%s_%s</title>\n",program,
- VERSION);
- fprintf(out,"<revision>\n");
- fprintf(out,"<timestamp>%s</timestamp>\n",mydate(buf,255,TRUE));
- fprintf(out,"<text xml:space=\"preserve\">\n");
- if (nldesc > 0) {
- fprintf(out,"== Description ==\n");
- print_tty_formatted(out,nldesc,desc,0,links,program,TRUE);
- fprintf(out,"\n");
- }
- if (nbug > 0) {
- fprintf(out,"== Known Problems ==\n");
- for(i=0; i<nbug; i++) {
- snew(tmp,strlen(bugs[i])+3);
- strcpy(tmp,"* ");
- strcpy(tmp+2,bugs[i]);
- fprintf(out,"%s\n",NWR(tmp));
- sfree(tmp);
- }
- }
- if (nfile > 0) {
- fprintf(out,"\n== Files ==\n");
- pr_html_files(out,nfile,fnm,program,links,TRUE);
- }
- if (npargs > 0) {
- fprintf(out,"\n== Options ==\n");
- fprintf(out," %-12s %-6s %-6s %-s\n",
- "Option","Type","Value","Description");
- fprintf(out," ------------------------------------------------------\n");
- for(i=0; (i<npargs); i++) {
- tmp = NWR(pargs_print_line(&pa[i],TRUE));
- fprintf(out,"%s",tmp);
- sfree(tmp);
- }
- }
- fprintf(out,"[[category:Manual_Pages_%s|%s]]\n",VERSION,program);
- fprintf(out,"</text>\n");
- fprintf(out,"</revision>\n");
- fprintf(out,"</page>\n\n");
+ int i;
+ char buf[256];
+ char *tmp;
+ fprintf(out, "<page>\n<title>Manual:%s_%s</title>\n", program,
+ VERSION);
+ fprintf(out, "<revision>\n");
+ fprintf(out, "<timestamp>%s</timestamp>\n", mydate(buf, 255, TRUE));
+ fprintf(out, "<text xml:space=\"preserve\">\n");
+ if (nldesc > 0)
+ {
+ fprintf(out, "== Description ==\n");
+ print_tty_formatted(out, nldesc, desc, 0, links, program, TRUE);
+ fprintf(out, "\n");
+ }
+ if (nbug > 0)
+ {
+ fprintf(out, "== Known Problems ==\n");
+ for (i = 0; i < nbug; i++)
+ {
+ snew(tmp, strlen(bugs[i])+3);
+ strcpy(tmp, "* ");
+ strcpy(tmp+2, bugs[i]);
+ fprintf(out, "%s\n", NWR(tmp));
+ sfree(tmp);
+ }
+ }
+ if (nfile > 0)
+ {
+ fprintf(out, "\n== Files ==\n");
+ pr_html_files(out, nfile, fnm, program, links, TRUE);
+ }
+ if (npargs > 0)
+ {
+ fprintf(out, "\n== Options ==\n");
+ fprintf(out, " %-12s %-6s %-6s %-s\n",
+ "Option", "Type", "Value", "Description");
+ fprintf(out, " ------------------------------------------------------\n");
+ for (i = 0; (i < npargs); i++)
+ {
+ tmp = NWR(pargs_print_line(&pa[i], TRUE));
+ fprintf(out, "%s", tmp);
+ sfree(tmp);
+ }
+ }
+ fprintf(out, "[[category:Manual_Pages_%s|%s]]\n", VERSION, program);
+ fprintf(out, "</text>\n");
+ fprintf(out, "</revision>\n");
+ fprintf(out, "</page>\n\n");
}
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)
+ 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[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,
- get_arg_desc(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:gromacs@gromacs.org\">"
- "gromacs@gromacs.org</a></font><br>\n");
- fprintf(out,"</div>\n");
- fprintf(out,"</BODY>\n");
+ int i;
+ char 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,
+ get_arg_desc(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:gromacs@gromacs.org\">"
+ "gromacs@gromacs.org</a></font><br>\n");
+ fprintf(out, "</div>\n");
+ fprintf(out, "</BODY>\n");
}
-char *check_xml(const char *s,const char *program,t_linkdata *links)
+char *check_xml(const char *s, const char *program, t_linkdata *links)
{
- char *buf;
-
- buf=repall(s,NSRXML,sandrXML);
- buf=html_xref(buf,program,links,FALSE); /* the same in html and xml */
-
- return buf;
+ char *buf;
+
+ buf = repall(s, NSRXML, sandrXML);
+ buf = html_xref(buf, program, links, FALSE); /* the same in html and xml */
+
+ return buf;
}
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)
+ 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",
- get_arg_desc(pa[i].type), is_hidden(&pa[i]),
- pa[i].option+1, /* +1 - with no trailing '-' */
- pa_val(&(pa[i]),buf,255),pa[i].desc); /*get_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
+ 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",
+ get_arg_desc(pa[i].type), is_hidden(&pa[i]),
+ pa[i].option+1, /* +1 - with no trailing '-' */
+ pa_val(&(pa[i]), buf, 255), pa[i].desc); /*get_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 pr_opts(FILE *fp,
- int nfile, t_filenm *fnm,
- int npargs, t_pargs pa[], int shell)
+static void pr_opts(FILE *fp,
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs pa[], int shell)
{
- int i;
-
- switch (shell) {
- case eshellCSH:
- fprintf(fp," \"c/-/(");
- for (i=0; i<nfile; i++)
- fprintf(fp," %s",fnm[i].opt+1);
- for (i=0; i<npargs; i++)
- if ( (pa[i].type==etBOOL) && *(pa[i].u.b) )
- fprintf(fp," no%s",pa[i].option+1);
- else
- fprintf(fp," %s",pa[i].option+1);
- fprintf(fp,")/\"");
- break;
- case eshellBASH:
- fprintf(fp,"if (( $COMP_CWORD <= 1 )) || [[ $c == -* ]]; then COMPREPLY=( $(compgen -W '");
- for (i=0; i<nfile; i++)
- fprintf(fp," -%s",fnm[i].opt+1);
- for (i=0; i<npargs; i++)
- if ( (pa[i].type==etBOOL) && *(pa[i].u.b) )
- fprintf(fp," -no%s",pa[i].option+1);
- else
- fprintf(fp," -%s",pa[i].option+1);
- fprintf(fp,"' -- $c)); return 0; fi\n");
- break;
- case eshellZSH:
- fprintf(fp," -x 's[-]' -s \"");
- for (i=0; i<nfile; i++)
- fprintf(fp," %s",fnm[i].opt+1);
- for (i=0; i<npargs; i++)
- if ( (pa[i].type==etBOOL) && *(pa[i].u.b) )
- fprintf(fp," no%s",pa[i].option+1);
- else
- fprintf(fp," %s",pa[i].option+1);
- fprintf(fp,"\" ");
- break;
- }
+ int i;
+
+ switch (shell)
+ {
+ case eshellCSH:
+ fprintf(fp, " \"c/-/(");
+ for (i = 0; i < nfile; i++)
+ {
+ fprintf(fp, " %s", fnm[i].opt+1);
+ }
+ for (i = 0; i < npargs; i++)
+ {
+ if ( (pa[i].type == etBOOL) && *(pa[i].u.b) )
+ {
+ fprintf(fp, " no%s", pa[i].option+1);
+ }
+ else
+ {
+ fprintf(fp, " %s", pa[i].option+1);
+ }
+ }
+ fprintf(fp, ")/\"");
+ break;
+ case eshellBASH:
+ fprintf(fp, "if (( $COMP_CWORD <= 1 )) || [[ $c == -* ]]; then COMPREPLY=( $(compgen -W '");
+ for (i = 0; i < nfile; i++)
+ {
+ fprintf(fp, " -%s", fnm[i].opt+1);
+ }
+ for (i = 0; i < npargs; i++)
+ {
+ if ( (pa[i].type == etBOOL) && *(pa[i].u.b) )
+ {
+ fprintf(fp, " -no%s", pa[i].option+1);
+ }
+ else
+ {
+ fprintf(fp, " -%s", pa[i].option+1);
+ }
+ }
+ fprintf(fp, "' -- $c)); return 0; fi\n");
+ break;
+ case eshellZSH:
+ fprintf(fp, " -x 's[-]' -s \"");
+ for (i = 0; i < nfile; i++)
+ {
+ fprintf(fp, " %s", fnm[i].opt+1);
+ }
+ for (i = 0; i < npargs; i++)
+ {
+ if ( (pa[i].type == etBOOL) && *(pa[i].u.b) )
+ {
+ fprintf(fp, " no%s", pa[i].option+1);
+ }
+ else
+ {
+ fprintf(fp, " %s", pa[i].option+1);
+ }
+ }
+ fprintf(fp, "\" ");
+ break;
+ }
}
static void write_cshcompl(FILE *out,
- int nfile, t_filenm *fnm,
- int npargs, t_pargs *pa)
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa)
{
- fprintf(out,"complete %s",ShortProgram());
- pr_enums(out,npargs,pa,eshellCSH);
- pr_fopts(out,nfile,fnm,eshellCSH);
- pr_opts(out,nfile,fnm,npargs,pa,eshellCSH);
- fprintf(out,"\n");
+ fprintf(out, "complete %s", ShortProgram());
+ pr_enums(out, npargs, pa, eshellCSH);
+ pr_fopts(out, nfile, fnm, eshellCSH);
+ pr_opts(out, nfile, fnm, npargs, pa, eshellCSH);
+ fprintf(out, "\n");
}
static void write_zshcompl(FILE *out,
- int nfile, t_filenm *fnm,
- int npargs, t_pargs *pa)
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa)
{
- fprintf(out,"compctl ");
+ fprintf(out, "compctl ");
- /* start with options, since they are always present */
- pr_opts(out,nfile,fnm,npargs,pa,eshellZSH);
- pr_enums(out,npargs,pa,eshellZSH);
- pr_fopts(out,nfile,fnm,eshellZSH);
- fprintf(out,"-- %s\n",ShortProgram());
+ /* start with options, since they are always present */
+ pr_opts(out, nfile, fnm, npargs, pa, eshellZSH);
+ pr_enums(out, npargs, pa, eshellZSH);
+ pr_fopts(out, nfile, fnm, eshellZSH);
+ fprintf(out, "-- %s\n", ShortProgram());
}
static void write_bashcompl(FILE *out,
- int nfile, t_filenm *fnm,
- int npargs, t_pargs *pa)
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa)
{
- /* Advanced bash completions are handled by shell functions.
- * p and c hold the previous and current word on the command line.
- * We need to use extended globbing, so write it in each completion file */
- fprintf(out,"shopt -s extglob\n");
- fprintf(out,"_%s_compl() {\nlocal p c\n",ShortProgram());
- fprintf(out,"COMPREPLY=() c=${COMP_WORDS[COMP_CWORD]} p=${COMP_WORDS[COMP_CWORD-1]}\n");
- pr_opts(out,nfile,fnm,npargs,pa,eshellBASH);
- fprintf(out,"case \"$p\" in\n");
-
- pr_enums(out,npargs,pa,eshellBASH);
- pr_fopts(out,nfile,fnm,eshellBASH);
- fprintf(out,"esac }\ncomplete -F _%s_compl %s\n",ShortProgram(),ShortProgram());
+ /* Advanced bash completions are handled by shell functions.
+ * p and c hold the previous and current word on the command line.
+ * We need to use extended globbing, so write it in each completion file */
+ fprintf(out, "shopt -s extglob\n");
+ fprintf(out, "_%s_compl() {\nlocal p c\n", ShortProgram());
+ fprintf(out, "COMPREPLY=() c=${COMP_WORDS[COMP_CWORD]} p=${COMP_WORDS[COMP_CWORD-1]}\n");
+ pr_opts(out, nfile, fnm, npargs, pa, eshellBASH);
+ fprintf(out, "case \"$p\" in\n");
+
+ pr_enums(out, npargs, pa, eshellBASH);
+ pr_fopts(out, nfile, fnm, eshellBASH);
+ fprintf(out, "esac }\ncomplete -F _%s_compl %s\n", ShortProgram(), ShortProgram());
}
-static void write_py(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)
+static void write_py(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)
{
- const char *cls = program;
- char *tmp;
- int i,j;
-
- /* Header stuff */
- fprintf(out,"#!/usr/bin/python\n\nfrom GmxDialog import *\n\n");
-
- /* Class definition */
- fprintf(out,"class %s:\n",cls);
- fprintf(out," def __init__(self,tk):\n");
-
- /* Help text */
- fprintf(out," %s_help = \"\"\"\n",cls);
- fprintf(out," DESCRIPTION\n");
- print_tty_formatted(out,nldesc,desc,8,links,program,FALSE);
- if (nbug > 0) {
- fprintf(out,"\n BUGS and PROBLEMS\n");
- for(i=0; i<nbug; i++) {
- snew(tmp,strlen(bugs[i])+3);
- strcpy(tmp,"* ");
- strcpy(tmp+2,check_tty(bugs[i]));
- fprintf(out,"%s\n",wrap_lines(tmp,78,10,TRUE));
- sfree(tmp);
- }
- }
- fprintf(out," \"\"\"\n\n # Command line options\n");
- /* File options */
- fprintf(out," flags = []\n");
- for(i=0; (i<nfile); i++)
- fprintf(out," flags.append(pca_file('%s',\"%s\",0,%d))\n",
- ftp2ext_generic(fnm[i].ftp),fnm[i].opt ? fnm[i].opt : "k",
- is_optional(&(fnm[i])));
-
-
- /* Other options */
- for(i=0; (i<npargs); i++) {
- switch(pa[i].type) {
- case etINT:
- fprintf(out," flags.append(pca_int(\"%s\",\"%s\",%d,%d))\n",
- pa[i].option,pa[i].desc,*pa[i].u.i,is_hidden(&(pa[i])));
- break;
- case etREAL:
- case etTIME:
- fprintf(out," flags.append(pca_float(\"%s\",\"%s\",%f,%d))\n",
- pa[i].option,pa[i].desc,*pa[i].u.r,is_hidden(&(pa[i])));
- break;
- case etSTR:
- case etBOOL:
- fprintf(out," flags.append(pca_gmx_bool(\"%s\",\"%s\",%d,%d))\n",
- pa[i].option,pa[i].desc,*pa[i].u.b,is_hidden(&(pa[i])));
- break;
- case etRVEC:
- fprintf(stderr,"Sorry, no rvecs yet...\n");
- break;
- case etENUM:
- fprintf(out," flags.append(pca_enum(\"%s\",\"%s\",\n",
- pa[i].option,pa[i].desc);
- fprintf(out," ['%s'",pa[i].u.c[1]);
- for(j=2; (pa[i].u.c[j] != NULL); j++)
- fprintf(out,",'%s'",pa[i].u.c[j]);
- fprintf(out,"],%d))\n",is_hidden(&(pa[i])));
- break;
- default:
- break;
- }
- }
-
- /* Make the dialog box */
- fprintf(out," gmxd = gmx_dialog(tk,\"%s\",flags,%s_help)\n\n",
- cls,cls);
-
- /* Main loop */
- fprintf(out,"#####################################################\n");
- fprintf(out,"tk = Tk()\n");
- fprintf(out,"my%s = %s(tk)\n",cls,cls);
- fprintf(out,"tk.mainloop()\n");
+ const char *cls = program;
+ char *tmp;
+ int i, j;
+
+ /* Header stuff */
+ fprintf(out, "#!/usr/bin/python\n\nfrom GmxDialog import *\n\n");
+
+ /* Class definition */
+ fprintf(out, "class %s:\n", cls);
+ fprintf(out, " def __init__(self,tk):\n");
+
+ /* Help text */
+ fprintf(out, " %s_help = \"\"\"\n", cls);
+ fprintf(out, " DESCRIPTION\n");
+ print_tty_formatted(out, nldesc, desc, 8, links, program, FALSE);
+ if (nbug > 0)
+ {
+ fprintf(out, "\n BUGS and PROBLEMS\n");
+ for (i = 0; i < nbug; i++)
+ {
+ snew(tmp, strlen(bugs[i])+3);
+ strcpy(tmp, "* ");
+ strcpy(tmp+2, check_tty(bugs[i]));
+ fprintf(out, "%s\n", wrap_lines(tmp, 78, 10, TRUE));
+ sfree(tmp);
+ }
+ }
+ fprintf(out, " \"\"\"\n\n # Command line options\n");
+ /* File options */
+ fprintf(out, " flags = []\n");
+ for (i = 0; (i < nfile); i++)
+ {
+ fprintf(out, " flags.append(pca_file('%s',\"%s\",0,%d))\n",
+ ftp2ext_generic(fnm[i].ftp), fnm[i].opt ? fnm[i].opt : "k",
+ is_optional(&(fnm[i])));
+ }
+
+
+ /* Other options */
+ for (i = 0; (i < npargs); i++)
+ {
+ switch (pa[i].type)
+ {
+ case etINT:
+ fprintf(out, " flags.append(pca_int(\"%s\",\"%s\",%d,%d))\n",
+ pa[i].option, pa[i].desc, *pa[i].u.i, is_hidden(&(pa[i])));
+ break;
+ case etREAL:
+ case etTIME:
+ fprintf(out, " flags.append(pca_float(\"%s\",\"%s\",%f,%d))\n",
+ pa[i].option, pa[i].desc, *pa[i].u.r, is_hidden(&(pa[i])));
+ break;
+ case etSTR:
+ case etBOOL:
+ fprintf(out, " flags.append(pca_gmx_bool(\"%s\",\"%s\",%d,%d))\n",
+ pa[i].option, pa[i].desc, *pa[i].u.b, is_hidden(&(pa[i])));
+ break;
+ case etRVEC:
+ fprintf(stderr, "Sorry, no rvecs yet...\n");
+ break;
+ case etENUM:
+ fprintf(out, " flags.append(pca_enum(\"%s\",\"%s\",\n",
+ pa[i].option, pa[i].desc);
+ fprintf(out, " ['%s'", pa[i].u.c[1]);
+ for (j = 2; (pa[i].u.c[j] != NULL); j++)
+ {
+ fprintf(out, ",'%s'", pa[i].u.c[j]);
+ }
+ fprintf(out, "],%d))\n", is_hidden(&(pa[i])));
+ break;
+ default:
+ break;
+ }
+ }
+
+ /* Make the dialog box */
+ fprintf(out, " gmxd = gmx_dialog(tk,\"%s\",flags,%s_help)\n\n",
+ cls, cls);
+
+ /* Main loop */
+ fprintf(out, "#####################################################\n");
+ fprintf(out, "tk = Tk()\n");
+ fprintf(out, "my%s = %s(tk)\n", cls, cls);
+ fprintf(out, "tk.mainloop()\n");
}
-void write_man(FILE *out,const char *mantp,
- const char *program,
- int nldesc,const char **desc,
- int nfile,t_filenm *fnm,
- int npargs,t_pargs *pa,
- int nbug,const char **bugs,
- gmx_bool bHidden)
+void write_man(FILE *out, const char *mantp,
+ const char *program,
+ int nldesc, const char **desc,
+ int nfile, t_filenm *fnm,
+ int npargs, t_pargs *pa,
+ int nbug, const char **bugs,
+ gmx_bool bHidden)
{
- const char *pr;
- int i,npar;
- t_pargs *par;
-
- t_linkdata *links;
-
- links=init_linkdata();
-
- /* Don't write hidden options to completions, it just
- * makes the options more complicated for normal users
- */
-
- if (bHidden) {
- npar=npargs;
- par=pa;
- }
- else {
- snew(par,npargs);
- npar=0;
- for(i=0;i<npargs;i++)
- if (!is_hidden(&pa[i])) {
- par[npar]=pa[i];
- npar++;
- }
- }
-
- if ((pr=strrchr(program,DIR_SEPARATOR)) == NULL)
- pr=program;
- else
- pr+=1;
- if (strcmp(mantp,"tex")==0)
- write_texman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,links);
- if (strcmp(mantp,"nroff")==0)
- write_nroffman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,links);
- if (strcmp(mantp,"ascii")==0)
- write_ttyman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,TRUE,links);
- if (strcmp(mantp,"wiki")==0)
- write_wikiman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,TRUE,links);
- if (strcmp(mantp,"help")==0)
- write_ttyman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,FALSE,links);
- if (strcmp(mantp,"html")==0)
- write_htmlman(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,links);
- if (strcmp(mantp,"py")==0)
- write_py(out,pr,nldesc,desc,nfile,fnm,npar,par,nbug,bugs,links);
- if (strcmp(mantp,"xml")==0)
- write_xmlman(out,pr,nldesc,desc,nfile,fnm,npargs,pa,nbug,bugs,links);
- if (strcmp(mantp,"completion-zsh")==0)
- write_zshcompl(out,nfile,fnm,npar,par);
- if (strcmp(mantp,"completion-bash")==0)
- write_bashcompl(out,nfile,fnm,npar,par);
- if (strcmp(mantp,"completion-csh")==0)
- write_cshcompl(out,nfile,fnm,npar,par);
-
- if (!bHidden)
- sfree(par);
-
- finish_linkdata(links);
+ const char *pr;
+ int i, npar;
+ t_pargs *par;
+
+ t_linkdata *links;
+
+ links = init_linkdata();
+
+ /* Don't write hidden options to completions, it just
+ * makes the options more complicated for normal users
+ */
+
+ if (bHidden)
+ {
+ npar = npargs;
+ par = pa;
+ }
+ else
+ {
+ snew(par, npargs);
+ npar = 0;
+ for (i = 0; i < npargs; i++)
+ {
+ if (!is_hidden(&pa[i]))
+ {
+ par[npar] = pa[i];
+ npar++;
+ }
+ }
+ }
+
+ if ((pr = strrchr(program, DIR_SEPARATOR)) == NULL)
+ {
+ pr = program;
+ }
+ else
+ {
+ pr += 1;
+ }
+ if (strcmp(mantp, "tex") == 0)
+ {
+ write_texman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, links);
+ }
+ if (strcmp(mantp, "nroff") == 0)
+ {
+ write_nroffman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, links);
+ }
+ if (strcmp(mantp, "ascii") == 0)
+ {
+ write_ttyman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, TRUE, links);
+ }
+ if (strcmp(mantp, "wiki") == 0)
+ {
+ write_wikiman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, TRUE, links);
+ }
+ if (strcmp(mantp, "help") == 0)
+ {
+ write_ttyman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, FALSE, links);
+ }
+ if (strcmp(mantp, "html") == 0)
+ {
+ write_htmlman(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, links);
+ }
+ if (strcmp(mantp, "py") == 0)
+ {
+ write_py(out, pr, nldesc, desc, nfile, fnm, npar, par, nbug, bugs, links);
+ }
+ if (strcmp(mantp, "xml") == 0)
+ {
+ write_xmlman(out, pr, nldesc, desc, nfile, fnm, npargs, pa, nbug, bugs, links);
+ }
+ if (strcmp(mantp, "completion-zsh") == 0)
+ {
+ write_zshcompl(out, nfile, fnm, npar, par);
+ }
+ if (strcmp(mantp, "completion-bash") == 0)
+ {
+ write_bashcompl(out, nfile, fnm, npar, par);
+ }
+ if (strcmp(mantp, "completion-csh") == 0)
+ {
+ write_cshcompl(out, nfile, fnm, npar, par);
+ }
+
+ if (!bHidden)
+ {
+ sfree(par);
+ }
+
+ finish_linkdata(links);
}
-const char *get_arg_desc(int type) {
- static const char *argtp[etNR] = {
- "int", "step", "real", "time", "string", "bool", "vector", "enum"
- };
- return argtp[type];
+const char *get_arg_desc(int type)
+{
+ static const char *argtp[etNR] = {
+ "int", "step", "real", "time", "string", "bool", "vector", "enum"
+ };
+ return argtp[type];
}
biod.pnpi.spb.ru / alexxy / gromacs.git / blobdiff