mawk 0.1.0

data/README

@@ -0,0 +1,30 @@
+= ruby-mawk
+
+== Description
+
+Ruby binding for libmawk
+
+see http://repo.hu/projects/libmawk/
+
+== Install
+
+gem install mawk
+
+== Example
+
+  #!/usr/bin/env ruby
+  
+  require 'mawk'
+  
+  open('file.txt') do |f|
+    f.awk('/London/ {print}')
+  end
+  
+  str = <<-EOS
+    London Bridge is broken down,
+    Broken down, bloken down.
+    London Bridge is bloken down,
+    My fair lady.
+  EOS
+  
+  puts str.sawk('{print $2}')

data/ext/extconf.rb

@@ -0,0 +1,7 @@
+require 'mkmf'
+
+$CFLAGS += ' -Wall '
+
+if have_header('libmawk.h') and have_library('mawk')
+  create_makefile('mawkc')
+end

data/ext/ruby-mawk.c

@@ -0,0 +1,82 @@
+#include "ruby-mawk.h"
+
+static VALUE rb_cMAWK;
+static VALUE rb_eMAWKError;
+
+static void rb_mawk_free(struct mawk *p) {
+  xfree(p);
+}
+
+static VALUE rb_mawk_alloc(VALUE klass) {
+  struct mawk *p = ALLOC(struct mawk);
+  return Data_Wrap_Struct(klass, 0, rb_mawk_free, p);
+}
+
+static VALUE rd_mawk_initialize(VALUE self, VALUE script) {
+  struct mawk *p;
+  int argc = 2;
+  char *argv[] = {"awk", StringValuePtr(script)};
+
+  Data_Get_Struct(self, struct mawk, p);
+
+  p->m = libmawk_initialize_stage1(argc, argv);
+
+  if (p->m == NULL) {
+    rb_raise(rb_eMAWKError, "Init failed");
+  }
+
+  p->m = libmawk_initialize_stage2(p->m);
+
+  if (p->m->compile_error_count != 0) {
+    libmawk_uninitialize(p->m);
+    rb_raise(rb_eMAWKError, "Compile error");
+  }
+
+  if (p->m->do_exit) {
+    libmawk_uninitialize(p->m);
+    rb_raise(rb_eMAWKError, "Do exit");
+  }
+
+  p->m = libmawk_initialize_stage3(p->m);
+
+  return Qnil;
+}
+
+static VALUE rd_mawk_uninitialize(VALUE self) {
+  struct mawk *p;
+
+  Data_Get_Struct(self, struct mawk, p);
+  libmawk_uninitialize(p->m);
+
+  return Qnil;
+}
+
+static VALUE rd_mawk_append_input(VALUE self, VALUE input) {
+  struct mawk *p;
+
+  Data_Get_Struct(self, struct mawk, p);
+  libmawk_append_input(p->m, StringValuePtr(input));
+
+  return Qnil;
+}
+
+static VALUE rd_mawk_run_main(VALUE self) {
+  struct mawk *p;
+
+  Data_Get_Struct(self, struct mawk, p);
+  libmawk_run_main(p->m);
+
+  return Qnil;
+}
+
+void Init_mawkc() {
+  rb_cMAWK = rb_define_class("MAWK", rb_cObject);
+  rb_define_alloc_func(rb_cMAWK, rb_mawk_alloc);
+  rb_define_private_method(rb_cMAWK, "initialize", rd_mawk_initialize, 1);
+  rb_define_method(rb_cMAWK, "uninitialize", rd_mawk_uninitialize, 0);
+  rb_define_method(rb_cMAWK, "append_input", rd_mawk_append_input, 1);
+  rb_define_method(rb_cMAWK, "<<", rd_mawk_append_input, 1);
+  rb_define_method(rb_cMAWK, "run_main", rd_mawk_run_main, 0);
+
+  rb_eMAWKError = rb_define_class_under(rb_cMAWK, "Error", rb_eStandardError);
+}

data/ext/ruby-mawk.h

@@ -0,0 +1,19 @@
+#ifndef __RUBY_MAWK_H__
+#define __RUBY_MAWK_H__
+
+#include <stdlib.h>
+#include <libmawk.h>
+#include <ruby.h>
+
+#ifndef RSTRING_PTR
+#define RSTRING_PTR(s) (RSTRING(s)->ptr)
+#endif
+#ifndef RSTRING_LEN
+#define RSTRING_LEN(s) (RSTRING(s)->len)
+#endif
+
+struct mawk {
+  mawk_state_t *m;
+};
+
+#endif // __RUBY_MAWK_H__

data/lib/mawk.rb

@@ -0,0 +1,48 @@
+require 'mawkc'
+require 'tempfile'
+require 'stringio'
+
+module AWK
+  def awk(script)
+    m = MAWK.new(script)
+
+    self.each_line do |line|
+      line.concat("\n") if line !~ /\n\Z/
+      m << line
+    end
+
+    m.run_main
+    m.uninitialize
+  end
+
+  def sawk(script)
+    file = Tempfile.new("mawk.#{$$}.#{Time.now.strftime '%Y%m%d%H%M%S'}")
+    out = nil
+
+    begin
+      stdout = $stdout.clone
+      $stdout.reopen(file)
+      awk(script)
+      file.rewind
+      out = file.read
+    ensure
+      $stdout.reopen(stdout)
+      file.close
+      file.unlink
+    end
+
+    return out
+  end
+end
+
+class IO
+  include AWK
+end
+
+class String
+  include AWK
+end
+
+class StringIO
+  include AWK
+end

metadata

@@ -0,0 +1,59 @@
+--- !ruby/object:Gem::Specification 
+name: mawk
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- winebarrel
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-04-11 00:00:00 +09:00
+default_executable: 
+dependencies: []
+
+description: 
+email: sgwr_dts@yahoo.co.jp
+executables: []
+
+extensions: 
+- ext/extconf.rb
+extra_rdoc_files: []
+
+files: 
+- ext/ruby-mawk.c
+- ext/ruby-mawk.h
+- ext/extconf.rb
+- README
+- lib/mawk.rb
+has_rdoc: true
+homepage: https://bitbucket.org/winebarrel/ruby-mawk
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Ruby binding for libmawk
+test_files: []
+