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
|
#!/bin/sh
analyze_path() {
# extract `obs id' and `source name' from path
echo "$@" | awk '
# main part
{
if (NF==1) {
## oi & name
input=($1 "/")
if (input ~ /_oi/) {
## PATTERN: .../$name_oi$oi/...
idx_oi = match(input, /oi[0-9]+/) + 2; # "2" skip the "oi"
len_oi = RLENGTH - 2;
oi = substr(input, idx_oi, len_oi);
idx_name = match(input, /\/[a-zA-Z0-9.+-]+_oi/) + 1;
len_name = RLENGTH - 4;
name = substr(input, idx_name, len_name);
owner = "lwt";
}
else {
## PATTERN: .../$name/$oi/...
idx_oi = match(input, /\/[0-9]+\//) + 1;
len_oi = RLENGTH - 2;
oi = substr(input, idx_oi, len_oi);
idx_name1 = match(input, /\/[a-zA-Z0-9_.+-]+\/[0-9]+\//);
len_name1 = RLENGTH;
name1 = substr(input, idx_name1, len_name1);
idx_name = match(name1, /\/[a-zA-Z0-9_.+-]+\//) + 1;
len_name = RLENGTH - 2;
name = substr(name1, idx_name, len_name);
owner = "zzh";
}
## output
printf("input: %s\n", input)
printf("oi: %s\nname: %s\nowner: %s\n", oi, name, owner)
}
else {
printf("*** WARNING: invalid input: %s\n", $0)
}
}
# END { }
'
}
case "$1" in
-[hH]*)
echo "Usage:"
echo " `basename $0` [ path ]"
exit 1
;;
esac
if [ -z "$1" ]; then
DIR="${PWD}"
else
DIR="$1"
fi
analyze_path "${DIR}"
|
