SILENT KILLERPanel

Current Path: > > usr > share > awk > 

Operation   : Linux premium131.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64
Software     : Apache
Server IP    : 162.0.232.56 | Your IP: 216.73.216.111
Domains      : 1034 Domain(s)
Permission   : [ 0755 ]

Files and Folders in: //usr/share/awk/

NameTypeSizeLast ModifiedActions
assert.awk File 383 bytes February 25 2018 17:17:35.
bits2str.awk File 334 bytes February 25 2018 17:17:35.
cliff_rand.awk File 307 bytes February 25 2018 17:17:35.
ctime.awk File 234 bytes February 25 2018 17:17:35.
ftrans.awk File 315 bytes February 25 2018 17:17:35.
getopt.awk File 2202 bytes February 25 2018 17:17:35.
gettime.awk File 2491 bytes February 25 2018 17:17:35.
group.awk File 1765 bytes April 18 2022 15:55:53.
have_mpfr.awk File 221 bytes February 25 2018 17:17:35.
inplace.awk File 1996 bytes February 25 2018 17:17:35.
intdiv0.awk File 462 bytes February 25 2018 17:17:35.
join.awk File 378 bytes February 25 2018 17:17:35.
libintl.awk File 238 bytes February 25 2018 17:17:35.
noassign.awk File 422 bytes February 25 2018 17:17:35.
ord.awk File 937 bytes February 25 2018 17:17:35.
passwd.awk File 1199 bytes April 18 2022 15:55:53.
processarray.awk File 355 bytes February 25 2018 17:17:35.
quicksort.awk File 1031 bytes February 25 2018 17:17:35.
readable.awk File 489 bytes February 25 2018 17:17:35.
readfile.awk File 267 bytes February 25 2018 17:17:35.
rewind.awk File 404 bytes February 25 2018 17:17:35.
round.awk File 661 bytes February 25 2018 17:17:35.
shellquote.awk File 472 bytes February 25 2018 17:17:35.
strtonum.awk File 1454 bytes February 25 2018 17:17:35.
walkarray.awk File 214 bytes February 25 2018 17:17:35.
zerofile.awk File 424 bytes February 25 2018 17:17:35.

Reading File: //usr/share/awk//ord.awk

# ord.awk --- do ord and chr

# Global identifiers:
#    _ord_:        numerical values indexed by characters
#    _ord_init:    function to initialize _ord_
#
# Arnold Robbins, arnold@skeeve.com, Public Domain
# 16 January, 1992
# 20 July, 1992, revised

BEGIN    { _ord_init() }

function _ord_init(    low, high, i, t)
{
    low = sprintf("%c", 7) # BEL is ascii 7
    if (low == "\a") {    # regular ascii
        low = 0
        high = 127
    } else if (sprintf("%c", 128 + 7) == "\a") {
        # ascii, mark parity
        low = 128
        high = 255
    } else {        # ebcdic(!)
        low = 0
        high = 255
    }

    for (i = low; i <= high; i++) {
        t = sprintf("%c", i)
        _ord_[t] = i
    }
}
function ord(str,    c)
{
    # only first character is of interest
    c = substr(str, 1, 1)
    return _ord_[c]
}

function chr(c)
{
    # force c to be numeric by adding 0
    return sprintf("%c", c + 0)
}

SILENT KILLER Tool