// Tester éventuellement la présence de 'http://'
if (!strstr($url, 'http://')) $url = 'http://'.$url';

// Extraction du NDD complet
$url_sliced_array = explode('/', $url);
$extracted_domain = $url_sliced_array[2];

/*
// Explications :
$url_sliced_array[0] == 'http:';
$url_sliced_array[1] == ''; // Chaîne vide !
$url_sliced_array[2] == '[[subsubdomain.]subdomain.]domain.tld[.uppertld]'; // [item] optionnel... SSV...
// etc... (éventuels répertoire, sous-répertoire et nom de page web [avec ou sans paramètres])
*/

// A tester :
// $extracted_domain = explode('/', $url)[2]; // Pourquoi pas ? Et ce serait encore plus rapide...
// Mais là, j'ai un doute sur les capacités du préprocesseur PHP...

function format_submitted_url($url)
{
	if (strstr($url, 'http://')) $url = substr($url,7); // On enlève le http:// avant le traitement
	if (substr($url,-1) != '/') $url = $url.'/'; // S'il n'y en a pas, on ajoute un / arbitraire à la fin de l'URL
	$url = str_replace('//','/',$url); // Si des fieffés tricheurs mettent un ou deux / à la fin... C'est ballot, mais on ne sait jamais...
	// Traitement ( si pas de ww[w]X présent)
	if (!preg_match("!^[w]{2}[w]?[0-9]+!i",$url))
	{
		// On considère toujours que c'est un sous-domaine
		if (preg_match("!^[w]{3}\.!i",$url)) $url = substr($url,4); // On supprime les www et le point éventuels (si domaine) !
		if (preg_match("!^[w]{2}\.!i",$url)) $url = substr($url,3); // On supprime les ww et le point éventuels (si domaine), il arrive parfois qu'un w soit oublié !
		// Si ce n'est pas un sous-domaine avéré (voire encore pire) --> On va remettre les www et le point !
		if (preg_match("!^[^.]+\.([a-z]{2,4}|[a-z]{2}\.[a-z]{2})/!i",$url)) $url = 'www.'.$url;
		elseif (preg_match("!^[^.]+\.(com\.[a-z]{2}|int\.[a-z]{2}|edu\.[a-z]{2}|jed\.[a-z]{2}|gov\.[a-z]{2}|gouv\.[a-z]{2}|asso\.[a-z]{2})/!i",$url)) $url = 'www.'.$url;
	}
	// On supprime le / qui se trouve à la fin de l'URL (il vaut mieux supprimer celui que l'on a ajouté si il y a des paramètres ou une page spécifique)
	$url = 'http://'.substr($url,0,(strlen($url) - 1)); // On remet aussi le http://, c'est mieux !
	// Et vlan ! On renvoit le bazar... Mais sans majuscules !
	return strtolower($url);
}

// Tester éventuellement la présence de 'http://'
if (strstr($url, 'http://')) $url = substr($url,7); // On enlève le http:// avant le traitement
if (substr($url,-1) != '/') $url = $url.'/'; // S'il n'y en a pas, on ajoute un / arbitraire à la fin de l'URL

// Y a-t-il des www ou autre forme ? si oui, on les vire !
if (preg_match("!^[w]{2}[w]?[0-9]+!i",$url))
{
	$sliced_www = explode('.',$url);
	$sliced_www[0] = '';
	$url = substr(implode('.',$sliced_www),1);
}

// Extraction du NDD complet sans aucun sous-domaine
$url_sliced_array = explode('/', $url);
if ((preg_match("!^[^.]+\.([a-z]{2,4}|[a-z]{2}\.[a-z]{2})/!i",$url_sliced_array[2])) ||
 (preg_match("!^[^.]+\.(com\.[a-z]{2}|int\.[a-z]{2}|edu\.[a-z]{2}|jed\.[a-z]{2}|gov\.[a-z]{2}|gouv\.[a-z]{2}|asso\.[a-z]{2})/!i",$url_sliced_array[2])))
	$extracted_domain = $url_sliced_array[2];
else // il doit y avoir un sous-domaine (voire plus... mais là, c'est zarbi !)
{
	$sliced_subdomain = explode('.',$url_sliced_array[2]);
	$sliced_subdomain[0] = '';
	$extracted_domain = substr(implode('.',$sliced_subdomain),1);
}
// Euh, s'il y a un sous-sous-domaine, c'est c*n... Et ça ne marche pas ! lol

if (preg_match("!^[w]{2}[w]?[0-9]+!i",$url))

if (preg_match("!^[w]{2}[w]?[0-9]*!i",$url))