version 1.138, 2019/04/24 18:38:02 |
version 1.141, 2019/04/28 17:10:06 |
|
|
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
|
#include "xmalloc.h" |
#include "node.h" |
#include "node.h" |
#include "macro.h" |
#include "macro.h" |
#include "format.h" |
#include "format.h" |
Line 728 pnode_printolink(struct format *f, struct pnode *n) |
|
Line 729 pnode_printolink(struct format *f, struct pnode *n) |
|
static void |
static void |
pnode_printprologue(struct format *f, struct pnode *root) |
pnode_printprologue(struct format *f, struct pnode *root) |
{ |
{ |
struct pnode *date, *refmeta, *name, *vol, *descr, *nc, *nn; |
struct pnode *name, *nc; |
const char *sname; |
|
|
|
/* Collect information. */ |
nc = TAILQ_FIRST(&root->childq); |
|
assert(nc->node == NODE_DATE); |
|
macro_nodeline(f, "Dd", nc, 0); |
|
pnode_unlink(nc); |
|
|
if ((date = pnode_takefirst(root, NODE_PUBDATE)) == NULL) |
|
date = pnode_takefirst(root, NODE_DATE); |
|
|
|
name = vol = NULL; |
|
if ((refmeta = pnode_findfirst(root, NODE_REFMETA)) != NULL) { |
|
TAILQ_FOREACH_SAFE(nc, &refmeta->childq, child, nn) { |
|
switch (nc->node) { |
|
case NODE_REFENTRYTITLE: |
|
name = nc; |
|
break; |
|
case NODE_MANVOLNUM: |
|
vol = nc; |
|
break; |
|
default: |
|
continue; |
|
} |
|
TAILQ_REMOVE(&refmeta->childq, nc, child); |
|
} |
|
} |
|
|
|
if (pnode_findfirst(root, NODE_REFNAMEDIV) == NULL && |
|
((nc = pnode_findfirst(root, NODE_BOOKINFO)) != NULL || |
|
(nc = pnode_findfirst(root, NODE_REFENTRYINFO)) != NULL)) |
|
descr = pnode_takefirst(nc, NODE_TITLE); |
|
else |
|
descr = NULL; |
|
|
|
/* Print prologue. */ |
|
|
|
if (date == NULL) |
|
macro_line(f, "Dd $Mdocdate" "$"); |
|
else |
|
macro_nodeline(f, "Dd", date, 0); |
|
|
|
macro_open(f, "Dt"); |
macro_open(f, "Dt"); |
if (name == NULL) { |
name = TAILQ_FIRST(&root->childq); |
sname = pnode_getattr_raw(root, ATTRKEY_ID, "UNKNOWN"); |
assert(name->node == NODE_REFENTRYTITLE); |
macro_addarg(f, sname, ARG_SPACE | ARG_SINGLE | ARG_UPPER); |
macro_addnode(f, name, ARG_SPACE | ARG_SINGLE | ARG_UPPER); |
} else |
TAILQ_REMOVE(&root->childq, name, child); |
macro_addnode(f, name, ARG_SPACE | ARG_SINGLE | ARG_UPPER); |
name->parent = NULL; |
if (vol == NULL) |
nc = TAILQ_FIRST(&root->childq); |
macro_addarg(f, "1", ARG_SPACE); |
assert (nc->node == NODE_MANVOLNUM); |
else |
macro_addnode(f, nc, ARG_SPACE | ARG_SINGLE); |
macro_addnode(f, vol, ARG_SPACE | ARG_SINGLE); |
pnode_unlink(nc); |
|
|
macro_line(f, "Os"); |
macro_line(f, "Os"); |
|
|
if (descr != NULL) { |
nc = TAILQ_FIRST(&root->childq); |
|
if (nc != NULL && nc->node == NODE_TITLE) { |
macro_line(f, "Sh NAME"); |
macro_line(f, "Sh NAME"); |
if (name == NULL) |
macro_nodeline(f, "Nm", name, ARG_SINGLE); |
macro_argline(f, "Nm", sname); |
macro_nodeline(f, "Nd", nc, 0); |
else |
pnode_unlink(nc); |
macro_nodeline(f, "Nm", name, ARG_SINGLE); |
|
macro_nodeline(f, "Nd", descr, 0); |
|
} |
} |
|
|
/* Clean up. */ |
|
|
|
pnode_unlink(date); |
|
pnode_unlink(name); |
pnode_unlink(name); |
pnode_unlink(vol); |
|
pnode_unlink(descr); |
|
f->parastate = PARA_HAVE; |
f->parastate = PARA_HAVE; |
} |
} |
|
|
Line 888 pnode_printrefentry(struct format *f, struct pnode *n) |
|
Line 850 pnode_printrefentry(struct format *f, struct pnode *n) |
|
*/ |
*/ |
|
|
if (match == NULL) { |
if (match == NULL) { |
if ((match = calloc(1, sizeof(*match))) == NULL) { |
match = xcalloc(1, sizeof(*match)); |
perror(NULL); |
|
exit(1); |
|
} |
|
match->node = NODE_SECTION; |
match->node = NODE_SECTION; |
match->flags |= NFLAG_SPC; |
match->flags |= NFLAG_SPC; |
match->parent = n; |
match->parent = n; |
TAILQ_INIT(&match->childq); |
TAILQ_INIT(&match->childq); |
TAILQ_INIT(&match->attrq); |
TAILQ_INIT(&match->attrq); |
if ((nc = pnode_alloc(match)) == NULL) { |
nc = pnode_alloc(match); |
perror(NULL); |
|
exit(1); |
|
} |
|
nc->node = NODE_TITLE; |
nc->node = NODE_TITLE; |
nc->flags |= NFLAG_SPC; |
nc->flags |= NFLAG_SPC; |
if ((nc = pnode_alloc(nc)) == NULL) { |
nc = pnode_alloc_text(nc, "AUTHORS"); |
perror(NULL); |
|
exit(1); |
|
} |
|
nc->node = NODE_TEXT; |
|
if ((nc->b = strdup("AUTHORS")) == NULL) { |
|
perror(NULL); |
|
exit(1); |
|
} |
|
nc->flags |= NFLAG_SPC; |
nc->flags |= NFLAG_SPC; |
if (later == NULL) |
if (later == NULL) |
TAILQ_INSERT_TAIL(&n->childq, match, child); |
TAILQ_INSERT_TAIL(&n->childq, match, child); |