Add new Crystal language target

Taken from upstream

Author: pimterry

src/targets/crystal/index.js

@@ -0,0 +1,12 @@
+'use strict'
+
+module.exports = {
+  info: {
+    key: 'crystal',
+    title: 'Crystal',
+    extname: '.cr',
+    default: 'native'
+  },
+
+  native: require('./native')
+}

src/targets/crystal/native.js

@@ -0,0 +1,68 @@
+/**
+ * @description
+ * HTTP code snippet generator for native Crystal
+ *
+ * @author
+ * @yanecc
+ *
+ * for any questions or issues regarding the generated code snippet, please open an issue mentioning the author.
+ */
+
+const CodeBuilder = require('../../helpers/code-builder')
+
+const { escape } = require('../../helpers/format')
+
+module.exports = function ({ method: rawMethod, fullUrl, postData, allHeaders }, options = {}) {
+  const { insecureSkipVerify = false } = options
+
+  const code = new CodeBuilder()
+
+  code.push('require "http/client"')
+
+  code.blank()
+
+  code.push(`url = "${fullUrl}"`)
+
+  const headers = Object.keys(allHeaders)
+  if (headers.length) {
+    code.push('headers = HTTP::Headers{')
+    headers.forEach(key => {
+      code.push(`  "${key}" => "${escape(allHeaders[key])}"`)
+    })
+    code.push('}')
+  }
+
+  if (postData.text) {
+    code.push(`reqBody = ${JSON.stringify(postData.text)}`)
+  }
+
+  code.blank()
+
+  const method = rawMethod.toUpperCase()
+  const methods = ['GET', 'POST', 'HEAD', 'DELETE', 'PATCH', 'PUT', 'OPTIONS']
+
+  const headersContext = headers.length ? ', headers: headers' : ''
+  const bodyContext = postData.text ? ', body: reqBody' : ''
+  const sslContext = insecureSkipVerify ? ', tls: OpenSSL::SSL::Context::Client.insecure' : ''
+
+  if (methods.includes(method)) {
+    code.push(
+      `response = HTTP::Client.${method.toLowerCase()} url${headersContext}${bodyContext}${sslContext}`
+    )
+  } else {
+    code.push(
+      `response = HTTP::Client.exec "${method}", url${headersContext}${bodyContext}${sslContext}`
+    )
+  }
+
+  code.push('puts response.body')
+
+  return code.join()
+}
+
+module.exports.info = {
+  key: 'native',
+  title: 'http::client',
+  link: 'https://crystal-lang.org/api/master/HTTP/Client.html',
+  description: 'Crystal HTTP client'
+}

src/targets/index.js

@@ -3,6 +3,7 @@
 module.exports = {
   c: require('./c'),
   clojure: require('./clojure'),
+  crystal: require('./crystal'),
   csharp: require('./csharp'),
   go: require('./go'),
   http: require('./http'),

test/fixtures/available-targets.json

@@ -358,5 +358,19 @@
         "description": "An HTTP Request Client Library"
       }
     ]
+  },
+  {
+    "key": "crystal",
+    "title": "Crystal",
+    "extname": ".cr",
+    "default": "native",
+    "clients": [
+      {
+        "key": "native",
+        "title": "http::client",
+        "link": "https://crystal-lang.org/api/master/HTTP/Client.html",
+        "description": "Crystal HTTP client"
+      }
+    ]
   }
 ]

test/fixtures/output/crystal/native/application-form-encoded.cr

@@ -0,0 +1,10 @@
+require "http/client"
+
+url = "http://mockbin.com/har"
+headers = HTTP::Headers{
+  "content-type" => "application/x-www-form-urlencoded"
+}
+reqBody = "foo=bar&hello=world"
+
+response = HTTP::Client.post url, headers: headers, body: reqBody
+puts response.body

test/fixtures/output/crystal/native/application-json.cr

@@ -0,0 +1,10 @@
+require "http/client"
+
+url = "http://mockbin.com/har"
+headers = HTTP::Headers{
+  "content-type" => "application/json"
+}
+reqBody = "{\"number\":1,\"string\":\"f\\\"oo\",\"arr\":[1,2,3],\"nested\":{\"a\":\"b\"},\"arr_mix\":[1,\"a\",{\"arr_mix_nested\":{}}],\"boolean\":false}"
+
+response = HTTP::Client.post url, headers: headers, body: reqBody
+puts response.body

test/fixtures/output/crystal/native/compression.cr

@@ -0,0 +1,9 @@
+require "http/client"
+
+url = "http://mockbin.com/har"
+headers = HTTP::Headers{
+  "accept-encoding" => "deflate, gzip, br"
+}
+
+response = HTTP::Client.get url, headers: headers
+puts response.body

test/fixtures/output/crystal/native/cookies.cr

@@ -0,0 +1,9 @@
+require "http/client"
+
+url = "http://mockbin.com/har"
+headers = HTTP::Headers{
+  "cookie" => "foo=bar; bar=baz"
+}
+
+response = HTTP::Client.post url, headers: headers
+puts response.body

test/fixtures/output/crystal/native/custom-method.cr

@@ -0,0 +1,6 @@
+require "http/client"
+
+url = "http://mockbin.com/har"
+
+response = HTTP::Client.exec "PROPFIND", url
+puts response.body

test/fixtures/output/crystal/native/full.cr

@@ -0,0 +1,12 @@
+require "http/client"
+
+url = "http://mockbin.com/har?foo=bar&foo=baz&baz=abc&key=value"
+headers = HTTP::Headers{
+  "cookie" => "foo=bar; bar=baz"
+  "accept" => "application/json"
+  "content-type" => "application/x-www-form-urlencoded"
+}
+reqBody = "foo=bar"
+
+response = HTTP::Client.post url, headers: headers, body: reqBody
+puts response.body