markdown_exec 2.0.8.4 → 2.2.0

data/lib/menu.src.yml

@@ -127,6 +127,13 @@
   :opt_name: menu_for_saved_lines
   :procname: val_as_bool
 
+- :arg_name: BOOL
+  :default: true
+  :description: Add menu options for history
+  :env_var: MDE_menu_for_history
+  :opt_name: menu_for_history
+  :procname: val_as_bool
+
 - :arg_name: BOOL
   :default: false
   :description: Dump @delegate_object
@@ -268,8 +275,10 @@
   :default: false
   :description: Execute script in own window
   :env_var: MDE_EXECUTE_IN_OWN_WINDOW
+  :long_name: execute_in_own_window
   :opt_name: execute_in_own_window
   :procname: val_as_bool
+  :short_name: w
 
 - :default: fg_rgbh_7f_ff_00
   :description: execution_report_preview_frame_color
@@ -296,13 +305,13 @@
 
 ## match fenced code indented by spaces
 #
-- :default: "^(?<indent> *)`{3,}"
+- :default: "^(?<indent>[ \t]*)`{3,}"
   :description: Matches the start and end of a fenced code block
   :env_var: MDE_FENCED_START_AND_END_REGEX
   :opt_name: fenced_start_and_end_regex
   :procname: val_as_str
 
-- :default: "^(?<indent> *)`{3,}(?<shell>[^`\\s]*) *(:(?<name>[^\\s]*))? *(?<rest>.*) *$"
+- :default: "^(?<indent>[ \t]*)`{3,}(?<shell>[^`\\s]*) *(:(?<name>[^\\s]*))? *(?<rest>.*) *$"
   :description: Match the start of a fenced block
   :env_var: MDE_FENCED_START_EXTENDED_REGEX
   :opt_name: fenced_start_extended_regex
@@ -373,7 +382,7 @@
 
 - :arg_name: HOW
   :default: ''
-  :description: Find in YAML configuration options
+  :description: Find keyword in YAML configuration options
   :long_name: how
   :procname: how
   :short_name: "?"
@@ -431,6 +440,7 @@
   :long_name: load-code
   :opt_name: load_code
   :procname: val_as_str
+  :short_name: l
 
 - :arg_name: PREFIX
   :default: mde
@@ -500,7 +510,7 @@
   :opt_name: menu_divider_format
   :procname: val_as_str
 
-- :default: "^:::(?<line>(?<indent>[ \t]*)(?<text>.*?)(?<trailing>[ \t]*))?$"
+- :default: "^(?<indent>[ \t]*):::(?<line>(?<text>.*?)(?<trailing>[ \t]*))?$"
   :description: Pattern for topics/dividers in block selection menu
   :env_var: MDE_MENU_DIVIDER_MATCH
   :opt_name: menu_divider_match
@@ -643,8 +653,9 @@
   :opt_name: menu_note_format
   :procname: val_as_str
 
-## all lines that do not start with "/ " are notes
-- :default: "^(?<line>(?!/ )(?<indent>[ \t]*)(?<text>.*?)(?<trailing>[ \t]*))?$"
+## lines that start with "/" are comments (hidden), not notes (visible)
+# - :default: "^(?<indent>[ \t]*)(?<line>(?!/)(?<text>.*?)(?<trailing>[ \t]*))?$"
+- :default: "^(?<line>(?![ \t]*/)(?<text>.*?)(?<trailing>[ \t]*))?$"
   :description: Pattern for notes in block selection menu
   :env_var: MDE_MENU_NOTE_MATCH
   :opt_name: menu_note_match
@@ -671,6 +682,13 @@
   :opt_name: menu_option_exit_name
   :procname: val_as_str
 
+- :default:
+    :line: "* History"
+  :description: Text for History option
+  :env_var: MDE_MENU_OPTION_HISTORY_NAME
+  :opt_name: menu_option_history_name
+  :procname: val_as_str
+
 - :default:
     :line: "* Load"
   :description: Text for Load option
@@ -951,13 +969,19 @@
   :procname: val_as_str
 
 - :default: Back
-  :description: Quit prompt
-  :env_var: MDE_PROMPT_FILESPEC_OTHER
+  :description: User wants out of menu
+  :env_var: MDE_PROMPT_FILESPEC_BACK
   :opt_name: prompt_filespec_back
   :procname: val_as_str
 
+- :default: Facet
+  :description: User wants to tailor the menu
+  :env_var: MDE_PROMPT_FILESPEC_FACET
+  :opt_name: prompt_filespec_facet
+  :procname: val_as_str
+
 - :default: Other
-  :description: Prompt for a custom file name
+  :description: User wants a custom file name
   :env_var: MDE_PROMPT_FILESPEC_OTHER
   :opt_name: prompt_filespec_other
   :procname: val_as_str
@@ -992,6 +1016,12 @@
   :opt_name: prompt_select_code_file
   :procname: val_as_str
 
+- :default: "\nView file:"
+  :description: Prompt to select a saved asset
+  :env_var: MDE_PROMPT_SELECT_HISTORY_FILE
+  :opt_name: prompt_select_history_file
+  :procname: val_as_str
+
 - :default: "\nChoose a file:"
   :description: Prompt to select a markdown document
   :env_var: MDE_PROMPT_SELECT_MD
@@ -1022,7 +1052,7 @@
   :opt_name: prompt_yes
   :procname: val_as_str
 
-- :description: Gem home folder
+- :description: Print the gem's home directory
   :long_name: pwd
   :opt_name: pwd
   :procname: val_as_bool
@@ -1038,6 +1068,18 @@
   :opt_name: runtime_exception_error_level
   :procname: val_as_int
 
+- :default: '%{prefix}%{join}%{time}%{join}%{filename}%{join}%{mark}%{join}%{blockname}%{join}%{exts}'
+  :description: Format for script and log file names
+  :env_var: MDE_SAVED_ASSET_FORMAT
+  :opt_name: saved_asset_format
+  :procname: val_as_str
+
+- :default: "^(?<prefix>.+)(?<join>_)(?<time>[0-9\\-]+)\\g'join'(?<filename>.+)\\g'join'(?<mark>~)\\g'join'(?<blockname>.+)\\g'join'(?<exts>\\..+)$"
+  :description: Regexp for script and log file names
+  :env_var: MDE_SAVED_ASSET_MATCH
+  :opt_name: saved_asset_match
+  :procname: val_as_str
+
 - :arg_name: BOOL
   :default: false
   :description: Whether to save an executed script
@@ -1064,6 +1106,12 @@
   :opt_name: saved_filename_replacement
   :procname: val_as_str
 
+- :default: '%{time}  %{blockname}  %{exts}'
+  :description: Format for each row displayed in history
+  :env_var: MDE_SAVED_HISTORY_FORMAT
+  :opt_name: saved_history_format
+  :procname: val_as_str
+
 - :arg_name: INT
   :default: 493
   :description: chmod for saved scripts
@@ -1162,16 +1210,6 @@
   :opt_name: select_page_height
   :procname: val_as_int
 
-- :description: Select and execute a recently saved output
-  :long_name: select-recent-output
-  :opt_name: select_recent_output
-  :procname: val_as_bool
-
-- :description: Select and execute a recently saved script
-  :long_name: select-recent-script
-  :opt_name: select_recent_script
-  :procname: val_as_bool
-
 - :default: "#!/usr/bin/env"
   :description: Shebang for saved scripts
   :env_var: MDE_SHEBANG
@@ -1202,6 +1240,13 @@
   :opt_name: shell_code_label_time_format
   :procname: val_as_str
 
+- :arg_name: BOOL
+  :default: true
+  :description: Whether saved file names include shell parameter expansion
+  :env_var: MDE_SHELL_PARAMETER_EXPANSION
+  :opt_name: shell_parameter_expansion
+  :procname: val_as_bool
+
 - :description: List tab completions
   :long_name: tab-completions
   :opt_name: tab_completions

data/lib/menu.yml

@@ -106,6 +106,12 @@
   :env_var: MDE_MENU_FOR_SAVED_LINES
   :opt_name: menu_for_saved_lines
   :procname: val_as_bool
+- :arg_name: BOOL
+  :default: true
+  :description: Add menu options for history
+  :env_var: MDE_menu_for_history
+  :opt_name: menu_for_history
+  :procname: val_as_bool
 - :arg_name: BOOL
   :default: false
   :description: Dump @delegate_object
@@ -230,8 +236,10 @@
   :default: false
   :description: Execute script in own window
   :env_var: MDE_EXECUTE_IN_OWN_WINDOW
+  :long_name: execute_in_own_window
   :opt_name: execute_in_own_window
   :procname: val_as_bool
+  :short_name: w
 - :default: fg_rgbh_7f_ff_00
   :description: execution_report_preview_frame_color
   :env_var: MDE_EXECUTION_REPORT_PREVIEW_FRAME_COLOR
@@ -253,12 +261,12 @@
   :long_name: exit
   :procname: exit
   :short_name: x
-- :default: "^(?<indent> *)`{3,}"
+- :default: "^(?<indent>[ \t]*)`{3,}"
   :description: Matches the start and end of a fenced code block
   :env_var: MDE_FENCED_START_AND_END_REGEX
   :opt_name: fenced_start_and_end_regex
   :procname: val_as_str
-- :default: "^(?<indent> *)`{3,}(?<shell>[^`\\s]*) *(:(?<name>[^\\s]*))? *(?<rest>.*)
+- :default: "^(?<indent>[ \t]*)`{3,}(?<shell>[^`\\s]*) *(:(?<name>[^\\s]*))? *(?<rest>.*)
     *$"
   :description: Match the start of a fenced block
   :env_var: MDE_FENCED_START_EXTENDED_REGEX
@@ -319,7 +327,7 @@
   :procname: val_as_str
 - :arg_name: HOW
   :default: ''
-  :description: Find in YAML configuration options
+  :description: Find keyword in YAML configuration options
   :long_name: how
   :procname: how
   :short_name: "?"
@@ -367,6 +375,7 @@
   :long_name: load-code
   :opt_name: load_code
   :procname: val_as_str
+  :short_name: l
 - :arg_name: PREFIX
   :default: mde
   :description: Name prefix for stdout files
@@ -425,7 +434,7 @@
   :env_var: MDE_MENU_DIVIDER_FORMAT
   :opt_name: menu_divider_format
   :procname: val_as_str
-- :default: "^:::(?<line>(?<indent>[ \t]*)(?<text>.*?)(?<trailing>[ \t]*))?$"
+- :default: "^(?<indent>[ \t]*):::(?<line>(?<text>.*?)(?<trailing>[ \t]*))?$"
   :description: Pattern for topics/dividers in block selection menu
   :env_var: MDE_MENU_DIVIDER_MATCH
   :opt_name: menu_divider_match
@@ -542,7 +551,7 @@
   :env_var: MDE_MENU_NOTE_FORMAT
   :opt_name: menu_note_format
   :procname: val_as_str
-- :default: "^(?<line>(?!/ )(?<indent>[ \t]*)(?<text>.*?)(?<trailing>[ \t]*))?$"
+- :default: "^(?<line>(?![ \t]*/)(?<text>.*?)(?<trailing>[ \t]*))?$"
   :description: Pattern for notes in block selection menu
   :env_var: MDE_MENU_NOTE_MATCH
   :opt_name: menu_note_match
@@ -565,6 +574,12 @@
   :env_var: MDE_MENU_OPTION_EXIT_NAME
   :opt_name: menu_option_exit_name
   :procname: val_as_str
+- :default:
+    :line: "* History"
+  :description: Text for History option
+  :env_var: MDE_MENU_OPTION_HISTORY_NAME
+  :opt_name: menu_option_history_name
+  :procname: val_as_str
 - :default:
     :line: "* Load"
   :description: Text for Load option
@@ -808,12 +823,17 @@
   :opt_name: prompt_exit
   :procname: val_as_str
 - :default: Back
-  :description: Quit prompt
-  :env_var: MDE_PROMPT_FILESPEC_OTHER
+  :description: User wants out of menu
+  :env_var: MDE_PROMPT_FILESPEC_BACK
   :opt_name: prompt_filespec_back
   :procname: val_as_str
+- :default: Facet
+  :description: User wants to tailor the menu
+  :env_var: MDE_PROMPT_FILESPEC_FACET
+  :opt_name: prompt_filespec_facet
+  :procname: val_as_str
 - :default: Other
-  :description: Prompt for a custom file name
+  :description: User wants a custom file name
   :env_var: MDE_PROMPT_FILESPEC_OTHER
   :opt_name: prompt_filespec_other
   :procname: val_as_str
@@ -848,6 +868,13 @@
   :procname: val_as_str
 - :default: |2-
 
+    View file:
+  :description: Prompt to select a saved asset
+  :env_var: MDE_PROMPT_SELECT_HISTORY_FILE
+  :opt_name: prompt_select_history_file
+  :procname: val_as_str
+- :default: |2-
+
     Choose a file:
   :description: Prompt to select a markdown document
   :env_var: MDE_PROMPT_SELECT_MD
@@ -875,7 +902,7 @@
   :env_var: MDE_PROMPT_YES
   :opt_name: prompt_yes
   :procname: val_as_str
-- :description: Gem home folder
+- :description: Print the gem's home directory
   :long_name: pwd
   :opt_name: pwd
   :procname: val_as_bool
@@ -889,6 +916,16 @@
   :env_var: MDE_RUNTIME_EXCEPTION_ERROR_LEVEL
   :opt_name: runtime_exception_error_level
   :procname: val_as_int
+- :default: "%{prefix}%{join}%{time}%{join}%{filename}%{join}%{mark}%{join}%{blockname}%{join}%{exts}"
+  :description: Format for script and log file names
+  :env_var: MDE_SAVED_ASSET_FORMAT
+  :opt_name: saved_asset_format
+  :procname: val_as_str
+- :default: "^(?<prefix>.+)(?<join>_)(?<time>[0-9\\-]+)\\g'join'(?<filename>.+)\\g'join'(?<mark>~)\\g'join'(?<blockname>.+)\\g'join'(?<exts>\\..+)$"
+  :description: Regexp for script and log file names
+  :env_var: MDE_SAVED_ASSET_MATCH
+  :opt_name: saved_asset_match
+  :procname: val_as_str
 - :arg_name: BOOL
   :default: false
   :description: Whether to save an executed script
@@ -911,6 +948,11 @@
   :env_var: MDE_SAVED_FILENAME_REPLACEMENT
   :opt_name: saved_filename_replacement
   :procname: val_as_str
+- :default: "%{time}  %{blockname}  %{exts}"
+  :description: Format for each row displayed in history
+  :env_var: MDE_SAVED_HISTORY_FORMAT
+  :opt_name: saved_history_format
+  :procname: val_as_str
 - :arg_name: INT
   :default: 493
   :description: chmod for saved scripts
@@ -998,14 +1040,6 @@
   :env_var: MDE_SELECT_PAGE_HEIGHT
   :opt_name: select_page_height
   :procname: val_as_int
-- :description: Select and execute a recently saved output
-  :long_name: select-recent-output
-  :opt_name: select_recent_output
-  :procname: val_as_bool
-- :description: Select and execute a recently saved script
-  :long_name: select-recent-script
-  :opt_name: select_recent_script
-  :procname: val_as_bool
 - :default: "#!/usr/bin/env"
   :description: Shebang for saved scripts
   :env_var: MDE_SHEBANG
@@ -1032,6 +1066,12 @@
   :env_var: MDE_SHELL_CODE_LABEL_TIME_FORMAT
   :opt_name: shell_code_label_time_format
   :procname: val_as_str
+- :arg_name: BOOL
+  :default: true
+  :description: Whether saved file names include shell parameter expansion
+  :env_var: MDE_SHELL_PARAMETER_EXPANSION
+  :opt_name: shell_parameter_expansion
+  :procname: val_as_bool
 - :description: List tab completions
   :long_name: tab-completions
   :opt_name: tab_completions

data/lib/namer.rb

@@ -0,0 +1,50 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+# encoding=utf-8
+require 'digest'
+# require_relative 'poly'
+
+$pd = false unless defined?($pd)
+
+class Hash
+  # block name in commands and documents
+  def pub_name(**kwargs)
+    full = fetch(:nickname, nil) || fetch(:oname, nil)
+    full&.to_s&.pub_name(**kwargs).tap { |ret| pp [__LINE__, 'Hash.pub_name() ->', ret] if $pd }
+  end
+end
+
+class String
+  FN_ID_LEN = 4
+  FN_MAX_LEN = 64
+  FN_PATTERN = %r{[^!#%\+\-0-9=@A-Z_a-z()\[\]{}]}.freeze # characters than can be used in a file name without quotes or escaping
+  # except '.', ',', '~' reserved for tokenization
+  # / !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~
+  FN_REPLACEMENT = '_'
+
+  # block name in commands and documents
+  def pub_name(
+    id_len: FN_ID_LEN, max_len: FN_MAX_LEN,
+    pattern: FN_PATTERN, replacement: FN_REPLACEMENT
+  )
+    trimmed = if self[max_len]
+                rand(((10**(id_len - 1)) + 1)..(10**id_len)).to_s
+                dig = Digest::MD5.hexdigest(self)[0, id_len]
+                self[0..max_len - id_len] + dig
+              else
+                self
+              end
+
+    trimmed.gsub(pattern, replacement).tap { |ret| pp [__LINE__, 'String.pub_name() ->', ret] if $pd }
+  end
+end
+
+# require 'ostruct'
+
+# class BlkS < OpenStruct
+#   # Method to fetch the value associated with the attribute :nickname or :oname
+#   def pub_name
+#     self.nickname || self.oname
+#   end
+# end

data/lib/poly.rb

@@ -0,0 +1,152 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+# encoding=utf-8
+
+$pd = false
+
+class Poly
+  # attr_reader :table
+  def initialize(table = {})
+    @table = table.tap{|ret| pp [__LINE__,'Poly.initialize()','table',table.to_yaml] if $pd }
+  end
+
+  def fetch(key, *args)
+    key_sym = key.to_sym
+    if respond_to?("get_#{key}")
+      send("get_#{key}")
+    elsif @table.key?(key_sym)
+      @table[key_sym]
+    elsif block_given?
+      yield key_sym
+    elsif args.count.positive?
+# binding.irb
+      args.first
+    else
+binding.irb
+      raise KeyError, "key not found: #{key}"
+    end.tap{|ret| pp([__LINE__,"Poly.fetch #{key} #{args}",'->',ret]) if $pd }
+  end
+
+  def key?(name)
+    @table.key?(name.to_sym).tap{|ret| pp([__LINE__,"Poly.key? #{name}",'->',ret]) if $pd }
+  end
+
+  def method_missing(name, *args)
+    pt = nil
+    if name.to_s.end_with?('=')
+      # Setter method
+      attribute = name.to_s.chomp('=').to_sym
+      value = args.first
+      if respond_to?("set_#{attribute}")
+        pt = 'send set_'
+        send("set_#{attribute}", value)
+      else
+        pt = 'table set'
+        @table[attribute] = value
+      end
+    elsif respond_to?("get_#{name}")
+      pt = 'send get_'
+      # Getter method
+      send("get_#{name}")
+    elsif @table.respond_to?(name)
+      pt = 'send name'
+      @table.send(name, *args)
+    else
+      pt = 'table read'
+      @table[name.to_sym]
+    end.tap{|ret| pp([__LINE__,"Poly.method_missing #{name} #{args.map(&:to_s).join(' ')}",pt,'->',ret]) if $pd }
+  end
+
+  def respond_to_missing?(name, include_private = false)
+    # name.to_s.end_with?('=') || @table.key?(name.to_sym) || @table.respond_to?(name) || super
+    (name.to_s.end_with?('=') || @table.key?(name.to_sym) || @table.respond_to?(name) || super).tap{|ret| pp([__LINE__,"Poly.respond_to_missing? #{name}",'->',ret]) if $pd }
+  end
+
+  def [](key)
+    if respond_to?("get_#{key}")
+      send("get_#{key}")
+    else
+      @table[key.to_sym]
+    end.tap{|ret| pp([__LINE__,"Poly.[] #{key}",'->',ret]) if $pd }
+  end
+
+  def []=(key, value)
+    if respond_to?("set_#{key}")
+      send("set_#{key}", value)
+    else
+      @table[key.to_sym] = value
+    end.tap{|ret| pp([__LINE__,"Poly.[]= #{key} #{value}",'->',ret]) if $pd }
+  end
+
+  # for export to Prompt library
+  # def merge(*args)
+  #   Proc.new { |x| @table.merge x }
+  # end
+  def merge(*args)
+# pp caller
+# binding.irb
+    @table.merge(*args).tap{|ret| pp([__LINE__,"Poly.merge",'->',ret]) if $pd }
+  end
+
+  # for export to Prompt library
+  def to_h
+    @table.tap{|ret| pp([__LINE__,"Poly.to_h",'->',ret]) if $pd }
+  end
+
+  def to_yaml
+    @table.to_yaml.tap{|ret| pp([__LINE__,"Poly.to_yaml",'->',ret]) if $pd }
+  end
+end
+
+# class CustomStruct < Poly
+#   # Custom setter for virtual attribute :full_name
+#   def set_full_name(value)
+#     names = value.split(' ')
+#     @table[:first_name] = names.first
+#     @table[:last_name] = names.last
+#   end
+
+#   # Custom getter for virtual attribute :full_name
+#   def get_full_name
+#     "#{@table[:first_name]} #{@table[:last_name]}"
+#   end
+# end
+
+# # Example usage
+# person = CustomStruct.new
+# person.first_name = 'John'
+# person.last_name = 'Doe'
+# puts person.first_name  # => John
+# puts person.last_name   # => Doe
+
+# # Setting and getting a virtual attribute
+# person.full_name = 'Jane Smith'
+# puts person.first_name  # => Jane
+# puts person.last_name   # => Smith
+# puts person.full_name   # => Jane Smith
+
+# # Setting and getting a regular attribute
+# person.age = 30
+# puts person.age         # => 30
+
+# # Using array notation
+# person[:age] = 35
+# puts person[:age]       # => 35
+
+# person[:full_name] = 'Alice Johnson'
+# puts person[:first_name] # => Alice
+# puts person[:last_name]  # => Johnson
+# puts person[:full_name]  # => Alice Johnson
+
+# # Using fetch method
+# puts person.fetch(:age)          # => 35
+# puts person.fetch(:nonexistent, 'default') # => default
+# puts person.fetch(:nonexistent) { |key| "block default for #{key}" } # => block default for nonexistent
+
+# # This will raise a KeyError
+# begin
+#   person.fetch(:nonexistent)
+# rescue KeyError => e
+#   puts e.message  # => key not found: nonexistent
+# end