texi2mdoc/main.c - diff

Return to main.c CVS log

Up to [cvsweb.bsd.lv] / texi2mdoc

Diff for /texi2mdoc/main.c between version 1.36 and 1.41

version 1.36, 2015/02/23 15:23:44

version 1.41, 2015/02/24 14:35:40

Line 14

* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF

* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

#include <sys/mman.h>

#if defined(__linux__) || defined(__MINT__)

#include <sys/stat.h>

# define _GNU_SOURCE /* memmem */

#endif

#include <assert.h>

#include <ctype.h>

#include <fcntl.h>

#include <getopt.h>

#include <libgen.h>

#include <limits.h>

Line 28

Line 27

#include <stdlib.h>

#include <string.h>

#include <time.h>

#include <unistd.h>

#include "extern.h"

Line 143 static const struct texitok __texitoks[TEXICMD__MAX] =

Line 141 static const struct texitok __texitoks[TEXICMD__MAX] =

{ doignblock, "direntry", 8 }, /* TEXICMD_DIRENTRY */

{ dodisplay, "display", 7 }, /* TEXICMD_DISPLAY */

{ doignbracket, "dmn", 3 }, /* TEXICMD_DMN */

{ doignblock, "documentdescription", 19 }, /* TEXICMD_DOCUMENTDESCRIPTION */

{ doignline, "documentencoding", 16 }, /* TEXICMD_DOCUMENTENCODING */

{ dosymbol, "dots", 4 }, /* TEXICMD_DOTS */

{ dolink, "email", 5 }, /* TEXICMD_EMAIL */

{ doinline, "emph", 4 }, /* TEXICMD_EMPH */

Line 669 doverbatim(struct texi *p, enum texicmd cmd,

teximacro(p, "Bd -literal -offset indent");

assert(endpos <= sz);

while (*pos < endpos) {

if (buf[*pos] == '\n')

texiputchar(p, buf[*pos]);

p->outcol = 0;

else

p->outcol++;

if (*pos > 0 && '.' == buf[*pos])

if ('\n' == buf[*pos - 1])

fputs("\\&", stdout);

putchar(buf[*pos]);

if ('\\' == buf[*pos])

putchar('e');

advance(p, buf, pos);

}

teximacro(p, "Ed");

Line 1061 dosymbol(struct texi *p, enum texicmd cmd,

Line 1052 dosymbol(struct texi *p, enum texicmd cmd,

case (TEXICMD_SQUIGGLE_RIGHT):

texiputchars(p, "}");

break;

case (TEXICMD_TIE):

case (TEXICMD_TEXSYM):

texiputchars(p, "TeX");

break;

case (TEXICMD_TEXSYM):

case (TEXICMD_TIE):

texiputchars(p, "\\ ");

break;

case (TEXICMD_COLON):

Line 1209 dolink(struct texi *p, enum texicmd cmd,

Line 1200 dolink(struct texi *p, enum texicmd cmd,

break;

case (TEXICMD_XREF):

texiputchars(p, "See Section");

teximacroopen(p, "Qq");

teximacroopen(p, "Dq");

break;

case (TEXICMD_PXREF):

texiputchars(p, "see Section");

teximacroopen(p, "Qq");

teximacroopen(p, "Dq");

break;

case (TEXICMD_INFOREF):

texiputchars(p, "See Info file node");

teximacroopen(p, "Qq");

teximacroopen(p, "Dq");

break;

default:

abort();

Line 1355 dosp(struct texi *p, enum texicmd cmd,

Line 1346 dosp(struct texi *p, enum texicmd cmd,

const char *buf, size_t sz, size_t *pos)

{

texivspace(p);

if (p->literal)

texiputchar(p, '\n');

else

texivspace(p);

/* FIXME: ignore and parseeoln. */

advanceeoln(p, buf, sz, pos, 1);

}

Line 1392 dotop(struct texi *p, enum texicmd cmd,

Line 1386 dotop(struct texi *p, enum texicmd cmd,

teximacro(p, "Os");

teximacro(p, "Sh NAME");

teximacroopen(p, "Nm");

texiputchars(p, p->title);

for (cp = p->title; '\0' != *cp; cp++)

texiputchar(p, *cp);

teximacroclose(p);

teximacroopen(p, "Nd");

texiputchars(p, NULL != p->subtitle ?

if (NULL != p->subtitle)

p->subtitle : "Unknown description");

for (cp = p->subtitle; '\0' != *cp; cp++)

texiputchar(p, *cp);

else

texiputchars(p, "Unknown description");

teximacroclose(p);

p->seenvs = 1;

dosection(p, cmd, buf, sz, pos);

Line 1591 doignline(struct texi *p, enum texicmd cmd,

Line 1589 doignline(struct texi *p, enum texicmd cmd,

* Parse colon-separated directories from "cp" (if not NULL) and returns

* the array of pointers.

* Prepends "base" to the array.

* Prepends "base" to the array, if found.

* This does NOT sanitise the directories!

static char **

Line 1599 parsedirs(struct texi *p, const char *base, const char

Line 1597 parsedirs(struct texi *p, const char *base, const char

{

char *tok, *str, *tofree;

const char *cpp;

size_t i;

size_t i = 0;

char **dirs;

*sz = NULL != (cpp = cp) ? 2 : 1;

/* Count up our expected arguments. */

if (*sz > 1)

*sz = NULL != base;

for ( ; NULL != (cpp = strchr(cpp, ':')); (*sz)++)

if (NULL != (cpp = cp))

for ((*sz)++; NULL != (cpp = strchr(cpp, ':')); (*sz)++)

cpp++;

if (0 == *sz)

return(NULL);

if (NULL == (dirs = calloc(*sz, sizeof(char *))))

texiabort(p, NULL);

else if (NULL == (dirs[0] = strdup(base)))

if (NULL != base && NULL == (dirs[i++] = strdup(base)))

texiabort(p, NULL);

if (NULL == cp)

return(dirs);

if (NULL == (tofree = tok = str = strdup(cp)))

texiabort(p, NULL);

for (i = 1; NULL != (tok = strsep(&str, ":")); i++)

for ( ; NULL != (tok = strsep(&str, ":")); i++)

if (NULL == (dirs[i] = strdup(tok)))

texiabort(p, NULL);

Line 1631 main(int argc, char *argv[])

Line 1630 main(int argc, char *argv[])

{

struct texi texi;

int c;

char *path, *dir;

char *dirpath, *dir, *ccp;

const char *progname, *Idir, *cp;

progname = strrchr(argv[0], '/');

Line 1641 main(int argc, char *argv[])

Line 1640 main(int argc, char *argv[])

++progname;

memset(&texi, 0, sizeof(struct texi));

texi.ign = 1;

Idir = NULL;

while (-1 != (c = getopt(argc, argv, "I:")))

Line 1653 main(int argc, char *argv[])

}

argv += optind;

if (0 == (argc -= optind))

argc -= optind;

goto usage;

if (NULL == (path = strdup(argv[0])))

if (argc > 0) {

texiabort(&texi, NULL);

if (NULL == (dirpath = strdup(argv[0])))

else if (NULL == (dir = dirname(path)))

texiabort(&texi, NULL);

if (NULL == (dir = dirname(dirpath)))

texiabort(&texi, NULL);

if (NULL != (cp = strrchr(argv[0], '/')))

texi.title = strdup(cp + 1);

else

texi.title = strdup(argv[0]);

if (NULL == texi.title)

texiabort(&texi, NULL);

else if (NULL != (ccp = strchr(texi.title, '.')))

*ccp = '\0';

texi.dirs = parsedirs(&texi, dir, Idir, &texi.dirsz);

free(dirpath);

parsefile(&texi, argv[0], 1);

} else {

texi.title = strdup("Unknown Manual");

texi.dirs = parsedirs(&texi, NULL, Idir, &texi.dirsz);

parsestdin(&texi);

}

free(path);

if (NULL != (cp = strrchr(argv[0], '/')))

texi.title = strdup(cp + 1);

else

texi.title = strdup(argv[0]);

if (NULL == texi.title)

texiabort(&texi, NULL);

else if (NULL != (path = strchr(texi.title, '.')))

*path = '\0';

texi.ign = 1;

texi.dirs = parsedirs(&texi, dir, Idir, &texi.dirsz);

parsefile(&texi, argv[0], 1);

/* We shouldn't get here. */

texiexit(&texi);

return(EXIT_FAILURE);

usage:

fprintf(stderr, "usage: %s [-Idirs] file\n", progname);

fprintf(stderr, "usage: %s [-Idirs] [file]\n", progname);

return(EXIT_FAILURE);

}

CVSweb