File: filefuncs.awk

package info (click to toggle)
gawk 1%3A4.1.4%2Bdfsg-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 16,836 kB
  • ctags: 5,783
  • sloc: ansic: 48,799; awk: 11,167; yacc: 5,939; sh: 5,579; makefile: 2,554; sed: 121
file content (25 lines) | stat: -rw-r--r-- 536 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
@load "filefuncs"

BEGIN {
   if (chdir(builddir) < 0) {
      printf "Error: chdir failed with ERRNO %s\n", ERRNO
      exit 1
   }

   if (stat(ARGV[0] "api.o", st) < 0) {
      printf "Error: stat(%s) failed with ERRNO %s\n", ARGV[0] "api.o", ERRNO
      exit 1
   }

   nf = split("name dev ino mode nlink uid gid size blocks atime mtime ctime pmode type", f)

   for (i = 1; i <= nf; i++) {
      if (!(f[i] in st)) {
	 printf "stat value for %s is missing\n",f[i]
	 rc = 1
      }
      else
	 delete st[f[i]]
   }
   exit rc+0
}