我正在使用计划任务运行下面的 xqy 代码,在这个 xqy 代码中,我在 put 调用中手动传递了带有 method="digest" 用户名 = admin 密码 = admin 的身份验证节点的值,有什么办法可以让我可以在运行时使用
1. 用户名和密码的加密令牌
2. 在运行时获取服务器的值用户名和密码,并将其传递给 http-put 函数以访问其余服务扩展(/v1/resources/example ) 在 8000 端口。
xquery version "1.0-ml";
declare namespace hst = 'http://marklogic.com/xdmp/status/host';
declare namespace c = 'http://example.com/abc';
declare variable $Collection := 'collection';
let $query :=
cts:and-query((
cts:collection-query($Collection),
cts:element-range-query(xs:QName('c:element'), '<=', fn:current-dateTime())
))
let $uris := cts:uris('',(), $query)
let $total-uri := count($uris)
return
if ($total-uri) then
let $PORT := '8000'
let $database := xdmp:database()
let $host-list := xdmp:hosts()
let $hosts :=
for $hosts-online in $host-list
where xdmp:host-status($hosts-online)/hst:hosts/hst:host[.//hst:online/fn:string() = 'true']
return $hosts-online
let $cluster-size := fn:count($hosts)
return
for $host at $index in $hosts
let $page-size := fn:ceiling($total-uri div $cluster-size)
let $start-index := ($index - 1) * $page-size + 1
let $end-index :=
if ($cluster-size eq $index) then
$total-uri
else
($index - 1) * $page-size +$page-size
let $urisforHost := string-join($uris[$start-index to $end-index],',')
let $url := fn:concat('http://',xdmp:host-name($host),':',$PORT,'/v1/resources/example?rs:uris=',$urisforHost,'&rs:db=',$database)
return
xdmp:spawn-function(function()
{xdmp:http-put($url,
<options xmlns="xdmp:http">
<authentication method="digest">
<username>admin</username>
<password>admin</password>
</authentication>
</options>
)
}
)