blob: 1fa220d788c73190b6e4edc02768524c347297d4 (
plain)
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
# passwd.awk --- access password file information
#
# Arnold Robbins, arnold@skeeve.com, Public Domain
# May 1993
# Revised October 2000
# Revised December 2010
# Revised July 2017
@namespace "foo" # this is foo
@namespace "bar" # this is bar
@namespace "passwd" # move to passwd namespace
BEGIN {
# tailor this to suit your system
Awklib = "/usr/local/libexec/awk/"
}
function awk::endpwent()
{
Count = 0
}
function awk::getpwent()
{
Init()
if (Count < Total) {
return Bycount[++Count]
}
return ""
}
function awk::getpwnam(name)
{
Init()
return Byname[name]
}
function awk::getpwuid(uid)
{
Init()
return Byuid[uid]
}
function Init(oldfs, oldrs, olddol0, pwcat, using_fw, using_fpat)
{
if (Inited) {
return
}
oldfs = FS
oldrs = RS
olddol0 = $0
using_fw = (PROCINFO["FS"] == "FIELDWIDTHS")
using_fpat = (PROCINFO["FS"] == "FPAT")
FS = ":"
RS = "\n"
pwcat = Awklib "pwcat"
while ((pwcat | getline) > 0) {
Byname[$1] = $0
Byuid[$3] = $0
Bycount[++Total] = $0
}
close(pwcat)
Count = 0
Inited = 1
FS = oldfs
if (using_fw) {
FIELDWIDTHS = FIELDWIDTHS
} else if (using_fpat) {
FPAT = FPAT
}
RS = oldrs
$0 = olddol0
}
|