Add additional channel action and fix endpoint config.

Author: Manfred

src/teletube/cli.cr

@@ -27,10 +27,14 @@ module Teletube
         puts @client.get_categories
       when "channels"
         case context.command
-        when "show"
-          puts @client.get_channel
         when "create"
           puts @client.create_channel
+        when "show"
+          puts @client.get_channel
+        when "update"
+          puts @client.update_channel
+        when "destroy"
+          puts @client.destroy_channel
         else
           puts @client.get_channels
         end

src/teletube/client.cr

@@ -1,3 +1,5 @@
+require "json"
+
 module Teletube
   class Client
     def initialize(config : Teletube::Config, context : Teletube::Context)
@@ -10,10 +12,6 @@ module Teletube
       handle_response(@http.get(path: "/api/v1/categories"))
     end
 
-    def get_channel
-      handle_response(@http.get(path: "/api/v1/channels/#{@context.params["id"]}"))
-    end
-
     def get_channels
       if @context.params.empty?
         handle_response(@http.get(path: "/api/v1/channels"))
@@ -27,6 +25,22 @@ module Teletube
       response.body
     end
 
+    def get_channel
+      handle_response(@http.get(path: "/api/v1/channels/#{@context.params["id"]}"))
+    end
+
+    def update_channel
+      handle_response(
+        @http.patch(path: "/api/v1/channels/#{@context.params["id"]}", params: @context.params)
+      )
+    end
+
+    def destroy_channel
+      handle_response(
+        @http.delete(path: "/api/v1/channels/#{@context.params["id"]}")
+      )
+    end
+
     def get_languages
       handle_response(@http.get(path: "/api/v1/languages"))
     end
@@ -35,9 +49,16 @@ module Teletube
       handle_response(@http.get(path: "/api/v1/profiles/me"))
     end
 
+    def encoded_json(params)
+      
+    end
+
     def handle_response(response)
-      if response.status_code == 200
+      case response.status_code
+      when 200
         response.body
+      when 404
+        "Not found"
       else
         "Failed"
       end

src/teletube/http.cr

@@ -5,15 +5,11 @@ require "http/client"
 module Teletube
   class Http
     def initialize(config : Teletube::Config)
-      uri = URI.parse(config.endpoint)
-      @http = HTTP::Client.new(
-        host: uri.host || "localhost",
-        port: uri.port || 500,
-        tls: uri.scheme == "https"
-      )
+      @http = HTTP::Client.new(uri: URI.parse(config.endpoint))
       @headers = HTTP::Headers.new
       @headers["Authorization"] = "Token #{config.token}"
       @headers["Accept"] = "application/json,*/*"
+      @headers["Content-Type"] = "application/json; charset=utf-8"
     end
 
     def get(path : String)
@@ -25,7 +21,15 @@ module Teletube
     end
 
     def post(path : String, params : Hash(String, String))
-      @http.post(path: path, headers: @headers, body: HTTP::Params.encode(params))
+      @http.post(path: path, headers: @headers, body: params.to_json)
+    end
+
+    def patch(path : String, params : Hash(String, String))
+      @http.patch(path: path, headers: @headers, body: params.to_json)
+    end
+
+    def delete(path : String)
+      @http.delete(path: path, headers: @headers)
     end
   end
 end

src/teletube/option_parser.cr

@@ -58,6 +58,21 @@ module Teletube
               context.params["id"] = id
             end
           end
+          parser.on("update", "Update details for a channel.") do
+            context.command = "update"
+            parser.on("--id ID", "The identifier of the channel to update.") do |id|
+              context.params["id"] = id
+            end
+            parser.on("--name NAME", "The name of the channel.") do |name|
+              context.params["name"] = name
+            end
+          end
+          parser.on("destroy", "Destroy a channel.") do
+            context.command = "destroy"
+            parser.on("--id ID", "The identifier of the channel to destroy.") do |id|
+              context.params["id"] = id
+            end
+          end
         end
 
         parser.on("languages", "Interact with languages.") do