rdoba 0.0.3 → 0.1

data/.gitignore

@@ -0,0 +1,43 @@
+# rcov generated
+coverage
+
+# rdoc generated
+rdoc
+
+# yard generated
+doc
+.yardoc
+
+# bundler
+.bundle
+
+# jeweler generated
+pkg
+
+# Have editor/IDE/OS specific files you need to ignore? Consider using a global gitignore: 
+#
+# * Create a file at ~/.gitignore
+# * Include files you want ignored
+# * Run: git config --global core.excludesfile ~/.gitignore
+#
+# After doing this, these files will be ignored in all your git projects,
+# saving you from having to 'pollute' every project you touch with them
+#
+# Not sure what to needs to be ignored for particular editors/OSes? Here's some ideas to get you started. (Remember, remove the leading # of the line)
+#
+# For MacOS:
+#
+#.DS_Store
+#
+# For TextMate
+#*.tmproj
+#tmtags
+#
+# For emacs:
+#*~
+#\#*
+#.\#*
+#
+# For vim:
+#*.swp
+Gemfile.lock

data/CHANGES.md

@@ -0,0 +1,28 @@
+Changes in rdoba
+====================
+
+Changes in rdoba releases are listed here.
+
+v0.0.1
+------
+- Common rdoba release functions
+
+v0.1
+------
+- Common rdoba release functions. The modules are:
+ * common
+ * a
+ * combinations
+ * debug
+ * dup
+ * hashorder
+ * numeric
+ * require
+ * roman
+ * chr
+ * deploy
+ * fenc
+ * io
+ * re
+ * strings
+ * yaml

data/Gemfile

@@ -1,13 +1,4 @@
 source "http://rubygems.org"
-# Add dependencies required to use your gem here.
-# Example:
-#   gem "activesupport", ">= 2.3.5"
 
-# Add dependencies to develop your gem here.
-# Include everything needed to run rake, tests, features, etc.
-group :development do
-  gem "shoulda", ">= 0"
-  gem "bundler", "~> 1.0.0"
-  gem "jeweler", "~> 1.5.2"
-  gem "rcov", ">= 0"
-end
+# Specify your gem's dependencies in rdoba.gemspec
+gemspec

data/README.md

@@ -0,0 +1,410 @@
+# Rdoba
+
+Rdoba, сирѣчь руби-добавокъ, есть библиотека, расширитяющая основныя классы Ruby такія какъ: Объектъ(Object), Ядро(Kernel), Строка(String), Словарь(Hash), Наборъ(Array), Пущь(NilClass) и т.д. Включаетъ модули и такія функціи:
+ * common       - нѣкоторыя простыя методы къ Объекту, Ядру, Пущю, Набору, Строкѣ и Словрю;
+ * a            - чтеніе и запись значеній въ Наборъ и Словарь по индексу;
+ * combinations - перечисленіе значеній Набора въ различномъ порядкѣ;
+ * debug	- функціи отладки приложенія;
+ * dup		- функціи удвоенія Словаря и Набораъ, включая ихъ вложенія;
+ * hashorder	- перечисленіе значеній Словаря въ заданномъ порядкѣ;
+ * numeric	- разширенный переводъ числа въ строку и строки въ число;
+ * require	- вложенная загрузка файловъ функціею require;
+ * roman	- переводъ римскаго числа въ строку и строки въ римское число;
+ * deploy	- развёртка YAML-шаблоновъ;
+ * fenc		- исправленіе кодировки въ Строкахъ (будетъ удалено по исправленіи въ ruby);
+ * io		- функціи sscanf и sprintf съ дополнительными свойствами;
+ * re		- простое преобразованіе Строки въ Правило;
+ * strings	- разширеніе нѣкоторыхъ функцій Строки кириллическими правилами;
+ * yaml		- упрощённая функція перевода Словаря или Набора въ YAML-документъ.
+
+## Использованіе
+
+### Общія методы
+
+Добавляетъ нѣкоторыя простыя методы къ Объекту, Ядру, Пущю, Набору, Строкѣ и Словрю;
+
+    require 'rdoba/common'
+
+### Чтеніе и запись по индексу
+
+Функціи позволяютъ читать и писать значенія въ Наборъ и Словарь по заданному въ видѣ Набора значеній индексу.
+
+    require 'rdoba/a'
+
+    h = { "ключъ 1" => [ 'знч', 'знч2' ],
+	"ключъ 2" => { "ключъ 3" => "знч3" } }
+
+    h.geta( [ "ключъ 2", "ключъ 3" ] ) # => "знч3"
+
+    h.geta( [ "ключъ 1", 0 ] ) # => "знч"
+
+    h.seta( [ "ключъ 2", "ключъ 3" ], 'НОВОЕ' ) # => "НОВОЕ"
+
+    h # => {"ключъ 1"=>["знч", "знч2"], "ключъ 2"=>{"ключъ 3"=>"НОВОЕ"}}
+
+### Перечисленіе значеній Набора
+
+Перечисляетъ значенія Набора въ различныхъ ихъ кучныхъ комбинаціяхъ въ количествѣ 2^(Ѯ-1), гдѣ Ѯ - длина Набора. Существуетъ возможность прямаго или обратнаго перечичленія.
+
+    require 'rdoba/combinations'
+
+    a = [ 1,2,3 ]
+    a.each_comby do |x|
+      puts x.inspect
+    end
+
+    # получаемъ:
+    # [[1], [2], [3]]
+    # [[1], [2, 3]]
+    # [[1, 2], [3]]
+    # [[1, 2, 3]]
+
+    a.each_comby(:backward) do |x|
+      puts x.inspect
+    end
+
+    # получаемъ:
+    # [[1, 2, 3]]
+    # [[1, 2], [3]]
+    # [[1], [2, 3]]
+    # [[1], [2], [3]]
+
+
+### Отладка приложенія
+
+Оладочныя функціи позволяютъ для выбранного класса выполнять заданныя куски кода или выводить на терминалъ опредѣлённый текстъ въ зависимости отъ уровня отладки.
+
+    require 'rdoba/debug'
+
+    class A
+      def initialize
+	dbp11 "Low-level initialize debug"
+      end
+
+      def method
+	@k = 0
+	dbp22 "Upper-level method debug"
+	dbg21 "@k = 1"
+	@k
+      end
+    end
+
+    $debug_A = 0x11
+
+    a = A.new
+    # выводъ
+    # Low-level initialize debug
+
+    a.method # => 0
+
+    a.debug = 0x21
+    a.method # => 1
+
+    a.debug = 0x33
+    a.method # => 1
+    # выводъ
+    # Upper-level method debug
+
+### Одвоеніе Словаря и Набора
+
+Позволяетъ выполнять какъ обычное, такъ и вложенное одвоеніе Словаря или Набора.
+
+    require 'rdoba/dup'
+
+    a = [ 'aaa', 'bbb' ]
+
+    # выполняемъ обычное одвоеніе
+    b = a.dup
+    a[0].replace 'ccc'
+    a # => ["ccc", "bbb"]
+    b # => ["ccc", "bbb"]
+
+    # выполняемъ вложенное одвоеніе
+    c = a.dup(:recursive)
+    a[0].replace 'ddd'
+    a # => ["ddd", "bbb"]
+    c # => ["ccc", "bbb"]
+
+### Перечисленіе значеній Словаря въ заданномъ порядкѣ
+
+Позволядетъ перебрать всѣ ключи и значенія Словаря по опредѣлённому порядку. Порядок сей задаётся свойствомъ Словаря :order. Если въ заданном порядкѣ не всѣ ключи опредѣлены, то сначала перебираются заданныя ключ, а затѣмъ уже остальныя въ порядкѣ какъ они заданы въ Словарѣ. Перебирать можно ключи, пары или значенія по ключамъ. 4 метода суть перебора: each, each_pair, each_key, each_value. Удаляется порядокъ методом disorder.
+
+    require 'rdoba/hashorder'
+
+    h = { "ключъ 1" => [ 'знч', 'знч2' ],
+	  "ключъ 2" => { },
+	  "ключъ 3" => "знч3" }
+
+    # простой переборъ паръ
+    h.each do |x,y|
+      puts x
+    end
+    # выводъ
+    # ключъ 1
+    # ключъ 2
+    # ключъ 3
+
+    # переборъ паръ
+    h.order = ['ключъ 2','ключъ 3','ключъ 1']
+    h.each_pair do |x,y|
+      puts x
+    end
+    # выводъ
+    # ключъ 2
+    # ключъ 3
+    # ключъ 1
+
+    # переборъ ключей
+    h.order = ['ключъ 2']
+    h.each_key do |x|
+      puts x
+    end
+    # выводъ
+    # ключъ 2
+    # ключъ 1
+    # ключъ 3
+
+    # переборъ значеній къ уже упорядоченнымъ ключамъ
+    h.order = ['ключъ 2','ключъ 3','ключъ 1']
+    h.each_value do |x|
+      puts x.inspect
+    end
+    # выводъ
+    # {}
+    # "знч3"
+    # ["знч", "знч2"]
+
+    # удаленіе порядка
+    h.disorder
+
+### Разширенный переводъ чиселъ
+
+Добавка позволяетъ преобразовывать:
+ * Строку въ Число по заданному основанію, а также задавать порядокъ слѣдованія цифръ;
+ * Число въ Строку, задавая основаніе, заполненіе нулями Строки до опредѣлённой ширины и обрамленіе числа въ строкѣ;
+ * Число въ потокъ данныхъ въ видѣ Строки.
+
+    require 'rdoba/numeric'
+
+    # Строка -> Число
+    '1010'.to_i(2)	# => 10
+    '0xFE'.to_i(16)	# => 254
+
+    # Big-endian число
+    '-123'.to_i(8, :be) # => -209 (-0321)
+
+    # Число -> Строка
+    1020.to_s(16, { :padding => 10 }, :style_formatting) # => "0x00000003FC"
+
+    # Число -> данныя въ Строкѣ
+    1020.to_p(16, { :padding => 5 }, :be)   # => "\x00\x00\x00\x03\xFC"
+    1020.to_p(16, { :padding => 5 })	    # => "\xFC\x03\x00\x00\x00"
+
+### Вложенная загрузка модулей
+
+Добавка позволяетъ загружать ruby-файлъ съ подпапками.
+
+    require 'rdoba/require'
+
+    # есть у васъ файловая структура:
+    # x.rb
+    # x/y.rb
+    # x/z.rb
+    # можно загрузить её разомъ такъ:
+    require 'x', :recursive
+
+### Обработка римскихъ чиселъ
+
+Добавка позволяетъ преобразовывать римскія числа въ Строку и изъ неё.
+
+    require 'rdoba/roman'
+
+    'XVI'.rom # => 16
+
+    144.to_rom # => "CXLIV"
+
+### Развёртка YAML-шаблоновъ
+
+    require 'rdoba/deploy'
+
+### Исправленіе кодировки въ Строкахъ
+
+Исправляетъ кодировку Строки въ ruby 1.9 въ Encoding.default_internal. Если оно не задано, то въ 'UTF-8'. Часто такой финтъ нуженъ для въставленія совместимости забугорныхъ приложеній и кириллицы.
+
+!!! будетъ удалено по исправленіи въ ruby
+
+    require 'rdoba/fenc'
+
+    s = 'eee'
+    s.encoding # => #<Encoding:US/ASCII>
+
+    s.fenc
+    s.encoding # => #<Encoding:UTF-8>
+
+### Новыя функціи sscanf, sprintf и consolize
+
+Въ функциію sprintf добавленъ ключъ 'P', позволяющій сохранить просто данныя чего-либо (въ частности Числа) въ строку. Функціи 'scanf' и 'consolize' у Строки позволяютъ разбирать строку согласно переданнымъ въ scanf ключамъ и прощать строку, убирая лишние знаки \r, соотвѣтственно.
+
+#### sprintf
+
+Форматъ ключа 'P' функціи sprintf: %сдвигъ.заполненіе+P
+ * сдвигъ есть сдвигъ новой строки от начала въ пробѣлахъ;
+ * заполненіе есть дополненіе преобразованного въ Строку Числа нулями;
+ * + сообщаетъ о томъ, что Число нужно выразить въ big-endian.
+
+    require 'rdoba/io'
+
+    sprintf "%5P", 1000	    # => "     \xE8\x03"
+    sprintf "%.5P", 1000    # => "\xE8\x03\x00\x00\x00"
+
+    sprintf "%5.10+P", 1000 # => "     \x00\x00\x00\x00\x00\x00\x00\x00\x03\xE8"
+
+#### scanf
+
+Позволяетъ преобразовать согласно заданной строкѣ ключей. Ключи здѣ такія же какъ в Kernel::sprintf.
+
+    s = 'значеніе = 1000'
+    s.scanf "%s = %i" # => [["значеніе", 1000]]
+
+#### consolize
+
+Функція упрощаетъ содержимое строки, как бы при выводѣ её на консоль.
+
+    s = "string\rval"
+    s.consolize # => "valing"
+
+### Преобразованіе Строки въ Правило
+
+    require 'rdoba/re'
+
+    a = 'строка.'
+    b = 'доп.строка.доп'
+    a.to_res	    # => "строка\\."
+    a.to_re	    # => /строка\./i
+
+    b.match a.to_re # => #<MatchData "строка.">
+
+### Расширеніе строки
+
+Здѣ суть опредѣлены функціи, разширяющія возможности Строки кириллическими правилами, а также дополняющія Строку новыми возможностями.
+
+    require 'rdoba/strings'
+
+#### Новыя методы класса
+
+##### upcase
+
+Переводъ знака въ верхнее значеніе:
+
+    a = 'ц'
+    String.upcase(a) # => "Ц"
+    a = 0x401 # 'ё'
+    String.upcase(a) # => "Ё"
+
+##### downcase
+
+Переводъ знака въ нижнее значеніе:
+
+    a = 'Ц'
+    String.downcase(a) # => "ц"
+    a = 0x400 # 'Ё'
+    String.downcase(a) # => "ё"
+
+
+#### Новыя методы экземпляра
+
+##### upcase
+
+Переводъ строки въ верхнее значеніе. Функція можетъ принимать дополнительное значеніе 'FirstChar', которое принуждаетъ переводить не всю строку, а только первый знакъ.
+
+    a = 'строка'
+    a.upcase # => "СТРОКА"
+    a = 'строка'
+    a.upcase(String::FirstChar) # => "Строка"
+
+##### downcase
+
+Переводъ знака въ нижнее значеніе. Функція можетъ принимать дополнительное значеніе 'FirstChar', которое принуждаетъ пе
+реводить не всю строку, а только первый знакъ.
+
+    a = 'СТРОКА'
+    a.downcase # => "строка"
+    a = 'СТРОКА'
+    a.downcase(String::FirstChar) # => "сТРОКА"
+
+##### reverse
+
+Обращаетъ строку. Допускается проводить обращеніе съ перемѣннымъ шагомъ, а также побайтно.
+
+    a = 'строка'
+
+    # обычное обращеніе
+    a.reverse # => "акортс"
+
+    # побайтное обращеніе
+    a.reverse(String::ByteByByte) # =>"\xB0\xD0\xBA\xD0\xBE\xD0\x80\xD1\x82\xD1\x81\xD1"
+
+    # обращеніе съ шагомъ 2
+    a.reverse(2) # => "карост"
+
+##### compare_to
+
+Работаетъ такъ же какъ и '<=>', но можетъ принимать дополнительное значеніе ignore_diacritics, которое вынуждаетъ методъ проводить сравненіе отбрасывая надстрочники:
+
+    a = 'а҆́гнецъ'
+    b = 'а҆гкѵ́ра'
+
+    a <=> b # => -1
+    a.compare_to(b) # => -1
+    a.compare_to(b, :ignore_diacritics) # => 1
+    a.compare_to(b, :ignore_diacritics => true) # => 1
+
+#### Новыя методы для Fixnum
+##### chr
+
+Возвращаетъ знакъ изъ числа, возпринимая его какъ кодъ.
+
+    1094.chr # => "ц"
+
+#### Новыя методы для ruby 1.8
+##### ord
+
+Возвращаетъ числовой кодъ перваго знака строки:
+
+    a = 'ёжъ'
+    a.ord # => 1025 (0x401)
+
+### Упрощённый переводъ въ YAML
+
+Позволяетъ простенько перевести экземпляры классовъ Словаря, Набора, Строки и Числа въ YAML-документъ. Также возможно указать порядокъ выведенія ключей въ Словарѣ.
+
+    h = { "ключъ 1" => [ 'знч', 'знч2' ],
+	"ключъ 2" => 10 }
+
+    puts h.to_yml
+      ---
+      ключъ 2: 10
+      ключъ 1:
+        - знч
+          - знч2
+
+    puts h.to_yml(:order => ["ключъ 1", "ключъ 2"])
+      ---
+      ключъ 1:
+        - знч
+          - знч2
+      ключъ 2: 10
+
+
+    puts h.to_yml(:order => ["ключъ 2", "ключъ 1"])
+      ---
+      ключъ 2: 10
+      ключъ 1:
+        - знч
+        - знч2
+
+# Права
+
+Авторскія и исключительныя права (а) 2011 Малъ Скрылевъ
+Зри LICENSE за подробностями.
+

data/Rakefile

@@ -1,53 +1,3 @@
 require 'rubygems'
 require 'bundler'
-begin
-  Bundler.setup(:default, :development)
-rescue Bundler::BundlerError => e
-  $stderr.puts e.message
-  $stderr.puts "Run `bundle install` to install missing gems"
-  exit e.status_code
-end
-require 'rake'
-
-require 'jeweler'
-Jeweler::Tasks.new do |gem|
-  # gem is a Gem::Specification... see http://docs.rubygems.org/read/chapter/20 for more options
-  gem.name = "rdoba"
-  gem.homepage = "http://github.com/3aHyga/rdoba"
-  gem.license = "MIT"
-  gem.summary = %Q{Ruby additionals}
-  gem.description = %Q{Ruby extransion library. It extends Kernel, Object and some other classes}
-  gem.email = "3aHyga@gmail.com"
-  gem.authors = ["Malo Skrylevo"]
-  # Include your dependencies below. Runtime dependencies are required when using your gem,
-  # and development dependencies are only needed for development (ie running rake tasks, tests, etc)
-  #  gem.add_runtime_dependency 'jabber4r', '> 0.1'
-  #  gem.add_development_dependency 'rspec', '> 1.2.3'
-end
-Jeweler::RubygemsDotOrgTasks.new
-
-require 'rake/testtask'
-Rake::TestTask.new(:test) do |test|
-  test.libs << 'lib' << 'test'
-  test.pattern = 'test/**/test_*.rb'
-  test.verbose = true
-end
-
-require 'rcov/rcovtask'
-Rcov::RcovTask.new do |test|
-  test.libs << 'test'
-  test.pattern = 'test/**/test_*.rb'
-  test.verbose = true
-end
-
-task :default => :test
-
-require 'rake/rdoctask'
-Rake::RDocTask.new do |rdoc|
-  version = File.exist?('VERSION') ? File.read('VERSION') : ""
-
-  rdoc.rdoc_dir = 'rdoc'
-  rdoc.title = "rdoba #{version}"
-  rdoc.rdoc_files.include('README*')
-  rdoc.rdoc_files.include('lib/**/*.rb')
-end
+Bundler::GemHelper.install_tasks

data/lib/rdoba/a.rb

@@ -0,0 +1,114 @@
+#!/usr/bin/ruby -KU
+#<Encoding:UTF-8>
+
+require 'rdoba/debug'
+
+class Array
+  def geta(index, options = {}) #TODO => [] + class Index
+    dbp11 "[geta] <<< array = #{self.inspect}, index = #{index.inspect}, options = #{options.inspect}"
+    options[:сокр] ||= @сокр
+
+    if index.class == Array
+      return self if index == [] or index == ['']
+      index = index.clone
+      value = self[index.shift]
+      (value.class == Hash or value.class == Array) ? value.geta(index, options) : value
+    else
+      geta_value(index, options)
+    end
+  end
+
+end
+
+
+class Hash
+
+protected
+
+  def geta_value(cid, options = {})
+    res = ((not cid) || cid.empty?) && self || self[cid] ||
+        (options[:сокр] && (self[options[:сокр][cid]] || self[options[:сокр].reverse[cid]]))
+
+    if not res and options[:try_regexp]
+      self.keys.each do |key|
+        break res = self[key] if key.rmatch(cid)
+        if options[:сокр]
+          options[:сокр].each_pair do |val1, val2|
+            break res = self[key] if key.rmatch(cid.gsub(/#{val1}/, val2)) or
+                key.rmatch(cid.gsub(/#{val2}/, val1))
+          end
+        end
+      end
+    end
+
+    res
+  end
+
+public
+
+  def geta(index, options = {}) #TODO => [] + class Index
+    dbp11 "[geta] <<< hash = #{self.inspect}, index = #{index.inspect}, options = #{options.inspect}"
+    options[:сокр] ||= @сокр
+
+    if index.class == Array
+      return self if index == [] or index == ['']
+      index = index.clone
+      value = geta_value(index.shift, options)
+      (value.class == Hash or value.class == Array) ? value.geta(index, options) : value
+    else
+      geta_value(index, options)
+    end
+  end
+
+  def seta(index, value, options = {}) #TODO => [] + class Index
+    dbp11 "[seta] <<< index: #{index.inspect}, value: #{value.inspect}, options: #{options.inspect}"
+    options[:сокр] ||= @сокр
+
+    return self[index] = value if index.class != Array # TODO spec index
+
+    back = 0
+    index = index.reverse.map do |x|
+      if x.empty?
+        back += 1
+        nil
+      elsif back > 0
+        back -= 1
+        nil
+      else
+        x
+      end
+    end.compact.reverse
+    dbp12 "[seta]> result index: #{index.inspect}"
+
+    obj = nil
+    o = self
+    dbp14 "[seta]>> self: #{o.inspect}"
+    set_idx = index.pop
+    par_class = set_idx =~ /^\d+$/ ? Array : Hash
+    par_idx = nil
+    index.each do |idx|
+      unless o
+        dbp14 "[seta]>> parent idx: #{par_idx.inspect}, idx: #{idx.inspect}, parent obj: #{o.inspect}"
+        o = idx =~ /^\d+$/ && [] || {}
+        obj[par_idx] = o
+      end
+      obj = o
+      o = (obj.class == Hash) ? obj.geta_value(idx, options) : obj[idx]
+      dbp14 "[seta]>> cur idx: #{idx.inspect}, parent obj: #{obj.inspect}, obj: #{o.inspect}"
+      unless o
+        if idx == index.last
+          o = par_class.new
+          obj[idx] = o
+        else
+          par_idx = idx =~ /^\d+$/ && idx.to_i || idx
+        end
+      end
+    end
+
+    raise "Invalid path" unless o # TODO special exception
+
+    o[set_idx] = value
+  end
+
+end
+