divert(-1)
define(`CUST_IP_PRINT', `src_ip=='$1)
define(`CUST_IP_FOREACH', `dnl
ifelse($#, 0, `',dnl
$#, 1, `CUST_IP_PRINT($1)',dnl
`CUST_IP_PRINT($1) || CUST_IP_FOREACH(shift($@))')')

define(`CUST_BLOCK', `
divert(2)
  if ( CUST_IP_FOREACH($1) ) {
    xlog("L_NOTICE", "*** $rm from '$2`, $si\n");

    append_hf("P-Hint: from '$2`\n");
    append_hf("Remote-Party-ID: <sip:+492319721231@62.191.185.47>;party=calling;screen=yes;privacy=off\n");

    if (method=="INVITE") {
      strip(1);
      prefix("+'$3$4$5`");
    }

    ds_select_domain("'$3`", "4");
    if (method=="INVITE") {
      t_on_failure("2");
    }
    
    xlog("L_NOTICE", "----> before t_relay <----\n");
    t_relay();
    xlog("L_NOTICE", "----> after  t_relay <----\n");

    return;
  }
divert
')
divert