faker-okinawa 0.1.0

data/o-dic/script/oki2vje.pl

@@ -0,0 +1,138 @@
+#!/usr/bin/perl
+#
+# oki2vje.pl - 沖縄辞書のファイルをVJE-Deltaに持って行くテキストに変換する
+#
+#		$Id: oki2vje.pl,v 1.16 2006/09/01 18:20:06 void Exp $
+#
+# このスクリプトを使って、以下のように「okinawa.txt」を生成しておいて、
+#     $ cat ../*.dic | ./oki2vje.pl | sort -u > okinawa.txt
+#  VJE-Deltaの辞書ユーティリティを起動し、
+# あらかじめ「ファイル」-「新規作成」をやってから
+# 「ファイル]-「テキストの登録/削除」にokinawa.txtを食わせてください。
+require 5.6.0;
+use FindBin;
+use lib $FindBin::Bin;  # For search scripts/ODIC.pm
+require 'ODIC.pm';
+use strict;
+our $phonate;
+our $word;
+our $class;
+
+while (<>) {
+	# JIS X 0208 に含まれていない文字を含む行を読み飛ばす
+	# 読み飛ばしにはコメントに「〓あり」マーカーが必要
+	next if (/〓あり/);
+
+	s/#.*$//;		# `#'以降を取り去る
+	next if (/^\s*$/);	# その結果空行になった行は読み飛ばす。
+	if (/(\S+)\s+(\S+)\s+(\S+)/) {
+		$phonate = $1;	# 読み
+		$word    = $2;	# 単語
+		$class   = $3;	# 品詞
+		ODIC::check_phonate($phonate);
+		ODIC::check_word($word);
+		&convert_class;
+	}
+	else {
+		print STDERR "Error: $.: too few field number `$_'\n";
+		print  "$_";
+	}
+}
+&version;
+exit 0;
+
+
+sub convert_class {
+	if ($class eq "普通名詞") {
+		$class = '名詞';
+	}
+	elsif ($class eq "サ変名詞") {
+		$class = '名サ';
+	}
+	elsif ($class eq "形動名詞") {
+		$class = '名形';
+	}
+	elsif ($class eq "姓") {
+		$class = '人姓';
+	}
+	elsif ($class eq "名") {
+		$class = '人名';
+	}
+	elsif ($class eq "その他の人名") {
+		$class = '人名';
+	}
+	elsif ($class eq "単純地名") {
+		$class = '地名';
+	}
+	elsif ($class eq "接尾語付き地名") {
+		$class = '地名行政区分';
+	}
+	elsif ($class eq "組織名") {
+		$class = '組織';
+	}
+	elsif ($class eq "その他固有名詞") {
+		$class = '固名';
+	}
+	elsif ($class eq "副詞") {
+		$class = '副詞';
+	}
+	elsif ($class eq "接続詞") {
+		$class = '接続';
+	}
+	elsif ($class eq "感動詞") {
+		$class = '感動';
+	}
+	elsif ($class eq "形容詞") {
+		$class = '形容';
+	}
+	elsif ($class eq "形容動詞") {
+		$class = '形動';
+	}
+	elsif ($class eq "接頭語") {
+		$class = '接頭';
+	}
+	elsif ($class eq "数字列接頭語") {
+		$class = '冠数';
+	}
+	elsif ($class eq "接尾語") {
+		$class = '接尾';
+	}
+	elsif ($class eq "人名接尾語") {
+		$class = '接尾人名';
+	}
+	elsif ($class eq "地名接尾語") {
+		$class = '接尾地名';
+	}
+	elsif ($class eq "組織名接尾語") {
+		$class = '接尾';
+	}
+	elsif ($class eq "数字列接尾語") {
+		$class = '助数';
+	}
+	elsif ($class eq "成句") {
+		$class = '名詞';
+	}
+	elsif ($class eq "無品詞") {
+		$class = '単漢';
+	}
+	else {
+		print STDERR "Error: $.: unknown class `$class': $phonate\t$word\n";
+		$class = '〓';
+	}
+
+	print ODIC::to_eucjp("$phonate\t$word\t［$class］\n");
+}
+
+sub version {
+	my $sec;
+	my $min;
+	my $hour;
+	my $mday;
+	my $mon;
+	my $year;
+
+	($sec, $min, $hour, $mday, $mon, $year) = localtime(time());
+	$year += 1900;
+	$mon++;
+	print ODIC::to_eucjp("おきなわじしょのひづけ\t$year/$mon/$mday(沖縄辞書の日付け)\t［名詞］\n");
+}

data/o-dic/script/wcount.pl

@@ -0,0 +1,114 @@
+#!/usr/bin/perl
+#
+# wcount.pl - 沖縄辞書の単語数をファイルごとに集計
+#
+#		$Id: wcount.pl,v 1.5 2002/06/16 04:31:52 void Exp $
+#
+#     # foreach i (../*.dic)
+#		cat $i | ./wcount.pl | wc -l
+#		echo $i
+#     end
+require 5.6.0;
+require 'ODIC.pm';
+use strict;
+our $phonate;
+our $word;
+our $class;
+
+while (<>) {
+	s/#.*$//;		# `#'以降を取り去る
+	next if (/^\s*$/);	# その結果空行になった行は読み飛ばす。
+	if (/(\S+)\s+(\S+)\s+(\S+)/) {
+		$phonate = $1;	# 読み
+		$word    = $2;	# 単語
+		$class   = $3;	# 品詞
+		ODIC::check_phonate($phonate);
+		ODIC::check_word($word);
+		&check_class;
+	}
+	else {
+		print STDERR "Error: $.: too few field number `$_'\n";
+		print  "$_";
+	}
+}
+exit 0;
+
+
+sub check_class {
+	if ($class eq "普通名詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "サ変名詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "形動名詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "姓") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "名") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "その他の人名") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "単純地名") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "接尾語付き地名") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "組織名") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "その他固有名詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "副詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "接続詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "感動詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "形容詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "形容動詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "接頭語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "数字列接頭語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "接尾語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "人名接尾語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "地名接尾語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "組織名接尾語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "数字列接尾語") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "成句") {
+		print "$phonate\t$word\tclass\n";
+	}
+	elsif ($class eq "無品詞") {
+		print "$phonate\t$word\tclass\n";
+	}
+	else {
+		print STDERR "Error: $.: unknown class `$class': $phonate\t$word\n";
+		print "$phonate\t$word\tclass\n";
+	}
+}

metadata

@@ -0,0 +1,135 @@
+--- !ruby/object:Gem::Specification
+name: faker-okinawa
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Seiei Miyagi
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2016-02-14 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.11'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.11'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+description: 
+email:
+- hanachin@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- CODE_OF_CONDUCT.md
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- faker-okinawa.gemspec
+- lib/faker/okinawa.rb
+- lib/faker/okinawa/address.rb
+- lib/faker/okinawa/awamori.rb
+- lib/faker/okinawa/base.rb
+- lib/faker/okinawa/fish.rb
+- lib/faker/okinawa/food.rb
+- lib/faker/okinawa/name.rb
+- lib/faker/okinawa/odic.rb
+- lib/faker/okinawa/school.rb
+- lib/faker/okinawa/version.rb
+- o-dic/address.dic
+- o-dic/amami.dic
+- o-dic/awamori.dic
+- o-dic/base.dic
+- o-dic/bin-dic/ATOK.zip
+- o-dic/bin-dic/Kotoeri.dmg
+- o-dic/bin-dic/MSIME.zip
+- o-dic/bin-dic/MSIME2000.zip
+- o-dic/bin-dic/MSIME2002.zip
+- o-dic/bin-dic/MSIME2003.zip
+- o-dic/bin-dic/MSIME2007.zip
+- o-dic/bin-dic/VJEDelta40.zip
+- o-dic/bin-dic/anthydic20090901.tar.bz2
+- o-dic/bin-dic/cannadic.tar.bz2
+- o-dic/bin-dic/cannadic20030407.tar.bz2
+- o-dic/bin-dic/cannadic20051104.tar.bz2
+- o-dic/bin-dic/google-20111218.zip
+- o-dic/bus.dic
+- o-dic/city.dic
+- o-dic/doc/History.doc
+- o-dic/doc/README.1ST
+- o-dic/doc/format.txt
+- o-dic/food.dic
+- o-dic/geo.dic
+- o-dic/history.dic
+- o-dic/island.dic
+- o-dic/misc.dic
+- o-dic/name.dic
+- o-dic/park.dic
+- o-dic/sakana.dic
+- o-dic/school.dic
+- o-dic/script/ODIC.pm
+- o-dic/script/ccount.pl
+- o-dic/script/geta_checker.sh
+- o-dic/script/oki2atk.pl
+- o-dic/script/oki2canna.pl
+- o-dic/script/oki2cha.pl
+- o-dic/script/oki2jis.pl
+- o-dic/script/oki2kotoeri.pl
+- o-dic/script/oki2mozc.pl
+- o-dic/script/oki2msime.pl
+- o-dic/script/oki2osxjapaneseim.pl
+- o-dic/script/oki2vje.pl
+- o-dic/script/wcount.pl
+homepage: https://github.com/okinawarb/faker-okinawa
+licenses:
+- MIT
+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.5.1
+signing_key: 
+specification_version: 4
+summary: Faker::Okinawa generates Okinawa fake data.
+test_files: []