naksh 0.2.0

data/lib/naksh/command_handling.rb

@@ -0,0 +1,117 @@
+#!/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/>.
+
+
+class NotExpectedFiletypeError<TypeError
+end
+class CompatibilityError<ArgumentError
+end
+class NoCommandError<StandardError
+  include Naksh::NonCriticalError
+end
+class NkcLoadError<LoadError
+  include Naksh::NonCriticalError
+end
+#looking through this file, you're going to ask,
+#sooner or later, what is nkc?
+#NKC could be an acronym for Naksh Command,
+#but that's not really important
+#I have chosen to identify these ready-made commands
+#by naming the files **.nkc.rb
+#and generally calling them nkcs
+
+
+module Naksh
+
+
+  # this is just what you expect it to be,
+  # an Array of path entries, see PathEntry
+  def Naksh.path
+    @path
+  end
+
+
+  #this is in case you want to save and swap paths, very useful
+  def Naksh.path=(new_path)
+    @path=new_path
+  end
+
+
+
+  #running a command made for us is easy as pie
+  def Naksh.run_nkc(location,args)
+    begin
+      prc=eval(File.new(location.to_s).read)
+    rescue Exception=>err
+      raise NkcLoadError,_('error in command: %s: `%s\'')%[location.sub(File.join(Naksh.config['/dir'],'lib'),''),err.to_s.sub(/\(eval\):\d+:in\s`run_nkc':\scompile error\s*/,"\n")]
+    end
+    raise NotExpectedFiletypeError,_("#{location} isn't a compatible NKC") unless prc.kind_of? Proc or not prc.lambda?
+    raise CompatibilityError,_(location.to_s+' must be written for a future version of Naksh; it requires too many arguments') unless prc.arity.abs==1
+    prc.call(args)
+  end
+
+
+  #this is for normal commands you can run from any shell
+  def Naksh.run_external_file(location,args)
+    $stderr.puts 'external command execution not yet implemented'
+    0
+  end
+
+
+  def Naksh.send_command(command,args)
+    raise ArgumentError unless command.kind_of? String and args.kind_of? Array
+    @path.each do |path_entry|
+      case path_entry.type
+        when :nkc
+          return run_nkc(path_entry.location,args) if path_entry.name==command
+        when :external
+          return run_external_file(path_entry.location,args) if path_entry.name==command
+        when :nkc_dir
+          path_entry.location.children.each do |child|
+            begin
+              return run_nkc(child,args) if (/\A(.+)\.nkc\.rb\z/.match(File.basename(child))[1])==command
+            rescue Naksh::NonCriticalError=>error
+              Naksh.buffer.clear
+              Naksh.interface.err.print((_('Naksh: %s')%[error.to_s])<<"\n")
+              return false
+            rescue NoMethodError
+            end
+          end
+        when :external_dir
+          path_entry.location.children.each do |child|
+            return run_external_file(path_entry.location,args) if File.basename(child)==command and File.file? child
+          end
+        when :mixed_dir
+          path_entry.location.children.each do |child|
+            md=/\A(.+)\.nkc\.rb\z/.match(File.basename(child))
+            if md
+              return run_nkc(child,args) if md[1]==command
+            else
+              return run_external_file(child,args) if File.basename(child)==command and File.file? child
+            end
+          end
+        else
+          raise RuntimeError
+      end
+    end
+    raise NoCommandError,_("%s: command not found")%[command]
+  end
+
+  @path      = Array.new
+
+end

data/lib/naksh/commands/bash/README

@@ -0,0 +1,2 @@
+This folder (lib/naksh/commands/bash) is for pure GNU Bash builtin clones written as NKC Ruby scripts.
+Documentation for the GNU Bash builtins can be found at <http://www.gnu.org/software/bash/manual/bashref.html#Shell-Builtin-Commands>

data/lib/naksh/commands/bash/echo.nkc.rb

@@ -0,0 +1,50 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+# GPLv3
+# This file is part of Naksh.
+
+#http://www.gnu.org/software/bash/manual/bashref.html#index-echo-133
+
+lambda do |input|
+  allow_escapes=false
+  suppress_line=false
+  input.collect! do |arg|
+    md=/\A\-([eEn]+)\z/.match(arg)
+    if md
+      md[1].each_byte do |c|
+        c=c.chr
+        case c
+          when 'e'
+            allow_escapes=true
+          when 'E'
+            allow_escapes=false
+          when 'n'
+            suppress_line=true
+        end
+      end
+    end
+    md ? nil : arg
+  end
+  result=input.compact.join(' ')
+  if allow_escapes
+    result.gsub! '\\a',"\a"
+    result.gsub! '\\b',"\b"
+    raise NotImplementedError if /\\c/.match(result)
+    result.gsub! '\\e',"\e"
+    result.gsub! '\\f',"\f"
+    result.gsub! '\\n',"\n"
+    result.gsub! '\\r',"\r"
+    result.gsub! '\\t',"\t"
+    result.gsub! '\\f',"\f"
+    result.gsub! '\\\\','\\'
+    result.gsub!(/\\0([0-7]{0,3})/) do |match|
+      match[2..-1].to_i(8).chr
+    end
+    result.gsub!(/\\x(\h{1,2})/) do |match|
+      match[2..-1].to_i(16).chr
+    end
+  end
+  result<<"\n" unless suppress_line
+  Naksh.buffer.print result
+  0
+end

data/lib/naksh/commands/bsd.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
+  module CommandSets
+    #all of the commands as implemented in Bsd
+    module Bsd
+    end
+  end
+end

data/lib/naksh/commands/dos.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
+  module CommandSets
+    #accept DOS commands, why not?, low priority
+    module Dos
+    end
+  end
+end

data/lib/naksh/commands/fuse.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
+  module CommandSets
+    #http://rubyforge.org/projects/fusefs/
+    module FuseFS
+    end
+  end
+end

data/lib/naksh/commands/gnu.rb

@@ -0,0 +1,30 @@
+#!/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
+  module CommandSets
+    #all of the commands written by GNU
+    module Gnu
+      def Unix.sort(args=[])
+        a=Naksh.argument_parser(args,1..1/0,:b=>:ignore_leading_blanks,:d=>:dictionary_order,:f=>:ignore_case,:g=>:general_numeric_sort,:i=>:ignore_nonprinting,:M=>:month_sort,:n=>:numeric_sort,:r=>:reverse,:C=>:check,:k=>:key,:m=>:merge,:o=>:output,:s=>:stable,:S=>:buffer_size,:t=>:field_separator,:T=>:temporary_directory,:u=>:unique,:a=>:zero_terminated)
+        p a
+        raise NotImplementedError
+      end
+    end
+  end
+end

data/lib/naksh/commands/gnu/README

@@ -0,0 +1,2 @@
+This folder (lib/naksh/commands/gnu) is for pure GNU core utility clones written as NKC Ruby scripts.
+Documentation for the GNU core utilities can be found at <http://www.gnu.org/software/coreutils/manual>

data/lib/naksh/commands/gnu/cat.nkc.rb

@@ -0,0 +1,50 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+# GPLv3
+# This file is part of Naksh.
+
+#http://www.gnu.org/software/coreutils/manual/coreutils.html#cat-invocation
+
+lambda do |input|
+  show_line_endings     = false
+  show_tabs             = false
+  show_nonprinting      = false
+  number_all_lines      = false
+  number_nonblank_lines = false
+  squeeze_blank         = false
+  input.collect! do |arg|
+    raise NotImplementedError
+    result=arg
+    if arg.start_with? '-'
+      case arg
+        when '--show-all'
+          show_line_endings = true
+          show_tabs         = true
+          show_nonprinting  = true
+        when '--number'
+          number_all_lines = true
+        when '--number-nonblank'
+          number_nonblank_lines = true
+        when '--show-ends'
+          show_line_endings = true
+        when '--show-nonprinting'
+          show_nonprinting = true
+        when '--squeeze-blank'
+          squeeze_blank = true
+        when '--help'
+          raise NotImplementedError
+        else
+          result=nil
+      end
+    end
+    result
+  end
+  input.compact!
+  line_number=0
+  while r=Naksh.buffer.gets
+    line_number+=1 if not number_nonblank_lines or r.empty?
+    r=line_number.pad(6,' ')<<r if number_all_lines
+    Naksh.buffer.puts r
+  end
+  0
+end

data/lib/naksh/commands/gnu/cd.nkc.rb

@@ -0,0 +1,11 @@
+#!/usr/local/bin/ruby
+# 2011 Mahmut Bulut
+# GPLv3
+# This file is part of Naksh.
+
+require 'pathname'
+
+lambda do |*a|
+  Naksh.config['/env/pwd']=(Pathname.new(Naksh.config['/env/pwd'])+a.last).realpath.to_s# rescue return 1
+  0
+end

data/lib/naksh/commands/gnu/echo.documentation.json

@@ -0,0 +1,57 @@
+{
+  "status"            : "\\c is questionable",
+  "name"              : "echo",
+  "short_description" : "Print a line of text",
+  "synopsis"          : "echo [option]... [string]...",
+  "author"            : "Mahmut Bulut",
+  "report_bugs"       : "mailto:naksh-developers@rubyforge.org",
+  "copyright"         : "2011 Mahmut Bulut GPLv3",
+  "last_modification" : "1198892637",
+  "designed_from"     : "GNU coreutils 6.9 echo documentation",
+  "long_description"  : "echo: Print a line of text
+
+echo writes each given string to standard output, with a space between each and a newline after the last one. Synopsis:
+
+     echo [option]... [string]...
+
+The program accepts the following options. Also see Common options. Options must precede operands, and the normally-special argument ‘--’ has no special meaning and is treated like any other string.
+
+‘-n’
+    Do not output the trailing newline.
+‘-e’
+    Enable interpretation of the following backslash-escaped characters in each string:
+
+    ‘\a’
+        alert (bell)
+    ‘\b’
+        backspace
+    ‘\c’
+        suppress trailing newline
+    ‘\f’
+        form feed
+    ‘\n’
+        new line
+    ‘\r’
+        carriage return
+    ‘\t’
+        horizontal tab
+    ‘\v’
+        vertical tab
+    ‘\\’
+        backslash
+    ‘\0nnn’
+        the eight-bit value that is the octal number nnn (zero to three octal digits)
+    ‘\nnn’
+        the eight-bit value that is the octal number nnn (one to three octal digits)
+    ‘\xhh’
+        the eight-bit value that is the hexadecimal number hh (one or two hexadecimal digits)
+
+
+‘-E’
+    Disable interpretation of backslash escapes in each string. This is the default. If -e and -E are both specified, the last one given takes effect.
+
+If the POSIXLY_CORRECT environment variable is set, then when echo's first argument is not -n it outputs option-like arguments instead of treating them as options. For example, echo -ne hello outputs ‘-ne hello’ instead of plain ‘hello’.
+
+POSIX does not require support for any options, and says that the behavior of echo is implementation-defined if any string contains a backslash or if the first argument is -n. Portable programs can use the printf command if they need to omit trailing newlines or output control characters or backslashes. See printf invocation.
+
+An exit status of zero indicates success, and a nonzero value indicates failure."}

data/lib/naksh/commands/gnu/echo.documentation.rb

@@ -0,0 +1,60 @@
+require 'scooter/email.rb'
+require 'xri/url.rb'
+#this is superior in content quality to the json version
+{
+  :status            => "\\c is questionable",
+  :name              => "echo",
+  :short_description => "Print a line of text",
+  :synopsis          => "echo [option]... [string]...",
+  :author            => "Mahmut Bulut",
+  :report_bugs       => "naksh-developers@rubyforge.org".to_email_address,
+  :copyright         => "2011 Mahmut Bulut GPLv3",
+  :last_modification => Time.at(1198892637),
+  "designed_from"    => "GNU coreutils 6.9 echo documentation",
+  :long_description  => %q{echo: Print a line of text
+
+echo writes each given string to standard output, with a space between each and a newline after the last one. Synopsis:
+
+     echo [option]... [string]...
+
+The program accepts the following options. Also see Common options. Options must precede operands, and the normally-special argument ‘--’ has no special meaning and is treated like any other string.
+
+‘-n’
+    Do not output the trailing newline.
+‘-e’
+    Enable interpretation of the following backslash-escaped characters in each string:
+
+    ‘\a’
+        alert (bell)
+    ‘\b’
+        backspace
+    ‘\c’
+        suppress trailing newline
+    ‘\f’
+        form feed
+    ‘\n’
+        new line
+    ‘\r’
+        carriage return
+    ‘\t’
+        horizontal tab
+    ‘\v’
+        vertical tab
+    ‘\\’
+        backslash
+    ‘\0nnn’
+        the eight-bit value that is the octal number nnn (zero to three octal digits)
+    ‘\nnn’
+        the eight-bit value that is the octal number nnn (one to three octal digits)
+    ‘\xhh’
+        the eight-bit value that is the hexadecimal number hh (one or two hexadecimal digits)
+
+
+‘-E’
+    Disable interpretation of backslash escapes in each string. This is the default. If -e and -E are both specified, the last one given takes effect.
+
+If the POSIXLY_CORRECT environment variable is set, then when echo's first argument is not -n it outputs option-like arguments instead of treating them as options. For example, echo -ne hello outputs ‘-ne hello’ instead of plain ‘hello’.
+
+POSIX does not require support for any options, and says that the behavior of echo is implementation-defined if any string contains a backslash or if the first argument is -n. Portable programs can use the printf command if they need to omit trailing newlines or output control characters or backslashes. See printf invocation.
+
+An exit status of zero indicates success, and a nonzero value indicates failure.}}