xiki 0.5.0a

data/menus/browse.rb

@@ -0,0 +1,13 @@
+class Browse
+  def self.menu file=nil, heading=nil, *content
+
+    return "| Pass a bookmark and then use this menu to browse headings\n| in the file, such as:\n|\n@ browse/$t/" if file == "docs"
+
+    return View.prompt "Type a bookmark of a .notes file." if file.nil?   # If no file, say it's required
+
+    # Add dollar sign if not there
+    file = "$#{file}" unless file =~ /^\$/
+
+    Notes.drill "#{file}", heading, *content
+  end
+end

data/menus/browser.rb

@@ -0,0 +1,78 @@
+class Browser
+  def self.menu
+    "
+    - .url/
+    - .reload/
+    - .tabs/
+    - api/
+      | This class lets you choose a default browser.
+      |
+      | Calls to Browser.url etc. will be delegated to the default browser.
+    - docs/
+      > Keys
+      | do+load+browser:  Reload the browser.
+      |
+      > See
+      | Many things have yet to be pulled out of firefox.rb and made generic.
+      << firefox/
+      |
+    "
+  end
+
+  def self.url url, options={}
+    Firefox.url url, options
+  end
+
+
+  def self.html html
+    Firefox.html html
+  end
+
+  def self.js txt, options={}
+    Firefox.run txt, options
+  end
+
+
+  def self.open_in_browser
+
+    if Keys.prefix_u   # Open as http://xiki/...
+
+      return self.url "http://xiki/#{Tree.path}"
+    end
+
+    file = FileTree.tree_path_or_this_file
+
+    return Browser.html Markdown.render(View.txt) if View.extension == "markdown"   # If .markdown, render it
+
+    mappings = Menu.menu_to_hash "/Users/craig/menus/url_mappings.menu"
+
+    result = nil
+    mappings.each do |k, v|
+      break file.sub!(v, "#{k}/") if file.start_with? v
+    end
+
+    # If path starts with any of the mappings, apply mapping
+
+    if file =~ /^\//   # If no ^/, must be a url, so use http://
+      file = "file://#{file}"
+    else
+      file = "http://#{file}"
+      file.sub! /\/index.html/, '/'
+    end
+
+    self.url file
+  end
+
+  def self.tabs
+    Firefox.tabs
+  end
+
+  def self.url *args
+    Firefox.url args.join "/"
+  end
+
+  def self.reload
+    Firefox.reload
+  end
+
+end

data/menus/cassandra_db.rb

@@ -0,0 +1,36 @@
+gem 'cassandra'
+require 'cassandra'
+
+require "launcher"
+
+# Cassandras structure:
+#   keyspace ->* table family ->* key (->* super column) ->* column
+class CassandraDb
+
+  @@connections = {}
+
+  def self.conn keyspace
+    @@connections[keyspace] ||= Cassandra.new(keyspace, '127.0.0.1:9160')
+  end
+
+  def self.insert keyspace, column_family, key, columns
+    conn = self.conn keyspace
+    conn.insert column_family, key, columns
+  end
+
+  def self.get keyspace, column_family, key, columns=nil
+    conn = self.conn keyspace
+    conn.get column_family, key, columns
+  end
+
+  def self.menu
+    "
+    + .start/
+      - TODO: implement!
+    + .statements/
+      CassandraDb.insert 'Animals', :Ant, 'Steve', {'bbbb' => 'bbb'}
+      CassandraDb.get 'Animals', :Ant, 'Steve'
+    "
+  end
+
+end

data/menus/chmod.rb

@@ -0,0 +1,27 @@
+class Chmod
+  def self.menu mode=nil
+
+    path = Tree.file :require=>1
+
+    if ! mode
+      base_10_number = File.stat(path).mode
+      mode = sprintf("%o", base_10_number)[/...$/]
+      return "
+        - original) #{mode}/
+        > Suggestions:
+        - no restrictions) 777/
+        - normal) 644/
+        - executable) 755/
+        - only owner) 600/
+        "
+    end
+
+    # Arg passed, so do chmod
+
+    command = "chmod #{mode} \"#{path}\""
+    command = "sudo #{command}" if ! File.writable? path
+
+    Console.run command, :dir=>path
+
+  end
+end

data/menus/classes.rb

@@ -0,0 +1,5 @@
+class Classes
+  def self.menu *args
+    Menu["ruby/classes/#{args.join '/'}"]
+  end
+end

data/menus/coffee_script.rb

@@ -0,0 +1,35 @@
+class CoffeeScript
+
+  # Called by keyboard shortcut
+  def self.run_block
+    # Get block contents
+    txt, left, right = View.txt_per_prefix #:prefix=>Keys.prefix
+
+    result = self.to_js txt
+    # Insert result at end of block
+    orig = Location.new
+    View.cursor = right
+    Line.to_left
+    View.insert ">>\n#{result}\n\n"
+    orig.go
+  end
+
+  def self.to_js txt
+
+    path = "/tmp/tmp.coffee"
+
+    # If txt is file path, us it
+    if txt !~ /\n/ && txt =~ /\.coffee$/
+      path = txt
+    else
+      File.open(path, "w") { |f| f << txt }   # Write to temp file
+    end
+
+    # Call js
+    result = Console.run "coffee -pc \"#{path}\"", :sync=>true
+    result.split("\n")[1..-2].join("\n")
+  end
+
+end
+
+Keys.do_as_coffee { CoffeeScript.run_block }

data/menus/computer.rb

@@ -0,0 +1,24 @@
+# Is just a menu now, since it's all delegation
+
+
+class Computer
+
+  def self.menu
+    "
+    - .ip/
+    - @processes/
+    "
+  end
+
+  def self.ip
+    #     return "| 192.168.5.231"
+
+    txt = `ifconfig`
+    inet = txt.grep(/\binet\b/)
+
+    return "| #{inet[0][/[\d.]+/]}\n- apparently you\'re not connected to the internet?!" if inet.length < 2
+
+    "| #{inet[1][/[\d.]+/]}"
+  end
+
+end

data/menus/contacts.rb

@@ -0,0 +1,5 @@
+class Contacts
+  def self.menu *args
+    Notes.drill '$c', *args
+  end
+end

data/menus/cookies.rb

@@ -0,0 +1,25 @@
+class Cookies
+  def self.menu key=nil, val=nil
+
+    txt = Firefox.run "document.cookie"
+    hash = txt.split('; ').inject({}) do |acc, e|
+      k, v = e.match(/(.*?)=(.*)/)[1..2]
+      acc[k] = v
+      acc
+    end
+
+    # If no args, show all keys
+
+    if key.nil?
+      return hash.keys.sort.map{|k| "- #{k}/\n"}.join
+    end
+
+    # If just key, show its value
+    if val.nil?
+      return "| #{hash[key]}"
+    end
+
+    ".flash - updated!"
+
+  end
+end

data/menus/couch.rb

@@ -0,0 +1,184 @@
+gem 'couchrest'
+require 'couchrest'
+
+class Couch
+  @@server = 'http://localhost:5984'
+
+  def self.menu
+    "
+    - .start/
+    - @db/
+    - .admin url/
+    "
+  end
+
+  def self.start
+    buffer = '*couchdb'
+    return ".flash - *couchdb already open!" if View.buffer_open? buffer
+
+    Console.run('sudo couchdb', :buffer=>buffer)
+  end
+
+  def self.admin_url
+    View.url "#{@@server}/_utils"
+    nil
+  end
+
+  def self.databases db=nil
+    if db.nil?   # If no db yet, list all
+      txt = Net::HTTP.get(URI.parse("#{@@server}/_all_dbs"))
+      dbs = JSON[txt]
+
+      return dbs.map{|i| "#{i}/"}
+    end
+
+    "
+    + .docs/
+    + .views/
+    + .all_docs/
+    + .delete/
+    + .rest_tree/
+    + .crud/
+    "
+  end
+
+  def self.rest_tree db
+    %Q[
+    - GET #{@@server}/#{db}
+      + create db: PUT
+      + delete db: DELETE
+      + all: _all_docs/
+      - bulk add: _bulk_docs/
+        POST
+          {"docs":[
+            {"_id":"a", "txt":"Aye"},
+            {"_id":"b", "txt":"Bee"},
+          ]}
+      - bar/
+        + PUT {\"txt\":\"hi\"}
+        - ?rev=9123589
+          + DELETE
+      - _view/d1/v1/
+      - _design/d1/
+        + PUT {"views": {"v1": {"map": "function(doc){ emit(\\\"a\\\", null); }" }}}
+    ]
+  end
+
+  def self.delete db, id=nil
+
+    # If no id, show all id's
+    if id.nil?
+      all = RestTree.request 'GET', "#{@@server}/#{db}_all_docs", nil
+      rows = JSON[all]['rows']
+      return rows.map{|i| "#{i['id']}/"}
+    end
+
+    self.escape_slashes id
+
+    # If id, look it up to get rev
+    record = RestTree.request 'GET', "#{@@server}/#{db}#{id}", nil
+    rev = JSON[record]['_rev']
+    # Delete it
+    RestTree.request 'DELETE', "#{@@server}/#{db}#{id}?rev=#{rev}", nil
+  end
+
+  def self.escape_slashes id
+    # If id has multiple slashes, escape all but the last
+    if id =~ /\/.+\/$/
+      id.sub! /\/$/, ''   # Remove last slash
+      id.gsub!('/', '%2F') unless id =~ /^_design/   # Escape slashes
+      id.sub! /$/, '/'   # Put last back
+    end
+  end
+
+  def self.docs db, id=nil, doc=nil
+    db.sub! /\/$/, ''
+
+    # If no id, show all id's
+    if id.nil?
+      all = RestTree.request 'GET', "#{@@server}/#{db}/_all_docs", nil
+
+      if all =~ /no_db_file/
+        return "| DB not found, create it?\n- .create/"
+      end
+
+      rows = JSON[all]['rows']
+
+      return "
+        | No records in db.  Create some?
+        a/name: aye
+        b/name: bee
+        " if rows.empty?
+
+      return rows.map{|i| "#{i['id']}/"}
+    end
+
+    self.escape_slashes id
+
+    # If just id, show doc
+
+    if doc.nil?
+
+      record = RestTree.request 'GET', "#{@@server}/#{db}/#{id}", nil
+      record = JSON[record]
+      record = record.to_yaml
+      record.sub! /.+\n/, ''
+      return record.gsub("\\n", "\n").gsub(/^/, '| ').gsub(/^\| $/, '|')
+    end
+
+    # Doc passed, so save it
+
+    doc = ENV['txt'].dup
+
+    # If a record is found, add rev
+    record = RestTree.request 'GET', "#{@@server}/#{db}/#{id}", nil
+    if record !~ /404 /
+      rev = JSON[record]['_rev']
+
+      # Insert rev after first {, or replace if there already
+      if doc =~ /"_rev":"\d+"/
+        doc.sub! /("_rev":")\d+(")/, "\\1#{rev}\\2"
+      else
+        doc.sub! /\{/, "{\"_rev\":\"#{rev}\", "
+      end
+    end
+
+    doc = YAML::load doc
+    doc = doc.to_json
+    # Update it
+    res = RestTree.request 'PUT', "#{@@server}/#{db}/#{id}", doc
+    ".flash - Updated!"
+  end
+
+  def self.views db
+    db.sub! /\/$/, ''
+    views = JSON[RestTree.request('GET', "#{@@server}/#{db}/_design/d1", nil)]['views'] rescue(return "- none found!")
+
+    views.keys.each do |k|
+      puts "y Cdb.#{db[/(.+)_/, 1]} :#{k}#, :key=>''"
+    end
+  end
+
+  def self.all_docs db
+    db = db[/(.+)_/, 1]
+    puts "y Cdb.#{db}"
+    puts "y Cdb.all :#{db}#, :key=>''"
+    puts "- descending: y Cdb.all :#{db}, :skip=>1, :descending=>true"
+  end
+
+  def self.create db
+    RestTree.request 'PUT', "#{@@server}/#{db}", nil
+    ".flash - created!"
+  end
+
+  def self.crud db
+    db = db[/(.+)_/, 1]
+    puts "y Cdb.#{db} ''"
+    puts "- save: y Cdb.#{db}! '', 'txt'=>''"
+    puts "- delete: y Cdb.delete :#{db}, ''"
+    puts "- search: y Cdb.#{db} :startkey=>'b', :endkey=>'n', :skip=>2, :limit=>3"
+    puts "- first: y Cdb.all :#{db}, :limit=>1, :include_docs=>true"
+    puts "- last: y Cdb.all :#{db}, :skip=>1, :limit=>1, :descending=>true, :include_docs=>true"
+  end
+
+end

data/menus/crop.rb

@@ -0,0 +1,45 @@
+class Crop
+
+  def self.menu coords=nil, save=nil
+
+    dir = Tree.dir :file=>"foo.png"
+
+    tmp_dir = "/tmp/crop"
+    Dir.mkdir tmp_dir if ! File.exists? tmp_dir
+
+    # If nothing, show coords options
+
+    return "
+      - 40x40+10+10/
+      - 200x200+100+100/
+      " if ! coords
+
+    dir, file = File.dirname(dir), File.basename(dir)
+    dest = file.sub '.', "_#{coords.sub('+', '_')}."
+
+    # If just coords, so crop into tmp dir and show
+
+    if save.nil?
+      dest = "#{tmp_dir}/#{dest}"
+
+      Console.sync %`convert "#{file}" -crop #{coords} "#{dest}"`, :dir=>dir
+      Image.>> dest, "_"
+      return
+    end
+
+    # Image clicked on, so crop to destination
+
+    Console.sync %`convert "#{file}" -crop #{coords} "#{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