2 * Copyright (C) 1995-2005, Index Data ApS
3 * See the file LICENSE for details.
5 * $Id: opacdisp.c,v 1.5 2005-02-25 17:05:09 adam Exp $
9 * \brief Implements OPAC record display
17 #include <yaz/proto.h>
18 #include <yaz/marcdisp.h>
20 static void opac_element_str(WRBUF wrbuf, int l, const char *elem,
26 wrbuf_puts(wrbuf, " ");
27 wrbuf_puts(wrbuf, "<");
28 wrbuf_puts(wrbuf, elem);
29 wrbuf_puts(wrbuf, ">");
30 wrbuf_xmlputs(wrbuf, data);
31 wrbuf_puts(wrbuf, "</");
32 wrbuf_puts(wrbuf, elem);
33 wrbuf_puts(wrbuf, ">\n");
37 static void opac_element_bool(WRBUF wrbuf, int l, const char *elem, int *data)
42 wrbuf_puts(wrbuf, " ");
43 wrbuf_puts(wrbuf, "<");
44 wrbuf_puts(wrbuf, elem);
46 wrbuf_puts(wrbuf, " value=\"1\"");
48 wrbuf_puts(wrbuf, " value=\"0\"");
49 wrbuf_puts(wrbuf, "/>\n");
53 void yaz_opac_decode_wrbuf(yaz_marc_t mt, Z_OPACRecord *r, WRBUF wrbuf)
57 wrbuf_puts(wrbuf, "<holdings>\n");
59 if (r->bibliographicRecord)
61 Z_External *ext = r->bibliographicRecord;
63 wrbuf_puts (wrbuf, " <bibliographicRecord>\n");
64 if (ext->which == Z_External_octet)
65 yaz_marc_decode_wrbuf(mt, ext->u.octet_aligned->buf,
66 ext->u.octet_aligned->len, wrbuf);
67 wrbuf_puts (wrbuf, " </bibliographicRecord>\n");
69 for (i = 0; i < r->num_holdingsData; i++)
71 Z_HoldingsRecord *h = r->holdingsData[i];
72 wrbuf_puts(wrbuf, " <holding>\n");
74 if (h->which == Z_HoldingsRecord_marcHoldingsRecord)
76 Z_External *ext = h->u.marcHoldingsRecord;
78 wrbuf_puts (wrbuf, " <marcHoldingsRecord>\n");
79 if (ext->which == Z_External_octet)
80 yaz_marc_decode_wrbuf(mt, ext->u.octet_aligned->buf,
81 ext->u.octet_aligned->len, wrbuf);
82 wrbuf_puts (wrbuf, " </marcHoldingsRecord>\n");
84 else if (h->which == Z_HoldingsRecord_holdingsAndCirc)
88 Z_HoldingsAndCircData *d = h->u.holdingsAndCirc;
90 opac_element_str(wrbuf, 2, "typeOfRecord", d->typeOfRecord);
91 opac_element_str(wrbuf, 2, "encodingLevel", d->encodingLevel);
92 opac_element_str(wrbuf, 2, "format", d->format);
93 opac_element_str(wrbuf, 2, "receiptAcqStatus", d->receiptAcqStatus);
94 opac_element_str (wrbuf, 2, "generalRetention", d->generalRetention);
95 opac_element_str (wrbuf, 2, "completeness", d->completeness);
96 opac_element_str (wrbuf, 2, "dateOfReport", d->dateOfReport);
97 opac_element_str (wrbuf, 2, "nucCode", d->nucCode);
98 opac_element_str (wrbuf, 2, "localLocation", d->localLocation);
99 opac_element_str (wrbuf, 2, "shelvingLocation", d->shelvingLocation);
100 opac_element_str (wrbuf, 2, "callNumber", d->callNumber);
101 opac_element_str (wrbuf, 2, "shelvingData", d->shelvingData);
103 opac_element_str (wrbuf, 2, "copyNumber", d->copyNumber);
104 opac_element_str (wrbuf, 2, "publicNote", d->publicNote);
105 opac_element_str (wrbuf, 2, "reproductionNote", d->reproductionNote);
106 opac_element_str (wrbuf, 2, "termsUseRepro", d->termsUseRepro);
107 opac_element_str (wrbuf, 2, "enumAndChron", d->enumAndChron);
110 wrbuf_puts (wrbuf, " <volumes>\n");
111 for (j = 0; j<d->num_volumes; j++)
113 wrbuf_puts (wrbuf, " <volume>\n");
114 opac_element_str (wrbuf, 4, "enumeration",
115 d->volumes[j]->enumeration);
116 opac_element_str (wrbuf, 4, "chronology",
117 d->volumes[j]->chronology);
118 opac_element_str (wrbuf, 4, "enumAndChron",
119 d->volumes[j]->enumAndChron);
120 wrbuf_puts (wrbuf, " </volume>\n");
122 wrbuf_puts (wrbuf, " </volumes>\n");
124 if (d->num_circulationData)
126 wrbuf_puts (wrbuf, " <circulations>\n");
127 for (j = 0; j<d->num_circulationData; j++)
129 wrbuf_puts (wrbuf," <circulation>\n");
130 opac_element_bool (wrbuf, 4, "availableNow",
131 d->circulationData[j]->availableNow);
132 opac_element_str (wrbuf, 4, "availabiltyDate",
133 d->circulationData[j]->availablityDate);
134 opac_element_str (wrbuf, 4, "availableThru",
135 d->circulationData[j]->availableThru);
136 opac_element_str (wrbuf, 4, "restrictions",
137 d->circulationData[j]->restrictions);
138 opac_element_str (wrbuf, 4, "itemId",
139 d->circulationData[j]->itemId);
140 opac_element_bool (wrbuf, 4, "renewable",
141 d->circulationData[j]->renewable);
142 opac_element_bool (wrbuf, 4, "onHold",
143 d->circulationData[j]->onHold);
144 opac_element_str (wrbuf, 4, "enumAndChron",
145 d->circulationData[j]->enumAndChron);
146 opac_element_str (wrbuf, 4, "midspine",
147 d->circulationData[j]->midspine);
148 opac_element_str (wrbuf, 4, "temporaryLocation",
149 d->circulationData[j]->temporaryLocation);
150 wrbuf_puts (wrbuf, " </circulation>\n");
152 wrbuf_puts (wrbuf, " </circulations>\n");
155 wrbuf_puts(wrbuf, " </holding>\n");
157 wrbuf_puts(wrbuf, "</holdings>\n");
160 void yaz_display_OPAC(WRBUF wrbuf, Z_OPACRecord *opac_rec, int flags)
162 yaz_marc_t mt = yaz_marc_create();
164 yaz_marc_xml(mt, YAZ_MARC_MARCXML);
165 yaz_opac_decode_wrbuf(mt, opac_rec, wrbuf);
166 yaz_marc_destroy(mt);