[[sysadmin:radpreply]]

[Пример]подмены маски в radreply

Найти:

sub authorize {
  print  $sock "auth\n"; 
  $answer=<$sock>;
  
  print $sock serialize(\%RAD_REQUEST); 
  $answer=<$sock>;
  print $sock serialize(\%RAD_REPLY); 
  $answer=<$sock>;
  print $sock serialize(\%RAD_CHECK); 
  $answer=<$sock>;

        if ($answer eq "reject\n") {
      return RLM_MODULE_REJECT;
        }
      $answer=<$sock>;
  %RAD_REPLY=%{unserialize($answer)};
  
  if ($RAD_REPLY{'Packet-Type'} eq "Access-Accept") {
      if ($RAD_REPLY{'Framed-IP-Netmask'} eq "255.255.255.255") {
    
    $RAD_REPLY{'Framed-IP-Netmask'} = "255.255.255.0";
      }
  }
  
  $answer=<$sock>;
        %RAD_CHECK=%{unserialize($answer)};
        return RLM_MODULE_OK;
}

Заменить на:

if ($RAD_REPLY{'Packet-Type'} eq "Access-Accept") {
      if ($RAD_REPLY{'Framed-IP-Netmask'} eq "255.255.255.255") {
    
    $RAD_REPLY{'Framed-IP-Netmask'} = "255.255.255.0";
      }
  }
  • sysadmin/radpreply.txt
  • Последние изменения: 2020/04/17 16:13
  • — admin