hquby 0.1.0

data/.gitignore

@@ -0,0 +1,18 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp
+.*.swp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in hquby.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Anton Ovchinnikov
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,38 @@
+# hquby
+
+
+**hquby** is a HQ9+ implementation written in Ruby.
+
+You can:
+
+- jump straight to interactive mode
+
+  `$ ./hquby.rb`
+
+- execute script from the command line
+
+  `$ ./hquby.rb -e 'hqq+'`
+
+- read commands from the standard input
+
+  `$ echo -n 'hq99+' | ./hquby.rb`
+
+- read commands from script files
+
+  `$ ./hquby.rb script1.hq script2.hq`
+
+**hquby** supports Readline library.
+
+You can also use the following service commands while in interactive mode:
+
+  `:help`               - show options summary
+
+  `:setprompt PROMPT`   - set new prompt
+
+  `:examine`            - print hidden variable value (for debug purposes!)
+
+  `:quit`               - terminate the shell
+
+## Installation
+
+    $ gem install hquby 

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/bin/hquby

@@ -0,0 +1,174 @@
+#!/usr/bin/env ruby
+
+require 'optparse'
+
+def eval_h
+  puts "Hello, world!"
+end
+
+def eval_q(script_string)
+  puts script_string
+end
+
+def eval_9
+
+  def multibeer(n)
+    n = n.to_i
+    case n
+    when 0 then 'no more bottles'
+    when 1 then '1 bottle'
+    else "#{n} bottles"
+    end
+  end
+  99.downto(1) do |i|
+    puts <<-BOTTLES
+#{multibeer(i)} of beer on the wall, #{multibeer(i)} of beer.
+Take one down and pass it around, #{multibeer(i-1)} of beer on the wall.
+
+    BOTTLES
+  end
+
+    puts <<-BOTTLES_ENDING
+No more bottles of beer on the wall, no more bottles of beer.
+Go to the store and buy some more, 99 bottles of beer on the wall.
+    BOTTLES_ENDING
+end
+
+$i = 0
+def eval_plus
+  $i += 1
+end
+
+def show_usage
+  puts <<-USAGE
+Usage:
+
+  -h, --help    - show help
+  -e SCRIPT     - execute script
+
+  no arguments  - fall back to interactive mode
+  USAGE
+end
+
+def show_greeting
+  puts <<-GREETING
+--- Welcome to hquby interactive mode!
+--- hquby is an implementation of HQ9+ interpreter.
+--- Type ':help' or '?' for more options.
+  GREETING
+end
+
+def show_help
+  puts <<-HELP
+\nAvailable options:
+
+:help, ?          - show this help
+:setprompt PROMPT - set new prompt
+:examine          - print hidden variable value for debug purposes
+:quit             - get me out of here!\n
+  HELP
+end
+
+def eval_config(str)
+  words = str.split(/\s+/)
+  case words[0]
+  when /\?|:help/   then show_help()
+  when ':setprompt' then $prompt = words[1].nil? ? DEFAULT_PROMPT : "#{words[1]} "
+  when ':quit'      then exit(0)
+  when ':examine'   then puts "#{$i}"
+  else puts "~ Error! Unknown statement: '#{words[0]}'"
+  end
+end
+
+def eval_string(str)
+  str.strip!
+
+  # eval config
+  if $is_interactive and [':', '?'].include?(str[0])
+    eval_config(str)
+    return
+  end
+
+  str.downcase!
+  str.gsub!(/\s+/, '')
+  commands = str.split('')
+
+  # check commands
+  commands.each_index do |c|
+    if not ['h', 'q', '9', '+'].include?(commands[c])
+      $stderr.puts "~ Error! Unknown symbol: '#{commands[c]}' (:#{c})"
+      return
+    end
+  end
+
+  # exec
+  commands.each do |x|
+    case x
+    when 'h' then eval_h
+    when 'q' then eval_q(str)
+    when '9' then eval_9
+    when '+' then eval_plus
+    else puts "~ Error! This is awkward..."
+    end
+  end
+end
+
+
+########
+# MAIN #
+########
+
+optparse = OptionParser.new do |opts|
+  opts.on('-h', '--help', 'Display usage') do
+    show_usage()
+    exit(0)
+  end
+
+  opts.on('-e SCRIPT', 'Execute script from command line') do |scr|
+    eval_string(scr)
+    exit(0)
+  end
+end
+optparse.parse!
+
+
+$is_interactive = false
+# Read from scripts or STDIN
+if not ARGV.empty? or not $stdin.tty?
+  ARGF.each do |line|
+    eval_string(line.chomp)
+  end
+  exit(0)
+end
+
+
+# Fall back to interactive mode
+# TODO Check 'Readline' support!
+require 'readline'
+$stdout.sync = true
+
+DEFAULT_PROMPT = '>> '
+$prompt = DEFAULT_PROMPT
+$is_interactive = true
+
+# Catch Ctrl-C
+trap('INT') do
+  puts "\n~ Interrupt"
+  print $prompt
+end
+
+LIST = [
+  ':help', ':setprompt',
+  ':quit', ':examine',
+].sort
+
+comp = proc { |s| LIST.grep( /^#{Regexp.escape(s)}/ ) }
+
+Readline.completion_append_character = " "
+Readline.completion_proc = comp
+
+show_greeting()
+while line = Readline.readline($prompt, true)
+  eval_string(line.chomp)
+end
+

data/hquby.gemspec

@@ -0,0 +1,19 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'hquby/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "hquby"
+  gem.version       = Hquby::VERSION
+  gem.authors       = ["Anton Ovchinnikov"]
+  gem.email         = ["revolver112@gmail.com"]
+  gem.description   = %q{HQ9+ interpreter}
+  gem.summary       = %q{Simple HQ9+ implementation}
+  gem.homepage      = "https://github.com/rev112/hquby"
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+end

data/lib/hquby/version.rb

@@ -0,0 +1,3 @@
+module Hquby
+  VERSION = "0.1.0"
+end

data/lib/hquby.rb

@@ -0,0 +1,5 @@
+require "hquby/version"
+
+module Hquby
+  # Your code goes here...
+end

metadata

@@ -0,0 +1,55 @@
+--- !ruby/object:Gem::Specification
+name: hquby
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+  prerelease: 
+platform: ruby
+authors:
+- Anton Ovchinnikov
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-02-14 00:00:00.000000000 Z
+dependencies: []
+description: HQ9+ interpreter
+email:
+- revolver112@gmail.com
+executables:
+- hquby
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/hquby
+- hquby.gemspec
+- lib/hquby.rb
+- lib/hquby/version.rb
+homepage: https://github.com/rev112/hquby
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.25
+signing_key: 
+specification_version: 3
+summary: Simple HQ9+ implementation
+test_files: []