foma 0.1.0

data/CHANGELOG

@@ -0,0 +1 @@
+v0.1.0. initial release

data/README.rdoc

@@ -0,0 +1,33 @@
+= foma
+
+A wrapper for the FOMA finite state library.
+
+The wrapper is very rudimentary (or an early version, if you like). Only
+loading of an FSM and the operations 'apply up' and 'apply down' are
+supported.
+
+== Installation
+
+  gem install foma
+
+== Usage
+
+    fsm = FOMA::FSM.new("fsm.bin")
+
+    fsm.apply_up("foo")
+    # => true
+
+    fsm.apply_down("bar")
+    # => true
+
+    fsm.apply_up("foo") do |d|
+      puts d
+    end
+
+== Development
+
+The project is hosted on github on http://github.com/mlj/ruby-foma.
+
+== License
+
+MIT

data/Rakefile

@@ -0,0 +1,16 @@
+# encoding: utf-8
+begin
+  require 'jeweler'
+
+  Jeweler::Tasks.new do |p|
+    p.name = "foma"
+    p.summary = "FOMA finite state library interface"
+    p.description = "A wrapper for the FOMA finite state library"
+    p.authors = ['Marius L. Jøhndal']
+    p.email = "mariuslj (at) ifi [dot] uio (dot) no"
+    p.homepage = "http://github.com/mlj/ruby-foma"
+    p.rubyforge_project = "foma"
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install jeweler"
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.0

data/ext/extconf.rb

@@ -0,0 +1,3 @@
+require 'mkmf'
+$LDFLAGS = '-lfoma'
+create_makefile "foma"

data/ext/foma.c

@@ -0,0 +1,110 @@
+#include "ruby.h"
+#include <fomalib.h>
+
+/*:enddoc:*/
+
+VALUE mFOMA = Qnil;
+VALUE mFSM = Qnil;
+
+struct foma_fsm {
+  struct fsm *net;
+  struct apply_handle *ah;
+};
+
+static void foma_fsm_mark(struct foma_fsm *t)
+{
+}
+
+static void foma_fsm_free(struct foma_fsm *t)
+{
+  if (t) {
+    fsm_destroy(t->net);
+    apply_clear(t->ah);
+    free(t);
+  }
+}
+
+static VALUE foma_fsm_alloc(VALUE klass)
+{
+  struct foma_fsm *t = NULL;
+
+  return Data_Wrap_Struct(klass, foma_fsm_mark, foma_fsm_free, t);
+}
+
+static VALUE foma_fsm_init(VALUE obj, VALUE filename)
+{
+  FILE *file;
+  struct foma_fsm *t;
+
+  t = malloc(sizeof(struct foma_fsm));
+
+  if (!t) {
+    rb_raise(rb_eRuntimeError, "Error allocating memory");
+  }
+
+  file = fopen(RSTRING(filename)->ptr, "rb");
+
+  if (!file) {
+    free(t);
+    rb_raise(rb_eRuntimeError, "Unable to open file %s", RSTRING(filename)->ptr);
+  }
+
+  fclose(file);
+
+  t->net = fsm_read_binary_file(RSTRING(filename)->ptr);
+
+  if (!t->net) {
+    free(t);
+    rb_raise(rb_eRuntimeError, "Unable to read file %s", RSTRING(filename)->ptr);
+  }
+
+  t->ah = apply_init(t->net);
+
+  DATA_PTR(obj) = t;
+  return Qnil;
+}
+
+static VALUE foma_fsm_apply(VALUE self, VALUE string, char *(*applyer)())
+{
+  struct foma_fsm *t;
+  char *result;
+
+  Check_Type(string, T_STRING);
+
+  Data_Get_Struct(self, struct foma_fsm, t);
+
+  result = applyer(t->ah, RSTRING(string)->ptr);
+
+  if (result) {
+    if (rb_block_given_p()) {
+      rb_yield(rb_str_new2(result));
+
+      while (result = applyer(t->ah, NULL))
+        rb_yield(rb_str_new2(result));
+    }
+
+    return Qtrue;
+  } else {
+    return Qfalse;
+  }
+}
+
+static VALUE foma_fsm_apply_down(VALUE self, VALUE string)
+{
+  return foma_fsm_apply(self, string, &apply_down);
+}
+
+static VALUE foma_fsm_apply_up(VALUE self, VALUE string)
+{
+  return foma_fsm_apply(self, string, &apply_up);
+}
+
+void Init_foma(void)
+{
+  mFOMA = rb_define_module("FOMA");
+  mFSM = rb_define_class_under(mFOMA, "FSM", rb_cObject);
+  rb_define_alloc_func(mFSM, foma_fsm_alloc);
+  rb_define_method(mFSM, "initialize", foma_fsm_init, 1);
+  rb_define_method(mFSM, "apply_down", foma_fsm_apply_down, 1);
+  rb_define_method(mFSM, "apply_up", foma_fsm_apply_up, 1);
+}

data/foma.gemspec

@@ -0,0 +1,40 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{foma}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Marius L. J\303\270hndal"]
+  s.date = %q{2011-10-05}
+  s.description = %q{A wrapper for the FOMA finite state library}
+  s.email = %q{mariuslj (at) ifi [dot] uio (dot) no}
+  s.extra_rdoc_files = [
+    "README.rdoc"
+  ]
+  s.files = [
+    "CHANGELOG",
+    "ext/foma.c",
+    "foma.gemspec",
+    "test/test_foma.rb"
+  ]
+  s.homepage = %q{http://github.com/mlj/ruby-foma}
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{foma}
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{FOMA finite state library interface}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end
+

data/test/.gitignore

@@ -0,0 +1 @@
+*.a

data/test/test_foma.rb

@@ -0,0 +1,33 @@
+require 'foma'
+require 'test/unit'
+
+TEST_DIRECTORY = File.expand_path(File.dirname(__FILE__))
+TEST_FSM       = File.join(TEST_DIRECTORY, 'test_foma.bin')
+
+class InitTestCase < Test::Unit::TestCase
+  def test_foma_init
+    fsm = FOMA::FSM.new(TEST_FSM)
+  end
+
+  def test_foma_acceptance
+    fsm = FOMA::FSM.new(TEST_FSM)
+
+    assert fsm.apply_up("amandum")
+    assert !fsm.apply_up("amanderxgtyvnuij")
+    assert fsm.apply_down("amō+VERB+ger+acc")
+    assert !fsm.apply_up("amō+VERB+ger+foobar")
+  end
+
+  def test_foma_analyses
+    fsm = FOMA::FSM.new(TEST_FSM)
+
+    analyses = []
+
+    fsm.apply_up("amandum") do |analysis|
+      analyses << analysis
+    end
+
+    assert_equal 3, analyses.count
+    assert_equal "amō+VERB+gdv+masc+sg+acc", analyses.sort.first
+  end
+end

metadata

@@ -0,0 +1,76 @@
+--- !ruby/object:Gem::Specification 
+name: foma
+version: !ruby/object:Gem::Version 
+  hash: 27
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- "Marius L. J\xC3\xB8hndal"
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-10-05 00:00:00 +01:00
+default_executable: 
+dependencies: []
+
+description: A wrapper for the FOMA finite state library
+email: mariuslj (at) ifi [dot] uio (dot) no
+executables: []
+
+extensions: 
+- ext/extconf.rb
+extra_rdoc_files: 
+- README.rdoc
+files: 
+- CHANGELOG
+- Rakefile
+- VERSION
+- ext/extconf.rb
+- ext/foma.c
+- foma.gemspec
+- test/.gitignore
+- test/test_foma.bin
+- test/test_foma.rb
+- README.rdoc
+has_rdoc: true
+homepage: http://github.com/mlj/ruby-foma
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: foma
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: FOMA finite state library interface
+test_files: []
+