2 goredo -- redo implementation on pure Go
3 Copyright (C) 2020-2021 Sergey Matveev <stargrave@stargrave.org>
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation, version 3 of the License.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>.
32 "go.cypherpunks.ru/recfile"
40 func mustSetenv(key, value string) {
41 if err := os.Setenv(key, value); err != nil {
46 func mustParseFd(v, name string) *os.File {
47 ptr, err := strconv.ParseUint(v, 10, 64)
51 fd := os.NewFile(uintptr(ptr), name)
53 panic("can not parse fd: " + name)
59 version := flag.Bool("version", false, "print version")
60 warranty := flag.Bool("warranty", false, "print warranty information")
61 symlinks := flag.Bool("symlinks", false, "create necessary symlinks in current directory")
70 fmt.Println(versionGet())
75 for _, cmdName := range []string{
86 fmt.Println(os.Args[0], "<-", cmdName)
87 if err := os.Symlink(os.Args[0], cmdName); err != nil {
102 NoColor = os.Getenv(EnvNoColor) != ""
103 NoSync = os.Getenv(EnvNoSync) == "1"
104 InodeTrust = os.Getenv(EnvInodeNoTrust) == ""
106 TopDir = os.Getenv(EnvTopDir)
110 TopDir, err = filepath.Abs(TopDir)
115 DirPrefix = os.Getenv(EnvDirPrefix)
118 mustSetenv(EnvStderrKeep, "1")
120 if *flagStderrSilent {
121 mustSetenv(EnvStderrSilent, "1")
124 mustSetenv(EnvNoProgress, "1")
127 mustSetenv(EnvDebug, "1")
130 mustSetenv(EnvLogWait, "1")
133 mustSetenv(EnvLogLock, "1")
136 mustSetenv(EnvLogPid, "1")
139 mustSetenv(EnvLogJS, "1")
141 StderrKeep = os.Getenv(EnvStderrKeep) == "1"
142 StderrSilent = os.Getenv(EnvStderrSilent) == "1"
143 NoProgress = os.Getenv(EnvNoProgress) == "1"
144 Debug = os.Getenv(EnvDebug) == "1"
145 LogWait = os.Getenv(EnvLogWait) == "1"
146 LogLock = os.Getenv(EnvLogLock) == "1"
147 LogJS = os.Getenv(EnvLogJS) == "1"
148 if Debug || os.Getenv(EnvLogPid) == "1" {
153 mustSetenv(EnvTrace, "1")
158 traced = os.Getenv(EnvTrace) == "1"
161 // Those are internal envs
162 StderrPrefix = os.Getenv(EnvStderrPrefix)
163 if v := os.Getenv(EnvLevel); v != "" {
164 Level, err = strconv.Atoi(v)
169 panic("negative " + EnvLevel)
173 if v := os.Getenv(EnvDepFd); v != "" {
174 fdDep = mustParseFd(v, EnvDepFd)
176 BuildUUID = os.Getenv(EnvBuildUUID)
180 if _, err = io.ReadFull(rand.Reader, raw[:]); err != nil {
183 raw[6] = (raw[6] & 0x0F) | uint8(4<<4) // version 4
184 BuildUUID = fmt.Sprintf(
186 raw[0:4], raw[4:6], raw[6:8], raw[8:10], raw[10:],
189 tgts = []string{"all"}
194 for i, tgt := range tgts {
196 tgts[i] = cwdMustRel(tgt)
202 cmdName := path.Base(os.Args[0])
204 CDebug, "[%s] run: %s %s cwd:%s dirprefix:%s",
205 BuildUUID, cmdName, tgts, Cwd, DirPrefix,
211 for _, tgt := range tgts {
212 ok, err = ifchange([]string{tgt}, true, traced)
213 if err != nil || !ok {
217 case "redo-ifchange":
218 ok, err = ifchange(tgts, false, traced)
220 err = writeDeps(fdDep, tgts)
222 case "redo-ifcreate":
224 log.Fatalln("no", EnvDepFd)
226 for _, tgt := range tgts {
227 err = ifcreate(fdDep, tgt)
234 log.Fatalln("no", EnvDepFd)
238 for _, what := range tgts {
239 err = cleanupWalker(Cwd, what)
248 log.Fatalln("no", EnvDepFd)
250 err = stamp(fdDep, os.Stdin)
253 log.Fatalln("single target expected")
255 d, t := cwdAndTgt(tgts[0])
257 fd, err = os.Open(path.Join(d, RedoDir, t+LogSuffix))
261 _, err = io.Copy(os.Stdout, fd)
264 log.Fatalln("single target expected")
267 fdTmp, err = ioutil.TempFile("", "")
271 os.Remove(fdTmp.Name())
272 cwd, tgt := cwdAndTgt(tgts[0])
273 doFile, upLevels, err := findDo(fdTmp, cwd, tgt)
277 _, err = fdTmp.Seek(0, 0)
281 r := recfile.NewReader(fdTmp)
283 m, err := r.NextMap()
290 fmt.Println(cwdMustRel(cwd, m["Target"]))
295 p := make([]string, 0, upLevels+2)
297 for i := 0; i < upLevels; i++ {
300 p = append(p, doFile)
301 rel, err := filepath.Rel(Cwd, path.Join(p...))
308 log.Fatalln("unknown command", cmdName)
314 if !ok || err != nil {
317 trace(CDebug, "[%s] finished: %s %s", BuildUUID, cmdName, tgts)