code / bp

   1 # This file defines some web-related patterns
   2 url: (
   3     ("https"/"http"/"ftp") "://" [>..`@ +url-char [`: +url-char] `@]
   4         (ipv4/ipv6/domain/domain-segment) [`: int] [url-path]
   5     / "mailto:" email
   6     / "file://" +(`/ *url-char)
   7 )
   8 url-path: +(`/ *url-char) [`? +(+url-char`=+url-char)%`&]
   9 ipv4: 4 int % `.
  10 ipv6: 8 (4 Hex) % `:
  11 domain-segment: +(Abc/digit/`-)
  12 domain: 2+domain-segment % `.
  13 url-char: Abc/digit/`$,-,_,.,+,!,*,',(,),,,%
  14 email: +(Abc/digit/`.,-,+) `@ domain