From 4560a29fd5a8d7cec73363cb23621beaca905cf3 Mon Sep 17 00:00:00 2001
From: Marcos Marado <mindboosternoori@gmail.com>
Date: Tue, 29 Oct 2019 02:23:26 +0000
Subject: [PATCH] norte2020: novo incumprimento

Closes: #33
---
 README.md               |  1 +
 scripts/36-norte2020.sh | 19 +++++++++++++++++++
 2 files changed, 20 insertions(+)
 create mode 100755 scripts/36-norte2020.sh

diff --git a/README.md b/README.md
index c2c6849..b145132 100644
--- a/README.md
+++ b/README.md
@@ -40,6 +40,7 @@ Esta tabela mostra casos de incumprimento do regulamento:
 | http://www.dgterritorio.pt | cartografia em ecw, CAOP em shapefile | [conteúdo ecw em vez de geotiff](http://www.dgterritorio.pt/cartografia_e_geodesia/cartografia/cartografia_de_base___topografica_e_topografica_de_imagem/serie_cartografica_1500_000/), [CAOP em shapefile](http://www.dgterritorio.pt/cartografia_e_geodesia/cartografia/carta_administrativa_oficial_de_portugal_caop/caop__download_/) | 2019/10/29 ||
 | https://www.inventarios.pt | Obriga à utilização de JAVA ou software que só existe para MAC e Windows, HTTPS com certificado a usar TLS 1.0 em vez do obrigatório 1.2 | [manual de instalação](https://www.inventarios.pt/documentos/manual_instalacao_gosign_v4.pdf) | 2019/10/29 ||
 | http://business.turismodeportugal.pt/ | Informação apenas em XLSX | [página com vários links para informação apenas em XLSX](http://business.turismodeportugal.pt/pt/Planear_Iniciar/Licenciamento_Registo_da_Atividade/Empreendimentos_Turisticos/Paginas/classificacao-et.aspx) | 2019/10/29 ||
+| https://www.norte2020.pt/ | Informação apenas em XLSX | [página com documento apenas em XLSX](https://www.norte2020.pt/investimento-municipal) | 2019/10/29 | 2019/10/29 |
 
 Este [template](template.txt) é utilizado pela ANSOL e pela Comunidade LibreOffice Portugal para enviar um pedido de resolução do problema.
 
diff --git a/scripts/36-norte2020.sh b/scripts/36-norte2020.sh
new file mode 100755
index 0000000..86ec80b
--- /dev/null
+++ b/scripts/36-norte2020.sh
@@ -0,0 +1,19 @@
+#!/bin/bash
+
+docs="$(for a in $(wget https://www.norte2020.pt/investimento-municipal -o /dev/null -O - |hxnormalize -x -l 1000|hxselect .a-dload); do echo "$a"|grep -i http; done)";
+dcount=$(echo "$docs"|wc -l);
+xls=$(echo "$docs"|grep -c -i xls)
+
+if [ "$dcount" -eq "0" ]; then
+	echo "norte2020: incumprimento pode já não existir (1)";
+elif [ ! "$dcount" -eq "$xls" ]; then
+	echo "norte2020: incumprimento pode já não existir (2)";
+else
+	echo "norte2020: Incumprimento mantém-se, a actualizar o README (faça um git diff, valide, e commit!)";
+	while IFS='' read -r line || [[ -n "$line" ]]; do
+		test "$(echo "$line"|grep -v -c "norte2020")" -eq "1" \
+			&& echo "$line" \
+			|| (h=$(echo "$line"|cut -d\| -f1-4); t=$(echo "$line"|cut -d\| -f6-); echo "$h| $(date +%Y/%m/%d) |$t");
+	done < README.md > new
+	mv new README.md
+fi