ancho_fijo
Lectura de archivos de ancho fijo que empieza por desconfiar del archivo.
El problema
El cliente manda el anexo técnico. Dice: 120 posiciones por línea, UTF-8, monto en las posiciones 61 a 72 con dos decimales implícitos. Uno escribe el parser, lo prueba con el archivo de ejemplo que venía en el correo, funciona, se sube a producción.
Y ahí llega el archivo de verdad. Tiene 118 posiciones. Los nombres vienen en
latin-1 y las tildes se convirtieron en signos de pregunta. Tres filas de las
diez mil traen la fecha en blanco. Y en la segunda semana, un operador exportó
la nómina desde Excel y el archivo pasó a ser un CSV con punto y coma, aunque
siga llamándose nomina.txt.
Nada de eso es difícil de manejar. El problema es cuándo se descubre: después
de escribir el parser, con el proyecto entregado, un viernes. Esta librería
existe para mover ese descubrimiento al día uno, y para que cuando algo falle el
error diga qué pasó en vez de {:error, :invalid}.
Instalación
def deps do
[{:ancho_fijo, "~> 0.3.0"}]
end
Sin dependencias de runtime.
Primero se interroga el archivo
Antes de escribir una línea de layout: detectar/2. Recibe el contenido o una
ruta y responde "¿esto es realmente lo que me dijeron que es?".
{:ok, reporte} = AnchoFijo.detectar("nomina.txt")
reporte.probablemente_ancho_fijo?
# => false
reporte.observaciones
# [
# "hay 4 largos de línea distintos: 28 (1 línea), 41 (1 línea), 45 (1 línea), 46 (1 línea);
# el predominante es 28, así que el resto son las filas sospechosas",
# "todos los bytes son ASCII: latin-1 y UTF-8 dan el mismo resultado en este archivo",
# "las líneas terminan en LF (\\n), estilo Unix",
# "el carácter \";\" aparece 3 veces en todas las líneas y en posiciones variables:
# esto parece un archivo delimitado, no de ancho fijo"
# ]
Ese archivo se llamaba .txt y era un CSV. La detección no es "tiene punto y
coma": es que la cantidad de punto y coma por línea es idéntica y sus posiciones
no lo son. Un formato de ancho fijo que usa | como separador decorativo tiene
el delimitador siempre en la misma columna, y detectar/2 no da ese falso
positivo.
El otro caso de todos los días, el encoding:
{:ok, reporte} = AnchoFijo.detectar("nomina.txt")
reporte.encoding_probable
# => :latin1
reporte.observaciones
# [
# "todas las 2 líneas miden 48 bytes",
# "hay bytes que no son UTF-8 válido pero sí caracteres latin-1
# (el byte 0xC9 en la posición 14 de la línea 1); declare encoding: :latin1 en el layout",
# "las líneas terminan en LF (\\n), estilo Unix"
# ]
Y si ya se tiene el layout que el anexo declara, se puede contrastar directo:
{:ok, reporte} = AnchoFijo.detectar("nomina.txt", layout: layout)
AnchoFijo.Detector.contrastar(reporte, layout)
# [
# %AnchoFijo.Diagnostico{
# esperado: "un largo de línea de 50 bytes según el layout",
# recibido: "48",
# causa_probable: "el archivo tiene 2 bytes menos por línea: falta un campo,
# o el layout es de otra versión del formato"
# }
# ]
Una lista vacía significa que el archivo y la especificación concuerdan en todo lo que se puede verificar sin parsear. Eso es lo que uno quiere ver el día uno.
El reporte completo trae :largos, :largo_consistente?, :largo_predominante,
:encoding_probable, :bytes_no_utf8, :terminador,
:termina_con_terminador?, :delimitadores, :delimitador_sugerido y
:probablemente_ancho_fijo?. Ver AnchoFijo.Detector.
Desde la terminal
El día uno no hay proyecto ni iex: hay un archivo que llegó por correo. La
misma pregunta, como comando:
$ mix ancho_fijo.detectar nomina.txt
nomina.txt: probablemente de ancho fijo
3 líneas · largo 48 bytes, consistente · ascii · LF
- todas las 3 líneas miden 48 bytes
- todos los bytes son ASCII: latin-1 y UTF-8 dan el mismo resultado en este archivo
- las líneas terminan en LF (\n), estilo Unix
--layout nomina.exs contrasta con un layout, --json imprime el reporte
para jq, y el código de salida sirve para un script de validación previa:
0 si parece ancho fijo y concuerda, 1 si no, 2 si no se pudo leer.
Ver mix help ancho_fijo.detectar.
Después se parsea
El layout es data: una lista de campos con nombre, largo, tipo y opciones de limpieza. Cambiar de formato es cambiar el mapa.
layout =
AnchoFijo.Layout.nuevo!(
nombre: "nómina banco X",
encoding: :latin1,
campos: [
[nombre: :rut, largo: 10],
[nombre: :beneficiario, largo: 20],
[nombre: :monto, largo: 10, tipo: :decimal, precision: 2],
[nombre: :fecha, largo: 8, tipo: :fecha, formato: :aaaammdd]
]
)
AnchoFijo.parsear(layout, "nomina.txt")
# {:ok,
# [
# %{rut: "12345678-9", beneficiario: "JOSÉ MUÑOZ PEÑA", monto: {125000, 2}, fecha: ~D[2024-01-15]},
# %{rut: "98765432-1", beneficiario: "MARÍA ROJAS ÑAÑEZ", monto: {9990050, 2}, fecha: ~D[2024-01-15]}
# ],
# []}
Las posiciones se omitieron: cada campo se encadena al anterior. Cuando el anexo las declara ("posiciones 61 a 72"), se ponen explícitas y son 1-based, igual que en el anexo.
Los dos modos
Los dos devuelven {:ok, registros, diagnosticos}. La tercera posición trae los
errores de las filas que no se pudieron leer y las advertencias de las que sí,
pero asumiendo algo; AnchoFijo.Diagnostico.separar/1 las parte en dos.
Estricto (el default) corta en la primera línea con problemas:
AnchoFijo.parsear(layout, "nomina.txt")
# {:error, [%AnchoFijo.Diagnostico{...}]}
# línea 2: se esperaban 48 bytes, llegaron 46; posible campo faltante o archivo delimitado
Tolerante devuelve las filas buenas y los diagnósticos de las malas, porque una nómina de 10.000 filas con 3 malas debe reportar las 3, no botar el lote:
{:ok, buenas, malas} = AnchoFijo.parsear(layout, "nomina.txt", modo: :tolerante)
length(buenas)
# => 2
Enum.map(malas, &AnchoFijo.Diagnostico.mensaje/1)
# ["línea 2: se esperaban 48 bytes, llegaron 46; posible campo faltante o archivo delimitado"]
Nótese que el modo tolerante devuelve :ok: un lote con filas malas separadas de
las buenas es un resultado, no una falla. {:error, _} queda para lo que impide
procesar cualquier cosa —layout inválido, archivo ilegible— donde no hay nada que
rescatar.
En estricto la lista solo puede traer advertencias: un error habría cortado. Y un error corta también con las advertencias de las líneas ya leídas, que se van con él: no hay resultado parcial que anotar.
Cuando no hay nada que hacer salvo fallar
Un script de migración, un Mix.Task, un pipeline donde un archivo malo no
deja nada que rescatar: ahí la tupla estorba. parsear!/3 y detectar!/2
siguen la convención de la stdlib, devuelven el valor o levantan
AnchoFijo.Error, cuyo mensaje es el reporte de los diagnósticos:
registros = AnchoFijo.parsear!(layout, "nomina.txt")
# ** (AnchoFijo.Error) línea 2: se esperaban 48 bytes, llegaron 46; posible campo faltante o archivo delimitado
Con modo: :tolerante el ! levanta igual si hay filas malas, pero la
excepción trae todos los errores del archivo, no el primero: es la
combinación para el script que tiene que morir, pero cuyo operador necesita la
lista completa para corregir el archivo de una vez. La alternativa, devolver las
filas buenas y descartar los diagnósticos, habría hecho del ! un atajo que
pierde información en silencio, y un ! no es un atajo: es otro contrato.
Lo que el ! no devuelve son las advertencias. Son filas que se leyeron bien
bajo un supuesto que el layout declaró, y la función devuelve un solo valor. Si
importan, parsear/3 las trae en la tercera posición.
Archivos grandes
"cartola.txt"
|> File.stream!()
|> then(&AnchoFijo.stream(layout, &1))
|> Stream.filter(&match?({:ok, _, _}, &1))
|> Stream.map(fn {:ok, registro, _advertencias} -> registro.monto end)
|> Enum.reduce(0, fn {unidades, _precision}, total -> total + unidades end)
Medido sobre un archivo de 100 MB (dos millones de líneas): stream/3 lo
recorre en 5 segundos con un pico de heap de 34 KB, que no depende del
tamaño del archivo; parsear/3 en modo tolerante tarda el doble y retiene
1,2 GB, porque devuelve los dos millones de registros. Los números, la
máquina y el script están en bench/README.md.
stream/3 emite {:ok, registro, advertencias} o {:error, diagnosticos} por
línea. Qué hacer con los errores es decisión del consumidor: acumular todos los
diagnósticos de un archivo de 2 GB para devolverlos al final anularía el punto de
ser lazy. Las advertencias viajan pegadas a su registro por la misma razón: no
hay dónde juntarlas.
Escribir con el mismo layout
Para mandarle la nómina al banco hay que generarla con el formato del anexo,
y el formato ya está escrito una vez. escribir/3 es el inverso de
parsear/3, y la propiedad que lo define es el round-trip: lo que se escribe
se vuelve a leer igual.
{:ok, contenido, []} = AnchoFijo.escribir(layout, registros)
File.write!("nomina.txt", contenido)
# o línea por línea, sin armar el archivo en memoria:
layout
|> AnchoFijo.Escritor.stream(registros)
|> Stream.map(fn {:ok, linea, _advertencias} -> linea end)
|> Stream.into(File.stream!("nomina.txt"))
|> Stream.run()
No hay modo tolerante para escribir: una nómina con una fila menos es otro
archivo, y mandarlo es peor que no mandarlo. Si algún valor no se puede
escribir, escribir/3 devuelve todos los diagnósticos de todos los
registros, con el número de registro, el campo, las posiciones y la causa.
Lo que no cabe no se trunca. Un monto truncado es otro monto, un RUT
truncado es otra persona, una glosa truncada es la única de las tres que a
veces se acepta. Por eso un valor más ancho que su campo es un error, y
truncar: true existe solo para :texto, con una advertencia por cada
campo recortado. El texto se rellena del lado que :trim recorta al leer,
los números con ceros a la izquierda y el signo solo en los negativos, un
{unidades, precision} tiene que traer la precisión del campo (escalar es
donde se pierde el peso), y el encoding del layout se respeta: con
encoding: :latin1 el archivo sale en latin-1, y un carácter que latin-1 no
tiene es un diagnóstico con el carácter y su posición.
Líneas cortas por relleno recortado
Hay emisores que recortan los espacios finales de cada línea, o solo de la última. Con el layout tal cual, esa línea es un diagnóstico de largo y la fila se bota. Si el formato termina en un campo de texto —una glosa, una referencia—, lo que falta es relleno, no dato, y se puede declarar:
layout = AnchoFijo.Layout.nuevo!(
relleno_final: :tolerar,
campos: [
[nombre: :rut, largo: 10],
[nombre: :fecha, largo: 8, tipo: :fecha, formato: :aaaammdd],
[nombre: :monto, largo: 12, tipo: :decimal, precision: 2],
[nombre: :glosa, largo: 30]
]
)
{:ok, registros, advertencias} = AnchoFijo.parsear(layout, "nomina.txt")
Enum.map(advertencias, &AnchoFijo.Diagnostico.mensaje/1)
# ["línea 1: se esperaban 60 bytes, llegaron 47; se completaron 13 bytes de relleno
# al final de la línea; el emisor recorta los espacios finales y el layout lo tolera"]
La línea se completa con el carácter de relleno del campo y queda una
advertencia por cada línea completada, con cuántas unidades faltaban. La regla
es estrecha a propósito: se tolera relleno faltante, no bytes faltantes. La
zona reponible empieza al final de la línea y crece hacia atrás mientras
encuentre relleno no declarado o campos :texto con el mismo carácter de
relleno. Un :entero, un :decimal o una :fecha la cortan: ahí el ancho es
el dato, y una línea corta que los alcanza sigue siendo un error de largo,
aunque falte un solo byte. El diagnóstico dice cuántas unidades faltaban y
cuántas eran reponibles.
Sin la opción, nada cambia: el default es :estricto.
Con unidad: :caracteres la cuenta es en caracteres y la línea se completa
después de transcodificar, así que "JOSÉ MUÑOZ" en una glosa de 12 se
completa con 2 caracteres, no con los 0 que sugeriría contar bytes. Con
unidad: :bytes solo se repone un relleno ASCII: un carácter de más de un byte
repetido tantas veces como bytes faltan no reconstruye la línea, y ese campo no
entra en la zona reponible.
Header, detalle y trailer
Las nóminas y cartolas reales traen varios tipos de registro, cada línea dice
cuál es en sus primeras posiciones, el orden importa y el trailer trae
totales que tienen que cuadrar. AnchoFijo.Multiregistro es un layout de
layouts más esas reglas, y parsear/3 y stream/3 lo aceptan en lugar del
layout:
nomina = AnchoFijo.Multiregistro.nuevo!(
discriminador: [posicion: 1, largo: 2],
registros: [
header: [valor: "01", cantidad: :uno, layout: layout_header],
detalle: [valor: "02", cantidad: :al_menos_uno, layout: layout_detalle],
trailer: [valor: "09", cantidad: :uno, layout: layout_trailer]
],
controles: [
[en: :trailer, campo: :cantidad, cuenta: :detalle],
[en: :trailer, campo: :total, suma: {:detalle, :monto}]
]
)
{:ok, registros, []} = AnchoFijo.parsear(nomina, "nomina.txt")
# [header: %{...}, detalle: %{...}, detalle: %{...}, trailer: %{...}]
AnchoFijo.Multiregistro.agrupar(nomina, registros)
# %{header: %{...}, detalle: [%{...}, %{...}], trailer: %{...}}
Las decisiones, y por qué:
- Los registros vuelven como
{tipo, mapa}en el orden del archivo, no como un mapa por tipo. El orden es parte del dato (hay formatos que intercalan tipos) y es lo único questream/3puede emitir de a uno.agrupar/2arma el mapa por tipo para el caso común. - La estructura se valida al pasar; los controles, al final. Un
discriminador desconocido, un
:detalledespués del:trailer, un segundo:headero un:trailerque falta son diagnósticos:estructura, con la causa probable de siempre ("suele ser un archivo pegado a otro"). Los totales necesitan todos los detalles, así que se comparan al llegar al fin del archivo: diagnósticos:controlque dicen el valor calculado, el declarado y de qué se calculó. - En
stream/3los controles salen como último elemento. Un{:error, diagnosticos}después del último registro si algo no cuadra o falta un registro obligatorio, y nada si todo cuadra. El acumulador lleva cuentas y sumas, no registros: la memoria sigue siendo constante. - En modo tolerante los controles se calculan sobre lo que se pudo leer. Un detalle ilegible produce su diagnóstico y además el del total que ya no cuadra. Los dos son ciertos y el segundo es el que el banco va a reportar.
- Las sumas son sobre enteros o
{unidades, precision}, nunca floats; con precisiones distintas se comparan a la mayor.
Formatos incluidos
Los formatos de verdad son públicos y estables, y transcribirlos desde cero es el trabajo central de cada integración. Vienen incluidos, con su fuente citada y su vigencia, empezando por NACHA/ACH (Estados Unidos):
{:ok, registros, []} = AnchoFijo.parsear(AnchoFijo.Formatos.nacha(), "ach.txt")
[] = AnchoFijo.Formatos.Nacha.validar(registros) # hash, totales y cuentas de cada lote y del archivo
lotes = AnchoFijo.Formatos.Nacha.lotes(registros) # cada lote con sus entradas y addendas
Los formatos cambian por resolución del regulador, y un layout
desactualizado en silencio es peor que no tenerlo. Por eso cada uno se pide
con su vigencia (nacha(vigencia: "2021")), que no cambia cuando el
catálogo se actualiza; pedir la más nueva es para empezar, fijarla es para
producción. AnchoFijo.Formatos.catalogo/0 lista las vigencias con su fuente
y la fecha en que se consultó. Se agregan de a uno y completos: Previred
(Chile) es el siguiente.
Tipos de campo
| tipo | valor devuelto | opciones |
|---|---|---|
:texto |
String.t() en UTF-8 |
:trim, :relleno, :opcional |
:entero |
integer() |
:opcional, :signo |
:decimal |
{unidades, precision}; con :moneda, un AnchoFijo.Monto |
:precision (obligatoria sin :moneda), :moneda, :separador, :signo |
:fecha |
Date.t() |
:formato (obligatorio), :opcional |
:rut |
String.t() canónico, "12345678-5"; solo el cuerpo con dv: :ausente |
:dv, :opcional |
Un monto de 0000125000 con precision: 2 se lee como {125000, 2}: 125.000
unidades mínimas con escala 2, es decir 1.250,00. Nunca hay un float en el
camino. Un monto que pasó por punto flotante deja de cuadrar con la contabilidad
del banco y nadie sabe dónde se perdió el peso.
:moneda convierte el :decimal en un AnchoFijo.Monto con su código ISO
4217, y la precisión deja de declararse: es la escala de la moneda. CLP no
tiene decimales, USD tiene dos, KWD tres; moneda: :clp con precision: 2
es un layout inválido, porque leer pesos chilenos divididos por cien es el
error que nadie nota hasta la conciliación. Monto.sumar/2 exige la misma
moneda y devuelve un diagnóstico si no; total/1, formatear/2 y
a_decimal/1 para quien tenga Decimal. Nunca hay un float en el camino.
:signo es :inicial por default: -0125000. Los formatos heredados de
mainframe escriben el signo después de los dígitos, 0125000-, y para leerlos
se declara signo: :final. Un signo donde el layout no lo espera no es un
"carácter no numérico": el diagnóstico dice que el signo está en el otro
extremo y qué declarar. El overpunch EBCDIC (12K por -123) queda fuera.
:rut normaliza lo que llegue —12.345.678-5, 123456785, 0000123456785,
con k o K— a "12345678-5" y valida el dígito verificador por módulo 11.
Un RUT con el DV malo parsea perfecto y el banco lo rechaza días después: por
eso la validación es parte del tipo y no una opción que hay que acordarse de
activar. Las dos salidas son explícitas: dv: :no_validar para recibir el dato
y decidir después, y dv: :ausente para los formatos que traen el cuerpo sin
DV.
:formato no tiene default a propósito. Adivinar si 01022024 es el 1 de
febrero o el 2 de enero es exactamente el error silencioso que esta librería
existe para impedir: un campo :fecha sin :formato es un layout inválido.
Tipos propios
Los cinco tipos son implementaciones del behaviour AnchoFijo.Tipo, y un
tipo que solo tiene sentido para un usuario —:hora, :codigo_sucursal, el
enum de "tipo de movimiento" de su banco— se agrega sin tocar la librería:
un módulo con opciones/0, validar/1 y leer/3, y tipo: MiApp.Hora en
el layout.
defmodule MiApp.Hora do
@behaviour AnchoFijo.Tipo
alias AnchoFijo.Tipo
@impl true
def opciones, do: []
@impl true
def validar(campo), do: if(campo.largo == 4, do: [], else: [Tipo.falla(campo, "un :largo de 4", campo.largo, nil)])
@impl true
def leer("", campo, contexto), do: {:error, Tipo.vacio(campo, contexto)}
def leer(<<h::binary-2, m::binary-2>>, campo, contexto) do
case Time.new(String.to_integer(h), String.to_integer(m), 0) do
{:ok, hora} -> {:ok, hora}
_ -> {:error, Tipo.diagnostico(campo, contexto, esperado: "una hora HHMM", recibido: inspect(h <> m))}
end
end
end
[nombre: :hora_pago, largo: 4, tipo: MiApp.Hora]
validar/1 corre al construir el layout, no al parsear: un :fecha sin
:formato sigue siendo un layout inválido, y un tipo propio puede exigir lo
mismo. Los diagnósticos que produce con Tipo.diagnostico/3 son
indistinguibles de los internos. Que el módulo implemente el behaviour se
verifica también al construir el layout, con Code.ensure_loaded?/1 por
delante: un módulo que no existe o no implementa los callbacks es un
diagnóstico :layout, no un UndefinedFunctionError en la línea 40.000. El
ejemplo completo, con una opción propia, está en AnchoFijo.Tipo.
El layout se valida antes de ver el archivo
AnchoFijo.Layout.nuevo(campos: [
[nombre: :rut, posicion: 1, largo: 10],
[nombre: :nombre, posicion: 8, largo: 20]
])
# {:error, [%AnchoFijo.Diagnostico{...}]}
# layout, campo :nombre (posiciones 8-27): se esperaba que empezara en la posición 11
# o después, llegó 8; se solapa con el campo :rut (posiciones 1-10)
Los huecos son distintos: son advertencias, no errores. Un hueco suele ser una zona reservada legítima del formato, mientras que un solapamiento es siempre un error de transcripción del anexo.
{:ok, layout} = AnchoFijo.Layout.nuevo(campos: [
[nombre: :rut, posicion: 1, largo: 10],
[nombre: :monto, posicion: 21, largo: 10, tipo: :decimal, precision: 2]
])
Enum.map(layout.advertencias, &AnchoFijo.Diagnostico.mensaje/1)
# ["layout, campo :monto (posiciones 21-30): se esperaba que empezara en la posición 11,
# llegó 21; quedan 10 posiciones sin declarar entre :rut y :monto;
# si el formato tiene relleno ahí, ignore esta advertencia"]
Los datos personales no viajan en los diagnósticos
El mensaje que se pega en un correo para el banco es el mismo que termina en un
Logger.error, en Sentry y en un ticket. Si el campo que falló es un RUT o un
nombre, ese es el camino por el que los datos de miles de beneficiarios salen
del sistema sin que nadie lo haya decidido (Ley 19.628 en Chile, GDPR si hay
clientes europeos). Lo incómodo es que la información que hace útil al
diagnóstico es la misma que no debería viajar.
Un campo se declara sensible en el layout, y :rut lo es por default:
[nombre: :beneficiario, largo: 20, sensible: true]
Sus diagnósticos muestran la forma del valor, no el valor, en
Diagnostico.mensaje/1, reporte/1, to_string/1 e inspect/1:
línea 7, campo :rut (posiciones 1-10): se esperaban un RUT con dígito verificador,
llegaron <10 caracteres: 4 dígitos, 1 letra, 3 dígitos, "-", 1 dígito>; ...
La forma es la política de redacción, y es una decisión. Una máscara parcial
(1234****-*) deja ver lo suficiente para reidentificar —cuatro dígitos de un
RUT dejan diez mil candidatos— y oculta justo lo que hace falta para depurar.
La supresión total no dice nada. La forma dice que hay una letra donde debía
haber un dígito, y en qué posición, sin decir cuál. El largo no se oculta: es
el ancho del campo, que el layout ya declara.
El valor completo sigue en :recibido del struct, y mensaje(d, revelar: true)
o reporte(lista, revelar: true) lo muestran para uso local e interactivo. La
redacción es de las representaciones, no del dato: quien lo necesita lo lee a
propósito, y el camino accidental —Logger.error(inspect(diagnostico))— no lo
lleva. Es el mismo patrón que redact: true en Ecto.
Lo que no se redacta, y por qué: un byte inválido y su posición (el byte 0xC9 en la posición 14) no es un dato personal y es el diagnóstico entero de un
problema de encoding; la medida de una línea corta es un número; y las
observaciones de detectar/2 citan a lo sumo un byte y un delimitador, nunca
el contenido de un campo. Las entradas que no son binarios se describen por
tipo ("una lista de 3 elementos") en vez de imprimirse. Hay un test que
recorre cada tipo de campo y cada falla posible y verifica la ausencia del
valor en cada representación.
Trazabilidad: del registro al byte, y la huella del lote
Cuando el banco rechaza una nómina de 40.000 líneas, la conversación es "el
registro del beneficiario X está mal", y lo primero que se pide es volver del
dato al lugar físico del archivo del que salió. Con traza: true, cada
registro trae la clave reservada :__traza__:
{:ok, registros, []} = AnchoFijo.parsear(layout, "nomina.txt", traza: true)
registro = Enum.at(registros, 6)
registro.__traza__
# %AnchoFijo.Traza{linea: 7, offset: 288, largo: 48}
AnchoFijo.Traza.linea_original(registro.__traza__, File.read!("nomina.txt"))
# "12345678-5JUAN PEREZ 000012345620240115"
La forma de retorno fue una decisión. Una tupla {registro, traza} o un
struct %Registro{valores: ..., traza: ...} cambian la forma para todo el
código que ya lee registro.monto. La clave :__traza__ no: el registro
sigue siendo el mapa, la traza está al lado, y los dos guiones bajos son la
convención de Elixir para metadatos que no chocan con datos (__struct__,
__meta__ en Ecto). Un campo del layout no se puede llamar así. Apagada, la
opción no cuesta nada: el camino de parseo es el mismo de siempre y no se
calcula ni se agrega nada; medido sobre 100.000 líneas, encenderla cuesta un
45 % de tiempo y un 35 % de memoria en parsear/3, y nada medible en
stream/3, que lleva el offset en el acumulador sin estado global.
La huella del lote es la otra mitad de la trazabilidad: demostrar qué archivo se procesó.
AnchoFijo.huella("nomina.txt")
# {:ok, "sha256:3164aeb0f4d85eabb8bcc255402e83170729ffe8cb076483b98caf2407eca512"}
Es un SHA-256 estable entre corridas y sensible a cualquier byte de datos. Lo
que no cambia la huella es lo que no cambia lo que el parser lee: el estilo
de terminador de línea (CRLF, LF o CR, normalizados a LF) y la presencia del
terminador en la última línea. Un archivo que pasó por un editor de Windows es
el mismo lote. Lo que sí cambia la huella, a propósito: un espacio de relleno
de más o de menos (es un byte del registro) y el encoding (los bytes son el
dato). Con normalizar: false se calcula sobre los bytes exactos, que es lo
que da sha256sum. Se calcula por bloques, así que un archivo de gigabytes
no se carga en memoria.
Observabilidad
Una librería que procesa archivos de 2 GB de noche y no emite un solo evento
es una caja negra. ancho_fijo emite eventos de :telemetry con el patrón
start/stop/exception del ecosistema, bajo el prefijo [:ancho_fijo, ...],
para parsear/3, detectar/2 y stream/3. Suscribirse son tres líneas:
:telemetry.attach("nomina", [:ancho_fijo, :parsear, :stop], fn _evento, medidas, metadata, _ ->
Logger.info("#{metadata.layout}: #{medidas.registros} registros, #{medidas.errores} errores")
end, nil)
El stop de parsear/3 trae duration, lineas, registros, errores y
advertencias; el de stream/3 lo mismo, contado en el acumulador del stream
sin acumular registros ni romper la laziness, y sale también si la
enumeración se corta. No hay un evento por línea que falla: en un archivo con
10.000 filas malas serían 10.000 eventos, cada uno con un diagnóstico que
puede traer datos personales. El contrato completo, evento por evento, está
en AnchoFijo.Telemetria.
:telemetry es una dependencia opcional: hay que agregarla al proyecto
para recibir los eventos. Ver la decisión más abajo.
Idempotencia: reconocer el archivo que ya se procesó
El error operacional más caro de una nómina no es una fila mal parseada: es el mismo archivo procesado dos veces, por un reintento manual, un cron que corrió dos veces o un correo reenviado. La librería es el punto natural para detectarlo, porque ve el archivo completo antes de que exista un solo registro en la base de datos.
layout = AnchoFijo.Layout.nuevo!(identidad: [campos: [:lote, :fecha]], campos: [...])
{:ok, identidad} = AnchoFijo.identidad(layout, "nomina.txt")
# %AnchoFijo.Identidad{declarada: %{lote: 1, fecha: ~D[2024-01-15]}, huella: "sha256:...", nombre: "nomina.txt"}
case AnchoFijo.Identidad.cotejar(identidad, identidades_ya_procesadas) do
:nueva -> procesar(...)
{:duplicada, vista} -> rechazar("ya se procesó el #{vista.nombre}")
{:conflicto, diagnostico, _vista} -> escalar(AnchoFijo.Diagnostico.mensaje(diagnostico))
end
Tres fuentes, en orden de confiabilidad decreciente: lo que el archivo
declara de sí mismo (el número de lote y la fecha del header, que el layout
señala con identidad:), la huella del contenido, y el nombre del archivo,
que es informativo y nada más. La huella manda: el mismo contenido es un
duplicado aunque cambie el nombre. Y la misma identidad declarada con otro
contenido no es un duplicado, es algo peor: el emisor reutilizó el número
de lote o alguien editó el archivo, y tiene su propio diagnóstico.
La frontera. La librería no persiste nada ni tiene estado: recibe las identidades que el llamador ya vio, responde, y punto. El día en que un parser abre una tabla o un ETS deja de ser un parser, y además decide por el usuario cuánto tiempo recordar y qué hacer con un duplicado. Eso es del sistema que paga: guardar la huella y lo declarado de cada archivo procesado y consultarlos antes de empezar.
Decisiones y trade-offs
Las posiciones se cuentan en bytes, no en caracteres. Un formato de ancho
fijo se define sobre el archivo físico: cuando el banco dice "120 posiciones",
cuenta bytes. Con latin-1 es lo mismo. Con UTF-8 no, y ahí está el trade-off: si
el emisor contó caracteres, hay que declarar unidad: :caracteres o cada línea
con una "ñ" se corre un byte. La librería no lo adivina, pero detectar/2
reporta los dos largos cuando difieren, que es la señal para saber cuál usar.
Los montos son {unidades, precision} y no Decimal. Cumple con "ningún
float en el camino" sin sumar una dependencia. El costo es que hay que convertir
en el borde: Decimal.new(1, unidades, -precision) si se usa esa librería, o
div/2 y rem/2 para formatear. Para un paquete que se vende como chico, la
dependencia obligatoria pesaba más que la conversión de una línea.
Los huecos no bloquean, los solapamientos sí. Explicado arriba. La
consecuencia es que un layout con un campo olvidado en el medio parsea igual, y
solo queda constancia en layout.advertencias. Se eligió así porque la
alternativa —obligar a declarar campos :filler para satisfacer al validador—
hace que la definición deje de parecerse al anexo que se está transcribiendo.
Una línea de largo incorrecto reporta un solo diagnóstico. Si la línea no mide lo que debe, no se intentan leer sus campos. Un byte faltante corre todos los campos que vienen después, y reportar los doce diagnósticos derivados esconde el único que importa. El costo: en modo tolerante no se ve el detalle de los campos de una fila con largo malo.
Los dos modos devuelven {:ok, registros, diagnosticos}. El modo estricto
también, aunque al llegar a :ok la lista solo pueda traer advertencias. La
alternativa —dos elementos en estricto, tres en tolerante— obliga al llamador a
saber en qué modo llamó para saber qué desestructurar, y deja las advertencias
sin dónde ir en el modo que se usa justamente para archivos que son contratos.
Una advertencia que se descarta por no ser un error es un supuesto que nadie
revisó.
Una advertencia no reemplaza a su registro, lo acompaña. El registro está en
registros con su valor, y el diagnóstico de gravedad :advertencia dice qué
se asumió para llegar a él. Un error, en cambio, no deja registro: no hay valor
que entregar.
Se rechazan los caracteres de control en ambos encodings. El rango 0x80–0x9F es control en latin-1 pero trae comillas y guiones en Windows-1252. Encontrarlo es la señal más confiable de que el archivo es cp1252 y no latin-1, y el diagnóstico lo dice en vez de devolver basura silenciosa. El costo es que un archivo con un byte de control legítimo —no existe en ancho fijo bancario, pero podría existir— necesitaría otra estrategia.
No hay soporte de cp1252 ni de otros encodings. Solo :utf8 y :latin1.
Agregar una tabla de transcodificación por cada codepage del mundo es cómo un
paquete chico deja de estar terminado. El diagnóstico apunta al problema y la
conversión previa es una línea de iconv.
Dos formas de fallar, y solo dos. Un problema con los datos es un
AnchoFijo.Diagnostico, como valor o dentro de AnchoFijo.Error. Un problema
con la llamada —una opción que no existe, un valor de otro tipo— es un
ArgumentError que nombra la función y la opción, como en la stdlib: no es un
diagnóstico porque no hay nada que mandarle al banco. Una clave desconocida en
un layout (enconding:, precison:) también es un error de la definición, no
algo que se ignora: dejaría un layout distinto del que se escribió sin ninguna
señal. Los módulos de apoyo (AnchoFijo.Rut, AnchoFijo.Transcodificacion,
AnchoFijo.Campo.extraer/3) usan guardas y levantan FunctionClauseError ante
tipos equivocados, igual que String.upcase(42); el contrato de las dos formas
es de los puntos de entrada. Hay un test que le pasa basura a cada uno para
sostenerlo.
:telemetry es opcional, y el paquete sigue sin dependencias de runtime.
Las dos opciones eran declararla obligatoria (30 KB, sin dependencias, ya
instalada en cualquier app Phoenix) o optional: true con una decisión en
tiempo de compilación. Se eligió la segunda porque la promesa de cero
dependencias vale sobre todo fuera de Phoenix: el script de migración, el
Mix.Task, el escript donde cada dependencia es fricción y nadie va a
mirar un dashboard. El costo es un if Code.ensure_loaded?(:telemetry) en el
cuerpo de un módulo: con la dependencia presente las llamadas se compilan,
sin ella no existe ni una, y en runtime no hay ningún if. La parte fea:
si se agrega :telemetry después de haber compilado ancho_fijo, hay que
recompilarlo (mix deps.compile ancho_fijo --force). Está en la doc del
módulo.
moneda: devuelve un struct; sin moneda: sigue la tupla. Las tres
opciones eran seguir con {unidades, precision} y solo validar (cero
migración, pero sumar CLP con USD sigue sin quejarse), {unidades, precision, moneda} (rompe todo el pattern matching publicado en Hex) o un struct. Se
eligió el struct, pero solo cuando el layout declara la moneda: quien no la
declara no cambia una línea, y quien la declara pidió a propósito un valor
que sabe de qué moneda es. %AnchoFijo.Monto{} tiene tres campos, cinco
operaciones sobre enteros y un Inspect; no es una librería de dinero
disfrazada, y a_decimal/1 entrega el monto a quien sí tenga una. La tabla
ISO 4217 es acotada a propósito: todas las monedas con escala distinta de
dos, que son las que importan, más las de la región y las de reserva. Una
moneda que falta con :precision explícita se acepta con una advertencia
del layout; sin :precision, es un error.
Documentación
Licencia
MIT. Ver LICENSE.