xiki 0.5.0a

data/menus/google.rb

@@ -0,0 +1,35 @@
+require "cgi"
+
+class Google
+  def self.menu *args
+    if args.empty?   # If no path, pull from history
+      return Launcher.last "google", :exclude_path=>1, :quoted=>1
+    end
+    txt = CGI.escape ENV['txt']
+
+    $el.browse_url "http://www.google.com/search?q=#{txt}"
+    nil
+  end
+
+  def self.insert
+    line = Line.value
+    return View << "google/" if line =~ /^$/
+    return View << "@google/" if line =~ /^ /
+    return View << "google/" if line =~ /^ *- $/
+
+    View << "google/"
+  end
+
+  def self.search txt
+    txt = CGI.escape txt
+    Browser.url "http://www.google.com/search?q=#{txt}"
+    nil
+  end
+
+  def self.maps txt
+    txt = CGI.escape txt
+    Browser.url "http://maps.google.com/maps?q=#{txt}"
+    nil
+  end
+
+end

data/menus/google_images.rb

@@ -0,0 +1,11 @@
+class GoogleImages
+  def self.menu *args
+    return View.prompt "Type something to google image search for" if args.blank?
+    url = "https://www.google.com/search?tbm=isch&q=#{CGI.escape ENV['txt']}"
+
+    # If up+..., just return url
+    return "@ #{url}" if Keys.up?
+
+    Firefox.url url
+  end
+end

data/menus/google_patents.rb

@@ -0,0 +1,10 @@
+class GooglePatents
+  def self.menu *args
+
+    return View.prompt "Type something to google patent search for" if args.blank?
+    txt = ENV['txt']
+
+    url = "https://www.google.com/search?tbm=pts&q=#{CGI.escape txt}"
+    Browser.url url
+  end
+end

data/menus/gutenberg.rb

@@ -0,0 +1,13 @@
+class Gutenberg
+  def self.menu *args
+    arg = args.any? ? args.join("/") : nil
+
+    return View.prompt('Type a search phrase') if arg.nil?
+
+    arg.sub! /^\| ?/, ''
+    return View.prompt "Type something to google gutenberg search for" if arg.nil?
+
+    url = "http://www.gutenberg.org/ebooks/search.html/?format=html&default_prefix=all&sort_order=downloads&query=#{CGI.escape arg}"
+    Browser.url url
+  end
+end

data/menus/head.rb

@@ -0,0 +1,10 @@
+class Head
+  def self.menu *args
+
+    count = args.shift if args[0] =~ /^\d+$/
+
+    dir = Tree.dir :file=>1
+    Tree.quote `head #{count ? "-n #{count}" : ""} "#{dir}"`
+
+  end
+end

data/menus/headings.rb

@@ -0,0 +1,39 @@
+require 'view'
+require 'line'
+require 'effects'
+
+class Headings
+
+  def self.menu target=nil, line=nil
+    todo = Bookmarks['$t']
+
+    # If no target, tell them to enter one
+    if target.nil?
+      return View.prompt "Type a heading to search for"
+    end
+
+    # If no line, search for headings
+    if line.nil?
+      txt = IO.read(todo)
+      sections = txt.split(/^> /, -1)
+      sections = sections.select{|o|
+        # Check just first line
+        o[/.*/] =~ /#{Regexp.quote target}/i
+      }
+      return sections.map{|o| "> #{o.strip}\n\n"}.join("").gsub(/^/, '| ').gsub(/^\| $/, '|')
+    end
+
+    # Launched quoted line, so jump to it
+
+    line = Line.value
+
+    find = line.sub /^  \| /, ''
+    View.open todo
+    View.to_top
+    Search.forward "^#{$el.regexp_quote(find)}$"
+    Line.to_left
+    View.recenter_top
+    Effects.blink(:what=>:line)
+
+  end
+end

data/menus/html.rb

@@ -0,0 +1,61 @@
+class Html
+  def self.menu *args
+
+    return Tree.<< Dom.dom(:prefix=>"all") if Keys.prefix == "all"
+    return Tree.<< Dom.dom(:prefix=>"outline") if Keys.prefix == "outline"
+
+    prefix = Keys.prefix :clear=>1
+
+    # If as+open, or launched line without slash, render in browser...
+
+    if prefix == "open" || (Line !~ /\/$/ && Line =~ /^ /)
+      orig = Location.new
+      Tree.to_root
+      txt = Tree.children :string=>1, :cross_blank_lines=>1
+      orig.go
+      txt = txt.unindent
+
+      # Convert from tree to html if any ident, or 1st line doesn't start with "|"
+      txt = txt =~ /^ / || txt !~ /\A\|/ ?
+        Tree.to_html(txt) :
+        txt.gsub(/^\| ?/, '')
+
+      return Browser.html txt
+    end
+
+    # Suggest relevant elements...
+
+    last = args.last
+    if filler = @@filler[last]
+      Line.add_slash :txt=>filler, :left=>1
+    elsif args == []
+      ['html/', 'div/', 'style/']
+    elsif last == 'html'
+      ['head/', 'body/']
+    elsif last == 'head'
+      "- title/\n- style/\n| <script src='http://code.jquery.com/jquery.min.js'></script>"
+    elsif last == 'style'
+      "
+      | body {
+      |   font-family: arial;
+      |   margin: 50px;
+      | }
+      "
+    elsif last == 'body'
+      ['div/']
+    else
+      ['h1/Info', 'p/lorem ipsum...']
+    end
+  end
+
+  def initialize txt
+    @txt = txt
+  end
+
+  @@filler = {
+    "h1"=>"Info",
+    "title"=>"Welcome",
+    "p"=>"Lorem ipsum...",
+  }
+
+end

data/menus/icon.rb

@@ -0,0 +1,40 @@
+class Icon
+  def self.menu name=nil, choice=nil
+Ol << "name: #{name.inspect}"
+
+    name = choice if name == "recent" && choice
+
+    # If they picked recent/, just list icons
+
+    return Launcher.last "", :omit=>'icon' if name == "recent"
+
+    # If nothing, show main options
+
+    if name.nil?
+      last = Launcher.last "", :omit=>'icon'
+      most_recent = last[/^- (.+?)\//, 1]
+
+      return "
+        | Make an icon for which menu?  Use one of these options:
+        - type menu name here) #{most_recent}
+        - recent/
+        "
+    end
+
+    # Name passed so create menu
+
+
+    dir = Tree.dir :or=>:desktop
+    #     dir = Tree.dir || File.expand_path("~/Desktop")
+Ol << "dir: #{dir.inspect}"
+
+    path = "#{dir}/#{name}.xiki"
+    File.open(path, "w") { |f| f << "\n" }
+    Files.open_in_window path
+
+Ol << "!"
+    #     ".flash - created '#{name}' icon!"
+    "- created '#{name}' icon!"
+
+  end
+end

data/menus/images.menu

@@ -0,0 +1,2 @@
+<< google images/
+<< scale/

data/menus/img.rb

@@ -0,0 +1,15 @@
+class Img
+  def self.menu *args
+
+    path = args.join('/')
+
+    column = Line.indent.length
+    Line.sub! /^([ +-]*).*/, "\\1"
+    Move.to_end
+
+    at = column > 0 ? "@" : ""
+    Image.<< path, "#{at}img/#{path}"
+    Move.to_column column
+    nil
+  end
+end

data/menus/info.rb

@@ -0,0 +1,9 @@
+class Info
+  def self.menu *args
+
+    dir = Tree.dir :file=>1
+
+    result = `ls -lah "#{dir}"`
+    Tree.quote result
+  end
+end

data/menus/ip.rb

@@ -0,0 +1,10 @@
+class Ip
+  def self.menu
+    return '111.1.1.111'   # TMP: hard-coded for presentation
+
+    inet = `ifconfig`.grep(/\binet\b/)
+
+    return "| #{inet[0][/[\d.]+/]}" if inet.length < 2
+    "- #{inet[1][/[\d.]+/]}"
+  end
+end

data/menus/iterm.rb

@@ -0,0 +1,36 @@
+class Iterm
+  def self.menu *args
+
+    # If no arg, prompt to type something
+
+    return View.prompt "Type something to run in iTerm" if args.empty?
+
+    txt = args.join('/')
+
+    return self.command("activate") if txt == "start"
+    return self.command("quit") if txt == "quit"
+
+    self.run txt.sub(/^\| /, '')
+  end
+
+  def self.command txt
+    $el.do_applescript %`
+      #{txt} application "iTerm"
+      `
+    return nil
+  end
+
+  def self.run txt, options={}
+    $el.do_applescript %`
+      tell application "iTerm"
+        #{options[:activate] ? 'activate' : ''}
+        tell the first terminal
+          tell the last session
+            write text "#{txt}"
+          end tell
+        end tell
+      end tell
+      `
+    nil
+  end
+end

data/menus/itunes.rb

@@ -0,0 +1,78 @@
+class Itunes
+  def self.menu
+    "
+    - .play/
+    - .pause/
+    - .next/
+    - .previous/
+    - .artists/
+    - .songs/
+    - .playlist/
+    - api/
+      > Play a song
+      @ Itunes.songs 'Thunderstorm'
+      |
+    - docs/
+      | Play specific song
+      @itunes/songs/Around the Fur
+      |
+      | Play a playlist
+      @itunes/playlist/class
+    "
+  end
+
+  def self.songs name=nil
+
+    # If nothing passed, list all songs
+    if name.nil?
+      tracks = Applescript.run "iTunes", "get the name of every track of library playlist 1"
+      tracks = JSON[tracks.sub(/^\{(.+)\}$/, "[\\1]")]
+      return tracks.sort.uniq.select{|o| o != "" && o !~ /^ /}.map{|o| "- #{o}/\n"}.join
+      return
+    end
+
+    Applescript.run "iTunes", "play track \"#{name}\""
+
+  end
+
+  def self.playlist name=nil
+    return View.prompt("Enter a name") if name.nil?
+    Applescript.run "iTunes", "play playlist \"#{name}\""
+  end
+
+  def self.play
+    Applescript.run "iTunes", "play"
+  end
+  def self.pause
+    Applescript.run "iTunes", "pause"
+  end
+
+  def self.next
+    Applescript.run "iTunes", "next track"
+  end
+  def self.previous
+    Applescript.run "iTunes", "previous track"
+  end
+
+  def self.artists artist=nil, track=nil
+
+    # If nothing passed, list artists
+
+    if artist.nil?
+      artists = Applescript.run "iTunes", 'get the artist of every track of library playlist 1'
+      artists = JSON[artists.sub(/^\{(.+)\}$/, "[\\1]")]
+      return artists.sort.uniq.select{|o| o != ""}.map{|o| "- #{o}/\n"}.join
+    end
+
+    # If just artist passed, list artists
+
+    if track.nil?
+      tracks = Applescript.run "iTunes", "get the name of every track of library playlist 1 whose artist is \"#{artist}\""
+      tracks = JSON[tracks.sub(/^\{(.+)\}$/, "[\\1]")]
+      return tracks.sort.uniq.select{|o| o != ""}.map{|o| "- #{o}/\n"}.join
+    end
+
+    self.songs track
+    ".flash - Playing!"
+  end
+end

data/menus/javascript.rb

@@ -0,0 +1,74 @@
+class Javascript
+
+  def self.menu
+    "
+    | See
+    @js/
+    "
+  end
+
+  def self.run
+
+    Block.do_as_something do |txt|
+
+      txt << "
+        function p(txt) {
+          print(JSON.stringify(txt));
+        }";
+
+      result = self.run_internal txt
+    end
+  end
+
+  def self.run_internal txt
+
+    # Write to temp file
+    File.open("/tmp/tmp.js", "w") { |f| f << txt }
+    # Call js
+    Console.run "js /tmp/tmp.js", :sync=>true
+  end
+
+  def self.launch
+    line = Line.without_label
+    result = self.run_internal line
+    Tree.under result, :escape=>'', :no_slash=>1
+  end
+
+  def self.enter_as_jquery
+    clip = Clipboard.get(0)
+    insert_this = clip =~ /^[a-z_.#]+$/ ? clip : ""
+
+    if Keys.prefix_u?
+      View.insert "$(\"#{insert_this}\")"
+      Search.backward '"'
+      return
+    end
+
+    View.insert "- js/$(\"#{insert_this}\").blink()"
+    Search.backward '"'
+
+  end
+
+  def self.wrap_jquery_load txt, url=nil
+
+    url ||= "http://code.jquery.com/jquery.min.js"
+
+    txt = "
+      var f = function(){
+      #{txt}
+      };
+
+      if(typeof($) == 'undefined') {
+        var s = document.createElement('script');
+        s.src = '#{url}';
+        s.onload = f;
+        document.getElementsByTagName('head')[0].appendChild(s);
+      }else{
+        f();
+      }
+      ".unindent
+
+    txt
+  end
+
+end