class Careplus::Client

# File app/lib/careplus/client.rb, line 11
def initialize(username:, password:, namespace:, payload:)
  @username = username
  @password = password
  @namespace = namespace
  @payload = payload
end

# File app/lib/careplus/client.rb, line 27
    def self.send_csv(...) = new(...).send_csv

    private_class_method :new

    private

    attr_reader :username, :password, :namespace, :payload

    def build_soap_envelope
      escaped_payload = CGI.escapeHTML(payload)
      target_namespace = "#{TARGET_NAMESPACE_BASE}/#{namespace}/webservices"

      <<~XML
        <?xml version="1.0" encoding="utf-8"?>
        <soap:Envelope
            xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
            xmlns:car="#{target_namespace}">
          <soap:Body>
            <car:InsertImmsRecord>
              <car:strUserId>#{username}</car:strUserId>
              <car:strPwd>#{password}</car:strPwd>
              <car:strPayload>#{escaped_payload}</car:strPayload>
            </car:InsertImmsRecord>
          </soap:Body>
        </soap:Envelope>
      XML
    end

    def post_soap_request(uri, body)
      http = Net::HTTP.new(uri.host, uri.port)
      http.use_ssl = uri.scheme == "https"

      request = Net::HTTP::Post.new(uri.request_uri)
      request["Content-Type"] = "text/xml; charset=utf-8"
      request.body = body

      http.request(request)
    end
  end

# File app/lib/careplus/client.rb, line 35
    def build_soap_envelope
      escaped_payload = CGI.escapeHTML(payload)
      target_namespace = "#{TARGET_NAMESPACE_BASE}/#{namespace}/webservices"

      <<~XML
        <?xml version="1.0" encoding="utf-8"?>
        <soap:Envelope
            xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
            xmlns:car="#{target_namespace}">
          <soap:Body>
            <car:InsertImmsRecord>
              <car:strUserId>#{username}</car:strUserId>
              <car:strPwd>#{password}</car:strPwd>
              <car:strPayload>#{escaped_payload}</car:strPayload>
            </car:InsertImmsRecord>
          </soap:Body>
        </soap:Envelope>
      XML
    end

# File app/lib/careplus/client.rb, line 55
def post_soap_request(uri, body)
  http = Net::HTTP.new(uri.host, uri.port)
  http.use_ssl = uri.scheme == "https"

  request = Net::HTTP::Post.new(uri.request_uri)
  request["Content-Type"] = "text/xml; charset=utf-8"
  request.body = body

  http.request(request)
end

# File app/lib/careplus/client.rb, line 18
def send_csv
  base_url = Settings.careplus.base_url.presence or
    raise "Settings.careplus.base_url is empty or has not been configured " \
            "(if this is a deployed service, the MOCK_CAREPLUS_URL environment variable may not be set)"
  uri = URI.parse("#{base_url}/#{namespace}/soap.SchImms.cls")
  soap_body = build_soap_envelope
  post_soap_request(uri, soap_body)
end