Committing before test

src/cligen/command/argument.cr

@@ -0,0 +1,34 @@
+module CliGen
+  class Command
+    macro argument(variable, short, long, description, validation = nil)
+      {% raise "ERROR : CliGen::Command.argument : First argument (#{variable}) must be a TypeDeclaration (ex: '<var> : <type> [= val]')" unless variable.is_a? TypeDeclaration %}
+      {% name = variable.name %}
+      {% type = variable.type %}
+      {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided short must be a string" unless short.is_a? StringLiteral || string == nil %}
+      {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided long must be a string" unless long.is_a? StringLiteral || long == nil %}
+      {% raise "ERROR : CliGen::Command.argument(#{name}) : You must provide a short or long" unless long || short %}
+      {% raise "ERROR : CliGen::Command.argument(#{name}) : You must provide a description" unless description %}
+      {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided description must be a String" unless description.is_a? StringLiteral %}
+      {% unless validation.nil? %}
+        {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided validation must be a Proc" unless validation.is_a? ProcLiteral %}
+        {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided validation return type must be a Bool" unless validation.return_type == Bool %}
+        {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided validation provided validation must have an input variable" if validation.args.empty? %}
+        {% arg = validation.args.first %}
+        {% unless arg.restriction == type %}
+          {% example = "->(#{arg.name} : #{type}) : #{type} { #{validation.body} }" %}
+          {% raise "ERROR : CliGen::Command.argument(#{name}) : Provided validation input value must be #{type}. EX: #{example}" %}
+        {% end %}
+      {% end %}
+
+      @[CliGen::Argument(short: {{short}}, long: {{long}}, description: {{description}}, validation: {{validation}}, on_match: {{on_match}})]
+      @{{variable}}
+
+      def {{variable.name}}= (value : {{type}})
+        {% unless validation.nil? %}
+          raise "ERROR : #{@type.name}##{@def.name} : Provided value #{value} is not passing validation" unless {{validation}}.call(value)
+        {% end %}
+        @{{name}} = value
+      end
+    end
+  end
+end