run.go

   1 /*
   2 goredo -- redo implementation on pure Go
   3 Copyright (C) 2020 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 // Targets runner
  19
  20 package main
  21
  22 import (
  23         "bufio"
  24         "encoding/hex"
  25         "errors"
  26         "flag"
  27         "fmt"
  28         "io"
  29         "os"
  30         "os/exec"
  31         "path"
  32         "strconv"
  33         "strings"
  34         "sync"
  35         "syscall"
  36         "time"
  37
  38         "go.cypherpunks.ru/recfile"
  39         "golang.org/x/sys/unix"
  40 )
  41
  42 const (
  43         EnvDepFd        = "REDO_DEP_FD"
  44         EnvDirPrefix    = "REDO_DIRPREFIX"
  45         EnvBuildUUID    = "REDO_BUILD_UUID"
  46         EnvStderrPrefix = "REDO_STDERR_PREFIX"
  47         EnvTrace        = "REDO_TRACE"
  48         EnvStderrKeep   = "REDO_LOGS"
  49         EnvStderrSilent = "REDO_SILENT"
  50         EnvNoSync       = "REDO_NO_SYNC"
  51
  52         RedoDir    = ".redo"
  53         LockSuffix = ".lock"
  54         DepSuffix  = ".dep"
  55         TmpPrefix  = ".redo."
  56         LogSuffix  = ".log"
  57 )
  58
  59 var (
  60         NoSync       bool = false
  61         StderrKeep   bool = false
  62         StderrSilent bool = false
  63         StderrPrefix string
  64         Jobs         sync.WaitGroup
  65
  66         flagTrace        = flag.Bool("x", false, fmt.Sprintf("trace current target (sh -x) (set %s=1 for others too)", EnvTrace))
  67         flagStderrKeep   = flag.Bool("logs", false, fmt.Sprintf("keep job's stderr (%s=1)", EnvStderrKeep))
  68         flagStderrSilent = flag.Bool("silent", false, fmt.Sprintf("do not print job's stderr (%s=1)", EnvStderrSilent))
  69 )
  70
  71 type RunErr struct {
  72         Tgt      string
  73         DoFile   string
  74         Started  *time.Time
  75         Finished *time.Time
  76         Err      error
  77 }
  78
  79 func (e RunErr) Unwrap() error { return e.Err }
  80
  81 func (e *RunErr) Name() string {
  82         var name string
  83         if e.DoFile == "" {
  84                 name = e.Tgt
  85         } else {
  86                 name = fmt.Sprintf("%s (%s)", e.Tgt, e.DoFile)
  87         }
  88         if e.Finished == nil {
  89                 return name
  90         }
  91         return fmt.Sprintf("%s (%fsec)", name, e.Finished.Sub(*e.Started).Seconds())
  92 }
  93
  94 func (e RunErr) Error() string {
  95         return fmt.Sprintf("%s: %s", e.Name(), e.Err)
  96 }
  97
  98 func mkdirs(pth string) error {
  99         if _, err := os.Stat(pth); err == nil {
 100                 return nil
 101         }
 102         return os.MkdirAll(pth, os.FileMode(0777))
 103 }
 104
 105 func tempsuffix() string {
 106         return strconv.FormatInt((time.Now().UnixNano()+int64(os.Getpid()))&0xFFFFFFFF, 16)
 107 }
 108
 109 func tempfile(dir, prefix string) (*os.File, error) {
 110         // It respects umask, unlike ioutil.TempFile
 111         name := path.Join(dir, TmpPrefix+prefix+"."+tempsuffix())
 112         return os.OpenFile(name, os.O_RDWR|os.O_CREATE|os.O_EXCL, os.FileMode(0666))
 113 }
 114
 115 func isModified(cwd, redoDir, tgt string) (bool, string, error) {
 116         fdDep, err := os.Open(path.Join(redoDir, tgt+DepSuffix))
 117         if err != nil {
 118                 if os.IsNotExist(err) {
 119                         return false, "", nil
 120                 }
 121                 return false, "", err
 122         }
 123         defer fdDep.Close()
 124         r := recfile.NewReader(fdDep)
 125         var ourTs string
 126         for {
 127                 m, err := r.NextMap()
 128                 if err != nil {
 129                         if err == io.EOF {
 130                                 break
 131                         }
 132                         return false, "", err
 133                 }
 134                 if m["Target"] != tgt {
 135                         continue
 136                 }
 137                 fd, err := os.Open(path.Join(cwd, tgt))
 138                 if err != nil {
 139                         if os.IsNotExist(err) {
 140                                 return false, "", nil
 141                         }
 142                         return false, "", err
 143                 }
 144                 defer fd.Close()
 145                 ourTs, err = fileCtime(fd)
 146                 if err != nil {
 147                         return false, "", err
 148                 }
 149                 if ourTs != m["Ctime"] {
 150                         return true, ourTs, nil
 151                 }
 152                 break
 153         }
 154         return false, ourTs, nil
 155 }
 156
 157 func syncDir(dir string) error {
 158         fd, err := os.Open(dir)
 159         if err != nil {
 160                 return err
 161         }
 162         err = fd.Sync()
 163         fd.Close()
 164         return err
 165 }
 166
 167 func runScript(tgtOrig string, errs chan error, traced bool) error {
 168         cwd, tgt := cwdAndTgt(tgtOrig)
 169         redoDir := path.Join(cwd, RedoDir)
 170         if err := mkdirs(redoDir); err != nil {
 171                 return TgtErr{tgtOrig, err}
 172         }
 173
 174         // Acquire lock
 175         fdLock, err := os.OpenFile(
 176                 path.Join(redoDir, tgt+LockSuffix),
 177                 os.O_WRONLY|os.O_TRUNC|os.O_CREATE,
 178                 os.FileMode(0666),
 179         )
 180         if err != nil {
 181                 return TgtErr{tgtOrig, err}
 182         }
 183         lockRelease := func() {
 184                 trace(CLock, "LOCK_UN: %s", fdLock.Name())
 185                 unix.Flock(int(fdLock.Fd()), unix.LOCK_UN)
 186                 fdLock.Close()
 187         }
 188         trace(CLock, "LOCK_NB: %s", fdLock.Name())
 189
 190         // Waiting for job completion, already taken by someone else
 191         if err = unix.Flock(int(fdLock.Fd()), unix.LOCK_EX|unix.LOCK_NB); err != nil {
 192                 if uintptr(err.(syscall.Errno)) != uintptr(unix.EWOULDBLOCK) {
 193                         fdLock.Close()
 194                         return TgtErr{tgtOrig, err}
 195                 }
 196                 Jobs.Add(1)
 197                 trace(CDebug, "waiting: %s", tgtOrig)
 198                 if FdStatus != nil {
 199                         FdStatus.Write([]byte{StatusWait})
 200                 }
 201                 go func() {
 202                         defer Jobs.Done()
 203                         trace(CLock, "LOCK_EX: %s", fdLock.Name())
 204                         unix.Flock(int(fdLock.Fd()), unix.LOCK_EX)
 205                         lockRelease()
 206                         trace(CDebug, "waiting done: %s", tgtOrig)
 207                         if FdStatus != nil {
 208                                 FdStatus.Write([]byte{StatusWaited})
 209                         }
 210                         var depInfo *DepInfo
 211                         fdDep, err := os.Open(path.Join(redoDir, tgt+DepSuffix))
 212                         if err != nil {
 213                                 if os.IsNotExist(err) {
 214                                         err = errors.New("was not built: no .dep")
 215                                 }
 216                                 goto Finish
 217                         }
 218                         defer fdDep.Close()
 219                         depInfo, err = depRead(fdDep)
 220                         if err != nil {
 221                                 goto Finish
 222                         }
 223                         if depInfo.build != BuildUUID {
 224                                 err = errors.New("was not built: build differs")
 225                         }
 226                 Finish:
 227                         if err != nil {
 228                                 err = TgtErr{tgtOrig, err}
 229                         }
 230                         errs <- err
 231                 }()
 232                 return nil
 233         }
 234
 235         // Check if target is not modified externally
 236         modified, tsPrev, err := isModified(cwd, redoDir, tgt)
 237         if err != nil {
 238                 lockRelease()
 239                 return TgtErr{tgtOrig, err}
 240         }
 241         if modified {
 242                 trace(CWarn, "%s externally modified: not redoing", tgtOrig)
 243                 lockRelease()
 244                 go func() {
 245                         errs <- nil
 246                 }()
 247                 return nil
 248         }
 249
 250         // Start preparing .dep
 251         fdDep, err := tempfile(redoDir, tgt+DepSuffix)
 252         if err != nil {
 253                 lockRelease()
 254                 return TgtErr{tgtOrig, err}
 255         }
 256         cleanup := func() {
 257                 lockRelease()
 258                 fdDep.Close()
 259                 os.Remove(fdDep.Name())
 260         }
 261         if _, err = recfile.NewWriter(fdDep).WriteFields(
 262                 recfile.Field{Name: "Build", Value: BuildUUID},
 263         ); err != nil {
 264                 cleanup()
 265                 return TgtErr{tgtOrig, err}
 266         }
 267
 268         // Find .do
 269         doFile, upLevels, err := findDo(fdDep, cwd, tgt)
 270         if err != nil {
 271                 cleanup()
 272                 return TgtErr{tgtOrig, err}
 273         }
 274         if doFile == "" {
 275                 cleanup()
 276                 return TgtErr{tgtOrig, errors.New("no .do found")}
 277         }
 278         if err = writeDep(fdDep, cwd, doFile); err != nil {
 279                 cleanup()
 280                 return TgtErr{tgtOrig, err}
 281         }
 282
 283         // Determine basename and DIRPREFIX
 284         ents := strings.Split(cwd, "/")
 285         ents = ents[len(ents)-upLevels:]
 286         dirPrefix := path.Join(ents...)
 287         cwdOrig := cwd
 288         for i := 0; i < upLevels; i++ {
 289                 cwd = path.Join(cwd, "..")
 290         }
 291         cwd = path.Clean(cwd)
 292         basename := tgt
 293         runErr := RunErr{Tgt: tgtOrig}
 294         if strings.HasPrefix(doFile, "default.") {
 295                 basename = tgt[:len(tgt)-(len(doFile)-len("default.")-len(".do"))-1]
 296                 runErr.DoFile = doFile
 297         }
 298         trace(CWait, "%s", runErr.Name())
 299         doFile = path.Base(doFile)
 300
 301         // Prepare command line
 302         var cmdName string
 303         var args []string
 304         if err = unix.Access(path.Join(cwd, doFile), unix.X_OK); err == nil {
 305                 // Ordinary executable file
 306                 cmdName = doFile
 307                 args = make([]string, 0, 3)
 308         } else {
 309                 fd, err := os.Open(path.Join(cwd, doFile))
 310                 if err != nil {
 311                         cleanup()
 312                         return TgtErr{tgtOrig, err}
 313                 }
 314                 buf := make([]byte, 512)
 315                 n, err := fd.Read(buf)
 316                 if err != nil {
 317                         cleanup()
 318                         return TgtErr{tgtOrig, err}
 319                 }
 320                 if n > 3 && string(buf[:3]) == "#!/" {
 321                         // Shebanged
 322                         t := string(buf[2:n])
 323                         nlIdx := strings.Index(t, "\n")
 324                         if nlIdx == -1 {
 325                                 cleanup()
 326                                 return TgtErr{tgtOrig, errors.New("not fully read shebang")}
 327                         }
 328                         args = strings.Split(t[:nlIdx], " ")
 329                         cmdName, args = args[0], args[1:]
 330                 } else {
 331                         // Shell
 332                         cmdName = "/bin/sh"
 333                         if traced {
 334                                 args = append(args, "-ex")
 335                         } else {
 336                                 args = append(args, "-e")
 337                         }
 338                 }
 339                 args = append(args, doFile)
 340         }
 341
 342         // Temporary file for stdout
 343         fdStdout, err := tempfile(cwd, tgt)
 344         if err != nil {
 345                 cleanup()
 346                 return TgtErr{tgtOrig, err}
 347         }
 348         tmpPath := fdStdout.Name() + ".3" // and for $3
 349         args = append(args, tgt, basename, path.Base(tmpPath))
 350
 351         cmd := exec.Command(cmdName, args...)
 352         cmd.Dir = cwd
 353         cmd.Stdout = fdStdout
 354         cmd.Env = append(os.Environ(), fmt.Sprintf("%s=%d", EnvLevel, Level+1))
 355         cmd.Env = append(cmd.Env, fmt.Sprintf("%s=%s", EnvDirPrefix, dirPrefix))
 356         cmd.Env = append(cmd.Env, fmt.Sprintf("%s=%s", EnvBuildUUID, BuildUUID))
 357
 358         childStderrPrefix := tempsuffix()
 359         cmd.Env = append(cmd.Env, fmt.Sprintf(
 360                 "%s=%s", EnvStderrPrefix, childStderrPrefix,
 361         ))
 362
 363         fdNum := 0
 364         cmd.ExtraFiles = append(cmd.ExtraFiles, fdDep)
 365         cmd.Env = append(cmd.Env, fmt.Sprintf("%s=%d", EnvDepFd, 3+fdNum))
 366         fdNum++
 367
 368         if FdStatus == nil {
 369                 cmd.Env = append(cmd.Env, fmt.Sprintf("%s=NO", EnvStatusFd))
 370         } else {
 371                 cmd.ExtraFiles = append(cmd.ExtraFiles, FdStatus)
 372                 cmd.Env = append(cmd.Env, fmt.Sprintf("%s=%d", EnvStatusFd, 3+fdNum))
 373                 fdNum++
 374         }
 375
 376         if JSR == nil {
 377                 // infinite jobs
 378                 cmd.Env = append(cmd.Env, fmt.Sprintf("%s=NO", EnvJSFd))
 379         } else {
 380                 cmd.ExtraFiles = append(cmd.ExtraFiles, JSR)
 381                 cmd.ExtraFiles = append(cmd.ExtraFiles, JSW)
 382                 cmd.Env = append(cmd.Env, fmt.Sprintf(
 383                         "%s=%d,%d", EnvJSFd, 3+fdNum+0, 3+fdNum+1,
 384                 ))
 385                 fdNum += 2
 386         }
 387
 388         // Preparing stderr
 389         stderr, err := cmd.StderrPipe()
 390         if err != nil {
 391                 panic(err)
 392         }
 393         var fdStderr *os.File
 394         if StderrKeep {
 395                 fdStderr, err = os.OpenFile(
 396                         path.Join(redoDir, tgt+LogSuffix),
 397                         os.O_WRONLY|os.O_CREATE,
 398                         os.FileMode(0666),
 399                 )
 400                 if err != nil {
 401                         cleanup()
 402                         return TgtErr{tgtOrig, err}
 403                 }
 404                 fdStderr.Truncate(0)
 405         }
 406         shCtx := fmt.Sprintf("sh: %s: %s %s [%s]", tgtOrig, cmdName, args, cwd)
 407         trace(CDebug, "%s", shCtx)
 408
 409         Jobs.Add(1)
 410         go func() {
 411                 jsAcquire(shCtx)
 412                 if FdStatus != nil {
 413                         FdStatus.Write([]byte{StatusRun})
 414                 }
 415                 defer func() {
 416                         jsRelease(shCtx)
 417                         lockRelease()
 418                         fdDep.Close()
 419                         fdStdout.Close()
 420                         if fdStderr != nil {
 421                                 fdStderr.Close()
 422                         }
 423                         os.Remove(fdDep.Name())
 424                         os.Remove(fdStdout.Name())
 425                         os.Remove(tmpPath)
 426                         os.Remove(fdLock.Name())
 427                         if FdStatus != nil {
 428                                 FdStatus.Write([]byte{StatusDone})
 429                         }
 430                         Jobs.Done()
 431                 }()
 432                 started := time.Now()
 433                 runErr.Started = &started
 434                 err := cmd.Start()
 435                 if err != nil {
 436                         runErr.Err = err
 437                         errs <- runErr
 438                         return
 439                 }
 440                 pid := fmt.Sprintf("[%d]", cmd.Process.Pid)
 441                 trace(CDebug, "%s runs %s", tgtOrig, pid)
 442
 443                 stderrTerm := make(chan struct{}, 0)
 444                 go func() {
 445                         scanner := bufio.NewScanner(stderr)
 446                         var line string
 447                         ts := new(TAI64N)
 448                         for scanner.Scan() {
 449                                 line = scanner.Text()
 450                                 if strings.HasPrefix(line, childStderrPrefix) {
 451                                         line = line[len(childStderrPrefix):]
 452                                         os.Stderr.WriteString(StderrPrefix + line + "\n")
 453                                         continue
 454                                 }
 455                                 if fdStderr != nil {
 456                                         tai64nNow(ts)
 457                                         LogMutex.Lock()
 458                                         fmt.Fprintf(fdStderr, "@%s %s\n", hex.EncodeToString(ts[:]), line)
 459                                         LogMutex.Unlock()
 460                                 }
 461                                 if StderrSilent {
 462                                         continue
 463                                 }
 464                                 if MyPid == 0 {
 465                                         trace(CNone, "%s", line)
 466                                 } else {
 467                                         trace(CNone, "%s %s", pid, line)
 468                                 }
 469                         }
 470                         close(stderrTerm)
 471                 }()
 472
 473                 // Wait for job completion
 474                 <-stderrTerm
 475                 err = cmd.Wait()
 476                 finished := time.Now()
 477                 runErr.Finished = &finished
 478                 if err != nil {
 479                         runErr.Err = err
 480                         errs <- runErr
 481                         return
 482                 }
 483
 484                 // Was $1 touched?
 485                 if fd, err := os.Open(path.Join(cwdOrig, tgt)); err == nil {
 486                         ts, err := fileCtime(fd)
 487                         fd.Close()
 488                         if err == nil && ts != tsPrev {
 489                                 runErr.Err = errors.New("$1 was explicitly touched")
 490                                 errs <- runErr
 491                                 fd.Close()
 492                                 return
 493                         }
 494                 }
 495
 496                 // Does it produce both stdout and tmp?
 497                 fiStdout, err := os.Stat(fdStdout.Name())
 498                 if err != nil {
 499                         runErr.Err = err
 500                         errs <- runErr
 501                         return
 502                 }
 503                 tmpExists := false
 504                 _, err = os.Stat(tmpPath)
 505                 if err == nil {
 506                         if fiStdout.Size() > 0 {
 507                                 runErr.Err = errors.New("created both tmp and stdout")
 508                                 errs <- runErr
 509                                 return
 510                         }
 511                         tmpExists = true
 512                 } else if !os.IsNotExist(err) {
 513                         runErr.Err = err
 514                         errs <- runErr
 515                         return
 516                 }
 517
 518                 // Determine what file we must process at last
 519                 var fd *os.File
 520                 if tmpExists {
 521                         fd, err = os.Open(tmpPath)
 522                         if err != nil {
 523                                 goto Finish
 524                         }
 525                         defer fd.Close()
 526                 } else if fiStdout.Size() > 0 {
 527                         fd = fdStdout
 528                 }
 529
 530                 // Do we need to ifcreate it, of ifchange with renaming?
 531                 if fd == nil {
 532                         err = ifcreate(fdDep, tgt)
 533                         if err != nil {
 534                                 goto Finish
 535                         }
 536                 } else {
 537                         if !NoSync {
 538                                 err = fd.Sync()
 539                                 if err != nil {
 540                                         goto Finish
 541                                 }
 542                         }
 543                         err = os.Rename(fd.Name(), path.Join(cwdOrig, tgt))
 544                         if err != nil {
 545                                 goto Finish
 546                         }
 547                         if !NoSync {
 548                                 err = syncDir(cwdOrig)
 549                                 if err != nil {
 550                                         goto Finish
 551                                 }
 552                         }
 553                         err = writeDep(fdDep, cwdOrig, tgt)
 554                         if err != nil {
 555                                 goto Finish
 556                         }
 557                 }
 558
 559                 // Commit .dep
 560                 if !NoSync {
 561                         err = fdDep.Sync()
 562                         if err != nil {
 563                                 goto Finish
 564                         }
 565                 }
 566                 err = os.Rename(fdDep.Name(), path.Join(redoDir, tgt+DepSuffix))
 567                 if err != nil {
 568                         goto Finish
 569                 }
 570                 if !NoSync {
 571                         err = syncDir(redoDir)
 572                         if err != nil {
 573                                 goto Finish
 574                         }
 575                 }
 576         Finish:
 577                 runErr.Err = err
 578                 errs <- runErr
 579         }()
 580         return nil
 581 }
 582
 583 func isOkRun(err error) bool {
 584         if err == nil {
 585                 return true
 586         }
 587         if err, ok := err.(RunErr); ok && err.Err == nil {
 588                 trace(CRedo, "%s", err.Name())
 589                 return true
 590         }
 591         trace(CErr, "%s", err)
 592         return false
 593 }