xiki 0.5.0a

data/menus/rss.rb

@@ -0,0 +1,15 @@
+# Gets mp3 url's from an rss feed
+class Rss
+  def self.menu rss=nil
+    # If no rss passed, tell them to provide one
+    if rss.nil?
+      return "- rss url - <put url here>"
+    end
+
+    # rss passed, so get result and pull out url's
+    xml = Net::HTTP.get URI.parse(rss.sub(/.+?http/,'http'))
+    urls = []
+    xml.scan(/http:\/\/[\w.\/-]+\.mp3/) {|m| urls << m}
+    urls.uniq.join("\n")
+  end
+end

data/menus/safari.rb

@@ -0,0 +1,11 @@
+class Safari
+  def self.reload
+
+    $el.do_applescript %`
+      tell application "Safari"
+        do JavaScript "window.location.reload();" in the first document
+      end tell
+      `
+
+  end
+end

data/menus/sass.rb

@@ -0,0 +1,15 @@
+class Sass
+  def self.menu *args
+    txt = ENV['txt']
+    File.open("/tmp/tmp.sass", "w") { |f| f << txt }
+    css = `sass /tmp/tmp.sass`
+
+    css.gsub!("\n", '\n')
+    css.gsub!('"', '\"')
+    code = "$('head').append(\"<style>#{css}</style>\")"
+
+    Firefox.run code
+
+    ".flash - Loaded in browser!"
+  end
+end

data/menus/say.rb

@@ -0,0 +1,6 @@
+class Say
+  def self.menu *args
+    txt = args.join('/').gsub('"', '\"')
+    $el.do_applescript "say \"#{txt}\""
+  end
+end

data/menus/scale.rb

@@ -0,0 +1,49 @@
+class Scale
+
+  def self.menu percent=nil, save=nil
+
+    dir = Tree.dir :file=>"foo.png"
+
+    tmp_dir = "/tmp/scale"
+    Dir.mkdir tmp_dir if ! File.exists? tmp_dir
+
+    # If nothing, show percent options
+
+    return "
+      - 25%/
+      - 50%/
+      - 75%/
+      - 150%/
+      - 64x64/
+      - 128x128/
+      " if ! percent
+
+    dir, file = File.dirname(dir), File.basename(dir)
+    dest = file.sub '.', "_#{percent.sub('%', '')}."
+
+    # If just percent, so resize into tmp dir and show
+
+    if save.nil?
+      dest = "#{tmp_dir}/#{dest}"
+      Console.sync %`convert "#{file}" -resize #{percent} "#{dest}"`, :dir=>dir
+      Image.>> dest, "_"
+      #       Line.previous
+      return
+    end
+
+    # Image clicked on, so resize to destination
+
+    Console.sync %`convert "#{file}" -resize #{percent} "#{dest}"`, :dir=>dir
+    Line.previous
+    Tree.to_parent
+    Tree.kill_under
+    indent = Line.indent Line.value(0)
+    Line.next
+    View.<< "#{indent}- #{dest}\n", :dont_move=>1
+
+    Effects.glow :fade_in=>1
+
+    nil
+
+  end
+end

data/menus/serve.rb

@@ -0,0 +1,78 @@
+class Serve
+  def self.menu *args
+
+    children = Tree.children(:string=>1)
+    children = children.unindent if children
+
+    trunk = Xiki.trunk
+
+    # If no children and no parents, say how to use it.
+    if children.blank? && trunk.length == 1
+      return "
+        > How to use
+        | To serve a menu in the browser, put a menu under or above, like one of these:
+        |
+        | serve/
+        |   - dogs/
+        |   - cats/
+        |
+        | animals/
+        |   @serve
+        "
+    end
+
+
+    if children.blank?
+      file = File.expand_path "~/menus/#{trunk[0]}.menu"
+    else
+      file = "/tmp/tmp.menu"
+      File.open(file, "w") { |f| f << children }
+    end
+
+    code = self.wrap_controller file
+    Node.run_controller code
+
+    ".flash - showing in browser!"
+  end
+
+  def self.wrap_controller file
+    %`
+    var http = require('http');
+    var Xiki = require('#{Xiki.dir}etc/js/xiki.js');
+    var fs = require('fs');
+    http.createServer(function(req, res) {
+
+      url = decodeURI(req.url);
+      console.log('processing request: ' + url);
+
+
+      // If requesting js, just return it
+      if(url.match(/^\\/js\\//)){
+        res.writeHead(200, {'Content-Type': 'application/x-javascript'});
+        var js = fs.readFileSync('#{Xiki.dir}etc/js/'+url.replace(/.+\\//, ''), 'utf8');
+        res.end(js);
+        return;
+      }
+
+      tree = fs.readFileSync(#{file.inspect}, 'utf8');
+
+      if(req.headers['user-agent'] && ! req.headers['x-requested-with']){
+
+        res.writeHead(200, {'Content-Type': 'text/html'});
+        res.end(Xiki.render_mobile_ajax());
+
+      }else{
+        res.writeHead(200, {'Content-Type': 'text/plain'});
+        console.log("tree:", tree);
+        items = Xiki.children(tree, url);
+        console.log("items:", items);
+        res.end(items);
+      }
+
+
+    }).listen(8161, '127.0.0.1');
+    console.log('Server running at http://127.0.0.1:8161/');
+    `.unindent
+  end
+
+end

data/menus/shuffle.rb

@@ -0,0 +1,24 @@
+class Shuffle
+  def self.menu *args
+
+    message = "| This menu shuffles the siblings that follow it."
+    return message if args.any?
+
+    orig = Location.new
+
+    ignore, ignore2, left, right = Tree.sibling_bounds
+
+    return message if left == right
+
+    txt = View.txt left, right
+    View.delete left, right
+
+    Line.next
+
+    Code.randomize_lines txt
+
+    orig.go
+
+    nil
+  end
+end

data/menus/spanish.rb

@@ -0,0 +1,7 @@
+class Spanish
+  def self.menu txt=nil
+    return "| Type something here to translate from spanish" if txt.nil?
+
+    Browser.url "http://translate.google.com/#es|en|#{URI.encode ENV['txt'].gsub(' ', '+')}"
+  end
+end

data/menus/standalone.rb

@@ -0,0 +1,57 @@
+class Standalone
+  def self.menu *args
+    children = Tree.children(:string=>1)
+    children = children.unindent if children
+
+    trunk = Xiki.trunk
+
+    # If no children and no parents, say how to use it.
+    if children.blank? && trunk.length == 1
+      return "
+        > How to use
+        | To make a stand-alone jquery mobile page and show in the browser,
+        | put a menu under or above, like one of these:
+        |
+        | standalone/
+        |   - dogs/
+        |   - cats/
+        |
+        | animals/
+        |   @standalone
+        "
+    end
+
+    menu = "untitled"
+
+    if children.blank?
+      file = File.expand_path "~/menus/#{trunk[0]}.menu"
+      menu = trunk[0]
+      children = File.read file
+    end
+
+    # Write file to tmp
+    File.open("/tmp/#{menu}.html", "w") { |f| f << self.wrap_standalone(children) }
+
+    Firefox.url "file:///tmp/untitled.html"
+
+    ".flash - showing in browser!"
+  end
+
+  def self.wrap_standalone children
+    %`
+    <head>
+      <script src="http://code.jquery.com/jquery-1.6.4.min.js"></script>
+      <script src="file://#{Xiki.dir}etc/js/xiki.js"></script>
+      <script src="file://#{Xiki.dir}etc/js/menu1.js"></script>
+      <script src="http://code.jquery.com/mobile/1.0/jquery.mobile-1.0.min.js"></script>
+      <link rel="stylesheet" href="http://code.jquery.com/mobile/1.0/jquery.mobile-1.0.min.css" />
+    </head>
+    <body>
+      <div data-xiki="menu">\n#{children}
+      </div>
+    </body>
+    `.unindent
+
+  end
+
+end

data/menus/tail.rb

@@ -0,0 +1,41 @@
+class Tail
+  #   def self.menu *args
+
+  def self.ongoing
+    dir = Tree.dir :file=>1
+    Console.run "tail -f \"#{dir}\""
+  end
+
+  def self.in
+    dir = Tree.dir :file=>1
+    Tree.quote `tail "#{dir}"`
+  end
+
+  def self.menu_before *args
+    # Don't do anything unless it's just numeric args
+    return nil if args.length != 1 || args[0] !~ /^\d+$/
+
+    dir = Tree.dir :file=>1
+
+    count = args[0].to_i
+    Tree.quote `tail -n #{count} "#{dir}"`
+  end
+
+  def self.menu
+    "
+    - .in/
+    - 3/
+    - .ongoing/
+    - .docs/
+      > Shows the first 10 lines inline
+      << in/
+
+      > Show N lines inline
+      << 3/
+
+      > Opens a shell and keeps showing updates
+      << ongoing/
+    "
+  end
+
+end

data/menus/technologies.rb

@@ -0,0 +1,19 @@
+class Technologies
+  def self.menu topic=nil, heading=nil, *content
+
+    content = content.any? ? content.join("/") : nil
+
+    # If no topic, just show all dirs
+
+    if topic.nil?
+      entries = Dir.new(Bookmarks["$te"]).entries
+      entries = entries.select{|o| o =~ /^\w/}
+      return entries.map{|o| "#{o}/"}
+    end
+
+    # If just topic, list all headings
+
+    Notes.drill "$te/#{topic}/#{topic}.notes", heading, content
+
+  end
+end

data/menus/themes.rb

@@ -0,0 +1,32 @@
+class Themes
+  def self.menu *args
+
+    # If nothing passed, show options
+
+    if args.empty?
+      path = "#{Xiki.dir}etc/themes/"
+
+      themes = Dir.new(path).entries.select{|o| o =~ /^\w/}
+
+      return "
+        | Click one of these to change how the window dividers
+        | look (aka the emacs mode line).
+        #{themes.map{|o| "- #{o[/\w+/].gsub('_', ' ')}/\n"}.join()}
+        "
+    end
+
+    # Theme name passed, so use it
+
+    self.use args[0]
+  end
+
+  def self.use name
+    path = "#{Xiki.dir}etc/themes/#{TextUtil.title_case name, :underscores=>1}.notes"
+    return "| Theme doesn't exist" if ! File.exists? path
+
+    load path
+
+    nil
+  end
+
+end

data/menus/thesaurus.rb

@@ -0,0 +1,13 @@
+# - @http://thesaurus.com/browse/<here>
+
+class Thesaurus
+  # self.add :paren=>"th" do   # - (th): thesaurus.com
+  def self.menu word=nil
+    return View.prompt('Type a word to look up') if word.nil?
+
+    word = word.sub(/^\s+/, '').gsub('"', '%22').gsub(':', '%3A').gsub(' ', '%20')
+    #     Browser.url "http://en.wiktionary.org/wiki/Wikisaurus:#{word}"
+    $el.browse_url "http://thesaurus.reference.com/browse/#{word}"
+    nil
+  end
+end

data/menus/to.rb

@@ -0,0 +1,24 @@
+class To
+  def self.menu
+    %`
+    > Summary
+    | Keys shortcuts that start with "to+" (ctrl-t) such as to+end.
+    |
+    - frequent/
+      > Jumping cursor around
+      | to+row - jump to line
+      | to+axis - beginning of line
+      | to+end - end of line
+      |
+      | to+previous - beginning of previous paragraph
+      | to+next - beginning of next paragraph
+      |
+      | to+highest - beginning of file
+      | to+lowest - end of file
+      |
+    - others/
+      | to+backward - backward one word
+      | to+foreward - foreward one word
+    `
+  end
+end

data/menus/twitter.rb

@@ -0,0 +1,57 @@
+require 'net/http'
+require 'timeout'
+
+class Twitter
+
+  CODE_SAMPLES = %q<
+    # C-. on this
+    - Twitter.menu
+  >
+
+  def self.post_or_list
+    if Keys.prefix_u?  # If U prefix, just list
+      $el.shell_command("twitter timeline")
+    else  # Otherwise, post
+      self.post
+    end
+  end
+
+  def self.list options={}
+    View.handle_bar
+    Console.run "twitter timeline", :buffer => "*twitter timeline"
+    Styles.define :twitter_name, :fg => '99f'
+    Styles.define :twitter_date, :fg => 'ddd'
+    Styles.apply '^\\(-- .+\\)\\( at .+\\)', nil, :twitter_name, :twitter_date
+    View.to_top
+    $el.kill_line
+    View.previous
+  end
+
+  def self.tree options={}
+    txt = nil
+    begin
+      timeout(3) do
+        txt = Net::HTTP.get URI.parse("http://twitter.com/statuses/friends_timeline/13453802.atom")
+      end
+    rescue Exception => e
+      return puts("- Timed out!")
+    end
+
+    txt.scan( /<title>(.+)<\/title>/ ).each do |t|
+      puts "- #{t}"
+    end
+    View.wrap :off
+    ""
+  end
+
+  def self.post message
+    puts $el.shell_command_to_string("twitter post \"#{message}\"")
+  end
+
+  def self.menu options={}
+    puts "+ in tree: .tree/"
+    puts "- async: .list"
+    puts "- post: .post 'foo'"
+  end
+
+end