Mercurial > mercurial > hgweb_golang.cgi
comparison src/kaigo/qtuti/95y/95y.go @ 65:0369656be06c default tip
many changes.
author | pyon@macmini |
---|---|
date | Fri, 20 May 2022 06:30:34 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
64:ad5c30ee5cf1 | 65:0369656be06c |
---|---|
1 /* | |
2 95y.go: Qfuhi Tsuchi (Year Version) | |
3 | |
4 Last Change: 2021-11-15 月 14:40:46. | |
5 */ | |
6 | |
7 package main | |
8 | |
9 /* | |
10 #cgo LDFLAGS: -L. -lxdwapi -static | |
11 // | |
12 // 95.cpp: Qfuhi Tsuchi | |
13 // Last Change: 2020-09-08 火 15:20:43. | |
14 // | |
15 | |
16 #include <stdio.h> | |
17 #include <stdlib.h> | |
18 #include <string.h> | |
19 #include <io.h> | |
20 #include <windows.h> | |
21 #include <xdw_api.h> | |
22 #include <xdwapian.h> | |
23 | |
24 #define MAXCOL 1024 | |
25 #define MAXLINE 9999 | |
26 #define BLOCKSZ 128 | |
27 #define ATN_N 20 | |
28 | |
29 char* xdw2txt(const char* file) { | |
30 char in_path[_MAX_PATH]; | |
31 _fullpath(in_path, file, _MAX_PATH); | |
32 | |
33 XDW_DOCUMENT_HANDLE h = NULL; // 文書ハンドルを開く | |
34 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE}; | |
35 if (XDW_OpenDocumentHandle(in_path, &h, (XDW_OPEN_MODE*)&mode)) { | |
36 fprintf(stderr, "Error: cannot open %s\n", file); | |
37 return NULL; | |
38 } | |
39 | |
40 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; // 総ページ数を得る | |
41 XDW_GetDocumentInformation(h, &info); | |
42 int nPage = info.nPages; | |
43 | |
44 // メイン処理 | |
45 char *lpszvalue, *all_lpszvalue; | |
46 long datasize[9999]; | |
47 for (int i=1; i<=nPage; i++) { | |
48 datasize[i] = XDW_GetPageTextToMemory(h, i, NULL, 0, NULL); | |
49 datasize[0] += datasize[i]; | |
50 } | |
51 datasize[0] += nPage - 1; // for "\n" | |
52 all_lpszvalue = (char*)malloc(sizeof(char)*datasize[0]); | |
53 all_lpszvalue[0] = '\0'; | |
54 for (int i = 1; i <= nPage; i++) { | |
55 if (i < nPage) datasize[i]++; // for "\n" | |
56 lpszvalue = (char*)malloc(sizeof(char)*(datasize[i])); | |
57 XDW_GetPageTextToMemory(h, i, lpszvalue, datasize[i], NULL); | |
58 strcat(all_lpszvalue, lpszvalue); | |
59 if (i < nPage) strcat(all_lpszvalue, "\n"); | |
60 free(lpszvalue); | |
61 } | |
62 | |
63 XDW_CloseDocumentHandle(h, NULL); // 文書ハンドルを閉じる | |
64 return all_lpszvalue; | |
65 } | |
66 | |
67 void xdw2txtb(const char* xdwfile, const char* txtfile) { | |
68 char in_path[_MAX_PATH], out_path[_MAX_PATH]; | |
69 _fullpath(in_path, xdwfile, _MAX_PATH); | |
70 _fullpath(out_path, txtfile, _MAX_PATH); | |
71 | |
72 XDW_DOCUMENT_HANDLE h = NULL; // 文書ハンドルを開く | |
73 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE}; | |
74 if (XDW_OpenDocumentHandle(in_path, &h, (XDW_OPEN_MODE*)&mode)) { | |
75 fprintf(stderr, "Error: cannot open %s\n", xdwfile); | |
76 return; | |
77 } | |
78 | |
79 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; // 総ページ数を得る | |
80 XDW_GetDocumentInformation(h, &info); | |
81 int nPage = info.nPages; | |
82 | |
83 FILE *fp; | |
84 if ((fp = fopen(out_path, "w")) == NULL) { | |
85 fprintf(stderr, "Error: cannot open %s\n", out_path); | |
86 return; | |
87 } | |
88 | |
89 long datasize; | |
90 char* lpszvalue; | |
91 | |
92 for (int i = 1; i <= nPage; i++) { | |
93 datasize = XDW_GetPageTextToMemory(h, i, NULL, 0, NULL); | |
94 lpszvalue = (char*)malloc(sizeof(char)*datasize); | |
95 XDW_GetPageTextToMemory(h, i, lpszvalue, datasize, NULL); | |
96 fprintf(fp, "%s\n", lpszvalue); | |
97 free(lpszvalue); | |
98 } | |
99 | |
100 fclose(fp); | |
101 XDW_CloseDocumentHandle(h, NULL); // 文書ハンドルを閉じる | |
102 return; | |
103 } | |
104 | |
105 int xdwsplit1(const char* file, const char* workdir, const char* prefix) { | |
106 char file_path[_MAX_PATH]; | |
107 _fullpath(file_path, file, _MAX_PATH); | |
108 | |
109 XDW_DOCUMENT_HANDLE h = NULL; | |
110 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE}; | |
111 if (XDW_OpenDocumentHandle(file_path, &h, (XDW_OPEN_MODE*)&mode)) { | |
112 fprintf(stderr, "Error: cannot open %s\n", file); | |
113 return -1; | |
114 } | |
115 | |
116 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; | |
117 XDW_GetDocumentInformation(h, &info); | |
118 int nPage = info.nPages; | |
119 | |
120 char buf[_MAX_PATH]; | |
121 for (int i = 1; i <= nPage; i++) { | |
122 sprintf(buf, "%s/%s%05d.xdw", workdir, prefix, i); | |
123 //sprintf(buf, "%s_%05d.xdw", prefix, i); | |
124 _fullpath(file_path, buf, _MAX_PATH); | |
125 | |
126 int api_result = XDW_GetPage(h, i, file_path, NULL); | |
127 if (api_result < 0) { | |
128 fprintf(stderr, "XDW Error: cannot get page (%s p=%d)\n", file, i); | |
129 return -1; | |
130 } | |
131 } | |
132 | |
133 XDW_CloseDocumentHandle(h, NULL); | |
134 return 0; | |
135 } | |
136 | |
137 int xdwextpage(const char* infile, const int p, const char* outfile) { | |
138 char file_path[_MAX_PATH]; | |
139 _fullpath(file_path, infile, _MAX_PATH); | |
140 | |
141 XDW_DOCUMENT_HANDLE h = NULL; | |
142 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_READONLY, XDW_AUTH_NODIALOGUE}; | |
143 if (XDW_OpenDocumentHandle(file_path, &h, (XDW_OPEN_MODE*)&mode)) { | |
144 fprintf(stderr, "Error: cannot open %s\n", infile); | |
145 return -1; | |
146 } | |
147 | |
148 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; | |
149 XDW_GetDocumentInformation(h, &info); | |
150 int nPage = info.nPages; | |
151 | |
152 char buf[_MAX_PATH]; | |
153 _fullpath(file_path, outfile, _MAX_PATH); | |
154 | |
155 int api_result = XDW_GetPage(h, p, file_path, NULL); | |
156 if (api_result < 0) { | |
157 fprintf(stderr, "XDW Error: cannot get page (%s p=%d)\n", infile, p); | |
158 return -1; | |
159 } | |
160 | |
161 XDW_CloseDocumentHandle(h, NULL); | |
162 return 0; | |
163 } | |
164 | |
165 void xdwmerge(const char* list, const char* output) { | |
166 FILE *fp; | |
167 | |
168 if ((fp = fopen(list, "r")) == NULL) { | |
169 fprintf(stderr, "XDW Error: can't open file [%s]\n", list); | |
170 exit(1); | |
171 } | |
172 | |
173 char *all_path = (char*)malloc(MAXLINE * sizeof(char) * _MAX_PATH); | |
174 | |
175 if (all_path == NULL) { | |
176 fprintf(stderr, "XDW Error: can't allocate memory\n"); | |
177 exit(1); | |
178 } | |
179 | |
180 int n = 0; | |
181 char *q; | |
182 char buf[_MAX_PATH]; | |
183 | |
184 while (fgets(buf, sizeof buf, fp)) { | |
185 if ((q = strchr(buf, '\n')) != NULL) { | |
186 *q = '\0'; | |
187 } | |
188 _fullpath(buf, buf, _MAX_PATH); | |
189 strncpy(&all_path[n * _MAX_PATH], buf, _MAX_PATH); | |
190 n++; | |
191 } | |
192 fclose(fp); | |
193 | |
194 char *blk_path = (char*)malloc(BLOCKSZ * sizeof(char) * _MAX_PATH); | |
195 const char **blk_path_addr = (const char**)malloc((n / BLOCKSZ + 1) * sizeof(char*) * _MAX_PATH); | |
196 if (blk_path == NULL || blk_path_addr == NULL) { | |
197 fprintf(stderr, "XDW Error: can't allocate memory\n"); | |
198 exit(1); | |
199 } | |
200 | |
201 // process by block | |
202 int api_result; | |
203 int bn = 0; | |
204 for (int p = 0, m = 0; p < n; p++) { | |
205 m = p % BLOCKSZ; | |
206 if (m == 0 && p > 0) { | |
207 sprintf(buf, "tmp_b%04d.xdw", ++bn); | |
208 _fullpath(buf, buf, _MAX_PATH); | |
209 api_result = XDW_MergeXdwFiles(blk_path_addr, BLOCKSZ, buf, NULL); | |
210 if (api_result < 0) { | |
211 fprintf(stderr, "XDW Error: can't merge [1] (p = %d, m = %d)\n", p, m); | |
212 exit(1); | |
213 } | |
214 } | |
215 strncpy(&blk_path[m * _MAX_PATH], &all_path[p * _MAX_PATH], _MAX_PATH); | |
216 blk_path_addr[m] = &blk_path[m * _MAX_PATH]; | |
217 } | |
218 | |
219 sprintf(buf, "tmp_b%04d.xdw", ++bn); | |
220 _fullpath(buf, buf, _MAX_PATH); | |
221 | |
222 int mod = n % BLOCKSZ; | |
223 if (mod == 0) mod = BLOCKSZ; | |
224 api_result = XDW_MergeXdwFiles(blk_path_addr, mod, buf, NULL); | |
225 | |
226 if (api_result < 0) { | |
227 fprintf(stderr, "XDW Error: can't merge [2]\n"); | |
228 exit(1); | |
229 } | |
230 | |
231 // merge blocks | |
232 for (int b = 0; b < bn; b++) { | |
233 sprintf(buf, "tmp_b%04d.xdw", b + 1); | |
234 _fullpath(buf, buf, _MAX_PATH); | |
235 strncpy(&blk_path[b * _MAX_PATH], buf, _MAX_PATH); | |
236 blk_path_addr[b] = &blk_path[b * _MAX_PATH]; | |
237 } | |
238 | |
239 _fullpath(buf, output, _MAX_PATH ); | |
240 api_result = XDW_MergeXdwFiles(blk_path_addr, bn, buf, NULL); | |
241 | |
242 if (api_result < 0) { | |
243 fprintf(stderr, "XDW Error: can't merge [3]\n"); | |
244 exit(1); | |
245 } | |
246 | |
247 free(all_path); | |
248 free(blk_path); | |
249 free(blk_path_addr); | |
250 | |
251 for (int b = 0; b < bn; b++) { | |
252 sprintf(buf, "tmp_b%04d.xdw", b + 1); | |
253 _fullpath(buf, buf, _MAX_PATH); | |
254 remove(buf); | |
255 } | |
256 } | |
257 | |
258 int xdwaddatn(const char* xdwfile, const char* atnfile) { | |
259 FILE *fp; | |
260 char filepath[_MAX_PATH]; | |
261 _fullpath(filepath, atnfile, _MAX_PATH); | |
262 | |
263 if ((fp = fopen(filepath, "r")) == NULL) { | |
264 fprintf(stderr, "Error: cannot open %s\n", filepath); | |
265 return -1; | |
266 } | |
267 | |
268 char keyword[128]; | |
269 char *q; | |
270 fgets(keyword, sizeof keyword, fp); | |
271 if ((q = strchr(keyword, '\n')) != NULL) { | |
272 *q = '\0'; | |
273 } | |
274 | |
275 char buf[_MAX_PATH]; | |
276 int x[ATN_N], y[ATN_N], sz[ATN_N], tr[ATN_N]; | |
277 char txt[ATN_N][256]; | |
278 int an = 0; | |
279 while (fgets(buf, sizeof buf, fp)) { | |
280 if ((q = strchr(buf, '\n')) != NULL) { | |
281 *q = '\0'; | |
282 } | |
283 | |
284 x[an] = atoi(strtok(buf, ",")); | |
285 y[an] = atoi(strtok(NULL, ",")); | |
286 sz[an] = atoi(strtok(NULL, ",")); | |
287 tr[an] = atoi(strtok(NULL, ",")); | |
288 strcpy(txt[an], strtok(NULL, ",")); | |
289 an++; | |
290 //printf("x=%d y=%d txt=%s sz=%d tr=%d\n", x[an], y[an], txt[an], sz[an], tr[an]); | |
291 } | |
292 fclose(fp); | |
293 | |
294 | |
295 XDW_DOCUMENT_HANDLE h = NULL; | |
296 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_UPDATE, XDW_AUTH_NODIALOGUE}; | |
297 | |
298 _fullpath(filepath, xdwfile, _MAX_PATH); | |
299 int api_result = XDW_OpenDocumentHandle(filepath, &h, (XDW_OPEN_MODE*)&mode); | |
300 if (api_result < 0) return api_result; | |
301 | |
302 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; | |
303 XDW_GetDocumentInformation(h, &info); | |
304 XDW_FOUND_HANDLE pFoundHandle = NULL; | |
305 for (int i = 0; i < info.nPages; i++) { | |
306 if (keyword[0] != '\0') { | |
307 api_result = XDW_FindTextInPage(h, i + 1, keyword, NULL, &pFoundHandle, NULL); | |
308 if (!pFoundHandle) { | |
309 XDW_CloseFoundHandle(pFoundHandle); | |
310 continue; | |
311 } | |
312 XDW_CloseFoundHandle(pFoundHandle); | |
313 } | |
314 for (int j = 0; j < an; j++ ) { | |
315 XDW_ANNOTATION_HANDLE annoation; | |
316 int api_result = XDW_AddAnnotation(h, XDW_AID_TEXT, i + 1, x[j], y[j], NULL, &annoation, NULL); | |
317 if (api_result < 0) return api_result; | |
318 | |
319 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_Text, XDW_ATYPE_STRING, txt[j], 0, NULL); | |
320 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_FontSize, XDW_ATYPE_INT, (char*)&sz[j], 0, NULL); | |
321 | |
322 int color = XDW_COLOR_WHITE; | |
323 if (tr[j]) { | |
324 color = XDW_COLOR_NONE; | |
325 } | |
326 api_result = XDW_SetAnnotationAttribute(h, annoation, XDW_ATN_BackColor, XDW_ATYPE_INT, (char*)&color, 0, NULL); | |
327 } | |
328 } | |
329 | |
330 XDW_SaveDocument(h, NULL); | |
331 XDW_CloseDocumentHandle(h, NULL); | |
332 | |
333 return 0; | |
334 } | |
335 | |
336 int xdwaddatntool(const char* xdwfile, const char* toolfile, int n, int x, int y) { | |
337 char filepath[_MAX_PATH]; | |
338 _fullpath(filepath, xdwfile, _MAX_PATH); | |
339 | |
340 XDW_DOCUMENT_HANDLE h = NULL; | |
341 XDW_OPEN_MODE_EX mode = {sizeof(XDW_OPEN_MODE_EX), XDW_OPEN_UPDATE, XDW_AUTH_NODIALOGUE}; | |
342 | |
343 int api_result = XDW_OpenDocumentHandle(filepath, &h, (XDW_OPEN_MODE*)&mode); | |
344 if (api_result < 0) return api_result; | |
345 | |
346 XDW_DOCUMENT_INFO info = {sizeof(XDW_DOCUMENT_INFO), 0, 0, 0}; | |
347 XDW_GetDocumentInformation(h, &info); | |
348 | |
349 _fullpath(filepath, toolfile, _MAX_PATH); | |
350 for (int i = 0; i < info.nPages; i++) { | |
351 XDW_ANNOTATION_HANDLE annoation; | |
352 int api_result = XDW_AddAnnotationFromAnnFile(h, filepath, n, i + 1, NULL, x, y, &annoation, NULL); | |
353 } | |
354 | |
355 XDW_SaveDocument(h, NULL); | |
356 XDW_CloseDocumentHandle(h, NULL); | |
357 | |
358 return 0; | |
359 } | |
360 | |
361 | |
362 */ | |
363 import "C" | |
364 | |
365 import ( | |
366 "bufio" | |
367 "regexp" | |
368 "encoding/json" | |
369 "flag" | |
370 "fmt" | |
371 "log" | |
372 "os" | |
373 "path/filepath" | |
374 "sort" | |
375 "strings" | |
376 | |
377 "golang.org/x/text/encoding/japanese" | |
378 "golang.org/x/text/transform" | |
379 ) | |
380 | |
381 type Hhs struct { | |
382 No string | |
383 Name string | |
384 Weight int | |
385 //Text string | |
386 Xdw []string | |
387 } | |
388 | |
389 func(h *Hhs) AppendXdw(xdw string) { | |
390 h.Xdw = append(h.Xdw, xdw) | |
391 } | |
392 | |
393 func(h *Hhs) CsvString() string { | |
394 return strings.Join([]string{h.No, h.Name}, ",") | |
395 } | |
396 | |
397 func(h *Hhs) Dump() string { | |
398 x := strings.Join(h.Xdw, ",") | |
399 return strings.Join([]string{h.No, h.Name, fmt.Sprintf("%d", h.Weight), x}, "\t") | |
400 } | |
401 | |
402 type Config struct { | |
403 Indir string | |
404 Outdir string | |
405 Workdir string | |
406 Atnfile[] string | |
407 } | |
408 | |
409 var ( | |
410 ver = "0.1" | |
411 conf Config | |
412 confjson = "95y.json" | |
413 logfile = "95y.log" | |
414 whitexdw = "aiobo.xdw" | |
415 split_n = 9000 | |
416 | |
417 out_q1 = "q1.xdw" | |
418 out_q2 = "q2.xdw" | |
419 out_q3 = "q3.xdw" | |
420 out_l = "l.csv" | |
421 | |
422 delfile = "del.list" | |
423 sortfile = "sort.list" | |
424 | |
425 tmpfile = "95y.tmp" | |
426 | |
427 in_xdw []string | |
428 re_hhsno, re_name *regexp.Regexp | |
429 | |
430 // option parameters | |
431 version bool | |
432 ) | |
433 | |
434 func init() { | |
435 /* コンフィグファイルは JSON */ | |
436 content, err := os.ReadFile(confjson) | |
437 if err != nil { | |
438 log.Fatal(err) | |
439 } | |
440 if err := json.Unmarshal(content, &conf); err != nil { | |
441 log.Fatal(err) | |
442 } | |
443 | |
444 out_q1 = filepath.Join(conf.Outdir, out_q1) | |
445 out_q2 = filepath.Join(conf.Outdir, out_q2) | |
446 out_q3 = filepath.Join(conf.Outdir, out_q3) | |
447 out_l = filepath.Join(conf.Outdir, out_l) | |
448 | |
449 logfile = filepath.Join(conf.Workdir, logfile) | |
450 | |
451 /* 一時ファイル消去 */ | |
452 os.RemoveAll(conf.Outdir) | |
453 os.RemoveAll(conf.Workdir) | |
454 os.Mkdir(conf.Outdir, 0755) | |
455 os.Mkdir(conf.Workdir, 0755) | |
456 | |
457 /* 変数初期化 */ | |
458 re_hhsno = regexp.MustCompile(`0[1238]00\d{6}`) | |
459 re_name = regexp.MustCompile(`管理者 老 松 博 行.{14}`) | |
460 | |
461 /* Docuworksファイル列挙 */ | |
462 files, err := os.ReadDir(conf.Indir) | |
463 if err != nil { | |
464 log.Fatal(err) | |
465 } | |
466 | |
467 for _, file := range files { | |
468 if !strings.HasSuffix(file.Name(), ".xdw") { | |
469 continue | |
470 } | |
471 if strings.HasPrefix(file.Name(), "KDPK016G") || strings.HasPrefix(file.Name(), "KDPK126G") { | |
472 in_xdw = append(in_xdw, file.Name()) | |
473 } | |
474 } | |
475 | |
476 flag.BoolVar(&version, "v", false, "print version") | |
477 } | |
478 | |
479 func main() { | |
480 flag.Parse() | |
481 | |
482 if version { | |
483 fmt.Println("95y - version", ver) | |
484 os.Exit(0) | |
485 } | |
486 | |
487 /* 重み付けの準備 */ | |
488 err, sort_list := file2slice(filepath.Join(conf.Indir, sortfile)) | |
489 if err != nil { | |
490 log.Fatal(err) | |
491 } | |
492 | |
493 /* 給付費通知を漁り,構造体を初期化 */ | |
494 hash_Hhs := make(map[string]Hhs) | |
495 for i, file := range in_xdw { | |
496 for p, t := range xdw2txtb(filepath.Join(conf.Indir, file), filepath.Join(conf.Workdir, tmpfile)) { | |
497 hno := re_hhsno.FindString(t) | |
498 _, ok := hash_Hhs[hno] | |
499 if strings.Contains(t, "大曲仙北広域市町村圏組合") && !ok { | |
500 name := re_name.FindString(t) | |
501 name = strings.Replace(name, "管理者 老 松 博 行", "", 1) | |
502 | |
503 w := 99 | |
504 for j, s := range sort_list { | |
505 if strings.Contains(t, s) { | |
506 w = j | |
507 } | |
508 } | |
509 | |
510 h := Hhs{No: hno, Name: name, Weight: w, Xdw: []string{fmt.Sprintf("%02d_%05d.xdw", i, p + 1)}} | |
511 hash_Hhs[hno] = h | |
512 } else { | |
513 h := hash_Hhs[hno] | |
514 h.AppendXdw(fmt.Sprintf("%02d_%05d.xdw", i, p + 1)) | |
515 hash_Hhs[hno] = h | |
516 } | |
517 //fmt.Println(file, i, "-", p) // <--- | |
518 } | |
519 } | |
520 fmt.Println("analize done") | |
521 | |
522 /* バックグラウンドで給付費通知をバラす */ | |
523 ch := make(chan int) | |
524 go func() { | |
525 for i, file := range in_xdw { | |
526 qtsuchi := filepath.Join(conf.Indir, file) | |
527 C.xdwsplit1(C.CString(qtsuchi), C.CString(conf.Workdir), C.CString(fmt.Sprintf("%02d_", i))) | |
528 } | |
529 ch <- 1 | |
530 fmt.Println("split done") | |
531 }() | |
532 | |
533 /* そのあいだに 不要者削除,ソート,マージ */ | |
534 err, del_list := file2slice(filepath.Join(conf.Indir, delfile)) | |
535 if err != nil { | |
536 log.Fatal(err) | |
537 } | |
538 for _, hno := range del_list { | |
539 delete(hash_Hhs, hno) | |
540 } | |
541 fmt.Println("delete done") | |
542 | |
543 /* ソート */ | |
544 var slice_Hhs []Hhs | |
545 for _, h := range hash_Hhs { | |
546 slice_Hhs = append(slice_Hhs, h) | |
547 } | |
548 sort.Slice(slice_Hhs, func(i, j int) bool { | |
549 if slice_Hhs[i].Weight != slice_Hhs[j].Weight { | |
550 return slice_Hhs[i].Weight < slice_Hhs[j].Weight | |
551 } | |
552 if slice_Hhs[i].No != slice_Hhs[j].No { | |
553 return slice_Hhs[i].No < slice_Hhs[j].No | |
554 } | |
555 return false | |
556 }) | |
557 fmt.Println("sort done") | |
558 | |
559 /* マージ */ | |
560 var list_q1, list_q2 []string | |
561 for _, h := range slice_Hhs { | |
562 if h.Weight < 99 { | |
563 for _, x := range h.Xdw { | |
564 buf := filepath.Join(conf.Workdir, x) | |
565 list_q1 = append(list_q1, buf) | |
566 } | |
567 if len(h.Xdw) % 2 == 1 { | |
568 list_q1 = append(list_q1, whitexdw) | |
569 } | |
570 } else { | |
571 for _, x := range h.Xdw { | |
572 buf := filepath.Join(conf.Workdir, x) | |
573 list_q2 = append(list_q2, buf) | |
574 } | |
575 if len(h.Xdw) % 2 == 1 { | |
576 list_q2 = append(list_q2, whitexdw) | |
577 } | |
578 } | |
579 } | |
580 | |
581 <-ch | |
582 xdwmerge(list_q1, out_q1) | |
583 if len(list_q2) <= split_n { | |
584 xdwmerge(list_q2, out_q2) | |
585 } else { | |
586 xdwmerge(list_q2[:split_n], out_q2) | |
587 xdwmerge(list_q2[split_n:], out_q3) | |
588 } | |
589 fmt.Println("merge done") | |
590 | |
591 /* バックグラウンドで給付費通知を校正 */ | |
592 ch_q1 := make(chan int) | |
593 go func() { | |
594 for _, a := range conf.Atnfile { | |
595 xdwaddatn(out_q1, a) | |
596 } | |
597 ch_q1 <- 1 | |
598 fmt.Println("correct1 done") | |
599 } () | |
600 | |
601 ch_q2 := make(chan int) | |
602 go func() { | |
603 for _, a := range conf.Atnfile { | |
604 xdwaddatn(out_q2, a) | |
605 } | |
606 ch_q2 <- 1 | |
607 fmt.Println("correct2 done") | |
608 } () | |
609 | |
610 ch_q3 := make(chan int) | |
611 if len(list_q2) > split_n { | |
612 go func() { | |
613 for _, a := range conf.Atnfile { | |
614 xdwaddatn(out_q3, a) | |
615 } | |
616 ch_q3 <- 1 | |
617 fmt.Println("correct3 done") | |
618 } () | |
619 } | |
620 | |
621 /* リスト出力 & ログダンプ */ | |
622 csvtxt := "" | |
623 logtxt := "" | |
624 for _, h := range slice_Hhs { | |
625 csvtxt += h.CsvString() + "\n" | |
626 logtxt += h.Dump() + "\n" | |
627 } | |
628 csvtxt, _, _ = transform.String(japanese.ShiftJIS.NewEncoder(), csvtxt) | |
629 if err := os.WriteFile(out_l, []byte(csvtxt), 0644); err != nil { | |
630 log.Fatal(err) | |
631 } | |
632 if err := os.WriteFile(logfile, []byte(logtxt), 0644); err != nil { | |
633 log.Fatal(err) | |
634 } | |
635 fmt.Println("logdump done") | |
636 | |
637 <-ch_q1 | |
638 <-ch_q2 | |
639 if len(list_q2) > split_n { | |
640 <-ch_q3 | |
641 } | |
642 } | |
643 | |
644 func file2slice(file string) (err error, list []string) { | |
645 f, err := os.Open(file) | |
646 if err != nil { | |
647 return err, nil | |
648 } | |
649 defer f.Close() | |
650 | |
651 buf := bufio.NewScanner(f) | |
652 for buf.Scan() { | |
653 list = append(list, buf.Text()) | |
654 } | |
655 return nil, list | |
656 } | |
657 | |
658 func xdw2txt(file string) (txt []string) { | |
659 s := C.GoString(C.xdw2txt(C.CString(file))) | |
660 r := strings.NewReader(s) | |
661 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder()) | |
662 buf := bufio.NewScanner(tr) | |
663 for buf.Scan() { | |
664 txt = append(txt, buf.Text()) | |
665 } | |
666 return | |
667 } | |
668 | |
669 func xdw2txtb(xdwfile, txtfile string) (txt []string) { | |
670 if _, err := os.Stat(txtfile); os.IsExist(err) { | |
671 os.Remove(txtfile) | |
672 } | |
673 | |
674 C.xdw2txtb(C.CString(xdwfile), C.CString(txtfile)) | |
675 content, err := os.ReadFile(txtfile) | |
676 if err != nil { | |
677 return nil | |
678 } | |
679 | |
680 r := strings.NewReader(string(content)) | |
681 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder()) | |
682 buf := bufio.NewScanner(tr) | |
683 for buf.Scan() { | |
684 txt = append(txt, buf.Text()) | |
685 } | |
686 return | |
687 } | |
688 | |
689 func xdwmerge(list []string, outfile string) (err error) { | |
690 order := strings.Join(list, "\n") | |
691 order, _, _ = transform.String(japanese.ShiftJIS.NewEncoder(), order) | |
692 orderfile := fmt.Sprintf("%s_order.txt", outfile) | |
693 if err := os.WriteFile(orderfile, []byte(order), 0644); err != nil { | |
694 return err | |
695 } | |
696 C.xdwmerge(C.CString(orderfile), C.CString(outfile)) | |
697 return nil | |
698 } | |
699 | |
700 func xdwaddatn(xdwfile, atnfile string) (err error) { | |
701 C.xdwaddatn(C.CString(xdwfile), C.CString(atnfile)) | |
702 return nil | |
703 } | |
704 | |
705 func xdwaddatntool(xdwfile, toolfile string, n, x, y int) (err error) { | |
706 C.xdwaddatntool(C.CString(xdwfile), C.CString(toolfile), C.int(n), C.int(x), C.int(y)) | |
707 return nil | |
708 } | |
709 |