version 1.35, 2020/04/18 20:40:10 |
version 1.38, 2023/11/24 05:02:18 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2015,2016,2018,2019,2020 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2015, 2016, 2018, 2019, 2020, 2022, 2023 |
|
* 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 <limits.h> |
#include <limits.h> |
#include <stddef.h> |
#include <stddef.h> |
#include <stdint.h> |
#include <stdint.h> |
|
#include <stdio.h> |
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "mandoc_aux.h" |
#include "mandoc_aux.h" |
#include "mandoc_ohash.h" |
#include "mandoc_ohash.h" |
|
#include "mandoc.h" |
#include "roff.h" |
#include "roff.h" |
#include "mdoc.h" |
#include "mdoc.h" |
#include "roff_int.h" |
#include "roff_int.h" |
Line 43 struct tag_entry { |
|
Line 46 struct tag_entry { |
|
char s[]; |
char s[]; |
}; |
}; |
|
|
|
static void tag_move_href(struct roff_man *, |
|
struct roff_node *, const char *); |
static void tag_move_id(struct roff_node *); |
static void tag_move_id(struct roff_node *); |
|
|
static struct ohash tag_data; |
static struct ohash tag_data; |
|
|
|
|
/* |
/* |
* Set a node where a term is defined, |
* Set a node where a term is defined, |
* unless it is already defined at a lower priority. |
* unless the term is already defined at a lower priority. |
*/ |
*/ |
void |
void |
tag_put(const char *s, int prio, struct roff_node *n) |
tag_put(const char *s, int prio, struct roff_node *n) |
{ |
{ |
struct tag_entry *entry; |
struct tag_entry *entry; |
struct roff_node *nold; |
struct roff_node *nold; |
const char *se; |
const char *se, *src; |
|
char *cpy; |
size_t len; |
size_t len; |
unsigned int slot; |
unsigned int slot; |
|
int changed; |
|
|
assert(prio <= TAG_FALLBACK); |
assert(prio <= TAG_FALLBACK); |
|
|
|
/* |
|
* If the node is already tagged, the existing tag is |
|
* explicit and we are now about to add an implicit tag. |
|
* Don't do that; just skip implicit tagging if the author |
|
* specified an explicit tag. |
|
*/ |
|
|
|
if (n->flags & NODE_ID) |
|
return; |
|
|
|
/* Determine the implicit tag. */ |
|
|
|
changed = 1; |
if (s == NULL) { |
if (s == NULL) { |
if (n->child == NULL || n->child->type != ROFFT_TEXT) |
if (n->child == NULL || n->child->type != ROFFT_TEXT) |
return; |
return; |
Line 107 tag_put(const char *s, int prio, struct roff_node *n) |
|
Line 127 tag_put(const char *s, int prio, struct roff_node *n) |
|
s += 2; |
s += 2; |
break; |
break; |
default: |
default: |
break; |
return; |
} |
} |
break; |
break; |
default: |
default: |
|
changed = 0; |
break; |
break; |
} |
} |
} |
} |
|
|
/* |
/* |
|
* Translate \- and ASCII_HYPH to plain '-'. |
* Skip whitespace and escapes and whatever follows, |
* Skip whitespace and escapes and whatever follows, |
* and if there is any, downgrade the priority. |
* and if there is any, downgrade the priority. |
*/ |
*/ |
|
|
len = strcspn(s, " \t\\"); |
cpy = mandoc_malloc(strlen(s) + 1); |
|
for (src = s, len = 0; *src != '\0'; src++, len++) { |
|
switch (*src) { |
|
case '\t': |
|
case ' ': |
|
changed = 1; |
|
break; |
|
case ASCII_HYPH: |
|
cpy[len] = '-'; |
|
changed = 1; |
|
continue; |
|
case '\\': |
|
if (src[1] != '-') |
|
break; |
|
src++; |
|
changed = 1; |
|
/* FALLTHROUGH */ |
|
default: |
|
cpy[len] = *src; |
|
continue; |
|
} |
|
break; |
|
} |
if (len == 0) |
if (len == 0) |
return; |
goto out; |
|
cpy[len] = '\0'; |
|
|
se = s + len; |
if (*src != '\0' && prio < TAG_WEAK) |
if (*se != '\0' && prio < TAG_WEAK) |
|
prio = TAG_WEAK; |
prio = TAG_WEAK; |
|
|
|
s = cpy; |
|
se = cpy + len; |
slot = ohash_qlookupi(&tag_data, s, &se); |
slot = ohash_qlookupi(&tag_data, s, &se); |
entry = ohash_find(&tag_data, slot); |
entry = ohash_find(&tag_data, slot); |
|
|
Line 135 tag_put(const char *s, int prio, struct roff_node *n) |
|
Line 181 tag_put(const char *s, int prio, struct roff_node *n) |
|
|
|
if (entry == NULL) { |
if (entry == NULL) { |
entry = mandoc_malloc(sizeof(*entry) + len + 1); |
entry = mandoc_malloc(sizeof(*entry) + len + 1); |
memcpy(entry->s, s, len); |
memcpy(entry->s, s, len + 1); |
entry->s[len] = '\0'; |
|
entry->nodes = NULL; |
entry->nodes = NULL; |
entry->maxnodes = entry->nnodes = 0; |
entry->maxnodes = entry->nnodes = 0; |
ohash_insert(&tag_data, slot, entry); |
ohash_insert(&tag_data, slot, entry); |
Line 148 tag_put(const char *s, int prio, struct roff_node *n) |
|
Line 193 tag_put(const char *s, int prio, struct roff_node *n) |
|
*/ |
*/ |
|
|
else if (entry->prio < prio) |
else if (entry->prio < prio) |
return; |
goto out; |
|
|
/* |
/* |
* If the existing entry is worse, clear it. |
* If the existing entry is worse, clear it. |
Line 165 tag_put(const char *s, int prio, struct roff_node *n) |
|
Line 210 tag_put(const char *s, int prio, struct roff_node *n) |
|
} |
} |
if (prio == TAG_FALLBACK) { |
if (prio == TAG_FALLBACK) { |
entry->prio = TAG_DELETE; |
entry->prio = TAG_DELETE; |
return; |
goto out; |
} |
} |
} |
} |
|
|
Line 179 tag_put(const char *s, int prio, struct roff_node *n) |
|
Line 224 tag_put(const char *s, int prio, struct roff_node *n) |
|
entry->nodes[entry->nnodes++] = n; |
entry->nodes[entry->nnodes++] = n; |
entry->prio = prio; |
entry->prio = prio; |
n->flags |= NODE_ID; |
n->flags |= NODE_ID; |
if (n->child == NULL || n->child->string != s || *se != '\0') { |
if (changed) { |
assert(n->tag == NULL); |
assert(n->tag == NULL); |
n->tag = mandoc_strndup(s, len); |
n->tag = mandoc_strndup(s, len); |
} |
} |
|
|
|
out: |
|
free(cpy); |
} |
} |
|
|
int |
int |
Line 254 tag_move_id(struct roff_node *n) |
|
Line 302 tag_move_id(struct roff_node *n) |
|
} |
} |
|
|
/* |
/* |
|
* When a paragraph is tagged and starts with text, |
|
* move the permalink to the first few words. |
|
*/ |
|
static void |
|
tag_move_href(struct roff_man *man, struct roff_node *n, const char *tag) |
|
{ |
|
char *cp; |
|
|
|
if (n == NULL || n->type != ROFFT_TEXT || |
|
*n->string == '\0' || *n->string == ' ') |
|
return; |
|
|
|
cp = n->string; |
|
while (cp != NULL && cp - n->string < 5) |
|
cp = strchr(cp + 1, ' '); |
|
|
|
/* If the first text node is longer, split it. */ |
|
|
|
if (cp != NULL && cp[1] != '\0') { |
|
man->last = n; |
|
man->next = ROFF_NEXT_SIBLING; |
|
roff_word_alloc(man, n->line, |
|
n->pos + (cp - n->string), cp + 1); |
|
man->last->flags = n->flags & ~NODE_LINE; |
|
*cp = '\0'; |
|
} |
|
|
|
assert(n->tag == NULL); |
|
n->tag = mandoc_strdup(tag); |
|
n->flags |= NODE_HREF; |
|
} |
|
|
|
/* |
* When all tags have been set, decide where to put |
* When all tags have been set, decide where to put |
* the associated permalinks, and maybe move some tags |
* the associated permalinks, and maybe move some tags |
* to the beginning of the respective paragraphs. |
* to the beginning of the respective paragraphs. |
Line 261 tag_move_id(struct roff_node *n) |
|
Line 342 tag_move_id(struct roff_node *n) |
|
void |
void |
tag_postprocess(struct roff_man *man, struct roff_node *n) |
tag_postprocess(struct roff_man *man, struct roff_node *n) |
{ |
{ |
struct roff_node *nn; |
|
char *cp; |
|
|
|
if (n->flags & NODE_ID) { |
if (n->flags & NODE_ID) { |
switch (n->tok) { |
switch (n->tok) { |
case MDOC_Pp: |
case MDOC_Pp: |
nn = n->next; |
tag_move_href(man, n->next, n->tag); |
if (nn == NULL || nn->type != ROFFT_TEXT || |
|
*nn->string == '\0' || *nn->string == ' ') |
|
break; |
|
/* Use the first few letters for the permalink. */ |
|
cp = nn->string; |
|
while (cp != NULL && cp - nn->string < 5) |
|
cp = strchr(cp + 1, ' '); |
|
if (cp != NULL && cp[1] != '\0') { |
|
/* Split a longer text node. */ |
|
man->last = nn; |
|
man->next = ROFF_NEXT_SIBLING; |
|
roff_word_alloc(man, nn->line, |
|
nn->pos + (cp - nn->string), cp + 1); |
|
man->last->flags = nn->flags; |
|
*cp = '\0'; |
|
} |
|
assert(nn->tag == NULL); |
|
nn->tag = mandoc_strdup(n->tag); |
|
nn->flags |= NODE_HREF; |
|
break; |
break; |
case MDOC_Bd: |
case MDOC_Bd: |
|
case MDOC_D1: |
|
case MDOC_Dl: |
|
tag_move_href(man, n->child, n->tag); |
|
break; |
case MDOC_Bl: |
case MDOC_Bl: |
/* XXX No permalink for now. */ |
/* XXX No permalink for now. */ |
break; |
break; |