save

bin/sq

@@ -0,0 +1,100 @@
+#!/usr/bin/env ruby
+require 'socket'
+
+# Path to QEMU monitor socket
+sock_path = "/tmp/qemu-monitor.sock"
+
+# Connect to UNIX socket
+sock = UNIXSocket.new(sock_path)
+
+# Read greeting from QEMU (optional)
+puts sock.readline rescue nil
+
+# Function to send a single keystroke
+def send_key(sock, key)
+  cmd = "sendkey #{key}\n"
+  puts ">>> #{cmd.strip}"
+  sock.write(cmd)
+end
+
+def char_to_key(ch)
+  case ch
+  # Control characters
+  when "\n" then "ret"
+  when "\t" then "tab"
+  when " "  then "spc"
+  when "\e" then "esc"
+  when "\b" then "backspace"
+
+  # Lowercase letters
+  when "a".."z" then ch
+
+  # Uppercase letters (shift + letter)
+  when "A".."Z" then "shift-#{ch.downcase}"
+
+  # Digits
+  when "0".."9" then ch
+
+  # Shifted number row
+  when "!" then "shift-1"
+  when "@" then "shift-2"
+  when "#" then "shift-3"
+  when "$" then "shift-4"
+  when "%" then "shift-5"
+  when "^" then "shift-6"
+  when "&" then "shift-7"
+  when "*" then "shift-8"
+  when "(" then "shift-9"
+  when ")" then "shift-0"
+
+  when "-" then "minus"
+  when "_" then "shift-minus"
+  when "=" then "equal"
+  when "+" then "shift-equal"
+  when "[" then "bracket_left"
+  when "{" then "shift-bracket_left"
+  when "]" then "bracket_right"
+  when "}" then "shift-bracket_right"
+  when "\\" then "backslash"
+  when "|" then "shift-backslash"
+  when ";" then "semicolon"
+  when ":" then "shift-semicolon"
+  when "'" then "apostrophe"
+  when "\"" then "shift-apostrophe"
+  when "," then "comma"
+  when "<" then "shift-comma"
+  when "." then "dot"
+  when ">" then "shift-dot"
+  when "/" then "slash"
+  when "?" then "shift-slash"
+  when "`" then "grave_accent"
+  when "~" then "shift-grave_accent"
+
+  else
+    raise "Unsupported character: #{ch.inspect}"
+  end
+end
+
+if ARGV[0]
+    puts ARGV[0]
+    input = ARGV[0]
+    puts "Typing: #{input.inspect}"
+
+  input.chars.each do |ch|
+    send_key(sock, char_to_key(ch))
+    sleep 0.1
+  end
+
+else
+    # Example: type "hello<Enter>"
+    %w[p a s s ret].each do |k|
+    send_key(sock, k)
+    sleep 0.1
+    end
+end
+
+sock.close
+
+
+# (qemu) screendump /Volumes/Cache/homes/debian/guaset.ppm
+# ffmpeg -y -i guaset.ppm guest.png