--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/xdwhno.lex	Fri Jun 15 18:44:44 2018 +0900
@@ -0,0 +1,273 @@
+/* xdwhno	Last Change: 2018-06-15 金 09:48:07.
+
+release: xdwhno.lex
+	flex xdwhno.lex
+	gcc -I. lex.yy.c xdwapi.lib -static -o xdwhno.exe
+	strip xdwhno.exe
+
+機能:
+  DocuWorks文書から被保番らしいものを抽出
+
+*/
+/*** Definition section ***/
+
+%{
+
+/*
+ * C コードにはCの標準I/O ライブラリを使うものがある.
+ * %{と %} で囲まれた部分はそのまま生成ファイルに取り込まれる.
+ */
+#include <stdio.h>
+#include <stdbool.h>
+int mcnt = 1;
+int column = 1;
+bool verbose = false;
+bool debug = false;
+bool plno = false;
+bool z2h = false;
+FILE *fp1, *fp2;
+
+%}
+
+/* これはflexに入力ファイルが一つであることを示す. */
+/* %option noyywrap */
+
+%%
+    /*
+	 * 規則領域
+     * コメントはインデントしなければならない.そうしないと正規表現と誤認識してしまう.
+     */
+
+0[1238]0[0-9]{7}   {
+                /*
+                 * この規則は入力から整数を表示する.
+                 * yytextには一致した文字列が含まれる.
+                 */	
+				/* 同一行の mcnt 回のマッチだったら処理 */
+				if ( mcnt == column ) {
+					if ( plno ) printf( "%d,", yylineno );
+				    printf( "%s\n", yytext ); 
+				}
+				mcnt++;
+            }
+\n  		{
+				mcnt = 1;
+				yylineno++;
+				ECHO;
+			}
+０			{ unput( '0' ); }
+１			{ unput( '1' ); }
+２			{ unput( '2' ); }
+３			{ unput( '3' ); }
+４			{ unput( '4' ); }
+５			{ unput( '5' ); }
+６			{ unput( '6' ); }
+７			{ unput( '7' ); }
+８			{ unput( '8' ); }
+９			{ unput( '9' ); }
+<<EOF>>		{ }
+.           { ECHO; }
+
+%%
+/*** Cコード領域 ***/
+
+/*
+ * メインプログラム.
+ * 字句解析を呼び出し、処理が済むと終了する. 
+ */
+
+
+#include <unistd.h>
+#include <stdlib.h>
+#include <io.h>
+#include <glob.h>
+
+#include <windows.h>
+#include <xdw_api.h>
+
+void print_error( int code ) {
+	switch ( code ) {
+	case XDW_E_NOT_INSTALLED:
+		fprintf( stderr, "DocuWorksがインストールされていません。" );
+		break;
+	case XDW_E_FILE_NOT_FOUND:
+		fprintf( stderr, "指定されたファイルが見つかりません。" );
+		break;
+	case XDW_E_FILE_EXISTS:
+		fprintf( stderr, "指定されたファイルはすでに存在します。" );
+		break;
+	case XDW_E_ACCESSDENIED:
+		fprintf( stderr, "指定されたファイルを開くことができません。" );
+		break;
+	case XDW_E_INVALID_NAME:
+	case XDW_E_BAD_NETPATH:
+		fprintf( stderr, "指定されたファイルを開くことができません。（ネットワーク）" );
+		break;
+	case XDW_E_BAD_FORMAT:
+		fprintf( stderr, "指定されたファイルは正しいフォーマットではありません。" );
+		break;
+	case XDW_E_INVALID_ACCESS:
+		fprintf( stderr, "指定された操作をする権利がありません。" );
+		break;
+	case XDW_E_SHARING_VIOLATION:
+		fprintf( stderr, "ファイルが使用中です。" );
+		break;
+	default:
+		fprintf( stderr, "エラーが発生しました。" );
+		break;
+	}
+	fprintf( stderr, "[ Error code : %d ]\n", code );
+}
+
+void print_help() {
+	char prog[12] = "xdwhno";
+	fprintf( stderr, "Usage:\n" );
+	fprintf( stderr, "  %s infile\n", prog );
+	fprintf( stderr, "  %s -v infile\n", prog );
+	fprintf( stderr, "  %s -p infile ( print line-no )\n", prog );
+	fprintf( stderr, "  %s -c N infile ( N-th match )\n", prog );
+	fprintf( stderr, "  %s -z infile ( not implement )\n", prog );
+	fprintf( stderr, "  %s -d dir ( not implement )\n", prog );
+	fprintf( stderr, "  %s -x ( debug )\n", prog );
+}
+
+int xdw2txt( const char* in_path, const char *tmpfile ) {
+
+	FILE *fp;
+	if ( ( fp = fopen( tmpfile, "w" ) ) == NULL ) {
+		fprintf( stderr, "can't open tmp file [%s].\n", tmpfile );
+		exit( 1 );
+	}
+
+	int api_result = 0;
+	// 文書ハンドルを開く
+	XDW_DOCUMENT_HANDLE h = NULL;
+	XDW_OPEN_MODE_EX mode = {
+		sizeof( XDW_OPEN_MODE_EX ), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE 
+	};
+	api_result = XDW_OpenDocumentHandle( in_path, &h, (XDW_OPEN_MODE*)&mode );
+	if ( api_result < 0 ) {
+		print_error( api_result );
+		return 1;
+	}
+	// XDW_GetDocumentInformationを用いて総ページ数を得る
+	XDW_DOCUMENT_INFO info = { sizeof(XDW_DOCUMENT_INFO), 0, 0, 0 };
+	XDW_GetDocumentInformation(h, &info);
+    int nPage = info.nPages;
+
+    long datasize;
+    char* lpszvalue;
+    // メイン処理
+    for ( int i = 1; i <= nPage; i++ ) {
+        datasize = XDW_GetPageTextToMemory( h, i, NULL, 0, NULL );
+        lpszvalue = (char*)malloc( sizeof(char)*datasize );
+        XDW_GetPageTextToMemory( h, i, lpszvalue, datasize, NULL );
+
+        fprintf( fp, "%s\n", lpszvalue );
+        free( lpszvalue );
+    }
+
+	if ( api_result < 0 ) {
+		print_error( api_result );
+		return 1;
+	}
+
+	// 文書ハンドルを閉じる
+	XDW_CloseDocumentHandle( h, NULL );
+
+	fclose( fp );
+}
+
+int main( int argc, char** argv ) {
+	// オプションの解析
+	char prog[128];
+	strcpy( prog, argv[0] );
+
+	bool zenkaku = false;
+	bool globdir = false;
+
+	int opt;
+	while ( ( opt = getopt( argc, argv, "pvzxdc::" ) ) != -1 ) {
+		switch ( opt ) {
+			case 'x':
+				debug = true;
+				break;
+			case 'v':
+				verbose = true;
+				break;
+			case 'p':
+				plno = true;
+				break;
+			case 'c':
+				column = atoi( optarg );
+				break;
+			case 'z':
+				zenkaku = true;
+				break;
+			case 'd':
+				globdir = true;
+				break;
+			default:
+				fprintf( stderr, "error: illegal option '%c'.\n", opt );
+				print_help();
+				exit( 1 );
+		}
+	}
+
+	if ( argc == 1 ) {
+		print_help();
+		exit( 1 );
+	}
+
+	char in_path[ _MAX_PATH ];
+    _fullpath( in_path, argv[ argc - 1 ], _MAX_PATH );
+
+	xdw2txt( in_path, "xdwhno.tmp1" );
+	if ( verbose ) fprintf( stderr, "x2t done.\n" );
+
+	if ( ( fp1 = fopen( "xdwhno.tmp1", "r" ) ) == NULL ) {
+		fprintf( stderr, "can't open tmp file [%s].\n", "xdwhno.tmp1" );
+		exit( 1 );
+	}
+
+	if ( ( fp2 = fopen( "xdwhno.tmp2", "w" ) ) == NULL ) {
+		fprintf( stderr, "can't open tmp file [%s].\n", "xdwhno.tmp2" );
+		exit( 1 );
+	}
+
+    yyin  = fp1;
+	yyout = fp2;	
+    yylex(); // 字句解析の呼び出し
+
+    return 0;
+}
+
+int yywrap() {
+	if ( z2h ) {
+		if ( verbose ) fprintf( stderr, "analysis done.\n" );
+		fclose( fp1 );
+		fclose( fp2 );
+
+		if ( !debug ) {
+			unlink( "xdwhno.tmp1" );
+			unlink( "xdwhno.tmp2" );
+		}
+
+		exit( 0 );
+	}
+
+	z2h = true;
+	if ( verbose ) fprintf( stderr, "z2h done.\n" );
+
+	yyout = NULL;
+	yylineno = 1;
+
+	if ( ( fp2 = freopen( "xdwhno.tmp2", "r", fp2 ) ) == NULL ) {
+		fprintf( stderr, "can't open tmp file [%s].\n", "xdwhno.tmp2" );
+		exit( 1 );
+	}
+
+	yyin = fp2;
+
+	return 0;
+}