Add role to characters in play information and to the characters endp…

…oint Discovered from #274 that this is missing
dracor-org · Dec 20, 2024 · 0a53eda · 0a53eda
1 parent 5319e5f
commit 0a53eda
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/api.yaml b/api.yaml
@@ -1958,6 +1958,8 @@ components:
             - MALE
             - FEMALE
             - UNKNOWN
+        role:
+          type: string
         wikidataId:
           # ontology: #character_wikidata_id
           type: string
@@ -2226,6 +2228,8 @@ components:
           - FEMALE
           - UNKNOWN
           nullable: true
+        role:
+          type: string
         betweenness:
           # ontology: #character_node_betweenness
           type: number

diff --git a/modules/util.xqm b/modules/util.xqm
@@ -1020,6 +1020,7 @@ declare function dutil:get-play-info(
           )
           let $name := $node/(tei:persName | tei:name)[1]/text()
           let $sex := $node/@sex/string()
+          let $role := $node/@role/string()
           let $isGroup := if ($node/name() eq 'personGrp')
             then true() else false()
           let $wikidata-id := dutil:get-wikidata-id-from-ana($node)
@@ -1030,6 +1031,7 @@ declare function dutil:get-play-info(
               "isGroup": $isGroup,
               "sex": if($sex) then $sex else ()
             },
+            if ($role) then map:entry("role", $role) else (),
             if ($wikidata-id) then map:entry("wikidataId", $wikidata-id) else ()
           ))
         },
@@ -1151,6 +1153,7 @@ declare function dutil:characters-info (
       )
       let $name := $node/(tei:persName | tei:name)[1]/text()
       let $sex := $node/@sex/string()
+      let $role := $node/@role/string()
       let $isGroup := if ($node/name() eq 'personGrp')
         then true() else false()
       let $num-of-speech := $tei//tei:sp[@who='#'||$id]
@@ -1174,6 +1177,7 @@ declare function dutil:characters-info (
           "betweenness": $metrics-node/betweenness/number(.),
           "eigenvector": $eigenvector
         },
+        if ($role) then map:entry("role", $role) else (),
         if ($wikidata-id) then map:entry("wikidataId", $wikidata-id) else ()
       ))
     }