php取顶级域名

<?php
function getTopLevelDomain($url) {
    $parts = parse_url($url);
    if (isset($parts['host'])) {
        $host = $parts['host'];
        $tlds = array('com', 'org', 'net', 'edu', 'gov', 'mil', 'int', 'biz', 'info', 'name', 'pro', 'museum', 'coop', 'aero', 'xxx', 'idv', 'mobi', 'tel', 'travel', 'arpa', 'root', 'post', 'jobs', 'co.uk', 'ac.uk', 'gov.uk', 'net.uk', 'org.uk', 'me.uk', 'co.in', 'firm.in', 'ind.in', 'nic.in', 'org.in', 'gen.in', 'res.in', 'ac.in', 'co.tt', 'or.tt', 'go.tt', 'mb.tt', 'ms.tt', 'ph.tt', 'co.za', 'org.za', 'web.za', 'ac.za', 'grondarbeiders.za', 'nyt.za', 'tm.za', 'work.za', 'gs.za', 'za', 'com.au', 'org.au', 'net.au', 'edu.au', 'gov.au', 'id.au', 'info.au', 'asn.au', 'conf.au', 'dev.au', 'int.au', 'nic.au', 'pro.au', 'tm.au', 'travel.au', 'co.nz', 'org.nz', 'gen.nz', 'kiwi.nz', 'net.nz', 'ac.nz', 'nom.nz', 'tm.nz', 'co.ca', 'com.ca', 'org.ca', 'net.ca', 'edu.ca', 'gov.ca', 'mil.ca', 'int.ca', 'coop.ca', 'aero.ca', 'xxx.ca', 'idv.ca', 'mob.ca', 'tel.ca', 'travel.ca', 'arpa.ca', 'post.ca', 'bc.ca', 'mb.ca', 'nb.ca', 'nl.ca', 'ns.ca', 'nt.ca', 'nu.ca', 'on.ca', 'pe.ca', 'qc.ca', 'sk.ca', 'yk.ca', 'ab.ca', 'bc.ca', 'mb.ca', 'nb.ca', 'nl.ca', 'ns.ca', 'nt.ca', 'nu.ca', 'on.ca', 'pe.ca', 'qc.ca', 'sk.ca', 'yk.ca', 'com.br', 'org.br', 'net.br', 'edu.br', 'gov.br', 'mil.br', 'int.br', 'emp.br', 'eco.br', 'pro.br', 'tel.br', 'mil.br', 'name.br', 'arts.br', 'com.sg', 'net.sg', 'org.sg', 'gov.sg', 'edu.sg', 'per.sg', 'com.my', 'net.my', 'org.my', 'gov.my', 'edu.my', 'mil.my', 'id.my', 'name.my', 'pro.my', 'tm.my', 'com.ph', 'org.ph', 'net.ph', 'edu.ph', 'gov.ph', 'mil.ph', 'com.th', 'org.th', 'net.th', 'edu.th', 'gov.th', 'mil.th', 'int.th', 'pro.th', 'co.jp', 'ne.jp', 'or.jp', 'go.jp', 'ac.jp', 'co.kr', 'ne.kr', 'or.kr', 'go.kr', 'ac.kr', 'co.in', 'firm.in', 'ind.in', 'nic.in', 'org.in', 'gen.in', 'res.in', 'ac.in', 'co.tt', 'or.tt', 'go.tt', 'mb.tt', 'ms.tt', 'ph.tt', 'co.za', 'org.za', 'web.za', 'ac.za', 'grondarbeiders.za', 'nyt.za', 'tm.za', 'work.za', 'gs.za', 'za', 'com.au', 'org.au', 'net.au', 'edu.au', 'gov.au', 'id.au', 'info.au', 'asn.au', 'conf.au', 'dev.au', 'int.au', 'nic.au', 'pro.au', 'tm.au', 'travel.au', 'co.nz', 'org.nz', 'gen.nz', 'kiwi.nz', 'net.nz', 'ac.nz', 'nom.nz', 'tm.nz', 'co.ca', 'com.ca', 'org.ca', 'net.ca', 'edu.ca', 'gov.ca', 'mil.ca', 'int.ca', 'coop.ca', 'aero.ca', 'xxx.ca', 'idv.ca', 'mob.ca', 'tel.ca', 'travel.ca', 'arpa.ca', 'post.ca', 'bc.ca', 'mb.ca', 'nb.ca', 'nl.ca', 'ns.ca', 'nt.ca', 'nu.ca', 'on.ca', 'pe.ca', 'qc.ca', 'sk.ca', 'yk.ca', 'ab.ca', 'bc.ca', 'mb.ca', 'nb.ca', 'nl.ca', 'ns.ca', 'nt.ca', 'nu.ca', 'on.ca', 'pe.ca', 'qc.ca', 'sk.ca', 'yk.ca');
        $hostParts = explode('.', $host);
        $tld = array_pop($hostParts);
        if (in_array($tld, $tlds)) {
            return $tld;
        } else {
            return $tld . '.' . array_pop($hostParts);
        }
    }
    return null;
}

$url = "https://www.example.com/path/to/page";
$tld = getTopLevelDomain($url);
echo "Top Level Domain: " . $tld; // 输出: com
?>

<?php
$host = idn_to_ascii($host);
?>