samagotchi 0.92.0 → 0.93.0

data/lib/samagotchi/guardrails/data_readers.rb

@@ -32,17 +32,30 @@ module Samagotchi
 
       # Where command_word's word is in +words+ (nil when there is none).
       def command_index(words)
-        i = 0
+        each_argument_index(words).find { |i| !assignment?(words[i]) }
+      end
+
+      # Each index of +words+ from +from+ on that is no redirection and no
+      # spaced redirection's target (the "/tmp/x" of "> /tmp/x"); an
+      # Enumerator without a block.
+      def each_argument_index(words, from = 0)
+        return enum_for(:each_argument_index, words, from) unless block_given?
+
+        i = from
         while i < words.size
           word = words[i]
           if word.match?(REDIRECT)
-            i += 1 if word.match?(/\A\d*[<>]{1,2}\z/)
-          elsif !word.match?(/\A[A-Za-z_]\w*=/)
-            return i
+            i += word.match?(/\A\d*[<>]{1,2}\z/) ? 2 : 1
+            next
           end
+          yield i
           i += 1
         end
-        nil
+      end
+
+      # Whether a word is a NAME=value assignment.
+      def assignment?(word)
+        word.match?(/\A[A-Za-z_]\w*=/)
       end
 
       # Whether a cat or tee command sends its output to a file (a file
@@ -62,8 +75,21 @@ module Samagotchi
       # ">& -". A >& with any other target does write one: bash reads
       # ">& file" and ">&file" as "&>file".
       def stdout_file?(words)
+        redirects_to_file?(words, /\A1?(>>?)(&?)(.*)\z/m)
+      end
+
+      # Whether one of +words+ sends any fd's output to a file (3>run.sh,
+      # 2>>log, {fd}>run.sh, 3<>run.sh as well as stdout_file?'s forms),
+      # /dev/null and fd dups left out as there.
+      def output_file?(words)
+        redirects_to_file?(words, /\A(?:\d*|\{\w+\})(>>?|<>)(&?)(.*)\z/m)
+      end
+
+      # stdout_file? and output_file?: a word matching +pattern+ (its
+      # captures: the operator, an &, the target) that writes a file.
+      def redirects_to_file?(words, pattern)
         words.each_with_index do |word, i|
-          match = word.match(/\A1?(>>?)(&?)(.*)\z/m)
+          match = word.match(pattern)
           next unless match
 
           amp = match[2]
@@ -84,18 +110,7 @@ module Samagotchi
         verb = command_index(words)
         return false unless verb
 
-        i = verb + 1
-        while i < words.size
-          word = words[i]
-          if word.match?(REDIRECT)
-            i += word.match?(/\A\d*[<>]{1,2}\z/) ? 2 : 1
-            next
-          end
-          return true if filename_word?(word)
-
-          i += 1
-        end
-        false
+        each_argument_index(words, verb + 1).any? { |i| filename_word?(words[i]) }
       end
 
       # Whether a tee argument names a file: not an option, a heredoc's tag,
@@ -139,18 +154,7 @@ module Samagotchi
       # their spaced targets), the <<TAG words and the heredoc bodies left
       # out.
       def arguments(words)
-        args = []
-        i = 0
-        while i < words.size
-          word = words[i]
-          if word.match?(REDIRECT)
-            i += word.match?(/\A\d*[<>]{1,2}\z/) ? 2 : 1
-            next
-          end
-          args << word unless word.match?(/\A[A-Za-z_]\w*=/) || heredoc_word?(word)
-          i += 1
-        end
-        args
+        each_argument_index(words).map { |i| words[i] }.reject { |word| assignment?(word) || heredoc_word?(word) }
       end
 
       # Whether a word is a heredoc's <<TAG or one of its bodies.

data/lib/samagotchi/guardrails/parent_levels.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module Samagotchi
+  module Guardrails
+    # The parent-answers level words and their one reading (#parse_level),
+    # apart from the rest of ParentPolicy so Session (its parent_answers
+    # setter) reads them without loading the guardrails.
+    module ParentPolicy
+      HARD = "hard"
+      STANDARD = "standard"
+      SOFT = "soft"
+      # Strictest first: a session's own level may only move left of
+      # config.yml's.
+      ORDER = [HARD, STANDARD, SOFT].freeze
+      # A session value that means "none of its own" (config's).
+      UNSET = "default"
+
+      # A level word as written anywhere (a session file, /parent-answers,
+      # --parent-answers), stripped and case-blind.
+      # @param word [String, Symbol, nil]
+      # @return [String, Symbol] the level, :unset (nil, "" or "default":
+      #   config's) or :invalid
+      def self.parse_level(word)
+        text = word.to_s.strip.downcase
+        return :unset if text.empty? || text == UNSET
+
+        ORDER.include?(text) ? text : :invalid
+      end
+    end
+  end
+end

data/lib/samagotchi/guardrails/parent_policy.rb

@@ -3,6 +3,7 @@
 require_relative "../config"
 require_relative "../pending_question"
 require_relative "approval"
+require_relative "parent_levels"
 require_relative "parent_approvals"
 
 module Samagotchi
@@ -49,9 +50,8 @@ module Samagotchi
       KEY = "guardrails.parent_answers"
       # A session's own value (Session#parent_answers): it may only tighten KEY.
       SESSION_KEY = "parent_answers"
-      HARD = "hard"
-      STANDARD = "standard"
-      SOFT = "soft"
+      # The level words (HARD, STANDARD, SOFT, ORDER, UNSET) and
+      # #parse_level: parent_levels.rb.
 
       # A strategy: its name, the effects a parent may pick under it, and
       # where it comes from: :config (config.yml's) or :session (a
@@ -83,12 +83,6 @@ module Samagotchi
       # @return [Strategy]
       def strategy(name) = STRATEGIES.fetch(name.to_s, STRATEGIES[HARD])
 
-      # Strictest first: a session's own level may only move left of
-      # config.yml's.
-      ORDER = [HARD, STANDARD, SOFT].freeze
-      # A session value that means "none of its own" (config's).
-      UNSET = "default"
-
       # The stricter of two strategies, by name; a tie keeps +a+.
       # @return [Strategy]
       def stricter(a, b) = ORDER.index(b.name) < ORDER.index(a.name) ? b : a
@@ -99,18 +93,16 @@ module Samagotchi
       # is read on every parent answer).
       # @return [String, nil]
       def session_level(value)
-        word = value.to_s.strip.downcase
-        return nil if word.empty? || word == UNSET
-
-        STRATEGIES.key?(word) ? word : HARD
+        case (level = parse_level(value))
+        when :unset then nil
+        when :invalid then HARD
+        else level
+        end
       end
 
       # Whether a session's own value is set but not a level (a hand-edited
       # file: read as hard); the worker says so once when it loads.
-      def unknown_level?(value)
-        word = value.to_s.strip.downcase
-        !word.empty? && word != UNSET && !STRATEGIES.key?(word)
-      end
+      def unknown_level?(value) = parse_level(value) == :invalid
 
       # What a parent may answer on a session whose own value is
       # +session_value+: config.yml's (+config+) unless the session's is
@@ -150,9 +142,6 @@ module Samagotchi
         level.nil? ? ORDER.size : ORDER.index(level)
       end
 
-      # @return [Array<String>] the effects +strategy+ lets a parent pick
-      def allowed_effects(strategy) = strategy.allowed
-
       # Each option's effect, in option order. Tagged questions carry them;
       # an untagged one (asked by an older worker, a relayed card built
       # from an older child's question) gets them derived as before:

data/lib/samagotchi/guardrails/shell_lex.rb

@@ -95,6 +95,7 @@ module Samagotchi
 
         bodies = lexer.heredoc_spans.map { |doc| doc[:span] }
         cuts = []
+        redirected = false
         each_command(tokens) do |indices|
           words = indices.map { |i| tokens[i][1] }
           indices.each_with_index do |i, position|
@@ -103,12 +104,13 @@ module Samagotchi
 
             span = lexer.spans[i]
             cut = if bodies.include?(span)
-                    body_cut(text, span, words) if value == HEREDOC
+                    body_cut(text, span, words, redirected) if value == HEREDOC
                   elsif value == SUBST
                     substitution_cut(text, tokens, i, span, words, position)
                   end
             cuts << cut if cut
           end
+          redirected ||= exec_redirect?(tokens, indices, words)
         end
         cuts.sort_by { |span, _| -span.begin }.each_with_object(+text) do |(span, replacement), out|
           out[span] = replacement
@@ -134,25 +136,44 @@ module Samagotchi
 
       # [span, what it becomes] for a data heredoc's body at +span+ (its
       # command's +words+), or nil when the body stays in the code text: a
-      # cat or tee writing a file may be run later (D1).
-      def self.body_cut(text, span, words)
-        return nil unless cut_body?(words)
+      # cat or tee writing a file may be run later (D1), and so may one
+      # printing after an earlier exec sent the shell's output to a file
+      # (+redirected+).
+      def self.body_cut(text, span, words, redirected)
+        return nil unless cut_body?(words, redirected)
 
         [span, terminator_line(text[span])]
       end
       private_class_method :body_cut
 
       # Whether a body a data reader reads leaves the code text: a cat or tee
-      # sending it to a file keeps it (D1); a body any other command reads as
+      # sending it to a file keeps it (D1), as does any cat or tee once an
+      # exec redirected the shell's output (+redirected+: its stdout, or the
+      # fd a >&3 names, may be a file); a body any other command reads as
       # data is one the lexer's data_sink? approved.
-      def self.cut_body?(words)
+      def self.cut_body?(words, redirected)
         verb = DataReaders.command_word(words)
         return true unless DataReaders::SINKS.include?(File.basename(verb.to_s))
 
-        !DataReaders.writes_file?(words)
+        !redirected && !DataReaders.writes_file?(words)
       end
       private_class_method :cut_body?
 
+      # Whether the simple command at +indices+ may be an exec that redirects
+      # the shell's own output to a file (exec >run.sh, exec 3>run.sh,
+      # exec {fd}>run.sh, exec 3<>run.sh): what a later cat or tee prints may
+      # land there. Any exec word counts, not only the command word ({ exec
+      # …; }, then exec …, command exec …, a function's body), and so does an
+      # exec backgrounded (exec &>run.sh, which the lexer reads as "exec &"
+      # and ">run.sh"): the conservative reading.
+      def self.exec_redirect?(tokens, indices, words)
+        return false unless words.include?("exec")
+
+        following = tokens[indices.last + 1]
+        DataReaders.output_file?(words) || following == [:op, "&"]
+      end
+      private_class_method :exec_redirect?
+
       # [span, what it becomes] for the body of a "$(cat <<'EOF' … EOF)" given
       # as a message (-m, --body, …) of a data reader (D2), or nil: eval,
       # bash -c, a command piped on and a body that runs stay.

data/lib/samagotchi/hook_question.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Samagotchi
+  # A hook's or a plugin's question (event[:ask_user], ctx.ask_user) as one
+  # value on its way to the question flow: built at the plugin-facing edge
+  # (Hooks::Registry's event helper, Plugin::Context#ask_user), passed
+  # through the hook runtime and the plugin host (Hooks::Runtime#ask_user,
+  # Plugin::Host#ask_user), Engine#hook_ask_user and HookRoutes#ask_user to
+  # QuestionDesk#ask_for_hook. The bundle test kit records it as asked
+  # (Testing::Recorder#questions).
+  #
+  # question, options, header, allow_freeform: as the hook gave them
+  # (QuestionDesk checks the options); hook: the asking hook's or plugin's
+  # label; effects: what an option does for a parent agent's answer, by its
+  # label (label => effect, as the hook gave it; nil for none). QuestionDesk
+  # turns it into the pending question's per-option tags
+  # (Guardrails::ParentPolicy.option_tags, PendingQuestion#effects).
+  HookQuestion = Data.define(:question, :options, :header, :allow_freeform, :hook, :effects) do
+    def initialize(effects: nil, **) = super
+  end
+end

data/lib/samagotchi/hook_routes.rb

@@ -31,14 +31,13 @@ module Samagotchi
     end
 
     # The things a hook can do beyond reading its event. Each gets the
-    # hook's label (event[:hook]) from the registry.
+    # hook's label (event[:hook]) from the registry; ask_user gets it inside
+    # the HookQuestion.
     # @return [Hooks::Runtime]
     def runtime
       Hooks::Runtime.new(
         notify: ->(text:, level:, hook:, fallback_for: nil) { notify(text, level, hook, fallback_for: fallback_for) },
-        ask_user: lambda { |question:, options:, header:, allow_freeform:, hook:, effects: nil|
-          ask_user(question, options, header, allow_freeform, hook, effects: effects)
-        },
+        ask_user: ->(question) { ask_user(question) },
         stop_turn: ->(reason:, hook:) { stop_turn(reason, hook) },
         steer: ->(text:, hook:) { @steer.call(text, source(hook)) },
         stop_generation: ->(reason:, hook:) { stop_generation(reason, hook) }
@@ -87,9 +86,10 @@ module Samagotchi
     # web), single-select, kind "hook". A --non-interactive run has no one
     # to ask: nil at once. Anything but an answer (a sync handler's text, no
     # answer, cancelled) is nil too.
+    # @param question [HookQuestion]
     # @return [Hash, nil] {selected:, freeform:, selected_indices:}
-    def ask_user(question, options, header, allow_freeform, hook, effects: nil)
-      @question_desk.call.ask_for_hook(question, options, header, allow_freeform, hook, effects: effects)
+    def ask_user(question)
+      @question_desk.call.ask_for_hook(question)
     end
 
     # Cancel the running turn (reason :hook), after a notice that says why.

data/lib/samagotchi/hooks/registry.rb

@@ -1,6 +1,7 @@
 # frozen_string_literal: true
 
 require "monitor"
+require_relative "../hook_question"
 require_relative "../log"
 
 module Samagotchi
@@ -113,8 +114,8 @@ module Samagotchi
     # callables, each given the hook's label. +notify+ takes
     # (text:, level:, hook:, and fallback_for: when the hook gave one: what
     # the line stands in for, HookRoutes#notify) and shows one line to the
-    # user; +ask_user+ takes (question:, options:, header:, allow_freeform:, hook:, and
-    # effects: when the hook gave them) and returns the answer hash or nil; +stop_turn+ takes (reason:, hook:) and
+    # user; +ask_user+ takes a HookQuestion (the hook's label in it) and
+    # returns the answer hash or nil; +stop_turn+ takes (reason:, hook:) and
     # cancels the running turn (true when it did); +steer+ takes (text:,
     # hook:) and puts the text into the running turn (Engine#steer, true
     # when queued); +stop_generation+ takes (reason:, hook:) and cuts the
@@ -392,9 +393,8 @@ module Samagotchi
           nil
         }
         event[:ask_user] ||= lambda { |question:, options:, header: nil, allow_freeform: false, effects: nil|
-          @runtime&.ask_user&.call(question: question, options: options, header: header,
-                                   allow_freeform: allow_freeform, hook: event[:hook],
-                                   **(effects.nil? ? {} : { effects: effects }))
+          @runtime&.ask_user&.call(HookQuestion.new(question: question, options: options, header: header,
+                                                    allow_freeform: allow_freeform, hook: event[:hook], effects: effects))
         }
         event[:stop_turn] ||= lambda { |reason|
           next false if TURN_OVER_EVENTS.include?(event[:type])

data/lib/samagotchi/host_registry.rb

@@ -68,7 +68,7 @@ module Samagotchi
       def api_base_url
         return openai_base_url unless api&.to_sym == :anthropic
 
-        (url || root_url).chomp("/").delete_suffix("/v1")
+        LLM::AnthropicMessages.api_root(url || root_url)
       end
 
       # The header the host's key goes in: auth: when set, else the api's

data/lib/samagotchi/llm/anthropic_messages.rb

@@ -87,6 +87,11 @@ module Samagotchi
 
       attr_reader :base_url, :host_name, :api_key_env, :models_ttl, :first_token_timeout, :dialect
 
+      # The Messages API root a base URL names: without a trailing / and a
+      # trailing /v1 (as ANTHROPIC_BASE_URL), so requests never go to
+      # /v1/v1. HostEntry#api_base_url and the bootstrap probe both use it.
+      def self.api_root(url) = url.to_s.chomp("/").delete_suffix("/v1")
+
       # @param entry [HostRegistry::HostEntry]
       def self.for(entry, **)
         new(base_url: entry.api_base_url, host_name: entry.name, api_key_env: entry.api_key_env, auth: entry.auth,

data/lib/samagotchi/parent_answers_command.rb

@@ -25,10 +25,11 @@ module Samagotchi
       return [:show] if words.empty?
       return [:usage] if words.size > 1
 
-      word = words.first.downcase
-      return [:set, nil] if word == Guardrails::ParentPolicy::UNSET
-
-      Guardrails::ParentPolicy::ORDER.include?(word) ? [:set, word] : [:usage]
+      case (level = Guardrails::ParentPolicy.parse_level(words.first))
+      when :unset then [:set, nil]
+      when :invalid then [:usage]
+      else [:set, level]
+      end
     end
 
     # Whether the command line +line+ loosens a session whose own value is
@@ -72,8 +73,7 @@ module Samagotchi
       effective = Guardrails::ParentPolicy.for_session(session)
       own = session.parent_answers || "none"
       # A hand-edited value that isn't a level: fail-closed, said here.
-      own = "#{own} (unreadable value, read as hard)" if session.parent_answers &&
-                                                         !Guardrails::ParentPolicy::ORDER.include?(session.parent_answers)
+      own = "#{own} (unreadable value, read as hard)" if Guardrails::ParentPolicy.unknown_level?(session.parent_answers)
       "parent answers: #{effective.name} (this session: #{own}; config.yml #{config.label})"
     end
   end

data/lib/samagotchi/plugin/context.rb

@@ -5,6 +5,7 @@ require_relative "../log"
 require_relative "../paths"
 require_relative "../session_metrics/cost"
 require_relative "../guardrails/context"
+require_relative "../hook_question"
 require_relative "../idle_client"
 require_relative "service"
 require_relative "side_question"
@@ -28,8 +29,8 @@ module Samagotchi
 
     # The Engine's side of a Context: callables, so the Engine itself is
     # never handed out. +messages+ returns the conversation, +notify+ takes
-    # (text, level, label, fallback_for:), +ask_user+ takes (question:, options:, header:,
-    # allow_freeform:, hook:, and effects: when the plugin gave them) like the hook runtime's, +card+ takes
+    # (text, level, label, fallback_for:), +ask_user+ takes a HookQuestion
+    # (the plugin's label in it) like the hook runtime's, +card+ takes
     # Engine#show_card's keywords and returns the id, +ask_model+ takes
     # (chat messages, timeout:, max_tokens:, cancel_controller:, model:: a
     # configured model ref, nil for the session's) and returns the answer
@@ -363,13 +364,13 @@ module Samagotchi
       # @return [Hash, nil] {selected:, freeform:, selected_indices:}, or nil
       #   (no one to ask, cancelled, bad options or effects)
       def ask_user(question:, options:, header: nil, allow_freeform: false, effects: nil)
-        tags = effects.nil? ? {} : { effects: effects }
         if (helper = event_helper(:ask_user))
+          tags = effects.nil? ? {} : { effects: effects }
           return helper.call(question: question, options: options, header: header, allow_freeform: allow_freeform, **tags)
         end
 
-        @host.ask_user.call(question: question, options: options, header: header, allow_freeform: allow_freeform,
-                            hook: @label, **tags)
+        @host.ask_user.call(HookQuestion.new(question: question, options: options, header: header,
+                                             allow_freeform: allow_freeform, hook: @label, effects: effects))
       end
 
       # Whether the running turn was cancelled (a long tool should stop).

data/lib/samagotchi/plugin/http_transport.rb

@@ -12,8 +12,10 @@ module Samagotchi
     class Http
       # Plugin::Http's wire: one LLM::HTTP request per call (chi's TLS,
       # proxies, User-Agent, cancel by closing the socket, and one log line
-      # without query, headers or body), with chi's retries off. Every error
-      # but a cancel becomes an HttpError, so a plugin rescues one type.
+      # without query, headers or body), with chi's retries off. Every
+      # network, TLS, protocol or provider error but a cancel becomes an
+      # HttpError, so a plugin rescues one type; anything else is a bug in
+      # chi, logged with its backtrace and raised as it is.
       #
       # Loaded with the first real request (it pulls in net/http and the
       # LLM layer). Stateless.
@@ -29,6 +31,12 @@ module Samagotchi
           Net::ProtocolError => "protocol error", Zlib::Error => "bad compressed body"
         }.freeze
 
+        # The errors a request's wire may raise: each becomes an HttpError.
+        WIRE_ERRORS = [
+          *REASONS.keys, *LLM::HTTP::NETWORK_ERRORS, SystemCallError, IOError, OpenSSL::OpenSSLError,
+          LLM::ProviderError
+        ].uniq.freeze
+
         def initialize(bundle:)
           @bundle = bundle.to_s
         end
@@ -47,8 +55,11 @@ module Samagotchi
           raise HttpCancelled, "#{method} #{where(uri)}: cancelled"
         rescue HttpError
           raise
-        rescue StandardError => e
+        rescue *WIRE_ERRORS => e
           raise HttpError, "#{method} #{where(uri)}: #{reason(e)}"
+        rescue StandardError => e
+          Log.exception(:plugins, "http_transport_failed", e, bundle: @bundle)
+          raise
         end
 
         private

data/lib/samagotchi/plugin/sessions.rb

@@ -80,11 +80,10 @@ module Samagotchi
         sid = resolve(id, state_dir)
         delivered = SessionManager.deliver_turn(sid, prompt: text.to_s, client_id: ClientId::PLUGIN, state_dir: state_dir,
                                                      delivery: wire)
-        case delivered[:status]
+        case delivered.status
         when :accepted then sid
         when :refused
-          ack = delivered[:ack] || {}
-          raise Error, "session #{sid[0, 8]} refused the message (#{ack["error"]}#{": #{ack["detail"]}" if ack["detail"]})"
+          raise Error, "session #{sid[0, 8]} refused the message (#{delivered.error}#{": #{delivered.detail}" if delivered.detail})"
         when :timeout then raise Error, "session #{sid[0, 8]}'s worker did not answer in time; the message was not sent"
         else raise Error, "the message to session #{sid[0, 8]} could not be written"
         end

data/lib/samagotchi/question_desk.rb

@@ -6,6 +6,7 @@ require "securerandom"
 require "time"
 
 require_relative "client_id"
+require_relative "hook_question"
 require_relative "log"
 require_relative "pending_question"
 require_relative "question_answer"
@@ -404,30 +405,32 @@ module Samagotchi
     # web), single-select, kind "hook". A --non-interactive run has no one
     # to ask: nil at once. Anything but an answer (a sync handler's text, no
     # answer, cancelled) is nil too.
-    # @param effects [Hash, nil] label => effect for a parent agent's answer
-    #   (Guardrails::ParentPolicy); a label left out is "answer". A label
+    # @param asked [HookQuestion] its effects (label => effect for a parent
+    #   agent's answer, Guardrails::ParentPolicy; a label left out is
+    #   "answer") become the pending question's per-option tags. A label
     #   the options don't have, or an effect it doesn't know, makes the ask
     #   invalid (nil, warned), like bad options.
     # @return [Hash, nil] {selected:, freeform:, selected_indices:} (a plain
     #   Hash: the bundle boundary)
-    def ask_for_hook(question, options, header, allow_freeform, hook, effects: nil)
+    def ask_for_hook(asked)
       return nil if @interface_lookup.call == :non_interactive
 
-      opts = Tools::AskUserQuestion.normalize_options(options)
+      hook = asked.hook.to_s
+      opts = Tools::AskUserQuestion.normalize_options(asked.options)
       unless opts
-        Log.warn(:hooks, "ask_user_invalid", echo: "[samagotchi:hooks] #{hook} asked with invalid options (2-8 strings)", hook: hook.to_s)
+        Log.warn(:hooks, "ask_user_invalid", echo: "[samagotchi:hooks] #{hook} asked with invalid options (2-8 strings)", hook: hook)
         return nil
       end
-      tags = Guardrails::ParentPolicy.option_tags(opts, effects)
+      tags = Guardrails::ParentPolicy.option_tags(opts, asked.effects)
       if tags == false
         Log.warn(:hooks, "ask_user_invalid",
                  echo: "[samagotchi:hooks] #{hook} asked with invalid effects (option label => " \
-                       "#{Guardrails::ParentPolicy::EFFECTS.join("|")})", hook: hook.to_s)
+                       "#{Guardrails::ParentPolicy::EFFECTS.join("|")})", hook: hook)
         return nil
       end
 
-      fields = { question: question.to_s, options: opts, header: header, multi_select: false,
-                 allow_freeform: !!allow_freeform, effects: tags, kind: "hook", hook: hook.to_s }.compact
+      fields = { question: asked.question.to_s, options: opts, header: asked.header, multi_select: false,
+                 allow_freeform: !!asked.allow_freeform, effects: tags, kind: "hook", hook: hook }.compact
       answer = open_question(fields)
       return nil unless answer.is_a?(QuestionAnswer)