To write the Library Card element (Cd) in the index.
§1. The Library Card is part of the Contents index, and is intended as a natural way to present bibliographic data to the user. In effect, it's a simplified form of the iFiction record, without the XML overhead.
Note that the full version number is only listed on the Card if it is more than just a major version number (i.e., a non-negative integer): if it is something like "6", then it must be exactly the same as the release number, and there is no need to list both.
void CardElement::render(OUTPUT_STREAM, index_session *session) { inter_tree *I = Indexing::get_tree(session); inter_package *pack = InterPackage::from_URL(I, I"/main/completion/bibliographic"); HTML_OPEN("p"); IndexUtilities::anchor(OUT, I"LCARD"); HTML::begin_html_table_bg(OUT, NULL, FALSE, 0, 3, 3, 0, 0, I"bg_images/indexcard.png"); CardElement::Library_Card_entry(OUT, "Story title", pack, I"^title", I"Untitled"); CardElement::Library_Card_entry(OUT, "Story author", pack, I"^author", I"Anonymous"); CardElement::Library_Card_entry(OUT, "Story headline", pack, I"^headline", I"An Interactive Fiction"); CardElement::Library_Card_entry(OUT, "Story genre", pack, I"^genre", I"Fiction"); int E = (int) Metadata::read_optional_numeric(pack, I"^episode"); text_stream *series_name = Metadata::optional_textual(pack, I"^series"); if (series_name) { TEMPORARY_TEXT(episode_text) WRITE_TO(episode_text, "%d of %S", E, series_name); CardElement::Library_Card_entry(OUT, "Episode", pack, NULL, episode_text); DISCARD_TEXT(episode_text) } CardElement::Library_Card_entry(OUT, "Release number", pack, I"^release", I"1"); text_stream *version_number = Metadata::optional_textual(pack, I"^version"); if (version_number) { TEMPORARY_TEXT(version_text) WRITE_TO(version_text, "%S", version_number); if ((Str::includes_character(version_text, '.')) || (Str::includes_character(version_text, '+')) || (Str::includes_character(version_text, '-'))) CardElement::Library_Card_entry(OUT, "Full version number", pack, NULL, version_text); DISCARD_TEXT(version_text) } CardElement::Library_Card_entry(OUT, "Story creation year", pack, I"^year", I"(This year)"); CardElement::Library_Card_entry(OUT, "Language of play", pack, I"^language", I"English"); CardElement::Library_Card_entry(OUT, "IFID number", pack, I"^IFID", NULL); CardElement::Library_Card_entry(OUT, "Story description", pack, I"^description", I"None"); if (Metadata::optional_textual(pack, I"^licence")) CardElement::Library_Card_entry(OUT, "Licence", pack, I"^licence", I"Unspecified"); if (Metadata::optional_textual(pack, I"^copyright")) CardElement::Library_Card_entry(OUT, "Copyright", pack, I"^copyright", I"Unspecified"); if (Metadata::optional_textual(pack, I"^origin")) CardElement::Library_Card_entry(OUT, "Origin URL", pack, I"^origin", I"Unspecified"); if (Metadata::optional_textual(pack, I"^rights")) CardElement::Library_Card_entry(OUT, "Rights history", pack, I"^rights", I"Unspecified"); HTML::end_html_table(OUT); HTML_CLOSE("p"); }
void CardElement::Library_Card_entry(OUTPUT_STREAM, char *field, inter_package *pack, text_stream *key, text_stream *t) { HTML::first_html_column_nowrap(OUT, 0, NULL); if (Str::eq(key, I"^title")) { HTML::begin_span(OUT, I"librarycardtitle"); } else { HTML::begin_span(OUT, I"librarycardother"); } HTML::begin_span(OUT, I"typewritten"); WRITE("%s", field); HTML::end_span(OUT); HTML::end_span(OUT); HTML::next_html_column(OUT, 0); if (Str::eq(key, I"^title")) { HTML::begin_span(OUT, I"librarycardtitle"); } else { HTML::begin_span(OUT, I"librarycardother"); } HTML::begin_span(OUT, I"typewritten"); HTML_OPEN("b"); CardElement::index_variable(OUT, pack, key, t); HTML_CLOSE("b"); HTML::end_span(OUT); HTML::end_span(OUT); HTML::end_html_row(OUT); }
§3. And both of those features use:
void CardElement::index_variable(OUTPUT_STREAM, inter_package *pack, text_stream *key, text_stream *t) { if (key) { if (Str::eq(key, I"^release")) { int R = (int) Metadata::read_optional_numeric(pack, key); if (R > 0) { WRITE("%d", R); return; } } else { text_stream *matter = Metadata::optional_textual(pack, key); if (matter) { WRITE("%S", matter); return; } } } WRITE("%S", t); }