30 lines
1.0 KiB
Plaintext
30 lines
1.0 KiB
Plaintext
%% Copyright (c) 2020-2023, Loïc Hoguin <essen@ninenines.eu>
|
|
%%
|
|
%% Permission to use, copy, modify, and/or distribute this software for any
|
|
%% purpose with or without fee is hereby granted, provided that the above
|
|
%% copyright notice and this permission notice appear in all copies.
|
|
%%
|
|
%% THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
%% WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
%% MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
%% ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
%% WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
%% ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
%% OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
|
|
-module(gun_public_suffix).
|
|
-compile(no_type_opt). %% Until at least OTP-23.
|
|
|
|
-export([match/1]).
|
|
|
|
-spec match(binary()) -> boolean().
|
|
match(Domain) ->
|
|
Subdomains = string:split(Domain, <<".">>, all),
|
|
m(Subdomains).
|
|
|
|
%% GENERATED_M
|
|
m(_) -> false.
|
|
|
|
%% GENERATED_E
|
|
e(_) -> true.
|