From 43ba39f63445952911819a027cc133cce59ec247 Mon Sep 17 00:00:00 2001
From: Hugo Peixoto <hugo.peixoto@gmail.com>
Date: Tue, 18 Aug 2020 00:40:26 +0100
Subject: [PATCH] accessmonitor: Adiciona incrumprimento

Incumprimento em accessmonitor.acessibilidade.gov.pt .

Closes: #57, #64
---
 README.md                   |  1 +
 scripts/46-accessmonitor.sh | 15 +++++++++++++++
 2 files changed, 16 insertions(+)
 create mode 100755 scripts/46-accessmonitor.sh

diff --git a/README.md b/README.md
index eeae189..a2ddeb8 100644
--- a/README.md
+++ b/README.md
@@ -44,6 +44,7 @@ Esta tabela mostra casos de incumprimento do regulamento:
 | http://www.base.gov.pt | erros de configuração de HTTPS | [página de autenticação insegura](https://www.base.gov.pt/idp/Authn/UserPassword) | 2020/08/08 ||
 | http://www2.sg.pcm.gov.pt/ | autenticação sem HTTPS | [página de autenticação insegura](http://www2.sg.pcm.gov.pt/GEUPF/Login.aspx) | 2020/08/05 | [2] |
 | https://www.presidencia.pt/ | erro de configuração de HTTPS | [certificado https para o domínio errado](https://www.presidencia.pt/) | 2020/08/08 ||
+| https://accessmonitor.acessibilidade.gov.pt/ | Credenciais sem HTTPS | [Formulário de autenticação sem HTTPS](http://accessmonitor.acessibilidade.gov.pt/mm/) | 2020/08/18 ||
 
 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/46-accessmonitor.sh b/scripts/46-accessmonitor.sh
new file mode 100755
index 0000000..b5d6c81
--- /dev/null
+++ b/scripts/46-accessmonitor.sh
@@ -0,0 +1,15 @@
+#!/usr/bin/env bash
+
+set -ueo pipefail
+
+if curl -L -w "%{url_effective}\n" "http://accessmonitor.acessibilidade.gov.pt/ams/" | grep "^https" > /dev/null; then
+	echo "accessmonitor: incumprimento pode já não existir";
+else
+	echo "accessmonitor: 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 "accessmonitor")" -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