pione 0.3.2 → 0.4.0

data/lib/pione/command/pione-compiler.rb

@@ -1,57 +0,0 @@
-module Pione
-  module Command
-    # PionePackage is a command body of "pione-package".
-    class PioneCompiler < BasicCommand
-      #
-      # basic informations
-      #
-
-      command_name "pione-compiler"
-      command_banner "pione-compiler translates from PNML to PIONE document."
-
-      #
-      # options
-      #
-
-      use_option :debug
-
-      define_option(:name) do |item|
-        item.long = '--name=NAME'
-        item.desc = 'set package name'
-        item.value = proc {|val| val}
-      end
-
-      define_option(:editor) do |item|
-        item.long = '--editor=NAME'
-        item.desc = 'set package editor'
-        item.value = proc {|val| val}
-      end
-
-      define_option(:tag) do |item|
-        item.long = '--tag=NAME'
-        item.desc = 'set package tag'
-        item.value = proc {|val| val}
-      end
-
-      #
-      # command lifecycle: execution phase
-      #
-
-      setup :source
-
-      def setup_source
-        @source = @argv.first
-      end
-
-      #
-      # command lifecycle: execution phase
-      #
-
-      execute :compile_to_pnml
-
-      def execute_compile_to_pnml
-        print Util::PNMLCompiler.new(Location[@source], option[:name], option[:editor], option[:tag]).compile
-      end
-    end
-  end
-end

data/lib/pione/command/pione-relay-account-db.rb

@@ -1,141 +0,0 @@
-module Pione
-  module Command
-    # PioneRelayAccountDB is a command that adds, deletes, shows your accounts
-    # of relay servers.
-    class PioneRelayAccountDB < BasicCommand
-      #
-      # basic informations
-      #
-
-      command_name "pione-relay-account-db"
-      command_banner "Add, delete, or show your accounts of relay servers."
-
-      #
-      # options
-      #
-
-      use_option :color
-      use_option :debug
-
-      define_option(:add) do |item|
-        item.short = "-a"
-        item.long = "--add"
-        item.desc = "add an account"
-        item.action = lambda {|_, option| option[:action] = :add}
-      end
-
-      define_option(:delete) do |item|
-        item.short = "-d"
-        item.long = "--delete"
-        item.desc = "delete an account"
-        item.action = lambda {|_, option| option[:action] = :delete}
-      end
-
-      define_option(:list) do |item|
-        item.short = "-l"
-        item.long = "--list"
-        item.desc = "list accounts"
-        item.action = lambda {|_, option| option[:action] = :list}
-      end
-
-      define_option(:realm) do |item|
-        item.short = "-r"
-        item.long = "--realm=REALM"
-        item.desc = "realm name"
-        item.value = lambda {|name| name}
-      end
-
-      define_option(:name) do |item|
-        item.short = "-u"
-        item.long = "--user=NAME"
-        item.desc = "user name"
-        item.value = lambda {|name| name}
-      end
-
-      define_option(:password) do |item|
-        item.short = "-p"
-        item.long = "--password=PASSWORD"
-        item.desc = "password"
-        item.value = lambda {|password| password}
-      end
-
-      define_option(:file) do |item|
-        item.short = "-f"
-        item.long = "--file=PATH"
-        item.desc = "account db path"
-        item.action = lambda {|_, _, path| Global.relay_account_db_path = path}
-      end
-
-      validate_option do |option|
-        abort("error: -a, -d, or -l") unless option[:action]
-      end
-
-      #
-      # instance methods
-      #
-
-      def initialize(*options)
-        super(*options)
-        @realm = nil
-        @name = nil
-        @password = nil
-      end
-
-      #
-      # command lifecycle: setup phase
-      #
-
-      setup :account_db
-      setup [:add, :delete] => :realm
-      setup :add => :name_and_password
-
-      # Set account db.
-      def setup_account_db
-        Global.relay_account_db = RelayAccountDB.new(Global.relay_account_db_path)
-      end
-
-      # Get realm name from user input.
-      def setup_realm
-        @realm = option[:realm] || HighLine.new.ask("Realm: ") unless @realm
-      end
-
-      # Get user name and password from user input.
-      def setup_name_and_password
-        @name = option[:name] || HighLine.new.ask("Name: ")
-        unless @password = option[:password]
-          @password = HighLine.new.ask("Password: "){|q| q.echo = "*"}
-          password = HighLine.new.ask("Re-enter password: "){|q| q.echo = "*"}
-          abort("error: password mismatch") unless @password == password
-        end
-      end
-
-      #
-      # command lifecycle: execution phase
-      #
-
-      execute :add => :add
-      execute :delete => :delete
-      execute :list => :list
-
-      # Add a user.
-      def execute_add
-        Global.relay_account_db.add(@realm, @name, @password)
-        Global.relay_account_db.save
-      end
-
-      # Delete a user.
-      def execute_delete
-        Global.relay_account_db.delete(@realm)
-        Global.relay_account_db.save
-      end
-
-      # Show all users.
-      def execute_list
-        puts "%s accounts in %s" % [db.realms.size, Global.relay_account_db_path]
-        Global.relay_account_db.realms.each do |realm|
-          puts "%s:%s" % [realm, Global.relay_account_db[realm].name]
-        end
-      end
-    end
-  end
-end

data/lib/pione/command/pione-relay-client-db.rb

@@ -1,118 +0,0 @@
-module Pione
-  module Command
-    # PioneRelayClientDB is a command that adds, deletes, or shows clients in
-    # relay server.
-    class PioneRelayClientDB < BasicCommand
-      #
-      # basic informations
-      #
-
-      command_name "pione-relay-client-db"
-      command_banner "Add, delete, or show clients in this relay server."
-
-      #
-      # options
-      #
-
-      use_option :color
-      use_option :debug
-
-      define_option(:add) do |item|
-        item.short = "-a"
-        item.long = "--add"
-        item.desc = "add a client"
-        item.action = lambda {|_, option| option[:action] = :add}
-      end
-
-      define_option(:delete) do |item|
-        item.short = "-d"
-        item.long = "--delete"
-        item.desc = "delete a client"
-        item.action = lambda {|_, option| option[:action] = :delete}
-      end
-
-      define_option(:list) do |item|
-        item.short = "-l"
-        item.long = "--list"
-        item.desc = "list clients"
-        item.action = lambda {|_, option| option[:action] = :list}
-      end
-
-      define_option(:name) do |item|
-        item.short = "-u"
-        item.long = "--user=NAME"
-        item.desc = "user name"
-        item.value = lambda {|name| name}
-      end
-
-      define_option(:password) do |item|
-        item.short = "-p"
-        item.long = "--password=PASSWORD"
-        item.desc = "password"
-        item.value = lambda {|password| password}
-      end
-
-      define_option(:file) do |item|
-        item.short = "-f"
-        item.long = "--file=PATH"
-        item.desc = "client db path"
-        item.action = lambda {|_, option, path| Global.relay_client_db_path = path}
-      end
-
-      validate_option do |option|
-        abort("error: -a, -d, or -l") unless option[:action]
-      end
-
-      #
-      # command lifecycle: setup phase
-      #
-
-      setup :client_db
-      setup [:add, :delete] => :name
-      setup :add => :password
-
-      # set client db
-      def setup_client_db
-        Global.relay_client_db = RelayClientDB.new(Global.relay_client_db_path)
-      end
-
-      # set name
-      def setup_name
-        option[:name] = HighLine.new.ask("Name: ") unless option[:name]
-      end
-
-      # set password
-      def setup_password
-        unless option[:password]
-          option[:password] = HighLine.new.ask("Password: "){|q| q.echo = "*"}
-          password = HighLine.new.ask("Re-enter password: "){|q| q.echo = "*"}
-          abort("error: password mismatch") unless option[:password] == password
-        end
-      end
-
-      #
-      # command lifecycle: execution phase
-      #
-
-      execute :add => :add
-      execute :delete => :delete
-      execute :list => :list
-
-      def execute_add
-        Global.relay_client_db.add(option[:name], option[:password])
-        Global.relay_client_db.save
-      end
-
-      def execute_delete
-        Global.relay_client_db.delete(option[:name])
-        Global.relay_client_db.save
-      end
-
-      def execute_list
-        names = Global.relay_client_db.names
-        puts "%s clients in %s" % [names.size, Global.relay_client_db_path]
-        names.each {|user| puts user}
-      end
-    end
-  end
-end

data/lib/pione/command/pione-relay.rb

@@ -1,59 +0,0 @@
-module Pione
-  module Command
-    # PioneRelay is a command for connecting relay server.
-    class PioneRelay < BasicCommand
-      #
-      # basic informations
-      #
-
-      command_name("pione-relay") {|cmd| "relay-port: %s" % cmd.option[:relay_port]}
-      command_banner "Run relay process for connecting between clients and brokers."
-      command_front Front::RelayFront
-
-      #
-      # options
-      #
-
-      use_option :color
-      use_option :debug
-      use_option :my_ip_address
-
-      define_option(:realm) do |item|
-        item.long = "--realm name"
-        item.desc = "set relay realm name for client authentification"
-        item.action = lambda {|_, _, name| Global.relay_realm = name}
-      end
-
-      define_option(:relay_port) do |item|
-        item.long = "--relay-port port"
-        item.desc = "set relay port"
-        item.default = Global.relay_port
-        item.value = lambda {|port| port}
-      end
-
-      validate_option do |option|
-        abort("error: no realm name") if Global.relay_realm.nil? or Global.relay_realm.empty?
-        abort("error: no relay port") unless option[:relay_port]
-      end
-
-      #
-      # command lifecycle: execution phase
-      #
-
-      execute :relay
-
-      def execute_relay
-        # wake up tuple space provider process
-        Pione::TupleSpaceProvider.spawn
-
-        puts DRb.front.uri
-        DRb::DRbServer.new(
-          "relay://:%s" % option[:relay_port],
-          nil,
-          {:SSLCertName => Global.relay_ssl_certname}
-        )
-        DRb.thread.join
-      end
-    end
-  end
-end

data/lib/pione/command/pione-syntax-checker.rb

@@ -1,214 +0,0 @@
-module Pione
-  module Command
-    # PioneSyntaxChecker is a command for checking syntax tree and model of the
-    # PIONE document.
-    class PioneSyntaxChecker < BasicCommand
-      #
-      # basic informations
-      #
-
-      command_name "pione-syntax-checker"
-      command_banner "Print syntax tree of PIONE notation."
-
-      #
-      # options
-      #
-
-      use_option :color
-      use_option :debug
-
-      option_default(:readline_mode, true)
-
-      define_option(:expr) do |item|
-        item.short = '-e'
-        item.long = '--expr=EXPR'
-        item.desc = 'check the expression string and exit'
-        item.action = lambda do |_, option, e|
-          option[:expr] = e
-          option[:readline_mode] = false
-        end
-      end
-
-      define_option(:syntax) do |item|
-        item.short = '-s'
-        item.long = '--syntax'
-        item.desc = 'show syntax tree'
-        item.default = false
-        item.value = true
-      end
-
-      define_option(:transform) do |item|
-        item.short = '-t'
-        item.long = '--transformer'
-        item.desc = 'show transformer result'
-        item.default = false
-        item.value = true
-      end
-
-      define_option(:file) do |item|
-        item.short = '-f'
-        item.long = '--file=PATH'
-        item.desc = 'check syntax of the document'
-        item.action = lambda do |_, option, path|
-          option[:document] = path
-          option[:readline_mode] = false
-        end
-      end
-
-      define_option(:parser) do |item|
-        item.long = "--parser=NAME"
-        item.desc = "set parser"
-        item.value = lambda {|name| name}
-      end
-
-      #
-      # instance methods
-      #
-
-      def initialize(*argv)
-        super
-        @history = File.join(Global.dot_pione_dir, "pione-history")
-      end
-
-      #
-      # command lifecycle: setup phase
-      #
-
-      setup :pp
-      setup :readline => :readline_mode
-
-      def setup_pp
-        require 'pp'
-      end
-
-      def setup_readline_mode
-        require 'readline'
-        restore_history
-      end
-
-      #
-      # command lifecycle: execute phase
-      #
-
-      execute :readline => :readline_mode
-      execute :file => :file
-      execute :expr => :expr
-
-      def execute_readline_mode
-        buf = ""
-        mark = ">"
-
-        # start loop
-        while buf += Readline.readline("#{mark} ".color(:red), true)
-          if /[^\s]/.match(buf)
-            # don't record if previous line is the same
-            if Readline::HISTORY.size > 1 && Readline::HISTORY[-2] == buf
-              Readline::HISTORY.pop
-            end
-            if buf[-1] == "\\"
-              buf[-1] = "\n"
-              mark = "+"
-              next
-            else
-              # print parsing result
-              print_result(DocumentParser.new.expr, buf)
-              buf = ""
-              mark = ">"
-            end
-          else
-            # don't record if it is an empty line
-            Readline::HISTORY.pop
-          end
-        end
-      end
-
-      def execute_file
-        print_result(DocumentParser.new, Pathname.new(option[:document]).read)
-      end
-
-      def execute_expr
-        parser_name = option[:parser] ? option[:parser] : :expr
-        print_result(DocumentParser.new.send(parser_name), option[:expr])
-      end
-
-      #
-      # command lifecycle: termination phase
-      #
-
-      terminate :readline => :history
-
-      def terminate_history
-        save_history if readline_mode?
-      end
-
-      #
-      # helper methods
-      #
-
-      private
-
-      # Return action mode.
-      def action_mode
-        return :readline if readline_mode?
-        return :file if option[:document]
-        return :expr if option[:expr]
-      end
-
-      # Return true if readline mode is enabled.
-      def readline_mode?
-        option[:readline_mode]
-      end
-
-      # Print parsing result of the string.
-      def print_result(parser, str)
-        begin
-          stree = parser.parse(str)
-          transformer_option = {}
-          transformer_option[:package_name] = option[:package_name] || "PioneSyntaxChecker"
-          transformer_option[:filename] = option[:filename] || "NoFile"
-          model = DocumentTransformer.new.apply(stree, transformer_option)
-          if option[:syntax]
-            puts "syntax:".color(:green)
-            pp stree
-          end
-          if option[:transform]
-            puts "model:".color(:green)
-            pp model
-          end
-          if model.kind_of?(Array)
-            model.each {|m| p m}
-          else
-            p model.eval(Lang::Environment.new)
-          end
-        rescue Lang::ParserError, Parslet::ParseFailed => e
-          msg = "Pione syntax error: %s (%s)" % [e.message, e.class.name]
-          readline_mode? ? puts(msg) : abort(msg)
-        rescue Lang::PioneTypeError, Lang::VariableBindingError => e
-          msg = "Pione model error: %s (%s)" % [e.message, e.class.name]
-          readline_mode? ? puts(msg) : abort(msg)
-        rescue Lang::MethodNotFound => e
-          msg = "%s (%s)" % [e.message, e.class.name]
-          readline_mode? ? puts(msg) : abort(msg)
-        end
-      end
-
-      # Restore readline's history.
-      def restore_history
-        if File.exist?(@history)
-          File.readlines(@history).reverse.each do |line|
-            Readline::HISTORY.push line.chomp
-          end
-        end
-      end
-
-      # Save history to file.
-      def save_history
-        File.open(@history, "w+") do |file|
-          Readline::HISTORY.to_a.reverse[0..100].each do |line|
-            file.puts(line) if /\S/.match(line)
-          end
-        end
-      end
-    end
-  end
-end