[sub-log-caller]
exten => s,1,NoOp(*** begin sub-log-caller ***)
exten => s,n,GotoIf(${DB_EXISTS(cidname/${CALLERID(num)})}?CNAMCHECK)
;exten => s,n,GotoIf($[${DB_EXISTS(SPAMCHECK/deactivate)} = 0]?ACTIVATE)
exten => s,n,GotoIf($[${DB_EXISTS(SPAMCHECK/deactivate)} = 0]?ANONTEST)
exten => s,n,GotoIf($[${DB(SPAMCHECK/deactivate)} = 1]?CONNECTNOW)
exten => s,n(ACTIVATE),NoOp(Not yet WhiteListed)
exten => s,n,AGI(truecnam.sh,${CALLERID(number)})
exten => s,n,GotoIf($["${SPAM}"="SPAM"]?FLUNKED)
exten => s,n,Playback(silence/1)
exten => s,n,Playback(to-call-num-press)
exten => s,n,Playback(digits/5)
exten => s,n,Read(MYCODE,beep,1,n,1,10)
exten => s,n,GotoIf($["${MYCODE}" = "5"]?ANONTEST)
exten => s,n(FLUNKED),NoOp(*** Caller FLUNKED screening ***)
;exten => s,n,Dial(local/*701@from-internal) ; uncomment to send to 701 VM
exten => s,n,Zapateller()
exten => s,n,Hangup
exten => s,n,Return()
exten => s,n(ANONTEST),GotoIf($[${CALLERID(num)} > 0]?WHITELIST:CONNECTNOW)
exten => s,n(CNAMCHECK),Set(CNAM1=${CALLERID(name)})
exten => s,n,Set(CNAM2=${DB(cidname/${CALLERID(number)})})
exten => s,n,GotoIf($["${CNAM1}" = "${CNAM2}"]?WHITELISTED
exten => s,n(WHITELIST),Set(DB(cidname/${CALLERID(number)})=${CALLERID(name)})
exten => s,n,Set(CALLERID(all)="${CALLERID(name)} <${CALLERID(number)}>")
exten => s,n(WHITELISTED),NoOp(WhiteListed: ${CALLERID(all)})
exten => s,n(CONNECTNOW),NoOp(*** end of sub-log-caller ***)
exten => s,n,Return()
;-----------------------------------------------------------------------------$