예제 #1
0
/* write an header index
 */
int
mkd_toc(Document *p, char **doc)
{
    Paragraph *tp, *srcp;
    int last_hnumber = 0;
    Cstring res;
    
    CREATE(res);
    RESERVE(res, 100);

    *doc = 0;

    if ( !(p && p->ctx) ) return -1;
    if ( ! (p->ctx->flags & TOC) ) return 0;

    for ( tp = p->code; tp ; tp = tp->next ) {
	if ( tp->typ == SOURCE ) {
	    for ( srcp = tp->down; srcp; srcp = srcp->next ) {
		if ( srcp->typ == HDR && srcp->text ) {
	    
		    if ( last_hnumber == srcp->hnumber )
			Csprintf(&res,  "%*s</li>\n", srcp->hnumber, "");
		    else while ( last_hnumber > srcp->hnumber ) {
			Csprintf(&res, "%*s</li>\n%*s</ul>\n",
					 last_hnumber, "",
					 last_hnumber-1,"");
			--last_hnumber;
		    }

		    while ( srcp->hnumber > last_hnumber ) {
			Csprintf(&res, "\n%*s<ul>\n", srcp->hnumber, "");
			++last_hnumber;
		    }
		    Csprintf(&res, "%*s<li><a href=\"#", srcp->hnumber, "");
		    mkd_string_to_anchor(T(srcp->text->text), S(srcp->text->text), (void (*)(int,void*))Csputc, &res);
		    Csprintf(&res, "\">");
		    Csreparse(&res, T(srcp->text->text), S(srcp->text->text), 0);
		    Csprintf(&res, "</a>");
		}
	    }
        }
    }

    while ( last_hnumber > 0 ) {
	Csprintf(&res, "%*s</li>\n%*s</ul>\n",
			last_hnumber, "", last_hnumber, "");
	--last_hnumber;
    }
			/* HACK ALERT! HACK ALERT! HACK ALERT! */
    *doc = T(res);	/* we know that a T(Cstring) is a character pointer */
			/* so we can simply pick it up and carry it away, */
    return S(res);	/* leaving the husk of the Ctring on the stack */
			/* END HACK ALERT */
}
예제 #2
0
/* print a header block
 */
static void
printheader(Paragraph *pp, MMIOT *f)
{
    Qprintf(f, "<h%d", pp->hnumber);
    if ( f->flags & TOC ) {
	Qprintf(f, " id=\"", pp->hnumber);
	mkd_string_to_anchor(T(pp->text->text), S(pp->text->text), Qchar, f);
	Qchar('"', f);
    }
    Qchar('>', f);
    push(T(pp->text->text), S(pp->text->text), f);
    text(f);
    Qprintf(f, "</h%d>", pp->hnumber);
}
예제 #3
0
파일: generate.c 프로젝트: Orc/discount
/* Qanchor() prints out a suitable-for-id-tag version of a string
 */
static void
Qanchor(struct line *p, MMIOT *f)
{
    mkd_string_to_anchor(T(p->text), S(p->text),
			 (mkd_sta_function_t)Qchar, f, 1, f);
}