File: rfc1918_parser.rl

package info (click to toggle)
kamailio 4.2.0-2%2Bdeb8u3
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 56,276 kB
  • sloc: ansic: 552,836; xml: 166,484; sh: 8,659; makefile: 7,676; sql: 6,235; perl: 3,487; yacc: 3,428; python: 1,457; cpp: 1,219; php: 1,047; java: 449; pascal: 194; cs: 40; awk: 27
file content (43 lines) | stat: -rw-r--r-- 912 bytes parent folder | download | duplicates (9)
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
#include "rfc1918_parser.h"


/** Ragel machine **/
%%{
  machine rfc1918_parser;

  action is_rfc1918 {
    is_ip_rfc1918 = 1;
  }

  DIGIT                = "0".."9";
  dec_octet            = DIGIT | ( 0x31..0x39 DIGIT ) | ( "1" DIGIT{2} ) |
                         ( "2" 0x30..0x34 DIGIT ) | ( "25" 0x30..0x35 );

  RFC1918_address      = ( "10." dec_octet "." dec_octet "." dec_octet ) |
                         ( "172." ( ( "1" "6".."9" ) | ( "2" DIGIT ) | ( "3" "0".."1" ) ) "." dec_octet "." dec_octet ) |
                         ( "192.168." dec_octet "." dec_octet );

   main                := RFC1918_address @is_rfc1918;
}%%


/** Data **/
%% write data;


/** exec **/
unsigned int rfc1918_parser_execute(const char *str, size_t len)
{
  int cs = 0;
  const char *p, *pe;
  unsigned int is_ip_rfc1918 = 0;

  p = str;
  pe = str+len;

  %% write init;
  %% write exec;

  return is_ip_rfc1918;
}