version 1.35, 2014/10/22 23:10:05 |
version 1.37, 2015/02/13 00:44:16 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv> |
|
* Copyright (c) 2014, 2015 Ingo Schwarze <schwarze@openbsd.org> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
|
|
#include <string.h> |
#include <string.h> |
#include <unistd.h> |
#include <unistd.h> |
|
|
|
#include "dict.h" |
|
|
/* |
/* |
* In what section can we find Perl module manuals? |
* In what section can we find Perl module manuals? |
* Sometimes (Mac OS X) it's 3pm, sometimes (OpenBSD, etc.) 3p. |
* Sometimes (Mac OS X) it's 3pm, sometimes (OpenBSD, etc.) 3p. |
Line 1010 command(struct state *st, const char *buf, size_t star |
|
Line 1013 command(struct state *st, const char *buf, size_t star |
|
static void |
static void |
verbatim(struct state *st, char *buf, size_t start, size_t end) |
verbatim(struct state *st, char *buf, size_t start, size_t end) |
{ |
{ |
size_t i, ift, ifo, ifa, ifc; |
size_t i, ift, ifo, ifa, ifc, inl; |
char *cp; |
char *cp; |
|
int nopen; |
|
|
if ( ! st->parsing || st->paused || start == end) |
if ( ! st->parsing || st->paused || start == end) |
return; |
return; |
|
|
|
|
/* Parse function declaration. */ |
/* Parse function declaration. */ |
ifo = ifa = ifc = 0; |
ifo = ifa = ifc = 0; |
for (ift = i; i < end && buf[i] != '\n'; i++) { |
inl = end; |
if (ifa) { |
nopen = 0; |
if (buf[i] == ')') |
for (ift = i; i < end; i++) { |
|
if (ifc) { |
|
if (buf[i] != '\n') |
|
continue; |
|
inl = i; |
|
break; |
|
} |
|
switch (buf[i]) { |
|
case ' ': |
|
if ( ! ifa) |
|
ifo = i; |
|
break; |
|
case '(': |
|
if (ifo) { |
|
nopen++; |
|
if ( ! ifa) |
|
ifa = i; |
|
} else |
|
i = end; |
|
break; |
|
case ')': |
|
switch (nopen) { |
|
case 0: |
|
i = end; |
|
break; |
|
case 1: |
ifc = i; |
ifc = i; |
} else if (ifo && buf[i] == '(') |
break; |
ifa = i; |
default: |
else if (buf[i] == ' ') |
nopen--; |
ifo = i; |
break; |
|
} |
|
break; |
|
default: |
|
break; |
|
} |
} |
} |
|
|
/* Encode function declaration. */ |
/* Encode function declaration. */ |
if (ifc) { |
if (ifc) { |
|
for (i = ifa; i < ifc; i++) |
|
if (buf[i] == '\n') |
|
buf[i] = ' '; |
buf[ifo++] = '\0'; |
buf[ifo++] = '\0'; |
printf(".Ft %s", buf + ift); |
printf(".Ft %s", buf + ift); |
if (buf[ifo] == '*') { |
if (buf[ifo] == '*') { |
|
|
putchar('\n'); |
putchar('\n'); |
buf[ifa++] = '\0'; |
buf[ifa++] = '\0'; |
printf(".Fo %s\n", buf + ifo); |
printf(".Fo %s\n", buf + ifo); |
|
dict_put(buf + ifo, MDOC_Fo); |
buf[ifc++] = '\0'; |
buf[ifc++] = '\0'; |
for (;;) { |
for (;;) { |
cp = strchr(buf + ifa, ','); |
cp = strchr(buf + ifa, ','); |
if (cp != NULL) |
if (cp != NULL) |
*cp = '\0'; |
*cp++ = '\0'; |
printf(".Fa \"%s\"\n", buf + ifa); |
printf(".Fa \"%s\"\n", buf + ifa); |
if (cp == NULL) |
if (cp == NULL) |
break; |
break; |
ifa = cp - buf + 1; |
while (*cp == ' ') |
|
cp++; |
|
ifa = cp - buf; |
} |
} |
puts(".Fc"); |
puts(".Fc"); |
if (buf[ifc] == ';') |
if (buf[ifc] == ';') |
ifc++; |
ifc++; |
if (ifc < i) { |
if (ifc < inl) { |
buf[i] = '\0'; |
buf[inl] = '\0'; |
puts(buf + ifc); |
puts(buf + ifc); |
} |
} |
start = i + 1; |
start = inl + 1; |
if (start < end) |
if (start < end) |
goto again; |
goto again; |
return; |
return; |
Line 1297 ordinary(struct state *st, const char *buf, size_t sta |
|
Line 1337 ordinary(struct state *st, const char *buf, size_t sta |
|
*/ |
*/ |
|
|
last = buf[start++]; |
last = buf[start++]; |
if (' ' == last) { |
if (' ' != last) { |
outbuf_flush(st); |
|
putchar(' '); |
|
st->wantws = 1; |
|
} else |
|
outbuf_addchar(st); |
outbuf_addchar(st); |
|
continue; |
|
} |
|
|
|
if ( ! strcmp(st->outbuf + st->outbuflen - 2, "()") && |
|
dict_get(st->outbuf, st->outbuflen - 2) == |
|
MDOC_Fo) { |
|
st->outbuflen -= 2; |
|
st->outbuf[st->outbuflen] = '\0'; |
|
mdoc_newln(st); |
|
fputs(".Fn ", stdout); |
|
outbuf_flush(st); |
|
mdoc_newln(st); |
|
continue; |
|
} |
|
|
|
outbuf_flush(st); |
|
putchar(' '); |
|
st->wantws = 1; |
} |
} |
|
|
if (start < end - 1 && '<' == buf[start + 1] && |
if (start < end - 1 && '<' == buf[start + 1] && |
Line 1468 dofile(const struct args *args, const char *fname, |
|
Line 1522 dofile(const struct args *args, const char *fname, |
|
|
|
free(title); |
free(title); |
|
|
|
dict_init(); |
memset(&st, 0, sizeof(struct state)); |
memset(&st, 0, sizeof(struct state)); |
st.oust = OUST_NL; |
st.oust = OUST_NL; |
st.wantws = 1; |
st.wantws = 1; |
Line 1495 dofile(const struct args *args, const char *fname, |
|
Line 1550 dofile(const struct args *args, const char *fname, |
|
dopar(&st, buf, cur, end); |
dopar(&st, buf, cur, end); |
cur = sup; |
cur = sup; |
} |
} |
|
dict_destroy(); |
} |
} |
|
|
/* |
/* |