# Author:: Eric Crane (mailto:eric.crane@mac.com) # Copyright:: Copyright (c) 2019 Eric Crane. All rights reserved. # # An object that evaluate a ruby statement. # module GlooLang module Objs class Eval < GlooLang::Core::Obj KEYWORD = 'eval'.freeze KEYWORD_SHORT = 'ruby'.freeze CMD = 'command'.freeze DEFAULT_CMD = '1+2'.freeze RESULT = 'result'.freeze # # The name of the object type. # def self.typename return KEYWORD end # # The short name of the object type. # def self.short_typename return KEYWORD_SHORT end # # Get the URI from the child object. # Returns nil if there is none. # def cmd_value cmd = find_child CMD return nil unless cmd return cmd.value end # # Set the result of the system call. # def set_result( data ) r = find_child RESULT return nil unless r r.set_value data end # --------------------------------------------------------------------- # Children # --------------------------------------------------------------------- # # Does this object have children to add when an object # is created in interactive mode? # This does not apply during obj load, etc. # def add_children_on_create? return true end # # Add children to this object. # This is used by containers to add children needed # for default configurations. # def add_default_children fac = $engine.factory fac.create_string CMD, DEFAULT_CMD, self fac.create_string RESULT, nil, self end # --------------------------------------------------------------------- # Messages # --------------------------------------------------------------------- # # Get a list of message names that this object receives. # def self.messages return super + [ 'run' ] end # # Run the command and evaluate the expression. # def msg_run cmd = cmd_value return unless cmd begin # rubocop:disable Security/Eval result = eval cmd # rubocop:enable Security/Eval set_result result $engine.heap.it.set_to result rescue => e $engine.err e.message end end end end end