calc_jmoral33 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: b03799e06e05f328a4dcb967e97666f2241a44e6
+  data.tar.gz: 538c6fca6fc7a92a8cc06c494bee2590598011b1
+SHA512:
+  metadata.gz: cc1a872f1e934c7cb78d02175b68b18885599bbf91afd4e29f183b726b81eb1c47cf72ce27941fd4abd4fb1f43e88f5872d1f21030ea7c57aacf3455077f30a7
+  data.tar.gz: 6ec3cd874518cd16813631f44496118f5601722343882f139df25652ab525ea5353cd23a1844f6d8f72369f13840856c981d876abed812f5edbd569ae010ca92

data/bin/calc

@@ -0,0 +1,55 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'calculator'
+require 'calcex'
+
+
+$calc = Calculator.new()
+
+file = File.new("bin/operaciones.txt")
+
+$calc.evalFile(file)
+
+begin
+  $stdout.print "> "
+  $stdout.flush
+  text = gets
+  if(!text)
+    break
+  end
+
+  # line_num=0
+  # text=File.open('operaciones.txt').read
+  # text.gsub!(/\r\n?/, "\n")
+  # text.each_line do |line|
+  #   print "= " + $calc.eval(line).to_s
+  # end
+
+  if(text!="\n")
+    
+    print "= " + $calc.eval(text).to_s
+    
+    if(!$calc.assigns.empty?)
+      assigns = $calc.assigns
+      print "[ "
+      assigns.each {|key,value| print "#{value} "}
+      print "]"
+
+      puts ""
+    else
+      puts ""
+    end
+    $calc.assigns.clear
+  else
+    puts "Parse Error, needed an expresion"
+    
+  end
+  
+rescue ParseError
+  puts "Parse Error"
+rescue UnrecognizedTokenException
+  puts "UnrecognizedTokenException"
+rescue
+  puts "Unkown exception"
+end until ($calc.eol and $calc.eof)

data/lib/ast.rb

@@ -0,0 +1,147 @@
+require 'set'
+
+class BinaryNode
+  attr_reader :left, :right
+  
+  def initialize(left,right)
+    @left = left
+    @right = right
+  end
+end
+   
+class UnaryNode
+  attr_reader :subTree
+   
+  def initialize subTree
+    @subTree = subTree
+  end
+end
+
+class AssignNode < UnaryNode
+  def initialize(id,subTree)
+    super(subTree)
+    @id=id
+  end
+
+  def evaluate
+    val = @subTree.evaluate
+    $calc.insert(@id,val)
+    #realizar asignacion
+    return val
+  end
+end
+
+class IdentifierNode
+  def initialize(id)
+    @id=id
+  end
+
+  def evaluate
+    return $calc.search(@id)
+  end
+end
+
+class AddNode < BinaryNode
+  def initialize(left, right)
+    super(left,right)
+  end
+   
+  def evaluate 
+    @left.evaluate + @right.evaluate
+  end
+end
+
+class SubNode < BinaryNode
+  def initialize(left, right)
+    super(left,right)
+  end
+   
+  def evaluate 
+    @left.evaluate - @right.evaluate
+  end
+end
+      
+class NumNode 
+  def initialize(num)
+    @num = num
+  end
+   
+  def evaluate
+    @num
+  end
+end
+
+class StoreNode < UnaryNode
+  def initialize(subTree)
+    super(subTree)
+  end
+
+  def evaluate    
+    $calc.memory=subTree.evaluate
+  end
+end
+
+class PlusNode < UnaryNode
+  def initialize(subTree)
+    super(subTree)
+  end
+
+  def evaluate    
+    $calc.memory+=subTree.evaluate
+  end
+end
+
+class MinusNode < UnaryNode
+  def initialize(subTree)
+    super(subTree)
+  end
+
+  def evaluate    
+    $calc.memory-=subTree.evaluate
+  end
+end
+
+class ClearNode
+  def evaluate
+    $calc.memory2.clear
+    $calc.memory=0
+    
+  end
+end
+
+class RecallNode
+  def evaluate
+    $calc.memory
+  end
+end
+
+
+class TimesNode < BinaryNode
+  def initialize(left,right)
+    super(left,right)
+  end
+   
+  def evaluate 
+    @left.evaluate*@right.evaluate
+  end
+end
+
+class DivideNode < BinaryNode
+  def initialize(left,right)
+    super(left,right)
+  end
+   
+  def evaluate 
+    @left.evaluate/@right.evaluate
+  end
+end
+
+class ModuloNode < BinaryNode
+  def initialize(left,right)
+    super(left,right)
+  end
+   
+  def evaluate 
+    @left.evaluate%@right.evaluate
+  end
+end

data/lib/calcex.rb

@@ -0,0 +1,3 @@
+ 
+class ParseError < Exception; end
+class UnrecognizedTokenException < Exception; end

data/lib/calculator.rb

@@ -0,0 +1,50 @@
+require 'parser'
+require 'ast'
+
+class Calculator
+  attr_accessor :memory
+  attr_accessor :memory2
+  attr_accessor :eol
+  attr_accessor :eof
+  attr_accessor :countAssigns
+  attr_accessor :assigns
+  def initialize()
+    @memory = 0
+    @memory2 = Hash.new(0)
+    @eol = false
+    @eof = false
+    @assigns = Hash.new("")
+    @countAssigns = 0
+  end
+  
+  def eval(expr)
+    parser = Parser.new(StringIO.new(expr))
+    ast = parser.parse()
+    return ast.evaluate()
+  end
+
+  def insert(id,val)
+    @assigns[countAssigns] = id.to_s + " <- " + val.to_s
+    @countAssigns += 1
+    @memory2[id] = val
+    
+  end
+
+  def evalFile(file)
+    file.each{|line|
+      if(line!="\n")
+        puts "= " + $calc.eval(line).to_s
+      else
+        puts "Needed an expresion"
+      end      
+    }    
+  end
+
+  def search(id)
+    if(@memory2.keys.include?(id))
+      return @memory2[id]
+    else
+      return 0
+    end
+  end
+end

data/lib/parser.rb

@@ -0,0 +1,163 @@
+require 'ast'
+require 'scanner'
+require 'token'
+require 'calcex'
+
+class Parser
+  def initialize(istream)
+    @scan = Scanner.new(istream)
+  end
+   
+  def parse
+    return Prog()
+  end
+  
+  private
+  def Prog
+    result = Expr()
+    t = @scan.getToken
+
+    if t.type == :eol
+      $calc.eol=true
+    else
+      $calc.eol=false
+      $calc.eof=true
+      
+    end
+    
+    return result
+
+    if t.type != :eof then
+      print "Expected EOF. Found ", t.type, ".\n"
+      raise ParseError.new
+    end
+    
+
+  end
+  
+  def Expr
+    return RestExpr(Term())
+  end
+   
+  def RestExpr(e) 
+    t = @scan.getToken()
+    
+    if t.type == :add then
+         return RestExpr(AddNode.new(e,Term()))
+    end
+  
+    if t.type == :sub then
+      return RestExpr(SubNode.new(e,Term()))
+    end
+      
+    @scan.putBackToken
+    
+    return e
+  end
+  
+  def Term
+    # Write your Term() code here. This code is just temporary
+    # so you can try the calculator out before finishing it.
+    
+    return RestTerm(Storable())
+    
+    
+    puts "Term not implemented\n"
+    
+    raise ParseError.new
+  end
+   
+  def RestTerm(e)
+    t = @scan.getToken
+    
+    if t.type == :times then
+      return RestTerm(TimesNode.new(e,Term()))
+    end
+    
+    if t.type == :divide then
+      return RestTerm(DivideNode.new(e,Term()))
+    end
+
+    if t.type == :modulo then
+      return RestTerm(ModuloNode.new(e,Term()))
+    end
+    
+    @scan.putBackToken
+    
+    return e
+
+    puts "RestTerm not implemented"
+    raise ParseError.new # "Parse Error"
+
+  end
+   
+  def Storable
+    return MemOperation(Factor())
+  
+  end
+
+  def MemOperation(e)
+    t=@scan.getToken()
+    if (t.type==:keyword)
+      if (t.lex=="S")
+        return StoreNode.new(e)
+      elsif(t.lex=="M")
+         return MinusNode.new(e)
+      elsif(t.lex=="P")
+        return PlusNode.new(e)
+      end
+    end
+
+    @scan.putBackToken
+    return e
+    
+  end
+
+  def Assignable
+    t=@scan.getToken
+    if(t.type == :identifier)
+      
+      result=Assign(t.lex.to_s)
+      return result
+    end
+       
+  end
+
+  def Assign(id)
+    t=@scan.getToken
+    if(t.type==:assign)
+      return AssignNode.new(id,Expr())
+    end
+    @scan.putBackToken
+    return IdentifierNode.new(id)
+  end
+  
+   
+  def Factor 
+    
+    t = @scan.getToken
+    
+    if t.type == :number then
+      val = t.lex.to_i
+      return NumNode.new(val)
+    elsif(t.type == :keyword)
+      if(t.lex == "R")
+        return RecallNode.new
+      elsif(t.lex== "C")
+        return ClearNode.new
+      end
+    elsif(t.type == :lparen)
+      result=Expr()
+      t=@scan.getToken
+      if(t.type== :rparen)
+        return result
+      else
+        puts "Expected right parentheses"
+      end
+    end
+    
+    @scan.putBackToken
+    return Assignable()
+    
+  end         
+end

data/lib/scanner.rb

@@ -0,0 +1,140 @@
+require 'stringio'
+require 'calcex'
+
+class Scanner
+  def initialize(inStream)
+    @istream = inStream
+    @keywords = Set.new(["S","R","M","P","C"])
+    @lineCount = 1
+    @colCount = -1
+    @needToken = true
+    @lastToken = nil
+  end
+  
+  def putBackToken
+    @needToken = false
+  end
+
+  def getToken
+    unless @needToken
+      @needToken = true
+      return @lastToken
+    end
+    
+    state = 0
+    foundOne = false
+    c = @istream.getc
+    
+    if @istream.eof? then
+      @lastToken = Token.new(:eof,@lineCount,@colCount)
+      return @lastToken
+    end
+    
+    until foundOne
+      @colCount +=1
+      case state
+      when 0
+        lex = ""
+        column = @colCount
+        line = @lineCount
+        if isLetter(c) then state=1
+        elsif isDigit(c) then state=2
+        elsif c == ?+ then state = 3
+        elsif c == ?- then state = 4
+        elsif c == ?* then state = 5
+        elsif c == ?/ then state = 6
+        elsif c == ?( then state = 7
+        elsif c == ?) then state = 8
+        elsif c == ?% then state=9
+        elsif c == ?= then state = 10        
+        elsif c == ?\n then 
+                state =11
+           @colCount = -1
+           @lineCount = @lineCount+1
+        elsif isWhiteSpace(c) then state = state #ignore whitespace
+        elsif @istream.eof() then
+           @foundOne = true
+              type = :eof
+           else
+          puts "Unrecognized Token found at line ",line," and column ",column,"\n"
+          raise UnrecognizedTokenException # "Unrecognized Token"
+        end
+      when 1
+        if isLetter(c) or isDigit(c) then state = 1
+        else
+          if @keywords.include?(lex) then
+            foundOne = true
+            type = :keyword
+          else
+            foundOne = true
+            type = :identifier
+          end
+        end
+      when 2
+        if isDigit(c) then state = 2
+        else
+          type = :number
+          foundOne = true
+        end
+      when 3
+        type = :add
+        foundOne = true
+      when 4
+        type = :sub
+        foundOne = true
+      when 5
+        type = :times
+        foundOne = true
+      when 6
+        type = :divide
+        foundOne = true
+      when 7
+        type = :lparen
+        foundOne = true
+      when 8
+        type = :rparen
+        foundOne = true        
+      when 9
+        type = :modulo
+        foundOne = true
+      when 10
+        type = :assign
+        foundOne = true
+      when 11
+        type = :eol
+        foundOne = true
+      end
+
+      if !foundOne then
+        lex.concat(c)
+        c = @istream.getc()
+      end
+
+    end
+   
+    @istream.ungetc(c)   
+    @colCount = @colCount - 1
+    if type == :number or type == :identifier or type == :keyword then
+      t = LexicalToken.new(type,lex,line,column)
+    else
+      t = Token.new(type,line,column)
+    end
+
+    @lastToken = t
+    return t
+    
+  end
+
+  private
+  def isLetter(c) 
+    return ((?a <= c and c <= ?z) or (?A <= c and c <= ?Z))
+  end
+  
+  def isDigit(c)
+    return (?0 <= c and c <= ?9)
+  end
+  
+  def isWhiteSpace(c)
+    return (c == ?\  or c == ?\n or c == ?\t)
+  end
+end

data/lib/token.rb

@@ -0,0 +1,19 @@
+class Token
+  attr_reader :type, :line, :col
+
+  def initialize(type,lineNum,colNum)
+    @type = type
+    @line = lineNum
+    @col = colNum
+  end
+end
+
+class LexicalToken < Token
+  attr_reader :lex
+  
+  def initialize(type,lex,lineNum,colNum)
+    super(type,lineNum,colNum)
+    
+    @lex = lex
+  end
+end

metadata

@@ -0,0 +1,51 @@
+--- !ruby/object:Gem::Specification
+name: calc_jmoral33
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Kent D. Lee - Juan Francisco Cardona Mc - Juan Daniel Morales
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-10-29 00:00:00.000000000 Z
+dependencies: []
+description: An calculator implementation on ruby
+email: jmoral33@eafit.edu.co
+executables:
+- calc
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/calc
+- lib/ast.rb
+- lib/calcex.rb
+- lib/calculator.rb
+- lib/parser.rb
+- lib/scanner.rb
+- lib/token.rb
+homepage: http://www1.eafit.edu.co/fcardona/cursos/st0244/rubycal
+licenses:
+- ARTISTIC
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.8
+signing_key: 
+specification_version: 4
+summary: Another calculator in ruby
+test_files: []