ajout des fonction __get{h,i,}()
This commit is contained in:
19
lib/ulib/awk
19
lib/ulib/awk
@@ -402,6 +402,25 @@ function do_once(key) {
|
||||
return 1
|
||||
}
|
||||
|
||||
function __geth(field, HEADERS, nbfields, i) {
|
||||
nbfields = array_len(HEADERS)
|
||||
if (int(field) == field) {
|
||||
field = int(field)
|
||||
if (field >= 1 && field <= nbfields) return field
|
||||
else return 0
|
||||
}
|
||||
field = tolower(field)
|
||||
for (i = 1; i <= nbfields; i++) {
|
||||
if (field == tolower(HEADERS[i])) {
|
||||
return i
|
||||
}
|
||||
}
|
||||
return 0
|
||||
}
|
||||
function __geti(num, HEADERS) { if (num != 0) return HEADERS[num] }
|
||||
function __get(field, HEADERS) { return __geti(__geth(field, HEADERS), HEADERS) }
|
||||
|
||||
|
||||
function ogeth(field, nbfields, i) {
|
||||
nbfields = array_len(ORIGHEADERS)
|
||||
if (int(field) == field) {
|
||||
|
||||
Reference in New Issue
Block a user