PowerDNS LUA script which blocks AAAA responses to specific IP's

noipv6.lua

function postresolve ( remoteip, domain, qtype, records, origrcode )
    print ("postresolve called for: ", remoteip, getlocaladdress(), domain, qtype, origrcode)
    setvariable()
    if not matchnetmask(remoteip, {"10.100.0.0/15", "10.0.0.1/32"})  then return -1, ret end -- passthrough for "normal" ips
    for key,val in ipairs(records)
    do
        if val.qtype == pdns.AAAA
        then
            return 0, {} -- drop the answer if we get an AAAA
        end
    end
    return origrcode, records
end