/usr/share/epic5/lice5/lice/lice.dns is in epic5-script-lice 1:5.3.0-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | #
# IRC Script Program. For use with ircii-EPIC5 clients.
# Copyright (C) 2000 SrfRoG (cag@codehack.com)
#
# ---------------------------------------------------------------------------
# All code by SrfRoG, unless specified. Visit https://lice.muppetz.com
# ---------------------------------------------------------------------------
# Updated for EPIC5 by tjh
IF (word(2 $loadinfo()) != [pf]) {
LOAD -pf $word(1 $loadinfo());
RETURN;
};
PACKAGE LiCe;
# Description: converts from IP -> hostname and viceversa
alias _proc.dns_result (adr) {
@ :res = convert($adr);
IF (temp.whois_away > 0) {
ECHO $fmt.whois_mid(Nslookup ${res?res:[Unknown]});
}{
iecho $adr is ${res?res:[Unknown]};
};
};
alias dns {
UNLESS (@) {
uecho Usage: /DNS < nick | [host | ip address] >;
RETURN;
};
^LOCAL who $0;
IF (match(*.* $who)) {
_proc.dns_result $who;
}{
USERHOST $who -CMD IF ([$4]!=[<UNKNOWN>]) {
_proc.dns_result $4;
}{
XECHO -B $who\: nick not online.;
};
};
};
ALIAS findip {dns $*};
ALIAS nsl {dns $*};
#tjh/09
|