Skip to main content
Fonte Link
Peter Krauss
  • 1,9mil
  • 2
  • 19
  • 43

Depois de ter consultado esta página e ter começado a rascunhar uma gambiarra, reparei que eu tinha no "baú" uma função pronta... E olhando acima reparo que o fundamento já foi dado aqui pelo @DanielOmine, lembrando que celular com DDD tem 11 dígitos e fixo 10 dígitios. PS: sem DDD são 9 e 8 respectivamente.

Foi mais ou menos no ano 2000 que os telefones brasileiros passaram a ter 8 dígitos, e entre 2010 e 2013 que todos os celulares passaram a ter 9 dígitos. Ver normas Anatel.

O algoritmo genérico de interpretação de uma suposta string de telefone expressa em texto livre se baseia na norma Anatel... Só é um pouco mais complicado porque precisa conferir contexto e saber diferenciar casos com e sem DDI e DDD.


A quem possa interessar... Algoritmo que "sanitiza" dados telefônicos digitados, escrita (em PL/SQL) e validada anos atrás... Atualizo se achar algo melhor mais tarde (deixando desde já em Wiki para você editar).

CREATE or replace FUNCTION lib.get_string_tel(text) RETURNS text AS $f$
  SELECT regexp_replace(
      $1
      ,'^.*?((\+?55[\s-]|\+\d\d[\s-])?\s*\(?\d\d\)?[\s\-\.]*\d[\.\s]?\d\d[\d\s\.\-]+).*?$'
      ,'\1'
    )
$f$ LANGUAGE SQL IMMUTABLE;
CREATE or replace FUNCTION lib.telbr_split(
  p_tel text  -- a string contendo o telefone 
  ,p_pode_ddi boolean DEFAULT true -- deixa preceder 55?
  ,p_ddd_default text DEFAULT '11' -- contexto Sampa
  ,p_max int DEFAULT 21  -- tamaho  máximo da string para remover outros dígitos
) RETURNS text[] AS $f$
DECLARE
  basenum text;
  digits text;
  len int;
  ret text[];
BEGIN
  basenum := trim(p_tel);
  IF length(basenum)>p_max THEN
    basenum := lib.get_string_tel(basenum);
  END IF;
  digits := lib.digits(basenum);
  IF p_pode_ddi THEN
    IF length(digits)>=14 THEN
      basenum := regexp_replace(basenum,'^[^\d]*\d\d','');
      digits := lib.digits(basenum);
    ELSEIF length(digits)>=12 AND substr(digits,1,2)='55' THEN
      basenum := regexp_replace(basenum,'^[^\d]*55','');
      digits := lib.digits(basenum);
    END IF;
  END IF;
  digits := regexp_replace(digits,'^0+','');
  len := length(digits);
  IF len<=9 THEN
    digits := p_ddd_default||digits;
  END IF;
  RETURN array[substr(digits,1,2), substr(digits,3)];
END
$f$ LANGUAGE PLpgSQL IMMUTABLE;

A primeira função faz extração da string contendo aparentemente um número de telefone no meio de texto livre.
Por exemplo outro dia cadastraram Iphone 6s plus (11) 9 1234-5678 como número de telefone um daqueles formulários do Google.

A segunda é que de fato normaliza e explode o número duas partes, DDD e número.

A linguagem PL/SQL (bases PostgreSQL ou Oracle) é quase um Pascal, bem facil de converter para PHP, Javascript, etc. Só ter paciência.

Publicação convertida em Wiki Comunitário por Peter Krauss