blob: 0d1e6298acfae149956d6c70eb0f16f6bee9b1df [file] [log] [blame]
Marc Kupietzab0a7332024-04-26 13:25:16 +02001#!/usr/bin/env bash
2TESTDIR=$(dirname $0)
3ASSERTSH=${TESTDIR}/assert.sh
4set -e
5. ${ASSERTSH}
6
7TEXTS=6
8I5_FILE=target/dnb18.i5.xml
9if [ ! -f "$I5_FILE" ]; then
10 log_failure "File $I5_FILE does not exist"
11 exit 1
12fi
13
14
15observed=$(xmlstarlet sel --net -t -v "count(//idsText)" $I5_FILE)
16
17if $(assert_eq "$observed" "$TEXTS"); then
18 log_success "$I5_FILE contains $TEXTS idsText elements"
19else
Marc Kupietz41c42382024-04-26 17:02:53 +020020 log_failure "$I5_FILE does not contain $TEXTS idsText elements, but: $observed"
Marc Kupietzab0a7332024-04-26 13:25:16 +020021fi
22
23
24observed=$(xmlstarlet sel --net -t -v "count(/idsCorpus/idsDoc/idsText/idsHeader/fileDesc/sourceDesc/biblStruct/monogr/h.author[normalize-space(.)])" $I5_FILE)
25if $(assert_eq "$observed" "$TEXTS"); then
26 log_success "$I5_FILE contains $TEXTS non-empty h.author elements"
27else
Marc Kupietz41c42382024-04-26 17:02:53 +020028 log_failure "$I5_FILE does not contain $TEXTS non-empty h.author elements: $observed"
29fi
30
31observed=$(xmlstarlet sel --net -t -v "/idsCorpus/idsHeader/fileDesc/titleStmt/c.title" target/dnb13.i5.xml)
32if $(assert_eq "$observed" "Deutsche Nationalbibliothek: Belletristik 2013"); then
33 log_success "c.title contains yeaar"
34else
35 log_failure "c.title does not contain year: $observed"
Marc Kupietzab0a7332024-04-26 13:25:16 +020036fi
37
Marc Kupietzfddbb512024-04-26 16:49:02 +020038observed=$(xmlstarlet sel --net -t -v "count(/idsCorpus/idsDoc/idsText/idsHeader/fileDesc/sourceDesc/biblStruct/monogr/h.author[contains(., '[')])" target/dnb13.i5.xml)
Marc Kupietzab0a7332024-04-26 13:25:16 +020039if $(assert_eq "$observed" "0"); then
40 log_success "authors do not contain []"
41else
Marc Kupietz41c42382024-04-26 17:02:53 +020042 log_failure "authors contain []: $observed"
Marc Kupietzab0a7332024-04-26 13:25:16 +020043fi