Module: Textbringer::Utils
- Included in:
- Commands
- Defined in:
- lib/textbringer/utils.rb
Constant Summary collapse
- COMPLETION =
{ original_buffer: nil, completions_window: nil }
- Y_OR_N_MAP =
Keymap.new
- HOOKS =
Hash.new { |h, k| h[k] = [] }
Class Method Summary collapse
- .add_hook(name, func = Proc.new) ⇒ Object
- .background ⇒ Object
- .complete_for_minibuffer(s, candidates) ⇒ Object
- .foreground(&block) ⇒ Object (also: next_tick)
- .foreground! ⇒ Object (also: next_tick!)
- .message(msg, log: true, sit_for: nil, sleep_for: nil) ⇒ Object
- .read_buffer(prompt, default: Buffer.other.name) ⇒ Object
- .read_char ⇒ Object
- .read_command_name(prompt) ⇒ Object
- .read_encoding(prompt, **opts) ⇒ Object
- .read_event ⇒ Object
- .read_file_name(prompt, default: nil) ⇒ Object
- .read_from_minibuffer(prompt, completion_proc: nil, default: nil, initial_value: nil, keymap: MINIBUFFER_LOCAL_MAP) ⇒ Object
- .read_key_sequence(prompt) ⇒ Object
- .read_single_char(prompt, chars) ⇒ Object
- .received_keyboard_quit? ⇒ Boolean
- .remove_hook(name, func) ⇒ Object
- .ruby_install_name ⇒ Object
- .run_hooks(name, remove_on_error: false) ⇒ Object
- .self_insert_and_exit_minibuffer ⇒ Object
- .set_transient_map(map) ⇒ Object
- .show_exception(e) ⇒ Object
- .sit_for(secs, no_redisplay = false) ⇒ Object
- .sleep_for(secs) ⇒ Object
- .y_or_n?(prompt) ⇒ Boolean
- .yes_or_no?(prompt) ⇒ Boolean
Class Method Details
.add_hook(name, func = Proc.new) ⇒ Object
316 317 318 |
# File 'lib/textbringer/utils.rb', line 316 def add_hook(name, func = Proc.new) HOOKS[name].unshift(func) end |
.background ⇒ Object
50 51 52 53 54 55 56 57 58 59 60 |
# File 'lib/textbringer/utils.rb', line 50 def background Thread.start do begin yield rescue Exception => e foreground do raise e end end end end |
.complete_for_minibuffer(s, candidates) ⇒ Object
204 205 206 |
# File 'lib/textbringer/utils.rb', line 204 def complete_for_minibuffer(s, candidates) candidates.select { |i| i.start_with?(s) } end |
.foreground(&block) ⇒ Object Also known as: next_tick
62 63 64 |
# File 'lib/textbringer/utils.rb', line 62 def foreground(&block) Controller.current.next_tick(&block) end |
.foreground! ⇒ Object Also known as: next_tick!
68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 |
# File 'lib/textbringer/utils.rb', line 68 def foreground! q = Queue.new foreground do begin result = yield q.push([:ok, result]) rescue Exception => e q.push([:error, e]) end end status, value = q.pop if status == :error raise value else value end end |
.message(msg, log: true, sit_for: nil, sleep_for: nil) ⇒ Object
7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 |
# File 'lib/textbringer/utils.rb', line 7 def (msg, log: true, sit_for: nil, sleep_for: nil) str = msg.to_s if log && Buffer.current&.name != "*Messages*" buffer = Buffer["*Messages*"] || Buffer.new_buffer("*Messages*", undo_limit: 0).tap { |b| b[:top_of_window] = b.new_mark } buffer.read_only = false begin buffer.end_of_buffer buffer.insert(str + "\n") if buffer.current_line > 1000 buffer.beginning_of_buffer 10.times do buffer.forward_line end buffer.delete_region(buffer.point_min, buffer.point) buffer.end_of_buffer end ensure buffer.read_only = true end end Window.echo_area.show(str) if sit_for sit_for(sit_for) Window.echo_area. end if sleep_for sleep_for(sleep_for) Window.echo_area. end end |
.read_buffer(prompt, default: Buffer.other.name) ⇒ Object
208 209 210 211 |
# File 'lib/textbringer/utils.rb', line 208 def read_buffer(prompt, default: Buffer.other.name) f = ->(s) { complete_for_minibuffer(s, Buffer.names) } read_from_minibuffer(prompt, completion_proc: f, default: default) end |
.read_char ⇒ Object
92 93 94 95 96 97 98 |
# File 'lib/textbringer/utils.rb', line 92 def read_char event = Controller.current.read_event if !event.is_a?(String) raise EditorError, "Non character event: #{event.inspect}" end event end |
.read_command_name(prompt) ⇒ Object
213 214 215 216 217 218 |
# File 'lib/textbringer/utils.rb', line 213 def read_command_name(prompt) f = ->(s) { complete_for_minibuffer(s.tr("-", "_"), Commands.list.map(&:to_s)) } read_from_minibuffer(prompt, completion_proc: f) end |
.read_encoding(prompt, **opts) ⇒ Object
220 221 222 223 224 225 |
# File 'lib/textbringer/utils.rb', line 220 def read_encoding(prompt, **opts) f = ->(s) { complete_for_minibuffer(s.upcase, Encoding.list.map(&:name)) } read_from_minibuffer(prompt, completion_proc: f, **opts) end |
.read_event ⇒ Object
88 89 90 |
# File 'lib/textbringer/utils.rb', line 88 def read_event Controller.current.read_event end |
.read_file_name(prompt, default: nil) ⇒ Object
188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 |
# File 'lib/textbringer/utils.rb', line 188 def read_file_name(prompt, default: nil) f = ->(s) { s = File.(s) if s.start_with?("~") Dir.glob(s + "*").map { |file| if File.directory?(file) && !file.end_with?(?/) file + "/" else file end } } file = read_from_minibuffer(prompt, completion_proc: f, initial_value: default) File.(file) end |
.read_from_minibuffer(prompt, completion_proc: nil, default: nil, initial_value: nil, keymap: MINIBUFFER_LOCAL_MAP) ⇒ Object
136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 |
# File 'lib/textbringer/utils.rb', line 136 def read_from_minibuffer(prompt, completion_proc: nil, default: nil, initial_value: nil, keymap: MINIBUFFER_LOCAL_MAP) if Window.echo_area.active? raise EditorError, "Command attempted to use minibuffer while in minibuffer" end old_buffer = Buffer.current old_window = Window.current old_completion_proc = Buffer.minibuffer[:completion_proc] old_current_prefix_arg = Controller.current.current_prefix_arg old_minibuffer_map = Buffer.minibuffer.keymap Buffer.minibuffer.keymap = keymap Buffer.minibuffer[:completion_proc] = completion_proc Window.echo_area.active = true begin Window.current = Window.echo_area Buffer.minibuffer.clear Buffer.minibuffer.insert(initial_value) if initial_value if default prompt = prompt.sub(/:/, " (default #{default}):") end Window.echo_area.prompt = prompt Window.echo_area.redisplay Window.update recursive_edit s = Buffer.minibuffer.to_s.chomp if default && s.empty? default else s end ensure Window.echo_area.clear Window.echo_area.redisplay Window.update Window.echo_area.active = false Window.current = old_window # Just in case old_window has been deleted by resize, # in which case Window.current is set to the first window. Window.current.buffer = Buffer.current = old_buffer Buffer.minibuffer[:completion_proc] = old_completion_proc Buffer.minibuffer.keymap = old_minibuffer_map Controller.current.current_prefix_arg = old_current_prefix_arg if COMPLETION[:original_buffer] COMPLETION[:completions_window].buffer = COMPLETION[:original_buffer] COMPLETION[:completions_window] = nil COMPLETION[:original_buffer] = nil end end end |
.read_key_sequence(prompt) ⇒ Object
286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 |
# File 'lib/textbringer/utils.rb', line 286 def read_key_sequence(prompt) buffer = Buffer.current key_sequence = [] map = Keymap.new map.define_key("\C-g", :abort_recursive_edit) map.handle_undefined_key do |key| -> { key_sequence.push(key) cmd = buffer.keymap&.lookup(key_sequence) || GLOBAL_MAP.lookup(key_sequence) if !cmd.is_a?(Keymap) exit_recursive_edit end Buffer.current.clear keys = Keymap.key_sequence_string(key_sequence) Buffer.current.insert("#{keys}-") } end read_from_minibuffer(prompt, keymap: map) if buffer.keymap&.lookup(key_sequence) || GLOBAL_MAP.lookup(key_sequence) key_sequence else keys = Keymap.key_sequence_string(key_sequence) raise EditorError, "#{keys} is undefined" end end |
.read_single_char(prompt, chars) ⇒ Object
273 274 275 276 277 278 279 280 281 282 283 284 |
# File 'lib/textbringer/utils.rb', line 273 def read_single_char(prompt, chars) map = Keymap.new chars.each do |c| map.define_key(c, :self_insert_and_exit_minibuffer) end map.define_key(?\C-g, :abort_recursive_edit) = chars.join(?/) map.handle_undefined_key do |key| -> { ("Invalid key. Type C-g to quit.", sit_for: 2) } end read_from_minibuffer(prompt + " (#{}) ", keymap: map) end |
.received_keyboard_quit? ⇒ Boolean
100 101 102 |
# File 'lib/textbringer/utils.rb', line 100 def received_keyboard_quit? Controller.current.received_keyboard_quit? end |
.remove_hook(name, func) ⇒ Object
320 321 322 |
# File 'lib/textbringer/utils.rb', line 320 def remove_hook(name, func) HOOKS[name].delete(func) end |
.ruby_install_name ⇒ Object
355 356 357 |
# File 'lib/textbringer/utils.rb', line 355 def ruby_install_name RbConfig::CONFIG["ruby_install_name"] end |
.run_hooks(name, remove_on_error: false) ⇒ Object
324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 |
# File 'lib/textbringer/utils.rb', line 324 def run_hooks(name, remove_on_error: false) HOOKS[name].delete_if do |func| begin case func when Symbol send(func) else func.call end false rescue Exception => e raise if e.is_a?(SystemExit) if remove_on_error true else raise end end end end |
.self_insert_and_exit_minibuffer ⇒ Object
249 250 251 252 |
# File 'lib/textbringer/utils.rb', line 249 def self_insert_and_exit_minibuffer self_insert exit_recursive_edit end |
.set_transient_map(map) ⇒ Object
345 346 347 348 349 350 351 352 353 |
# File 'lib/textbringer/utils.rb', line 345 def set_transient_map(map) old_overriding_map = Controller.current.overriding_map hook = -> { Controller.current.overriding_map = old_overriding_map remove_hook(:pre_command_hook, hook) } add_hook(:pre_command_hook, hook) Controller.current.overriding_map = map end |
.show_exception(e) ⇒ Object
104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 |
# File 'lib/textbringer/utils.rb', line 104 def show_exception(e) if e.is_a?(SystemExit) || e.is_a?(SignalException) raise end if Buffer.current&.name != "*Backtrace*" buffer = Buffer.find_or_new("*Backtrace*", undo_limit: 0) if !buffer.mode.is_a?(BacktraceMode) buffer.apply_mode(BacktraceMode) end buffer.read_only = false begin buffer.delete_region(buffer.point_min, buffer.point_max) buffer.insert("#{e.class}: #{e}\n") if e.backtrace e.backtrace.each do |line| buffer.insert(line + "\n") end end buffer.beginning_of_buffer ensure buffer.read_only = true end end (e.to_s.chomp) Window.beep end |
.sit_for(secs, no_redisplay = false) ⇒ Object
41 42 43 44 |
# File 'lib/textbringer/utils.rb', line 41 def sit_for(secs, no_redisplay = false) Window.redisplay unless no_redisplay Controller.current.wait_input((secs * 1000).to_i) end |
.sleep_for(secs) ⇒ Object
46 47 48 |
# File 'lib/textbringer/utils.rb', line 46 def sleep_for(secs) sleep(secs) end |
.y_or_n?(prompt) ⇒ Boolean
254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 |
# File 'lib/textbringer/utils.rb', line 254 def y_or_n?(prompt) new_prompt = prompt + " (y or n) " prompt_modified = false loop do s = read_from_minibuffer(new_prompt, keymap: Y_OR_N_MAP) case s when ?y break true when ?n break false else unless prompt_modified new_prompt.prepend("Answer y or n. ") prompt_modified = true end end end end |
.yes_or_no?(prompt) ⇒ Boolean
227 228 229 230 231 232 233 234 235 236 237 238 239 |
# File 'lib/textbringer/utils.rb', line 227 def yes_or_no?(prompt) loop { s = read_from_minibuffer(prompt + " (yes or no) ") case s when "yes" return true when "no" return false else ("Please answer yes or no.", sit_for: 2) end } end |