scribe/src/clients/medium_client.cr

require "json"

class MediumClient
  def self.post_data(post_id : String) : PostResponse::Root
    client = HTTP::Client.new("medium.com", tls: true)
    response = client.post("/_/graphql", headers: headers, body: body(post_id))
    PostResponse::Root.from_json(response.body)
  end

  private def self.headers : HTTP::Headers
    HTTP::Headers{
      "Accept"       => "application/json",
      "Content-Type" => "application/json; charset=utf-8",
    }
  end

  private def self.body(post_id : String) : String
    query = <<-GRAPHQL
      query {
        post(id: "#{post_id}") {
          title
          creator {
            id
            name
          }
          content {
            bodyModel {
              paragraphs {
                text
                type
                href
                layout
                markups {
                  title
                  type
                  href
                  userId
                  start
                  end
                  anchorType
                }
                iframe {
                  mediaResource {
                    href
                  }
                }
                metadata {
                  id
                  originalWidth
                  originalHeight
                }
              }
            }
          }
        }
      }
    GRAPHQL
    JSON.build do |json|
      json.object do
        json.field "query", query
        json.field "variables", {} of String => String
      end
    end
  end
end