annotate src/kaigo/fwgo/fwgo.go @ 63:17e042fc8a33

fix nk.go
author pyon@macmini
date Fri, 16 Oct 2020 20:35:44 +0900
parents 05f3d51ad966
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
57
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
1 /*
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
2 fwgo.go: Futan-Wariai de Go
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
3
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
4 Last Change: 2020-07-14 火 15:04:09.
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
5 */
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
6 package main
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
7
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
8 /*
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
9 #cgo LDFLAGS: -L. -lxdwapi -static
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
10 #include <stdio.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
11 #include <stdlib.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
12 #include <string.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
13 #include <io.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
14 #include <windows.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
15 #include <xdw_api.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
16 #include <xdwapian.h>
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
17
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
18 #define MAXLINE 12000
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
19 #define BLOCKSZ 128
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
20
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
21 void xdw2txt(const char* xdwfile, const char* txtfile) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
22 char in_path[_MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
23 _fullpath(in_path, xdwfile, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
24
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
25 XDW_DOCUMENT_HANDLE h = NULL;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
26 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE};
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
27 if (XDW_OpenDocumentHandle(in_path, &h, (XDW_OPEN_MODE*)&mode)) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
28 printf("XDW Error: cannot open %s\n", xdwfile);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
29 return;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
30 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
31
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
32 int api_result = XDW_GetFullText(h, txtfile, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
33 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
34 printf("Error: cannot write text\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
35 return;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
36 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
37 XDW_CloseDocumentHandle(h, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
38 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
39
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
40 void xdwsplit1(const char* xdwfile) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
41 char in_path[_MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
42 _fullpath(in_path, xdwfile, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
43
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
44 XDW_DOCUMENT_HANDLE h = NULL;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
45 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE};
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
46 if (XDW_OpenDocumentHandle(in_path, &h, (XDW_OPEN_MODE*)&mode)) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
47 printf("Error: cannot open %s\n", xdwfile);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
48 return;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
49 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
50
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
51 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0};
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
52 XDW_GetDocumentInformation(h, &info);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
53 int nPage = info.nPages;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
54
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
55 char buf[_MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
56 for (int i = 1; i <= nPage; i++) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
57 sprintf(buf, "fwtmp_%05d.xdw", i);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
58 _fullpath(in_path, buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
59
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
60 int api_result = XDW_GetPage(h, i, in_path, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
61 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
62 printf("XDW Error: cannot get page\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
63 return;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
64 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
65 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
66 XDW_CloseDocumentHandle(h, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
67 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
68
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
69 void xdwmerge(const char* list, const char* output) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
70
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
71 FILE *fp;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
72 if ((fp = fopen(list, "r")) == NULL) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
73 fprintf(stderr, "can't open file [%s]\n", list);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
74 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
75 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
76
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
77 char *all_path = (char*)malloc(MAXLINE * sizeof(char) * _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
78 if (all_path == NULL) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
79 fprintf(stderr, "can't allocate memory\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
80 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
81 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
82
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
83 int n = 0;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
84 char *q;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
85 char buf[_MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
86
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
87 while (fgets(buf, sizeof buf, fp)) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
88 if ((q = strchr(buf, '\n')) != NULL) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
89 *q = '\0';
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
90 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
91 _fullpath(buf, buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
92 strncpy(&all_path[n * _MAX_PATH], buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
93 n++;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
94 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
95 fclose(fp);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
96
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
97 char *blk_path = (char*)malloc(BLOCKSZ * sizeof(char) * _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
98 const char **blk_path_addr = (const char**)malloc((n / BLOCKSZ + 1) * sizeof(char*) * _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
99 if (blk_path == NULL || blk_path_addr == NULL) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
100 fprintf(stderr, "can't allocate memory\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
101 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
102 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
103
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
104 // process by block
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
105 int api_result;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
106 int bn = 0;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
107 for (int p = 0, m = 0; p < n; p++) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
108 m = p % BLOCKSZ;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
109 if (m == 0 && p > 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
110 sprintf(buf, "fwtmp_b%04d.xdw", ++bn);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
111 _fullpath(buf, buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
112 api_result = XDW_MergeXdwFiles(blk_path_addr, BLOCKSZ, buf, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
113 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
114 fprintf(stderr, "can't merge [1] (p = %d, m = %d)\n", p, m);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
115 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
116 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
117 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
118 strncpy(&blk_path[m * _MAX_PATH], &all_path[p * _MAX_PATH], _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
119 blk_path_addr[m] = &blk_path[m * _MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
120 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
121
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
122 sprintf(buf, "fwtmp_b%04d.xdw", ++bn);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
123 _fullpath(buf, buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
124 int mod = n % BLOCKSZ;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
125 if (mod == 0) mod = BLOCKSZ;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
126 api_result = XDW_MergeXdwFiles(blk_path_addr, mod, buf, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
127 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
128 fprintf(stderr, "can't merge [2]\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
129 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
130 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
131
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
132 // merge blocks
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
133 for (int b = 0; b < bn; b++) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
134 sprintf(buf, "fwtmp_b%04d.xdw", b + 1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
135 _fullpath(buf, buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
136 strncpy(&blk_path[b * _MAX_PATH], buf, _MAX_PATH);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
137 blk_path_addr[b] = &blk_path[b * _MAX_PATH];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
138 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
139 _fullpath(buf, output, _MAX_PATH );
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
140 api_result = XDW_MergeXdwFiles(blk_path_addr, bn, buf, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
141 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
142 fprintf(stderr, "can't merge [3]\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
143 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
144 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
145
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
146 free(all_path);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
147 free(blk_path);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
148 free(blk_path_addr);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
149 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
150
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
151 int xdwaddannotation(XDW_DOCUMENT_HANDLE h, int page, int x, int y, char* string, int* sz, int tr)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
152 {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
153 XDW_ANNOTATION_HANDLE annoation;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
154 int api_result = XDW_AddAnnotation(h, XDW_AID_TEXT, page, x, y, NULL, &annoation, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
155 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
156 fprintf(stderr, "can't make annotation\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
157 return -1;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
158 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
159
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
160 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_Text, XDW_ATYPE_STRING, string, 0, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
161 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_FontSize, XDW_ATYPE_INT, (char*)(sz), 0, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
162 if (tr) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
163 int color = XDW_COLOR_NONE;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
164 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_BackColor, XDW_ATYPE_INT, (char*)(&color), 0, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
165 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
166 return 0;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
167 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
168
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
169 void xdwaddpage(const char* file, int sp, int atena) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
170 XDW_DOCUMENT_HANDLE h = NULL;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
171 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_UPDATE, XDW_AUTH_NODIALOGUE};
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
172 int api_result = XDW_OpenDocumentHandle(file, &h, (XDW_OPEN_MODE*)&mode);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
173 if (api_result < 0) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
174 fprintf(stderr, "can't open file\n");
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
175 exit(1);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
176 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
177
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
178 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0};
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
179 XDW_GetDocumentInformation(h, &info);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
180 int last_page = info.nPages;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
181
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
182 int sz = 80;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
183 int tr = 1;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
184 char pagenum[10];
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
185
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
186 for (int p = 0; p < last_page; p++) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
187 sprintf(pagenum, "FW-%05d", p + sp);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
188 api_result = xdwaddannotation(h, p + 1, 8598, 335, pagenum, &sz, tr);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
189 if (atena) api_result = xdwaddannotation(h, p + 1, 1270, 23615, pagenum, &sz, tr);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
190 if (api_result < 0) break;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
191 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
192
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
193 if (api_result >= 0) api_result = XDW_SaveDocument(h, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
194
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
195 XDW_CloseDocumentHandle(h, NULL);
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
196 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
197
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
198
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
199 */
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
200 import "C"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
201
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
202 import (
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
203 "encoding/csv"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
204 "flag"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
205 "fmt"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
206 "io"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
207 "io/ioutil"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
208 "log"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
209 "os"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
210 "regexp"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
211 "strings"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
212 "time"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
213
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
214 "golang.org/x/text/encoding/japanese"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
215 "golang.org/x/text/transform"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
216 )
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
217
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
218 type Data struct {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
219 Hno string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
220 Page string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
221 Zip string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
222 SendTo string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
223 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
224
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
225 func (d *Data) ToCsv() string {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
226 s := []string{d.Hno, d.Page, d.Zip, d.SendTo}
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
227 return strings.Join(s, ",")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
228 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
229
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
230 var (
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
231 ver = "0.1"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
232
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
233 clean bool
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
234 skip bool
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
235 debug bool
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
236 xdwfile string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
237
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
238 txtfile = "fwtmp_txt.txt"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
239 infofile = "fwtmp_info.csv"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
240 orderfile = "order.csv" // input
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
241 pagefile1 = "fwtmp_page1.txt" // send to sisetsu
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
242 pagefile2 = "fwtmp_page2.txt" // send to home
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
243 output1 = "output1.xdw"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
244 output2 = "output2.xdw"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
245 )
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
246
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
247 func init() {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
248 /* INITIALIZE FLAGS */
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
249 flag.BoolVar(&clean, "c", false, "clean temporary files & exit")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
250 flag.BoolVar(&skip, "e", false, "use existed files")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
251 flag.BoolVar(&debug, "d", false, "debug mode")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
252 flag.StringVar(&xdwfile, "i", "KBPV016G.xdw", "target xdw file")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
253 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
254
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
255 func main() {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
256 flag.Parse()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
257
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
258 /* PRINT HEADER */
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
259 fmt.Println("=================================================")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
260 fmt.Println(" 負担割合証を... ")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
261 fmt.Printf(" - fwgo [ver %s] -\n", ver)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
262 fmt.Println("=================================================\n")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
263 print_time("now")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
264 fmt.Println("[0] start ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
265
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
266 /* CLEAN TEMPORARY DIRECTORY */
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
267 os.Remove(output1)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
268 os.Remove(output2)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
269 if !skip {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
270 clean_full()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
271 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
272 if clean {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
273 os.Exit(0)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
274 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
275 print_time("check done")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
276
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
277 fmt.Println("[1] extract ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
278 if !skip {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
279 C.xdw2txt(C.CString(xdwfile), C.CString(txtfile))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
280 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
281 print_time("extract done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
282
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
283 c := make(chan int)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
284 fmt.Println("[2] split ... (run background)")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
285 go func() {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
286 if !skip {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
287 C.xdwsplit1(C.CString(xdwfile))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
288 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
289 print_time("split done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
290 c <- 1
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
291 }()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
292
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
293 fmt.Println("[3] analize ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
294 data_hash, err := analize(txtfile, infofile)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
295 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
296 log.Fatal(err)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
297 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
298 print_time("analize done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
299 debug_print(debug, fmt.Sprintf("len = %d", len(data_hash)))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
300
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
301 fmt.Println("[4] read order ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
302 h_order, n, err := read_order(orderfile)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
303 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
304 log.Fatal(err)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
305 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
306 print_time("read order done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
307 debug_print(debug, fmt.Sprintf("len = %d / %d", len(h_order), n))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
308
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
309 fmt.Println("[5] make_list ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
310 n, m, l, err := make_list(h_order, data_hash, pagefile1, pagefile2)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
311 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
312 log.Fatal(err)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
313 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
314 print_time("make list done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
315 debug_print(debug, fmt.Sprintf("order, kunai, kugai = %d, %d, %d", n, m, l))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
316
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
317 <-c
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
318
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
319 fmt.Println("[6] merge ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
320 clean_mini()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
321 C.xdwmerge(C.CString(pagefile1), C.CString(output1))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
322 print_time("merge 1/2 done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
323 clean_mini()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
324 C.xdwmerge(C.CString(pagefile2), C.CString(output2))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
325 print_time("merge 2/2 done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
326
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
327 fmt.Println("[7] page ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
328 C.xdwaddpage(C.CString(output1), C.int(1), C.int(0))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
329 print_time("page 1/2 done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
330 C.xdwaddpage(C.CString(output2), C.int(n + 1), C.int(1))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
331 print_time("page 2/2 done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
332
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
333 if !debug {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
334 fmt.Println("[9] clean ...")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
335 clean_full()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
336 print_time("clean done.")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
337 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
338 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
339
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
340 func analize(txtfile, infofile string) (map[string]Data, error) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
341 hash := make(map[string]Data)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
342
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
343 c, err := ioutil.ReadFile(txtfile)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
344 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
345 return hash, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
346 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
347 r := strings.NewReader(string(c))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
348 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder())
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
349 b, err := ioutil.ReadAll(tr)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
350 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
351 return hash, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
352 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
353
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
354 regHid := regexp.MustCompile(`05[0-9]{4}0[1238][0-9]{8}`)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
355 regZip := regexp.MustCompile(`[0123456789]{3}-[0123456789]{4}`)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
356
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
357 var csv string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
358
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
359 buf := strings.Split(string(b), "生年月日年月日")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
360 for p, v := range buf[:len(buf)-1] {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
361 hid := regHid.FindString(v)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
362 hno := hid[6:16]
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
363
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
364 zips := regZip.FindAllString(v, -1)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
365 if len(zips) != 2 {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
366 fmt.Println("warnig:", hno, "have not 2 zip-pattern")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
367 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
368
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
369 s := strings.Split(v, zips[1])
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
370 s = strings.Split(s[len(s)-1], " 様 ")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
371 send := strings.ReplaceAll(s[0], " ", "")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
372
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
373 page := fmt.Sprintf("%05d", p + 1)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
374
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
375 data := Data {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
376 Hno: hno,
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
377 Page: page,
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
378 Zip: zips[1],
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
379 SendTo: send,
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
380 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
381 hash[hno] = data
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
382
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
383 csv += data.ToCsv() + "\n"
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
384 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
385
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
386 if err := ioutil.WriteFile(infofile, []byte(csv), 0644); err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
387 return hash, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
388 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
389 return hash, nil;
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
390 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
391
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
392 func read_order(csvfile string) ([]string, int, error) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
393 var order []string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
394
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
395 c, err := ioutil.ReadFile(csvfile)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
396 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
397 return order, -1, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
398 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
399 r := strings.NewReader(string(c))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
400 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder())
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
401 b, err := ioutil.ReadAll(tr)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
402 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
403 return order, -1, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
404 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
405
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
406 n := 0
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
407 cr := csv.NewReader(strings.NewReader(string(b)))
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
408 for {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
409 record, err := cr.Read()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
410 if err == io.EOF {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
411 break
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
412 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
413 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
414 return order, n, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
415 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
416
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
417 if strings.HasPrefix(record[0], "0") {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
418 order = append(order, record[0])
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
419 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
420 n++
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
421 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
422 return order, n, nil
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
423 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
424
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
425 func make_list(h_order []string, hash map[string]Data, pagefile1, pagefile2 string) (int, int, int, error) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
426 var n, m, l int
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
427 var list1, list2 []string
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
428 done := make(map[string]bool)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
429
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
430 for _, h := range h_order {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
431 if _, ok := done[h]; !ok {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
432 if data, ok := hash[h]; ok {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
433 list1 = append(list1, data.Page)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
434 done[h] = true
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
435 n++
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
436 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
437 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
438 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
439
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
440 for _, z := range []string{"014-00", "014-01", "014-08", "014-1413"} {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
441 for _, data := range hash {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
442 h := data.Hno
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
443 if _, ok := done[h]; !ok {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
444 if strings.HasPrefix(data.Zip, z) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
445 list2 = append(list2, data.Page)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
446 done[h] = true
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
447 m++
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
448 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
449 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
450 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
451 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
452
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
453 for _, data := range hash {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
454 h := data.Hno
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
455 if _, ok := done[h]; !ok {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
456 list2 = append(list2, data.Page)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
457 done[h] = true
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
458 l++
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
459 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
460 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
461
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
462 if err := write_pagefile(pagefile1, list1); err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
463 return n, m, l, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
464 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
465 if err := write_pagefile(pagefile2, list2); err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
466 return n, m, l, err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
467 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
468 return n, m, l, nil
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
469 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
470
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
471 func write_pagefile(file string, list []string) error {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
472 f, err := os.OpenFile(file, os.O_RDWR|os.O_CREATE, 0755)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
473 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
474 return err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
475 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
476 for _, p := range list {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
477 fmt.Fprintf(f, "fwtmp_%s.xdw\n", p)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
478 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
479 if err := f.Close(); err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
480 return err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
481 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
482 return nil
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
483 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
484
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
485 func print_time(msg string) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
486 now := time.Now()
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
487 fmt.Printf("\t%v # %s\n", now, msg)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
488 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
489
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
490 func debug_print(debug bool, msg string) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
491 if debug {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
492 fmt.Printf("\t%s\n", msg)
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
493 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
494 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
495
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
496 func clean_full() error {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
497 return clean_file("fwtmp_")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
498 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
499
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
500 func clean_mini() error {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
501 return clean_file("fwtmp_b")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
502 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
503
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
504 func clean_file(prefix string) error {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
505 files, err := ioutil.ReadDir(".")
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
506 if err != nil {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
507 return err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
508 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
509
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
510 for _, file := range files {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
511 if strings.HasPrefix(file.Name(), prefix) {
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
512 os.Remove(file.Name())
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
513 continue
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
514 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
515 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
516 return err
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
517 }
05f3d51ad966 add fwgo.
pyon@macmini
parents:
diff changeset
518