main.go

   1 /*
   2 goredo -- djb's redo implementation on pure Go
   3 Copyright (C) 2020-2021 Sergey Matveev <stargrave@stargrave.org>
   4
   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.
   8
   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.
  13
  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/>.
  16 */
  17
  18 package main
  19
  20 import (
  21         "bufio"
  22         "bytes"
  23         "crypto/rand"
  24         "flag"
  25         "fmt"
  26         "io"
  27         "io/ioutil"
  28         "log"
  29         "os"
  30         "path"
  31         "path/filepath"
  32         "runtime"
  33         "sort"
  34         "strconv"
  35
  36         "go.cypherpunks.ru/recfile"
  37         "golang.org/x/sys/unix"
  38 )
  39
  40 var (
  41         Cwd       string
  42         BuildUUID string
  43         IsTopRedo bool // is it the top redo instance
  44 )
  45
  46 func mustSetenv(key, value string) {
  47         if err := os.Setenv(key, value); err != nil {
  48                 panic(err)
  49         }
  50 }
  51
  52 func mustParseFd(v, name string) *os.File {
  53         ptr, err := strconv.ParseUint(v, 10, 64)
  54         if err != nil {
  55                 panic(err)
  56         }
  57         fd := os.NewFile(uintptr(ptr), name)
  58         if fd == nil {
  59                 panic("can not parse fd: " + name)
  60         }
  61         return fd
  62 }
  63
  64 func main() {
  65         version := flag.Bool("version", false, "print version")
  66         warranty := flag.Bool("warranty", false, "print warranty information")
  67         symlinks := flag.Bool("symlinks", false, "create necessary symlinks in current directory")
  68
  69         flag.Usage = func() { usage(os.Args[0]) }
  70         flag.Parse()
  71         if *warranty {
  72                 fmt.Println(Warranty)
  73                 return
  74         }
  75         if *version {
  76                 fmt.Println("goredo", Version, "built with", runtime.Version())
  77                 return
  78         }
  79         if *symlinks {
  80                 rc := 0
  81                 for _, cmdName := range []string{
  82                         "redo",
  83                         "redo-affects",
  84                         "redo-always",
  85                         "redo-cleanup",
  86                         "redo-dot",
  87                         "redo-ifchange",
  88                         "redo-ifcreate",
  89                         "redo-log",
  90                         "redo-ood",
  91                         "redo-sources",
  92                         "redo-stamp",
  93                         "redo-targets",
  94                         "redo-whichdo",
  95                 } {
  96                         fmt.Println(os.Args[0], "<-", cmdName)
  97                         if err := os.Symlink(os.Args[0], cmdName); err != nil {
  98                                 rc = 1
  99                                 log.Println(err)
 100                         }
 101                 }
 102                 os.Exit(rc)
 103         }
 104         log.SetFlags(0)
 105
 106         var err error
 107         Cwd, err = os.Getwd()
 108         if err != nil {
 109                 log.Fatalln(err)
 110         }
 111
 112         NoColor = os.Getenv(EnvNoColor) != ""
 113         NoSync = os.Getenv(EnvNoSync) == "1"
 114         InodeTrust = os.Getenv(EnvInodeNoTrust) == ""
 115
 116         TopDir = os.Getenv(EnvTopDir)
 117         if TopDir == "" {
 118                 TopDir = "/"
 119         } else {
 120                 TopDir, err = filepath.Abs(TopDir)
 121                 if err != nil {
 122                         panic(err)
 123                 }
 124         }
 125         DirPrefix = os.Getenv(EnvDirPrefix)
 126
 127         if *flagStderrKeep {
 128                 mustSetenv(EnvStderrKeep, "1")
 129         }
 130         if *flagStderrSilent {
 131                 mustSetenv(EnvStderrSilent, "1")
 132         }
 133         if *flagNoProgress {
 134                 mustSetenv(EnvNoProgress, "1")
 135         }
 136         if *flagDebug {
 137                 mustSetenv(EnvDebug, "1")
 138         }
 139         if *flagLogWait {
 140                 mustSetenv(EnvLogWait, "1")
 141         }
 142         if *flagLogLock {
 143                 mustSetenv(EnvLogLock, "1")
 144         }
 145         if *flagLogPid {
 146                 mustSetenv(EnvLogPid, "1")
 147         }
 148         if *flagLogJS {
 149                 mustSetenv(EnvLogJS, "1")
 150         }
 151         StderrKeep = os.Getenv(EnvStderrKeep) == "1"
 152         StderrSilent = os.Getenv(EnvStderrSilent) == "1"
 153         NoProgress = os.Getenv(EnvNoProgress) == "1"
 154         Debug = os.Getenv(EnvDebug) == "1"
 155         LogWait = os.Getenv(EnvLogWait) == "1"
 156         LogLock = os.Getenv(EnvLogLock) == "1"
 157         LogJS = os.Getenv(EnvLogJS) == "1"
 158         if Debug || os.Getenv(EnvLogPid) == "1" {
 159                 MyPid = os.Getpid()
 160         }
 161         var traced bool
 162         if *flagTraceAll {
 163                 mustSetenv(EnvTrace, "1")
 164         }
 165         if os.Getenv(EnvTrace) == "1" {
 166                 TracedAll = true
 167                 traced = true
 168         } else {
 169                 traced = *flagTrace
 170         }
 171
 172         // Those are internal envs
 173         FdOODTgts, err = ioutil.TempFile("", "ood-tgts")
 174         if err != nil {
 175                 panic(err)
 176         }
 177         if err = os.Remove(FdOODTgts.Name()); err != nil {
 178                 panic(err)
 179         }
 180         FdOODTgtsLock, err = ioutil.TempFile("", "ood-tgts.lock")
 181         if err != nil {
 182                 panic(err)
 183         }
 184         if err = os.Remove(FdOODTgtsLock.Name()); err != nil {
 185                 panic(err)
 186         }
 187
 188         if v := os.Getenv(EnvOODTgtsFd); v != "" {
 189                 fd := mustParseFd(v, EnvOODTgtsFd)
 190                 fdLock := mustParseFd(v, EnvOODTgtsLockFd)
 191                 if err = unix.Flock(int(fdLock.Fd()), unix.LOCK_EX); err != nil {
 192                         panic(err)
 193                 }
 194                 if _, err = fd.Seek(0, io.SeekStart); err != nil {
 195                         panic(err)
 196                 }
 197                 tgtsRaw, err := ioutil.ReadAll(bufio.NewReader(fd))
 198                 if err != nil {
 199                         panic(err)
 200                 }
 201                 unix.Flock(int(fdLock.Fd()), unix.LOCK_UN)
 202                 OODTgts = map[string]struct{}{}
 203                 for _, tgtRaw := range bytes.Split(tgtsRaw, []byte{0}) {
 204                         t := string(tgtRaw)
 205                         if t == "" {
 206                                 continue
 207                         }
 208                         OODTgts[t] = struct{}{}
 209                         trace(CDebug, "ood: known to be: %s", t)
 210                 }
 211         }
 212
 213         StderrPrefix = os.Getenv(EnvStderrPrefix)
 214         if v := os.Getenv(EnvLevel); v != "" {
 215                 Level, err = strconv.Atoi(v)
 216                 if err != nil {
 217                         panic(err)
 218                 }
 219                 if Level < 0 {
 220                         panic("negative " + EnvLevel)
 221                 }
 222         }
 223
 224         var fdDep *os.File
 225         if v := os.Getenv(EnvDepFd); v != "" {
 226                 fdDep = mustParseFd(v, EnvDepFd)
 227         }
 228
 229         tgts := flag.Args()
 230         BuildUUID = os.Getenv(EnvBuildUUID)
 231         tgtsWasEmpty := len(tgts) == 0
 232         if BuildUUID == "" {
 233                 IsTopRedo = true
 234                 raw := new([16]byte)
 235                 if _, err = io.ReadFull(rand.Reader, raw[:]); err != nil {
 236                         log.Fatalln(err)
 237                 }
 238                 raw[6] = (raw[6] & 0x0F) | uint8(4<<4) // version 4
 239                 BuildUUID = fmt.Sprintf(
 240                         "%x-%x-%x-%x-%x",
 241                         raw[0:4], raw[4:6], raw[6:8], raw[8:10], raw[10:],
 242                 )
 243                 if tgtsWasEmpty {
 244                         tgts = []string{"all"}
 245                 }
 246         }
 247
 248         statusInit()
 249
 250         for i, tgt := range tgts {
 251                 if path.IsAbs(tgt) {
 252                         tgts[i] = cwdMustRel(tgt)
 253                 }
 254         }
 255
 256         ok := true
 257         err = nil
 258         cmdName := path.Base(os.Args[0])
 259         trace(
 260                 CDebug, "[%s] run: %s %s cwd:%s dirprefix:%s",
 261                 BuildUUID, cmdName, tgts, Cwd, DirPrefix,
 262         )
 263
 264 CmdSwitch:
 265         switch cmdName {
 266         case "redo":
 267                 for _, tgt := range tgts {
 268                         ok, err = ifchange([]string{tgt}, true, traced)
 269                         if err != nil || !ok {
 270                                 break
 271                         }
 272                 }
 273         case "redo-ifchange":
 274                 ok, err = ifchange(tgts, false, traced)
 275                 if err == nil {
 276                         err = writeDeps(fdDep, tgts)
 277                 }
 278         case "redo-ifcreate":
 279                 if fdDep == nil {
 280                         log.Fatalln("no", EnvDepFd)
 281                 }
 282                 for _, tgt := range tgts {
 283                         err = ifcreate(fdDep, tgt)
 284                         if err != nil {
 285                                 break
 286                         }
 287                 }
 288         case "redo-always":
 289                 if fdDep == nil {
 290                         log.Fatalln("no", EnvDepFd)
 291                 }
 292                 err = always(fdDep)
 293         case "redo-cleanup":
 294                 for _, what := range tgts {
 295                         err = cleanupWalker(Cwd, what)
 296                         if err != nil {
 297                                 break
 298                         }
 299                 }
 300         case "redo-dot":
 301                 err = dotPrint(tgts)
 302         case "redo-stamp":
 303                 if fdDep == nil {
 304                         log.Fatalln("no", EnvDepFd)
 305                 }
 306                 err = stamp(fdDep, os.Stdin)
 307         case "redo-log":
 308                 if len(tgts) != 1 {
 309                         log.Fatalln("single target expected")
 310                 }
 311                 d, t := cwdAndTgt(tgts[0])
 312                 var fd *os.File
 313                 fd, err = os.Open(path.Join(d, RedoDir, t+LogSuffix))
 314                 if err != nil {
 315                         break
 316                 }
 317                 _, err = io.Copy(os.Stdout, fd)
 318         case "redo-whichdo":
 319                 if len(tgts) != 1 {
 320                         log.Fatalln("single target expected")
 321                 }
 322                 var fdTmp *os.File
 323                 fdTmp, err = ioutil.TempFile("", "whichdo")
 324                 if err != nil {
 325                         break
 326                 }
 327                 if err = os.Remove(fdTmp.Name()); err != nil {
 328                         break
 329                 }
 330                 cwd, tgt := cwdAndTgt(tgts[0])
 331                 doFile, upLevels, err := findDo(fdTmp, cwd, tgt)
 332                 if err != nil {
 333                         break
 334                 }
 335                 _, err = fdTmp.Seek(0, io.SeekStart)
 336                 if err != nil {
 337                         break
 338                 }
 339                 r := recfile.NewReader(fdTmp)
 340                 for {
 341                         m, err := r.NextMap()
 342                         if err != nil {
 343                                 if err == io.EOF {
 344                                         break
 345                                 }
 346                                 break CmdSwitch
 347                         }
 348                         fmt.Println(cwdMustRel(cwd, m["Target"]))
 349                 }
 350                 if doFile == "" {
 351                         ok = false
 352                 } else {
 353                         p := make([]string, 0, upLevels+2)
 354                         p = append(p, cwd)
 355                         for i := 0; i < upLevels; i++ {
 356                                 p = append(p, "..")
 357                         }
 358                         p = append(p, doFile)
 359                         rel, err := filepath.Rel(Cwd, path.Join(p...))
 360                         if err != nil {
 361                                 panic(err)
 362                         }
 363                         fmt.Println(rel)
 364                 }
 365         case "redo-targets":
 366                 if tgtsWasEmpty {
 367                         tgts = []string{Cwd}
 368                 }
 369                 tgts, err = targetsWalker(tgts)
 370                 if err != nil {
 371                         break
 372                 }
 373                 sort.Strings(tgts)
 374                 for _, tgt := range tgts {
 375                         fmt.Println(tgt)
 376                 }
 377         case "redo-affects":
 378                 if tgtsWasEmpty {
 379                         log.Fatalln("no targets specified")
 380                 }
 381                 var tgtsKnown []string
 382                 tgtsKnown, err = targetsWalker([]string{Cwd})
 383                 if err != nil {
 384                         break
 385                 }
 386                 deps := map[string]map[string]struct{}{}
 387                 for _, tgt := range tgtsKnown {
 388                         collectDeps(Cwd, tgt, 0, deps, true)
 389                 }
 390                 seen := map[string]struct{}{}
 391                 for _, tgt := range tgts {
 392                         collectWholeDeps(deps[tgt], deps, seen)
 393                 }
 394                 tgts := make([]string, 0, len(seen))
 395                 for dep := range seen {
 396                         tgts = append(tgts, dep)
 397                 }
 398                 sort.Strings(tgts)
 399                 for _, dep := range tgts {
 400                         fmt.Println(dep)
 401                 }
 402         case "redo-ood":
 403                 if tgtsWasEmpty {
 404                         tgts, err = targetsWalker([]string{Cwd})
 405                         if err != nil {
 406                                 break
 407                         }
 408                 }
 409                 sort.Strings(tgts)
 410                 var ood bool
 411                 for _, tgt := range tgts {
 412                         ood, err = isOOD(Cwd, tgt, 0, nil)
 413                         if err != nil {
 414                                 break
 415                         }
 416                         if ood {
 417                                 fmt.Println(tgt)
 418                         }
 419                 }
 420         case "redo-sources":
 421                 if tgtsWasEmpty {
 422                         tgts, err = targetsWalker([]string{Cwd})
 423                         if err != nil {
 424                                 break
 425                         }
 426                 }
 427                 sort.Strings(tgts)
 428                 var srcs []string
 429                 srcs, err = sourcesWalker(tgts)
 430                 sort.Strings(srcs)
 431                 for _, src := range srcs {
 432                         fmt.Println(src)
 433                 }
 434         default:
 435                 log.Fatalln("unknown command", cmdName)
 436         }
 437         if err != nil {
 438                 log.Println(err)
 439         }
 440         rc := 0
 441         if !ok || err != nil {
 442                 rc = 1
 443         }
 444         trace(CDebug, "[%s] finished: %s %s", BuildUUID, cmdName, tgts)
 445         os.Exit(rc)
 446 }