annotate src/kaigo/superFC/fc_tmpl.go @ 65:0369656be06c default tip

many changes.
author pyon@macmini
date Fri, 20 May 2022 06:30:34 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
65
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
1 /*
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
2 fcgo.go: Fucho de Go
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
3
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
4 Last Change: 2021-06-15 Tue 18:30:10.
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
5 */
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
6 package main
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
7
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
8 /*
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
9 #cgo LDFLAGS: -L. -lxdwapi -static
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
10 ##### C_SOURCE #####
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
11 */
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
12 import "C"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
13
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
14 import (
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
15 _ "embed"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
16
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
17 "encoding/csv"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
18 "flag"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
19 "fmt"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
20 "io"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
21 "log"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
22 "os"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
23 "regexp"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
24 "sort"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
25 "strings"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
26 "time"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
27
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
28 "golang.org/x/text/encoding/japanese"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
29 "golang.org/x/text/transform"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
30 )
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
31
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
32 //go:embed fcgo.go
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
33 var go_source string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
34
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
35 type Data struct {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
36 Hno string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
37 Page string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
38 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
39
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
40 func (d *Data) ToCsv() string {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
41 s := []string{d.Hno, d.Page}
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
42 return strings.Join(s, ",")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
43 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
44
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
45 var (
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
46 ver = "0.2"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
47
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
48 dump bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
49 pver bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
50 clean bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
51 skip bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
52 all bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
53 debug bool
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
54 xdwfile string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
55
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
56 txtfile = "fctmp_txt.txt"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
57 infofile = "fctmp_info.csv"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
58 orderfile = "sort.list" // input
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
59 pagefile = "fctmp_page.txt"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
60 output = "output.xdw"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
61 )
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
62
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
63 func init() {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
64 /* INITIALIZE FLAGS */
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
65 flag.BoolVar(&pver, "v", false, "print version")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
66 flag.BoolVar(&dump, "s", false, "dump source")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
67 flag.BoolVar(&all, "a", false, "output all page (default: matched page)")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
68 flag.BoolVar(&clean, "c", false, "clean temporary files & exit")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
69 flag.BoolVar(&skip, "e", false, "use existed files")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
70 flag.BoolVar(&debug, "d", false, "debug mode")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
71 flag.StringVar(&xdwfile, "i", "fc.xdw", "target xdw file")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
72 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
73
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
74 func main() {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
75 flag.Parse()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
76 if pver {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
77 fmt.Printf("fcgo [ver %s]\n", ver)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
78 os.Exit(0)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
79 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
80 if dump {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
81 fmt.Println(go_source)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
82 os.Exit(0)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
83 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
84
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
85 /* PRINT HEADER */
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
86 fmt.Println("===================================================")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
87 fmt.Println(" 普徴のみならず納通なら被保番でソートできるかも... ")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
88 fmt.Printf(" - fcgo [ver %s] -\n", ver)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
89 fmt.Println("===================================================\n")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
90 print_time("now")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
91 fmt.Println("[0] start ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
92
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
93 /* CLEAN TEMPORARY DIRECTORY */
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
94 os.Remove(output)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
95 if !skip {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
96 clean_full()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
97 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
98 if clean {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
99 os.Exit(0)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
100 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
101 print_time("check done")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
102
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
103 fmt.Println("[1] extract ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
104 if !skip {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
105 C.xdw2txt(C.CString(xdwfile), C.CString(txtfile))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
106 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
107 print_time("extract done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
108
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
109 c := make(chan int)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
110 fmt.Println("[2] split ... (run background)")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
111 go func() {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
112 if !skip {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
113 C.xdwsplit1(C.CString(xdwfile))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
114 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
115 print_time("split done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
116 c <- 1
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
117 }()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
118
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
119 fmt.Println("[3] analize ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
120 data_hash, err := analize(txtfile, infofile)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
121 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
122 log.Fatal(err)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
123 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
124 print_time("analize done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
125 debug_print(debug, fmt.Sprintf("len = %d", len(data_hash)))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
126
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
127 fmt.Println("[4] read order ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
128 h_order, n, err := read_order(orderfile)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
129 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
130 log.Fatal(err)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
131 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
132 print_time("read order done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
133 debug_print(debug, fmt.Sprintf("len = %d / %d", len(h_order), n))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
134
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
135 fmt.Println("[5] make_list ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
136 n, err = make_list(h_order, data_hash, pagefile, all)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
137 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
138 log.Fatal(err)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
139 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
140 print_time("make list done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
141 debug_print(debug, fmt.Sprintf("order = %d", n))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
142
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
143 <-c
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
144
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
145 fmt.Println("[6] merge ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
146 clean_mini()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
147 C.xdwmerge(C.CString(pagefile), C.CString(output))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
148 print_time("merge done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
149 clean_mini()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
150
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
151 fmt.Println("[7] page ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
152 C.xdwaddpage(C.CString(output), C.int(1))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
153 print_time("page done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
154
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
155 if !debug {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
156 fmt.Println("[8] clean ...")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
157 clean_full()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
158 print_time("clean done.")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
159 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
160 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
161
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
162 func analize(txtfile, infofile string) (map[string]Data, error) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
163 hash := make(map[string]Data)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
164
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
165 c, err := os.ReadFile(txtfile)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
166 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
167 return hash, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
168 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
169 r := strings.NewReader(string(c))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
170 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder())
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
171 b, err := io.ReadAll(tr)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
172 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
173 return hash, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
174 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
175
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
176 regHno := regexp.MustCompile(`0[1238]0[0-9]{7}`)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
177
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
178 var csv string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
179
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
180 buf := strings.Split(string(b), "期別保険料額")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
181 for p, v := range buf[:len(buf)-1] {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
182 s := zen2han(v)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
183 hno := regHno.FindString(s)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
184 page := fmt.Sprintf("%05d", p + 1)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
185
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
186 data := Data {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
187 Hno: hno,
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
188 Page: page,
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
189 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
190 hash[hno] = data
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
191
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
192 csv += data.ToCsv() + "\n"
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
193 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
194
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
195 if err := os.WriteFile(infofile, []byte(csv), 0644); err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
196 return hash, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
197 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
198 return hash, nil;
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
199 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
200
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
201 func zen2han(s string) (string) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
202 s = strings.ReplaceAll(s, "0", "0")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
203 s = strings.ReplaceAll(s, "1", "1")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
204 s = strings.ReplaceAll(s, "2", "2")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
205 s = strings.ReplaceAll(s, "3", "3")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
206 s = strings.ReplaceAll(s, "4", "4")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
207 s = strings.ReplaceAll(s, "5", "5")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
208 s = strings.ReplaceAll(s, "6", "6")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
209 s = strings.ReplaceAll(s, "7", "7")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
210 s = strings.ReplaceAll(s, "8", "8")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
211 return strings.ReplaceAll(s, "9", "9")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
212 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
213
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
214 func read_order(csvfile string) ([]string, int, error) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
215 var order []string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
216
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
217 c, err := os.ReadFile(csvfile)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
218 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
219 return order, -1, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
220 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
221 r := strings.NewReader(string(c))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
222 tr := transform.NewReader(r, japanese.ShiftJIS.NewDecoder())
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
223 b, err := io.ReadAll(tr)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
224 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
225 return order, -1, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
226 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
227
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
228 n := 0
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
229 cr := csv.NewReader(strings.NewReader(string(b)))
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
230 for {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
231 record, err := cr.Read()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
232 if err == io.EOF {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
233 break
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
234 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
235 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
236 return order, n, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
237 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
238
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
239 s := zen2han(record[0])
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
240 if strings.HasPrefix(s, "0") {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
241 order = append(order, s)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
242 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
243 n++
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
244 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
245 return order, n, nil
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
246 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
247
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
248 func make_list(h_order []string, hash map[string]Data, pagefile string, all bool) (int, error) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
249 var n int
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
250 var list []string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
251 done := make(map[string]bool)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
252
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
253 for _, h := range h_order {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
254 if _, ok := done[h]; !ok {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
255 if data, ok := hash[h]; ok {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
256 list = append(list, data.Page)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
257 done[h] = true
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
258 n++
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
259 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
260 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
261 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
262
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
263 if all {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
264 var p []string
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
265 for h, data := range hash {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
266 if !done[h] {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
267 p = append(p, data.Page)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
268 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
269 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
270 sort.Strings(p)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
271 list = append(list, p...)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
272 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
273
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
274 if err := write_pagefile(pagefile, list); err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
275 return n, err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
276 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
277 return n, nil
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
278 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
279
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
280 func write_pagefile(file string, list []string) error {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
281 f, err := os.OpenFile(file, os.O_RDWR|os.O_CREATE, 0755)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
282 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
283 return err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
284 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
285 for _, p := range list {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
286 fmt.Fprintf(f, "fctmp_%s.xdw\n", p)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
287 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
288 if err := f.Close(); err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
289 return err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
290 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
291 return nil
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
292 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
293
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
294 func print_time(msg string) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
295 now := time.Now()
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
296 fmt.Printf("\t%v # %s\n", now, msg)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
297 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
298
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
299 func debug_print(debug bool, msg string) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
300 if debug {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
301 fmt.Printf("\t%s\n", msg)
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
302 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
303 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
304
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
305 func clean_full() error {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
306 return clean_file("fctmp_")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
307 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
308
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
309 func clean_mini() error {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
310 return clean_file("fctmp_b")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
311 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
312
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
313 func clean_file(prefix string) error {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
314 files, err := os.ReadDir(".")
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
315 if err != nil {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
316 return err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
317 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
318
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
319 for _, file := range files {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
320 if strings.HasPrefix(file.Name(), prefix) {
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
321 os.Remove(file.Name())
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
322 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
323 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
324 return err
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
325 }
0369656be06c many changes.
pyon@macmini
parents:
diff changeset
326