Что такое XML для действительного запроса OTRS-TicketSearch

Я пытаюсь взаимодействовать с системой otrs-ticket, чтобы сделать несколько снимков и подсчитать некоторую статистику. Это я хочу сделать в haskell — я использую пакет soap.

Игнорируя операторы импорта, код довольно прост, я создаю SOAP-транспорт с файлом конфигурации soap.cfg (см. ниже). Затем создайте тело SOAP и вызовите веб-службу с помощью "Dispatch".

{-# LANGUAGE OverloadedStrings #-}

import Network (withSocketsDo)
import Network.SOAP
import Network.SOAP.Transport.HTTP

import Text.XML.Writer
import Text.XML.Stream.Parse as Parse
import           Data.Text (Text)
import qualified Data.Text as T
import qualified Data.ByteString.Lazy.Char8 as BS
import Data.Configurator (load, Worth(Required))

main :: IO ()
main = withSocketsDo $ do
    transport <- confTransport "soap" =<< load [Required "./src/SOAP/soap.cfg"]
    let body = do element "TicketObject" ("TicketSearch" :: Text)
                  element "OwnerID" ("owner" :: Text)

    xmlresult <- invokeWS transport "#TicketObject" () body (RawParser id)
    BS.putStrLn xmlresult

soap.cfg

soap {
    url = "http://domain/otrs/rpc.pl"
    user = "testuser"
    password = "testpass"
    trace = true
    timeout = 15
    }

Если я соберу и вызову эту программу, я получу следующее xmlresult:

запрос:

<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
    <soapenv:Body>
        <TicketObject>TicketSearch</TicketObject>
        <OwnerID>heu</OwnerID>
    </soapenv:Body>
</soapenv:Envelope>

отклик:

<?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope
    soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
    xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
    xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
    xmlns:xsd="http://www.w3.org/2001/XMLSchema"
    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
    <soap:Body>
        <soap:Fault>
            <faultcode>soap:Client</faultcode>
            <faultstring>
                SOAPAction shall match 'uri#method' if present (got 'Dispatch', expected '#TicketObject'
            </faultstring>
        </soap:Fault>
    </soap:Body>
</soap:Envelope>

Если я затем изменю строку, следующую за строкой

xmlresult <- invokeWS transport "Dispatch" () body (RawParser id)

to

xmlresult <- invokeWS transport "#TicketObject" () body (RawParser id)

строка неисправности становится

<faultstring>
    Denied access to method (TicketObject) in class (main) at /opt/otrs/Kernel/cpan-lib/SOAP/Lite.pm line 2810.
</faultstring>

Я искал в Интернете какое-то решение, я нашел только это

с последним мне удалось получить результат - но только для iPhoneObject и TicketGet - к сожалению, TicketSearch, похоже, не поддерживается.

Может ли кто-нибудь сказать мне, как должен выглядеть действительный XML для запроса?

Я также нашел Как создать билет otrs с помощью запроса мыла .Net, который использует веб-сервисы, но, к сожалению, я не знаю, как создать такую ​​услугу.


xml soap haskell otrs
person epsilonhalbe    schedule 18.10.2014    source источник
comment
Если кто-то спросит, почему я использую haskell вместо perl, php или java - ну, это язык, в котором я больше всего уверен.   -  person epsilonhalbe    schedule 19.10.2014
comment
согласно TicketSearch документацию OwnerID следует заменить на OwnerIDs   -  person palik    schedule 16.03.2019

Ответы (1)


arrow_upward
0
arrow_downward

Вы найдете XML-фрагмент в Использование javax.xml.soap для доступа к сервису OTRS SOAP без WSDL.

Здесь трассировка запроса, созданная perl-скриптом

Accept: text/xml
Accept: multipart/*
Accept: application/soap
Content-Length: 707
Content-Type: text/xml; charset=utf-8
SOAPAction: "/Core#Dispatch"

<?xml version="1.0" encoding="UTF-8"?><soap:Envelope soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"><soap:Body><Dispatch xmlns="/Core"><Username xsi:type="xsd:string">foo</Username><Password xsi:type="xsd:string">bar</Password><Object xsi:type="xsd:string">TicketObject</Object><Method xsi:type="xsd:string">TicketSearch</Method><Param1_Name xsi:type="xsd:string">TicketID</Param1_Name><Param1_Value xsi:type="xsd:int">561141</Param1_Value></Dispatch></soap:Body></soap:Envelope>
SOAP::Transport::HTTP::Client::send_receive: HTTP::Response=HASH(0x557656ccebb0)
SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 200 OK
Connection: close
Date: Mon, 18 Mar 2019 16:35:20 GMT
Vary: Accept-Encoding
Content-Length: 416
Content-Type: text/xml; charset=utf-8
Client-Date: Mon, 18 Mar 2019 16:35:21 GMT
Client-Peer: 85.239.118.197:443
Client-Response-Num: 1
Client-SSL-Cert-Issuer: /C=GB/ST=Greater Manchester/L=Salford/O=COMODO CA Limited/CN=COMODO RSA Domain Validation Secure Server CA
Client-SSL-Cert-Subject: /OU=Domain Control Validated/OU=EssentialSSL Wildcard/CN=*.pyur.com
Client-SSL-Cipher: ECDHE-RSA-AES128-GCM-SHA256
Client-SSL-Socket-Class: IO::Socket::SSL
Set-Cookie: TS0179c75b=013dfe6b3e1266bc1210a8bb5e6a9352943012e3f1d5767b07f5ec8a310bb53c004c09e467d982f0117fe8a3f6aa1dee4e812153c4; Path=/; Domain=.ticketsystem.pyur.com
SOAPServer: SOAP::Lite/Perl/1.11

<?xml version="1.0" encoding="UTF-8"?><soap:Envelope soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"><soap:Body><DispatchResponse xmlns="/Core" xsi:nil="true" /></soap:Body></soap:Envelope>
person palik    schedule 18.03.2019