naksh 0.2.0

data/lib/old/options.rb

@@ -0,0 +1,31 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+
+# This file is part of Naksh.
+#
+# Naksh is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Naksh is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Naksh.  If not, see <http://www.gnu.org/licenses/>.
+
+module Naksh
+  def options
+    @options
+  end
+  class OptionsClass<Hash
+    def method_missing(m)
+      p m
+      self[m]
+    end
+  end
+  @options=OptionsClass.new({
+    :suggest_on_failure?=>false}
+end

data/lib/old/rush.rb

@@ -0,0 +1,113 @@
+#!/usr/local/bin/ruby
+# Copyright 20.2.09-27 Ari Brown
+# All pwnage reserved.
+
+#THIS FILE IS NO LONGER USED,
+#IT IS KEPT SO YOU CAN STEAL CODE AND
+#USE IT IN ANOTHER FILE
+
+require "rubygems"
+
+module Kernel
+  def interactive(m, &b)
+    system(m)
+    yield
+    system("exit")
+  end
+
+  def method_missing(m, *arr)
+    if arr[0].is_a? Proc
+      interactive(m, arr[0])
+    else
+      system(m + arr.join(" "))
+    end
+  end
+
+  alias_method(:old_system, :system)
+  def system(*arr)
+    puts *arr.join(" ")
+    old_system(*arr)
+  end
+end
+
+class Rush
+  attr_reader :env
+
+  class << self
+
+    def get(url, save_loco=Dir.pwd)
+      system("#{@env[:getter]} #{url}")
+      if url =~ %r(.+/([^/]+)$)
+        name = \1
+        File.new(\1, false, false)
+      end
+    end
+
+    def env(arr={})
+      @env[:getter] = arr[:getter] || "curl"
+      @env[:clean] = arr[:clean] || false
+    end
+
+    def clean(file)
+      system("rm -rf #{file}*")
+    end
+  end
+end
+
+class File
+
+  TYPES      = [".zip",
+                ".tgz",
+                ".gz",
+                ".tar"]
+  UNCOMPRESS = {".zip"    => "unzip",
+                ".tgz"    => "tar zxvf",
+                ".tar"    => "tar xvf",
+                ".gz"     => "gunzip"}
+
+  def __clean(name)
+    if @clean
+      system("rm -rf #{name}")
+    end
+  end
+  private :clean
+
+  def initialize(file_name, clean, echo)
+    @type = TYPES.size.times do |i, type|
+      i = []
+
+      if file_name =~ %r((\.zip|\.tgz|\.tar|\.gz)$)
+        i << $1
+      end
+
+      i.reverse.join("")
+    end
+    @name = file_name - @type
+    @clean = clean
+    $echo = echo
+  end
+
+  def unpack
+    system(UNCOMPRESS[@type] + (@name + @type))
+    __clean(@name + @type)
+  end
+
+  def configure(*args)
+    system("cd #{@name}")
+    system("./configure" + args.join(" "))
+    system("cd ..")
+  end
+
+  def make
+    system("make")
+  end
+
+  def install
+    system("sudo make install")
+  end
+
+  def minstall
+    make
+    install
+  end
+end

data/lib/old/sortissimo.rb

@@ -0,0 +1,205 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+
+# This file is part of Naksh.
+#
+# Naksh is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Naksh is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Naksh.  If not, see <http://www.gnu.org/licenses/>.
+
+#this library is not capable of performing sorts using UNIX sort order
+#because a<A<aa
+#however, I am leaving it in until I figure out the right order.
+
+#Need to replace this with proper method
+#cant remember right now
+class Array
+  alias_method :merge,:+
+  def merge!(other_arr)
+    self.replace(self.merge(other_arr))
+  end
+end
+#sortObjects(objects,order,options,&block)
+#objects is an array of objects to be sorted
+#order is an array in the order the objects are to be arranged or a hash with a pointer to a nonnegative integer
+#others is either :beginning or :end, anything else raises an exception
+#if unlisted==:beginning, unlisted objects are prepended in the order they are given in +objects+
+#if unlisted==:end, unlisted objects are appended in the order they are given in +objects+
+#If a block is given, it will be executed whenever an element of +objects+ is unlisted in +order+, it will be passed that object
+def sort_objects(objects,order,unlisted=:end,&block)
+  raise ArgumentError,'3rd argument must be :beginning, :end, or :omit' if unlisted != :beginning and unlisted != :end and unlisted != :omit
+  begin
+    objects.replace(objects.to_ary)
+  rescue
+    raise ArgumentError,'1st argument must be an array'
+  end
+  begin
+    order.replace(order.to_ary)
+  rescue
+    begin
+      order.replace(order.to_hash)
+    rescue
+      raise ArgumentError,"2nd argument must respond to either to_ary or to_hsh #{order.inspect}"
+    end
+    raise ArgumentError,"second_argument.to_hash does not return a Hash #{order.inspect}" unless order.kind_of? Hash
+  end
+  #what's the proper error for object.to_ary is not an array?
+  raise ArgumentError,"second_argument.to_ary does not return an Array #{order.inspect}" unless order.kind_of? Array
+  result=[]
+  unlisted=[] if others
+  objects.each do |obj|
+    if order.class==Array
+      i=order.index(obj)
+    else
+      i=order[obj]
+    end
+    if i
+      #in case a hash points to something other than a nonnegative integer of class Fixnum
+      if order.class==Hash
+        begin
+          ni=i.to_i
+          #gets caught
+          raise ArgumentError unless i==ni
+          i=ni
+          ni=nil
+        rescue
+          raise ArgumentError,'2nd Argument (hashlike) has keys pointing to nonintegers'
+        end
+      end
+      if result[i]
+        result[i]<< obj
+      else
+        result[i]=[obj]
+      end
+    else
+      if block
+        #should blocks be allowed to modify obj?
+        yield(obj)
+      end
+      if unlisted != :omit
+        begin
+          unlisted<< obj
+        rescue
+        end
+      end
+    end
+  end
+  result.compact!
+  result.flatten!
+  if unlisted != :omit# or result.empty? #what is this?
+    if unlisted==:beginning
+      return unlisted.merge(result)
+    elsif unlisted==:end
+      return result.merge(unlisted)
+    else
+      raise RuntimeError,"internal problem with sortissimo; unlisted is not :omit, :beginning, or :end. This should have been checked earlier [#{unlisted.inspect}]"
+    end
+  end
+  result
+end
+
+
+
+
+#make nil allowed in order set
+#[a,b,nil,c]
+#this was a bad attempt to apply sort_objects to strings and arrays
+def sort_ordered_objects(objects,order,others=:end,element=0,&block)
+  $stderr.puts('this does not appear to work.')
+  raise ArgumentError,'3rd argument must be falsy or :beginning or :end' if others and others != :beginning and others != :end
+  begin
+    objects.replace(objects.to_ary)
+  rescue
+    raise ArgumentError,'1st argument must be an array'
+  end
+  begin
+    order.replace(order.to_ary)
+  rescue
+    begin
+      order.replace(order.to_hash)
+    rescue
+      raise ArgumentError,"2nd argument must respond to either to_ary or to_hsh #{order.inspect}"
+    end
+    raise ArgumentError,"second_argument.to_hash does not return a Hash #{order.inspect}" unless order.kind_of? Hash
+  end
+  #what's the proper error for object.to_ary is not an array?
+  raise ArgumentError,"second_argument.to_ary does not return an Array #{order.inspect}" unless order.kind_of? Array
+  result=[]
+  unlisted=[] if others
+  objects.each do |obj|
+    if order.class==Array
+      i=order.index(obj[element])
+    else
+      i=order[obj[element]]
+    end
+    if i
+      #in case a hash points to something other than a nonnegative integer of class Fixnum
+      if order.class==Hash
+        begin
+          ni=i.to_i
+          #gets caught
+          raise ArgumentError unless i==ni
+          i=ni
+          ni=nil
+        rescue
+          raise ArgumentError,'2nd Argument (hashlike) has keys pointing to nonintegers'
+        end
+      end
+      if result[i]
+        result[i]<< obj
+      else
+        result[i]=[obj]
+      end
+    else
+      if block
+        #should blocks be allowed to modify obj?
+        yield(obj)
+      end
+      if others
+        begin
+          unlisted<< obj
+        rescue
+        end
+      end
+    end
+  end
+  result.compact!
+  result.collect do entry
+    entry.kind_of? Array ? entry=sort_ordered_objects(entry,order,others,element.next) : entry
+  end
+  result.flatten!
+  if others or result.empty?
+    if others==:beginning
+      return unlisted.merge(result)
+    else#if others==:end#argument checked earlier
+      return result.merge(unlisted)
+    end
+  end
+  result
+end
+
+a=[4,6,'a']
+b={5=>a,:6=>'ahr'}
+c=nil
+d=3
+e=:6
+f=Object.new
+class<<f
+  undef_method :==,:===,'=~'.intern,:args_and_options,:class,:clone,:dclone,:deep_clone,:display,:dup,:enum_for,:eql?,:equal?,:extend,:freeze,:frozen?,:hash,:id,:inspect,:instance_eval,:instance_of?,:instance_variable_defined?,:instance_variable_get,:instance_variable_set,:instance_variables,:is_a?,:is_one_of?,:kind_of?,:metaclass,:method,:methods,:nil?,:object_id,:private_methods,:protected_methods,:public_methods,:remove_instance_variable,:respond_to?,:rollback!,:send,:singleton_method_added,:singleton_method_removed,:singleton_method_undefined,:singleton_methods,:taint,:tainted?,:to_a,:to_enum,:to_s,:to_yaml,:to_yaml_properties,:to_yaml_style,:type,:untaint,'`'.intern,:abort,:at_exit,:autoload,:autoload?,:binding,:block_given?,:callcc,:caller,:catch,:chomp,:chomp!,:chop,:chop!,:context,:describe,:eval,:exec,:exit,:exit!,:fail,:fork,:format,:gem,:getc,:gets,:global_variables,:gsub,:gsub!,:iterator?,:lambda,:load,:local_variables,:loop,:method_missing,:open,:open_uri_original_open,:p,:pp,:pretty_inspect,:print,:printf,:proc,:putc,:puts,:raise,:rand,:readline,:readlines,:require,:require_gem,:respond_to,:scan,:scanf,:select,:set_trace_func,:sleep,:split,:sprintf,:srand,:sub,:sub!,:syscall,:system,:test,:throw,:trace_var,:trap,:untrace_var,:warn,:y,:pretty_print,:pretty_print_cycle,:pretty_print_inspect,:pretty_print_instance_variables
+  def method_missing(*args,&block)
+    p args,block
+    yield block
+    *args
+  end
+end
+p f.methods
+sort_objects([a,b,c,d,e,f],[b,e,c,a,f,d],:end,0){|*args|p args;args}

data/lib/old/systems.rb

@@ -0,0 +1,25 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+
+# This file is part of Naksh.
+#
+# Naksh is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Naksh is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Naksh.  If not, see <http://www.gnu.org/licenses/>.
+
+module Naksh
+  #these should be really dumb
+  #only use when there isn't a cross-platform way
+  #good example is expanding '~/'
+  module Systems
+  end
+end

data/lib/old/systems/ruby.rb

@@ -0,0 +1,26 @@
+#!/usr/bin/ruby
+# 2011 Mahmut Bulut
+# GPLv3 License
+
+
+
+module Naksh
+  module Systems
+    module Ruby
+      def Ruby.delete(file_path)
+        File.del(file_path)
+      end
+      def Ruby.make_dir(dir_name,folder=Naksh.current_dir)
+        File.mkdir(dir_name,folder=Naksh.current_dir)
+      end
+      def Ruby.make_file(file_name,folder=Naksh.current_dir)
+      end
+      def Ruby.move(file_path,destination_dir)
+        File.mv(file_path,destination_dir)
+      end
+      def Ruby.rename(file_path,new_name)
+        File.rename(file_path,new_name)
+      end
+    end
+  end
+end

data/lib/old/un.rb

@@ -0,0 +1,240 @@
+#!/usr/bin/ruby
+# 2003 WATANABE Hirofumi
+# Ruby License
+
+#http://www.atdot.net/~ko1/w3ml/w3ml.cgi/yarv-diff/msg/152
+#
+# = un.rb
+#
+# Copyright (c) 2003 WATANABE Hirofumi <eban ruby-lang.org>
+#
+# This program is free software.
+# You can distribute/modify this program under the same terms of Ruby.
+#
+# == Utilities to replace common UNIX commands in Makefiles etc
+#
+# == SYNOPSIS
+#
+#   ruby -run -e cp -- [OPTION] SOURCE DEST
+#   ruby -run -e ln -- [OPTION] TARGET LINK_NAME
+#   ruby -run -e mv -- [OPTION] SOURCE DEST
+#   ruby -run -e rm -- [OPTION] FILE
+#   ruby -run -e mkdir -- [OPTION] DIRS
+#   ruby -run -e rmdir -- [OPTION] DIRS
+#   ruby -run -e install -- [OPTION] SOURCE DEST
+#   ruby -run -e chmod -- [OPTION] OCTAL-MODE FILE
+#   ruby -run -e touch -- [OPTION] FILE
+#   ruby -run -e help [COMMAND]
+
+require "fileutils"
+require "optparse"
+
+module FileUtils
+#  @fileutils_label = ""
+  @fileutils_output = $stdout
+end
+
+def setup(options = "")
+  ARGV.map! do |x|
+    case x
+    when /^-/
+      x.delete "^-#{options}v"
+    when /[*?\[{]/
+      Dir[x]
+    else
+      x
+    end
+  end
+  ARGV.flatten!
+  ARGV.delete_if{|x| x == "-"}
+  opt_hash = {}
+  OptionParser.new do |o|
+    options.scan(/.:?/) do |s|
+      o.on("-" + s.tr(":", " ")) do |val|
+        opt_hash[s.delete(":").intern] = val
+      end
+    end
+    o.on("-v") do opt_hash[:verbose] = true end
+    o.parse!
+  end
+  yield ARGV, opt_hash
+end
+
+##
+# Copy SOURCE to DEST, or multiple SOURCE(s) to DIRECTORY
+#
+#   ruby -run -e cp -- [OPTION] SOURCE DEST
+#
+#   -p    preserve file attributes if possible
+#   -r    copy recursively
+#   -v    verbose
+#
+
+def cp
+  setup("pr") do |argv, options|
+    cmd = "cp"
+    cmd += "_r" if options.delete :r
+    options[:preserve] = true if options.delete :p
+    dest = argv.pop
+    argv = argv[0] if argv.size == 1
+    FileUtils.send cmd, argv, dest, options
+  end
+end
+
+##
+# Create a link to the specified TARGET with LINK_NAME.
+#
+#   ruby -run -e ln -- [OPTION] TARGET LINK_NAME
+#
+#   -s    make symbolic links instead of hard links
+#   -f    remove existing destination files
+#   -v    verbose
+#
+
+def ln
+  setup("sf") do |argv, options|
+    cmd = "ln"
+    cmd += "_s" if options.delete :s
+    options[:force] = true if options.delete :f
+    dest = argv.pop
+    argv = argv[0] if argv.size == 1
+    FileUtils.send cmd, argv, dest, options
+  end
+end
+
+##
+# Rename SOURCE to DEST, or move SOURCE(s) to DIRECTORY.
+#
+#   ruby -run -e mv -- [OPTION] SOURCE DEST
+#
+#   -v    verbose
+#
+
+def mv
+  setup do |argv, options|
+    dest = argv.pop
+    argv = argv[0] if argv.size == 1
+    FileUtils.mv argv, dest, options
+  end
+end
+
+##
+# Remove the FILE
+#
+#   ruby -run -e rm -- [OPTION] FILE
+#
+#   -f    ignore nonexistent files
+#   -r    remove the contents of directories recursively
+#   -v    verbose
+#
+
+def rm
+  setup("fr") do |argv, options|
+    cmd = "rm"
+    cmd += "_r" if options.delete :r
+    options[:force] = true if options.delete :f
+    FileUtils.send cmd, argv, options
+  end
+end
+
+##
+# Create the DIR, if they do not already exist.
+#
+#   ruby -run -e mkdir -- [OPTION] DIR
+#
+#   -p    no error if existing, make parent directories as needed
+#   -v    verbose
+#
+
+def mkdir
+  setup("p") do |argv, options|
+    cmd = "mkdir"
+    cmd += "_p" if options.delete :p
+    FileUtils.send cmd, argv, options
+  end
+end
+
+##
+# Remove the DIR.
+#
+#   ruby -run -e rmdir -- [OPTION] DIR
+#
+#   -v    verbose
+#
+
+def rmdir
+  setup do |argv, options|
+    FileUtils.rmdir argv, options
+  end
+end
+
+##
+# Copy SOURCE to DEST.
+#
+#   ruby -run -e install -- [OPTION] SOURCE DEST
+#
+#   -p    apply access/modification times of SOURCE files to
+#         corresponding destination files
+#   -m    set permission mode (as in chmod), instead of 0755
+#   -v    verbose
+#
+
+def install
+  setup("pm:") do |argv, options|
+    options[:mode] = (mode = options.delete :m) ? mode.oct : 0755
+    options[:preserve] = true if options.delete :p
+    dest = argv.pop
+    argv = argv[0] if argv.size == 1
+    FileUtils.install argv, dest, options
+  end
+end
+
+##
+# Change the mode of each FILE to OCTAL-MODE.
+#
+#   ruby -run -e chmod -- [OPTION] OCTAL-MODE FILE
+#
+#   -v    verbose
+#
+
+def chmod
+  setup do |argv, options|
+    mode = argv.shift.oct
+    FileUtils.chmod mode, argv, options
+  end
+end
+
+##
+# Update the access and modification times of each FILE to the current time.
+#
+#   ruby -run -e touch -- [OPTION] FILE
+#
+#   -v    verbose
+#
+
+def touch
+  setup do |argv, options|
+    FileUtils.touch argv, options
+  end
+end
+
+##
+# Display help message.
+#
+#   ruby -run -e help [COMMAND]
+#
+
+def help
+  setup do |argv,|
+    all = argv.empty?
+    open(__FILE__) do |me|
+      while me.gets("##\n")
+        if help = me.gets("\n\n")
+          if all or argv.delete help[/-e \w+/].sub(/-e /, "")
+            print help.gsub(/^# ?/, "")
+          end
+        end
+      end
+    end
+  end
+end