%s --%s-- Level %d
\n",objsav,ptr,maxlevel); free(ptr); /* No dirlink if we have no directory server */ dirlink = dirlink && (*dirserver_w_dir != '\0'); /* No doclink if we have no infoserver */ doclink = doclink && (*infoserver_extURL != '\0'); /* Put out toplinks. */ /* If there are no buttons corresponding to the links, all */ /* spec'd links go on 1 line. Separate these text links with */ /* vertical bars. */ /* If there ARE buttons, they go on their "correct */ /* lines; that is, if any of doclink, dirlink, or plotlink */ /* are spec'd, they go on line 1; if any of lev0link, lev1link, */ /* or flatlink are spec'd, they go on line 2 (if there was a */ /* line 1). */ /* A mixture of text links and button links are allowed. As */ /* for formatting, I tried... */ /* */ /* Logic: */ /* 1) Put out vertical bar, if needed */ /* 2) Open the anchor with "comment, below) */ /* In order to find out about next line's buttons, we have to */ /* repeat a whole bunch of logic. Makes changing line structure, */ /* etc, a drag... */ if (any_buttons_on_line_1) { any_buttons_on_line_2 = (flatlink && (gifs[FLAT_GIF] != NULL)); if ( ! any_buttons_on_line_2 ) if (lev0link) if (maxlevel == 0) any_buttons_on_line_2 = (gifs[NOLEVEL0_GIF] != NULL); else any_buttons_on_line_2 = (gifs[LEVEL0_GIF] != NULL); if ( ! any_buttons_on_line_2 ) if (levnlink) if (maxlevel == maxobjectlevel) any_buttons_on_line_2 = (gifs[NOLEVELN_GIF] != NULL); else any_buttons_on_line_2 = (gifs[LEVELN_GIF] != NULL); if (any_buttons_on_line_2) { printf("
");
print_vert_bar (NULL,TRUE);
}
}
if (lev0link) {
if (maxlevel == 0) {
ptr = " - At level 0 - ";
ptr1 = gifs[NOLEVEL0_GIF];
print_vert_bar (ptr1,FALSE);
printf("");
} else {
ptr = "Level 0";
ptr1 = gifs[LEVEL0_GIF];
print_vert_bar (ptr1,FALSE);
/* Level 0 button gets query string w/o selections/projections */
/* I still don't know why it doesn't keep any "original" se- */
/* lections/projections, but we certainly don't want any */
/* "clicked-on" selections. See comments up top for dis- */
/* cussion of preservation of inner's args */
/* QUERY_STRING_no_selections may be \0; has its own ? */
/* if needed */
printf ("",
JGOFS_DATA_CGI_SPEC, level0_PATH_INFO, QUERY_STRING_no_selections);
free(QUERY_STRING_no_selections);
}
tag_toplink(ptr, ptr1);
}
if (levnlink) {
if (maxlevel < maxobjectlevel) {
ptr = next_level;
ptr1 = gifs[LEVELN_GIF];
print_vert_bar (ptr1,FALSE);
printf ("",
JGOFS_DATA_CGI_SPEC, nextlevel_PATH_INFO, parsav);
sprintf(next_level,"Level %d (of %d)",maxlevel+1,maxobjectlevel);
} else {
ptr = " - At last level - ";
ptr1 = gifs[NOLEVELN_GIF];
print_vert_bar (ptr1,FALSE);
printf("");
}
tag_toplink(ptr, ptr1);
}
if (flatlink) {
print_vert_bar (gifs[FLAT_GIF],FALSE);
printf ("",
JGOFS_DATA_CGI_SPEC, flat_PATH_INFO, parsav);
tag_toplink("Flat list", gifs[FLAT_GIF]);
}
/* If we are displaying buttons, " comment, above) */
if (any_buttons_on_line_1 || any_buttons_on_line_2) printf("
" (whatever that is) */
/* I wonder if this should also happen in a NOTOPLINKS environment */
/* (See
");
printf("\n");
printf("\n");
print_comments_html();
/* look at attributes to create array of widths - see ioattrout_ */
for(j=0; j%*s",
JGOFS_DATA_CGI_SPEC, nextlevel_PATH_INFO,
parsav, comma, outnames+j*VARNAMEBUFSIZE, equality_test, ptr,
tmp,
field_width-len_datum+2, " "
);
free (ptr);
}
else printf("%-*s ",field_width,tmp);
}
printf("\n");
return;
}
void print_full_list_link (s)
char *s;
{
#define BREVLINKINDENT 16
printf ("%*s%s\n",BREVLINKINDENT," ",s);
printf ("%*sFull data listing\n",
BREVLINKINDENT, " ", JGOFS_DATA_CGI_SPEC, full_list_PATH_INFO, parsav);
return;
}
Logical outputhtml(firsttime)
Logical firsttime;
{
/* linecount for abbreviated listing feature */
static int linecount;
int i,j;
/* minlevel != maxlevel for first record of each maxlevel file */
/* in a multilevel display */
if (minlevel