alphalang 0.1.2 → 0.1.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: bb11af78d1a68ee1f2a5aaba719040996f435be0183e690bea2532a7fce80201
-  data.tar.gz: 0f5a33e46b3fa611bab83528e90c481e5ba4ec1a480808a1bc7551fc25b90e4e
+  metadata.gz: 9e3d320e5322d98b56f1cd6d5f9e51211de1c41ba6abe20800177bf83ae08133
+  data.tar.gz: fe85e5979279fbff45aa74ec9a09435bff67fd49dca35c5fbd332c1c8628c9e7
 SHA512:
-  metadata.gz: 7411738e5cd015019a137324144b4a735f3e195263cc23ddf1301ecc2a3803be9ede4d28cc4f84403cb6547bc8dc6c75cf9ee59e307ef22d692632daa1439b58
-  data.tar.gz: b9ebbb5a83f4a2fb5f547754e7458e0de1249ff0e15fa79a293c5d56727d68237b6ff2de9d9b9be08866440dd5195f1eeff777b11eda23606a05c6b62941c54f
+  metadata.gz: 0ee5133266c1e9ebb85c13740d730efb69db1b4deb54853e53103e38275262edc789f425e1450ef5582bb4077590d33c21fbe24662920b473a6d05ba9de21676
+  data.tar.gz: 8e756c3aa10fa954cc06fbb299d5eff3ce1335d6c3130f76485280f09c08165fc1c62bd9b5160e83ea68dec7ead8368d7dc584b5915a62a14ca8ed28d2e954d8

data/bin/alphalang

@@ -1,7 +1,10 @@
 #!/usr/bin/env ruby
 require 'optparse'
 require File.expand_path('../lib/alpha', __dir__)
-ALPHA_VER = '0.1.2'.freeze
+ALPHA_VER = '0.1.4'.freeze
+ABORT_ANSWERS = [' ', '', 'none', 'abort'].freeze # something here? Some cases empty means yes tho..
+LOCALES_PATH = File.join(__dir__, '../lib/locales')
+PROTECTED_LOCALES = ['.', '..', 'locale_template', 'default', 'default.old', 'en', 'sv', 'de'].freeze
 
 basic_error_msg = "Usage: alphalang [options] file.alpha\nUsage: alphalang -h for the help menu."
 
@@ -17,44 +20,96 @@ OptionParser.new do |opts|
     options[:verify] = true
   end
 
-  opts.on('--lang=LOCALE', 'Set the locale language for all program keywords. Available: en, sv, de') do |lang|
-    options[:lang] = lang
+  opts.on('--locale=LOCALE', 'Set the syntax locale for current program keywords.') do |locale|
+    options[:locale] = locale
   end
 
-  opts.on('--createlocale', 'Creates a new locale-file for all program keywords available.') do
+  opts.on('--setlocale=LOCALE', 'Set the default syntax locale for all program keywords.') do |new_locale|
+    options[:defaultlocale] = new_locale
+  end
+
+  opts.on('--createlocale', 'Creates a new locale file for all program keywords available.') do
     options[:createlocale] = true
   end
+
+  opts.on('--deletelocale', 'Deletes a locale file from your locales directory.') do
+    options[:deletelocale] = true
+  end
+
+  opts.on('--listlocales', 'Lists all available locale files from your locales directory.') do
+    options[:listlocales] = true
+  end
+
+  opts.on('--listlocale', 'Lists all keywords from a specific locale file from your locales directory.') do
+    options[:listlocale] = true
+  end
 end.parse!
 
-verbose = options[:verbose]
-verify = options[:verify]
-language = options[:lang] || 'en'
-createlocale = options[:createlocale]
+verbose_flag = options[:verbose]
+verify_flag = options[:verify]
+language_flag = options[:locale]
+set_locale_flag = options[:defaultlocale]
+create_locale_flag = options[:createlocale]
+delete_locale_flag = options[:deletelocale]
+list_locales_flag = options[:listlocales]
+list_locale_flag = options[:listlocale]
 
-if createlocale
+if create_locale_flag
   require_relative '../lib/lang_creator'
   create_locale_file
   return
 end
 
+if language_flag.is_a?(NilClass)
+  language_flag = 'default'
+end
+
+if !set_locale_flag.is_a?(NilClass)
+  unless ARGV.empty?
+    puts 'Flag for verification found. Ignoring input file.'
+    sleep 0.5
+  end
+  require_relative '../lib/locale_defaulter'
+  set_default_locale(set_locale_flag)
+  return
+end
+
+if delete_locale_flag
+  require_relative '../lib/locale_deleter'
+  delete_locale_file
+  return
+end
+
+if list_locales_flag
+  require_relative '../lib/locale_lister'
+  list_locale_files
+  return
+end
+
+if list_locale_flag
+  require_relative '../lib/locale_lister'
+  list_specific_locale_file
+  return
+end
+
 raise OptionParser::MissingArgument, "No file provided.
-Usage: alphalang my_file.alpha | alphalang -h" if ARGV.empty? unless verify
+Usage: alphalang my_file.alpha | alphalang -h" if ARGV.empty? unless verify_flag
 raise OptionParser::InvalidArgument, 'Too many files provided.
 Did you mean to use an --[option]? | alphalang -h' if ARGV.length > 1
-raise OptionParser::InvalidArgument, 'File must end with .alpha' unless verify or ARGV[0].end_with?('.alpha')
+raise OptionParser::InvalidArgument, 'File must end with .alpha' unless verify_flag or ARGV[0].end_with?('.alpha')
 
-if verbose
+if verbose_flag
   require_relative '../lib/rdparse'
 else
   require_relative '../lib/rdparse_quiet'
 end
 
-if verify
-  if !ARGV.empty?
+if verify_flag
+  unless ARGV.empty?
     puts 'Flag for verification found. Ignoring input file.'
     sleep 1
   end
   require_relative '../lib/tester/test_unit'
 else
-  LangParser.new(language).parse_file(ARGV[0])
+  LangParser.new(language_flag).parse_file(ARGV[0])
 end

data/lib/alpha.rb

@@ -1,7 +1,7 @@
-require_relative './nodes/stmtnodes'
+require_relative './nodes/scopemanager'
 
 class LangParser
-  def initialize(locale='en')
+  def initialize(locale = 'default')
     @langParser = Parser.new('lang parser', locale) do
       token(/while/) { |_| :WHILE }
       token(/print/) { |_| :PRINT }
@@ -81,11 +81,6 @@ class LangParser
         match(:member, '=', :array_stmt) { |var, _, value| VariableDecNode.new(var, value) }
       end
 
-      #array inte klar kan assigna till vaiabel men inte kolla upp än
-      rule :array_stmt do
-        match('[', :arg_list, ']') { |_, array, _| array }
-      end
-
       rule :pause_stmt do
         match(:PAUSE, :expr) { |_, a| PauseNode.new(a) }
       end
@@ -109,6 +104,15 @@ class LangParser
         match(:NOT, :expr_stmt) { |_, b| NotNode.new(b) }
       end
 
+      rule :array_stmt do
+        match('[', :arg_list, ']') { |_, array, _| array }
+      end
+
+      rule :arg_list do
+        match(:expr, ',', :arg_list) { |a, _, b| ArrayNode.new(a, b) }
+        match(:expr) { |a| ArrayNode.new(a, NilClass) }
+      end
+
       rule :expr do
         match(:expr, /(<|>)/, :expr) { |a, op, b| CompareNode.new(a, op, b) }
         match(/(<|>)/, :expr) { |op, b| CompareNode.new(nil, op, b) }
@@ -141,14 +145,11 @@ class LangParser
       rule :member do
         match(/[a-z]/, '(', :arg_list, ')') { |var, _, args, _| FuncCallNode.new(var, args) }
         match(/[a-z]/, '(', ')') { |var, _, _| FuncCallNode.new(var, NilClass) }
+        match(/[a-z]/, '[', '-', /\d+/, ']') { |var, _, neg, index, _| ArrayCallNode.new(var, (neg+index)) }
+        match(/[a-z]/, '[', /\d+/, ']') { |var, _, index, _| ArrayCallNode.new(var, index) }
         match(/[a-z]/) { |var| VariableCallNode.new(var) }
       end
 
-      rule :arg_list do
-        match(:expr, ',', :arg_list) { |a, _, b| ArrayNode.new(a, b) }
-        match(:expr) { |a| ArrayNode.new(a, NilClass) }
-      end
-
       rule :prio_stmt do
         match('(', :stmt, ')') { |_, a, _| a }
       end

data/lib/lang_creator.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+require_relative 'locale_lister'
 
 # Function to read user input for translation
 def read_translation(line)
@@ -29,77 +30,66 @@ def read_translation_not_and_or(line)
   return "(#{input.empty? ? word : input}#{postfix}"
 end
 
-def prompt_user(locale_template, file)
+def prompt_user(file)
+  locale_template = File.readlines("#{LOCALES_PATH}/locale_template")
+
   counter = 0
-  locale_template.each do |line|
-    counter += 1
-    break if counter == 14
+  File.open(file, 'a') do |f|
+    locale_template.each do |line|
+      counter += 1
+      break if counter == 14
 
-    if counter < 9
-      translation = read_translation(line.chomp)
-      File.open(file, 'a') { |f| f.puts "#{line.chomp} #{translation}" }
-    end
-    if counter == 9
-      translation = read_translation_true_false(line.chomp)
-      File.open(file, 'a') { |f| f.puts "#{line.chomp} #{translation}" }
-    end
-    if counter == 10
-      File.open(file, 'a') { |f| f.puts "#{line.chomp} (==|<=|>=)" }
+      if counter < 9
+        translation = read_translation(line.chomp)
+        f.puts "#{line.chomp} #{translation}"
+      end
+      if counter == 9
+        translation = read_translation_true_false(line.chomp)
+        f.puts "#{line.chomp} #{translation}"
+      end
+      if counter == 10
+        f.puts "#{line.chomp} (==|<=|>=)"
+      end
+      if counter > 10
+        translation = read_translation_not_and_or(line.chomp)
+        f.puts "#{line.chomp} #{translation}"
+      end
     end
-    if counter > 10
-      translation = read_translation_not_and_or(line.chomp)
-      File.open(file, 'a') { |f| f.puts "#{line.chomp} #{translation}" }
-    end
-  end
-end
-
-def save_file(file)
-  ruby_version = "#{RUBY_VERSION}"
-  ruby_version[-1] = '0'
-  install_path = "/home/#{ENV['USER']}/.local/share/gem/ruby/#{ruby_version}/gems/alphalang-#{ALPHA_VER}"
-
-  if File.exist?(install_path)
-    File.rename(file, "#{install_path}/lib/locales/#{file}")
-    puts "Locale/syntax saved to #{install_path}/lib/locales/#{file}"
-  else
-    raise ArgumentError, "Didn't find your #{install_path}.\nTried #{ruby_version} as <VERSION>"
+    f.puts '\s+ \s+'
+    f.puts '\d+ \d+'
+    f.puts '\w+ \w+'
+    f.puts '. .'
   end
 end
 
 def create_locale_file()
   puts 'Choose a filename for your locale/syntax:'
-  filename = gets.chomp
-  File.open(filename, 'w') {}
+  new_locale_name = gets.chomp
+  new_locale_file_path = "#{LOCALES_PATH}/#{new_locale_name}"
 
-  # import locale template
-  locale_path = File.join(__dir__, 'locales', 'locale_template')
-  token_template = File.readlines(locale_path)
+  if File.exist?(new_locale_file_path)
+    puts "#{new_locale_name} already exists."
+    return
+  end
 
   # prompt user for translations
-  prompt_user(token_template, filename)
-
-  # Append additional translations
-  File.open(filename, 'a') do |f|
-    f.puts '\s+ \s+'
-    f.puts '\d+ \d+'
-    f.puts '\w+ \w+'
-    f.puts '. .'
-  end
+  prompt_user(new_locale_file_path)
 
   # Clear the screen
   system('clear')
 
   # Display the contents of the translation file
-  puts File.read(filename)
+  locale_as_array = clean_locale_file_to_array(new_locale_name)
+  print_clean_locale_array(new_locale_name, locale_as_array)
 
   # Ask user if the translation is correct
   puts 'Is this correct? [Y/n]'
   answer = gets.chomp
 
   if answer.downcase == /y|Y/ or answer.empty?
-    save_file(filename)
+    puts "Locale is saved as #{new_locale_name} in #{LOCALES_PATH}"
   else
     puts 'Translation removed'
-    File.delete(filename)
+    File.delete(new_locale_file)
   end
 end

data/lib/locale_defaulter.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+
+require_relative 'locale_lister'
+
+def set_default_locale(new_locale)
+  available_locales = get_locale_files
+
+  available_locales.each do |locale|
+    if locale == new_locale
+      File.rename("#{LOCALES_PATH}/default", "#{LOCALES_PATH}/default.old")
+      File.copy_stream("#{LOCALES_PATH}/#{new_locale}", "#{LOCALES_PATH}/default")
+      puts "[alphalang] Default syntax locale is now set to #{locale}."
+      return
+    end
+  end
+end

data/lib/locale_deleter.rb

@@ -0,0 +1,32 @@
+#!/usr/bin/env ruby
+
+def prompt_user_for_deletion(locales)
+  puts 'Which locale would you like to delete?:                    RET or "none" to abort'
+
+  locales.each do |locale|
+    puts locale
+  end
+
+  locale_file = gets.chomp
+
+  return if ABORT_ANSWERS.include?(locale_file)
+
+  if PROTECTED_LOCALES.include?(locale_file)
+    puts 'You may not delete a default locale.'
+    return
+  else
+    File.delete("#{LOCALES_PATH}/#{locale_file}")
+    puts "Successfully deleted #{LOCALES_PATH}/#{locale_file}"
+  end
+end
+
+def delete_locale_file()
+  imported_locales = Dir.entries(LOCALES_PATH).reject { |entry| PROTECTED_LOCALES.include?(entry) }
+
+  if imported_locales.empty?
+    puts '[alphalang] There are no locale files to delete. Default locale files are protected.'
+    return
+  else
+    prompt_user_for_deletion(imported_locales)
+  end
+end

data/lib/locale_lister.rb

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+
+# extra_entries_array in case we wanna make a "protected locale" function later on
+def get_locale_files(extra_entries_array = [])
+  protected_locales = ['.', '..', 'locale_template', 'default', 'default.old', extra_entries_array].flatten
+  Dir.entries(LOCALES_PATH).reject { |entry| protected_locales.include?(entry) }
+end
+
+def list_locale_files()
+  locales = get_locale_files
+  puts "[alphalang] These are the available locales.\ndefault"
+  locales.each do |locale|
+    puts locale
+  end
+  puts
+end
+
+def clean_locale_file_to_array(locale_name)
+  locale_file = File.readlines("#{LOCALES_PATH}/#{locale_name}")
+
+  clean_locale_file_array = []
+  locale_file.each do |line|
+    line.scan(/\b\p{Word}+\b/) do |word|
+      clean_locale_file_array << word if word.size > 1
+    end
+  end
+  clean_locale_file_array
+end
+
+def print_clean_locale_array(locale_name, clean_array)
+  header = "\n[alphalang] Syntax for locale <#{locale_name}>."
+  puts header
+  puts '+' * (header.size - 2)
+  clean_line = ''
+  clean_array.each_with_index do |word, index|
+    if index.even?
+      clean_line += "+        #{word}"
+    else
+      clean_line += (' ' * (20 - clean_line.size)) + "#{word}"
+      clean_line += (' ' * (header.size - clean_line.size - 3) + '+')
+      puts clean_line
+      clean_line = ''
+    end
+  end
+  puts '+' * (header.size - 2)
+end
+
+def list_specific_locale_file()
+  list_locale_files
+  specific_locale = gets.chomp
+
+  return if ABORT_ANSWERS.include?(specific_locale)
+
+  specific_locale_array = clean_locale_file_to_array(specific_locale)
+  print_clean_locale_array(specific_locale, specific_locale_array)
+end

data/lib/locales/default

@@ -0,0 +1,17 @@
+while while
+print print
+pause pause
+def def
+end end
+if if
+elseif elseif
+else else
+(false|true) (false|true)
+(==|<=|>=) (==|<=|>=)
+(not|!) (not|!)
+(and|&&) (and|&&)
+(or|\|\|) (or|\|\|)
+\s+ \s+
+\d+ \d+
+\w+ \w+
+. .

data/lib/nodes/basenodes.rb

@@ -1,9 +1,4 @@
 #!/usr/bin/env ruby
-####################################################
-
-$scopes = [{}]
-$scope_lvl = 0
-$test_nodes = false
 
 ####################################################
 

data/lib/nodes/scopemanager.rb

@@ -0,0 +1,49 @@
+require_relative 'stmtnodes'
+
+####################################################
+
+$scopes = [{}]
+$scope_lvl = 0
+$test_nodes = false
+
+# Need to figure out how to move the scopes in here as class members in a sane way
+class ScopeManager
+  def self.scope_lvl
+    $scope_lvl
+  end
+
+  def self.lookup_var(name)
+    temp_scope_lvl = $scope_lvl
+    while temp_scope_lvl >= 0
+      if !$scopes[temp_scope_lvl].key?(name)
+        temp_scope_lvl -= 1
+      else
+        return $scopes[temp_scope_lvl][name]
+      end
+    end
+    raise ArgumentError, "Variable '#{name}' is not defined" unless @value
+  end
+
+  def self.increment_scope_level
+    $scope_lvl += 1
+    $scopes.push({})
+  end
+
+  def self.decrement_scope_level
+    $scope_lvl -= 1
+    $scopes.pop
+  end
+
+  def self.lookup_func(name)
+    raise ArgumentError, "Function '#{name}' is not defined" if $scopes[0][name].is_a?(NilClass)
+    return $scopes[0][name]
+  end
+
+  def self.add_to_current_scope(name, value)
+    $scopes[$scope_lvl][name.name] = value.evaluate
+  end
+
+  def self.add_func_to_global_scope(name, value, args)
+    $scopes[0][name.name] = [value, args]
+  end
+end

data/lib/nodes/stmtnodes.rb

@@ -1,6 +1,7 @@
 require_relative 'basenodes'
 
 ####################################################
+
 class VariableCallNode < Node
   attr_accessor :name
 
@@ -8,19 +9,9 @@ class VariableCallNode < Node
     @name = name
   end
 
-  def lookup_var(name)
-    temp_scope_lvl = $scope_lvl
-    while temp_scope_lvl >= 0
-      if not $scopes[temp_scope_lvl].has_key?(name)
-        temp_scope_lvl -= 1
-      else
-        return $scopes[temp_scope_lvl][name]
-      end
-    end
-  end
-
   def evaluate
-    return @value = lookup_var(@name)
+    @value = ScopeManager.lookup_var(@name)
+    return @value
   end
 end
 
@@ -33,9 +24,8 @@ class VariableDecNode < Node
   end
 
   def evaluate
-    $scopes[$scope_lvl][@name.name] = @value.evaluate
+    ScopeManager.add_to_current_scope(name, @value)
     self
-    # return nil
   end
 end
 
@@ -49,7 +39,7 @@ class FunctionDecNode < Node
   end
 
   def evaluate
-    $scopes[0][@name.name] = [@value, @args]
+    ScopeManager.add_func_to_global_scope(@name, @value, @args)
     return nil
   end
 end
@@ -62,19 +52,13 @@ class FuncCallNode < Node
     @args = args
   end
 
-  def lookup_var(name)
-    return $scopes[0][name]
-  end
-
   def evaluate
-    $scopes.push({})
-    func = lookup_var(@name)
+    func = ScopeManager.lookup_func(@name)
+
     function_body = func[0]
     function_param = func[1]
 
-    return nil if func.is_a?(NilClass)
-
-    $scope_lvl += 1
+    ScopeManager.increment_scope_level
 
     if function_param.is_a?(ArrayNode)
       function_param.each do |val, index|
@@ -83,18 +67,18 @@ class FuncCallNode < Node
       end
     end
 
-    func_result = function_body.evaluate
-    old_scope_lvl = $scope_lvl
-    # Om en assign är returnvärde så declareras variablen i globalt scope
-    if func_result.is_a?(VariableDecNode)
-      $scope_lvl = 0
-      func_result.evaluate
-      $scope_lvl = old_scope_lvl
-    end
+    func_return_value = function_body.evaluate
+
+    ScopeManager.decrement_scope_level
 
-    $scope_lvl -= 1
-    $scopes.pop
-    return func_result
+    # If function return value is an "Assign" then we declare that variable in the global scope.
+    old_scope_lvl = ScopeManager.scope_lvl
+    if func_return_value.is_a?(VariableDecNode)
+      ScopeManager.scope_lvl = 0
+      func_return_value.evaluate
+      ScopeManager.scope_lvl = old_scope_lvl
+    end
+    return func_return_value
   end
 end
 
@@ -176,6 +160,23 @@ end
 
 ####################################################
 
+class ArrayCallNode < Node
+  def initialize(array, index)
+    super(array)
+    @index = index.to_i
+  end
+
+  def evaluate
+    arr = ScopeManager.lookup_var(@value)
+    if @index > arr.size - 1
+      raise ArgumentError, "You are trying to access an out of bounds index. Here -> #{@value}[#{@index}]"
+    end
+    @value = arr[@index]
+  end
+end
+
+####################################################
+
 class PrintNode
   attr_accessor :value
 
@@ -185,7 +186,7 @@ class PrintNode
 
   def evaluate
     puts @value.evaluate
-    self.class # detta kanske är trevligare än nil, åter igen den diskussionen.
+    self.class
   end
 end
 

data/lib/rdparse.rb

@@ -125,10 +125,9 @@ class Parser
   class ParseError < RuntimeError
   end
 
-  def initialize(language_name, locale='en', &block)
+  def initialize(language_name, locale = 'default', &block)
 
-    locales_path = File.join(__dir__, "locales", locale)
-    token_pairs = File.readlines(locales_path)
+    token_pairs = File.readlines("#{LOCALES_PATH}/#{locale}")
     @token_list = Hash.new
     token_pairs.each do |pair|
       default_value, locale_value = pair.split(' ')

data/lib/rdparse_quiet.rb

@@ -126,10 +126,9 @@ class Parser
   class ParseError < RuntimeError
   end
 
-  def initialize(language_name, locale='en', &block)
+  def initialize(language_name, locale = 'default', &block)
 
-    locales_path = File.join(__dir__, "locales", locale)
-    token_pairs = File.readlines(locales_path)
+    token_pairs = File.readlines("#{LOCALES_PATH}/#{locale}")
     @token_list = Hash.new
     token_pairs.each do |pair|
       default_value, locale_value = pair.split(' ')

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: alphalang
 version: !ruby/object:Gem::Version
-  version: 0.1.2
+  version: 0.1.4
 platform: ruby
 authors:
 - mattias
@@ -61,11 +61,20 @@ files:
 - bin/alphalang
 - lib/alpha.rb
 - lib/lang_creator.rb
+- lib/locale_defaulter.rb
+- lib/locale_defaulter.rb~
+- lib/locale_deleter.rb
+- lib/locale_deleter.rb~
+- lib/locale_lister.rb
+- lib/locale_lister.rb~
 - lib/locales/de
+- lib/locales/default
 - lib/locales/en
 - lib/locales/locale_template
 - lib/locales/sv
 - lib/nodes/basenodes.rb
+- lib/nodes/scopemanager.rb
+- lib/nodes/scopemanager.rb~
 - lib/nodes/stmtnodes.rb
 - lib/rdparse.rb
 - lib/rdparse_quiet.rb