You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
145 lines
4.5 KiB
145 lines
4.5 KiB
<?php
|
|
namespace p3k\url;
|
|
|
|
function display_url($url) {
|
|
# remove scheme and www.
|
|
$url = preg_replace('/^https?:\/\/(www\.)?/', '', $url);
|
|
# if the remaining string has no path components but has a trailing slash, remove the trailing slash
|
|
$url = preg_replace('/^([^\/]+)\/$/', '$1', $url);
|
|
return $url;
|
|
}
|
|
|
|
function add_query_params_to_url($url, $add_params) {
|
|
$parts = parse_url($url);
|
|
if(array_key_exists('query', $parts) && $parts['query']) {
|
|
parse_str($parts['query'], $params);
|
|
} else {
|
|
$params = [];
|
|
}
|
|
|
|
foreach($add_params as $k=>$v) {
|
|
$params[$k] = $v;
|
|
}
|
|
|
|
$parts['query'] = http_build_query($params);
|
|
|
|
return build_url($parts);
|
|
}
|
|
|
|
function strip_tracking_params($url) {
|
|
$parts = parse_url($url);
|
|
|
|
if(!array_key_exists('query', $parts))
|
|
return $url;
|
|
|
|
parse_str($parts['query'], $params);
|
|
|
|
$new_params = [];
|
|
|
|
foreach($params as $key=>$val) {
|
|
if(substr($key, 0, 4) != 'utm_')
|
|
$new_params[$key] = $val;
|
|
}
|
|
|
|
$parts['query'] = http_build_query($new_params);
|
|
|
|
return build_url($parts);
|
|
}
|
|
|
|
// Input: Any URL or string like "aaronparecki.com"
|
|
// Output: Normalized URL (default to http if no scheme, force "/" path)
|
|
// or return false if not a valid URL
|
|
function normalize($url) {
|
|
$parts = parse_url($url);
|
|
|
|
if(array_key_exists('path', $parts) && $parts['path'] == '')
|
|
return false;
|
|
|
|
// parse_url returns just "path" for naked domains
|
|
if(count($parts) == 1 && array_key_exists('path', $parts)) {
|
|
$parts['host'] = $parts['path'];
|
|
unset($parts['path']);
|
|
}
|
|
|
|
if(!array_key_exists('scheme', $parts))
|
|
$parts['scheme'] = 'http';
|
|
|
|
if(!array_key_exists('path', $parts))
|
|
$parts['path'] = '/';
|
|
|
|
// Invalid scheme
|
|
if(!in_array($parts['scheme'], array('http','https')))
|
|
return false;
|
|
|
|
return build_url($parts);
|
|
}
|
|
|
|
// Inverse of parse_url()
|
|
// http://php.net/parse_url
|
|
function build_url($parsed_url) {
|
|
$scheme = !empty($parsed_url['scheme']) ? $parsed_url['scheme'] . '://' : '';
|
|
$host = !empty($parsed_url['host']) ? $parsed_url['host'] : '';
|
|
$port = !empty($parsed_url['port']) ? ':' . $parsed_url['port'] : '';
|
|
$user = !empty($parsed_url['user']) ? $parsed_url['user'] : '';
|
|
$pass = !empty($parsed_url['pass']) ? ':' . $parsed_url['pass'] : '';
|
|
$pass = ($user || $pass) ? "$pass@" : '';
|
|
$path = !empty($parsed_url['path']) ? $parsed_url['path'] : '';
|
|
$query = !empty($parsed_url['query']) ? '?' . $parsed_url['query'] : '';
|
|
$fragment = !empty($parsed_url['fragment']) ? '#' . $parsed_url['fragment'] : '';
|
|
return "$scheme$user$pass$host$port$path$query$fragment";
|
|
}
|
|
|
|
function host_matches($a, $b) {
|
|
return parse_url($a, PHP_URL_HOST) == parse_url($b, PHP_URL_HOST);
|
|
}
|
|
|
|
function is_url($url) {
|
|
return is_string($url) && preg_match('/^https?:\/\/[a-z0-9\.\-]\/?/', $url);
|
|
}
|
|
|
|
function is_public_ip($ip) {
|
|
// http://stackoverflow.com/a/30143143
|
|
|
|
//Private ranges...
|
|
//http://www.iana.org/assignments/iana-ipv4-special-registry/
|
|
$networks = array('10.0.0.0' => '255.0.0.0', //LAN.
|
|
'172.16.0.0' => '255.240.0.0', //LAN.
|
|
'192.168.0.0' => '255.255.0.0', //LAN.
|
|
'127.0.0.0' => '255.0.0.0', //Loopback.
|
|
'169.254.0.0' => '255.255.0.0', //Link-local.
|
|
'100.64.0.0' => '255.192.0.0', //Carrier.
|
|
'192.0.2.0' => '255.255.255.0', //Testing.
|
|
'198.18.0.0' => '255.254.0.0', //Testing.
|
|
'198.51.100.0' => '255.255.255.0', //Testing.
|
|
'203.0.113.0' => '255.255.255.0', //Testing.
|
|
'192.0.0.0' => '255.255.255.0', //Reserved.
|
|
'224.0.0.0' => '224.0.0.0', //Reserved.
|
|
'0.0.0.0' => '255.0.0.0'); //Reserved.
|
|
|
|
$ip = @inet_pton($ip);
|
|
if (strlen($ip) !== 4) { return false; }
|
|
|
|
//Is the IP in a private range?
|
|
foreach($networks as $network_address => $network_mask) {
|
|
$network_address = inet_pton($network_address);
|
|
$network_mask = inet_pton($network_mask);
|
|
assert(strlen($network_address) === 4);
|
|
assert(strlen($network_mask) === 4);
|
|
if (($ip & $network_mask) === $network_address)
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
function geo_to_latlng($uri) {
|
|
if(preg_match('/geo:([\-\+]?[0-9\.]+),([\-\+]?[0-9\.]+)/', $uri, $match)) {
|
|
return array(
|
|
'latitude' => (double)$match[1],
|
|
'longitude' => (double)$match[2],
|
|
);
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|