#!/usr/bin/perl

# normalize HTML

use Getopt::Long;
use File::Slurp;

use strict;
use warnings;

my $force;
GetOptions ("force|f");

my $stem = shift;
my $_ = read_file( $stem . '.htm' );

# whitespace
s/(?: |\h)+/ /mg;

# preamble
s{.*>HAVE ADOPTED THIS REGULATION:</P>\s*}{}s;

# page header
s{<P\b[^>]*;top:(?:1172|1187)px;[^>]*>(?:(?!</P\b).)+.</P>\s*}{}mg;

# headline
s{<P\b[^>]*>(?:In Title \S+, the following Section \S+ is inserted:</P>\s*<P\b[^>]*>)?\'?(SECTION \S+)<br/><b>((?:(?!</P\b).)+.)</b></P>}{<H1>$1</H1>\n<H2>$2</H2>}mg;
s{<P\b[^>]*><i>\'?(Article \S+)</i></P>}{<H1>$1</H1>}mg;
s{<P\b[^>]*>(?:Article \S+ is replaced by the following:</P>\s*<P\b[^>]*>)?\'?(Article \S+)<br/><b>((?:(?!</P\b).)+.)</b></P>}{<H1>$1</H1>\n<H2>$2</H2>}mg;
s{<P\b[^>]*>(Article \S+) is amended as follows:</P>}{<H1>$1</H1>}mg;
s{<P\b[^>]*>(?:paragraph \S+ is replaced by the following:</P>\s*)(<P\b[^>]*>)\'?(\d+)\. }{<H3>$2</H3>\n$1}mg;
s{<P\b[^>]*>In (Article \S+), paragraph (\S+) is replaced by the following:</P>\s*(<P\b[^>]*>)\'?(\2)\. }{<H1>$1</H1>\n<H3>$2</H3>\n$3}mg;

# unwrap
s{\s*<br/>\s*}{ }mg;

write_file( $stem . '.html', $_ );

print "DONE: $0 stem $stem\n";
d class='sub'>Unnamed repository; edit this file 'description' to name the repository.</td><td class='sub right'>Jonas Smedegaard</td></tr></table>
<table class='tabs'><tr><td>
<a href='/notmuch/?h=master'>summary</a><a href='/notmuch/refs/?h=master'>refs</a><a href='/notmuch/log/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>log</a><a href='/notmuch/tree/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>tree</a><a class='active' href='/notmuch/commit/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>commit</a><a href='/notmuch/diff/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>diff</a></td><td class='form'><form class='right' method='get' action='/notmuch/log/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian'>
<input type='hidden' name='h' value='master'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/notmuch/commit/?h=master'>root</a>/<a href='/notmuch/commit/tags?h=master'>tags</a>/<a href='/notmuch/commit/tags/2c?h=master'>2c</a>/<a href='/notmuch/commit/tags/2c/02?h=master'>02</a>/<a href='/notmuch/commit/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu?h=master'>151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu</a>/<a href='/notmuch/commit/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>debian</a></div><div class='content'><div class='cgit-panel'><b>diff options</b><form method='get'><input type='hidden' name='h' value='master'/><table><tr><td colspan='2'/></tr><tr><td class='label'>context:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Jonas Smedegaard &lt;dr@jones.dk&gt;</td><td class='right'>2023-06-27 09:35:08 +0200</td></tr>
<tr><th>committer</th><td>Jonas Smedegaard &lt;dr@jones.dk&gt;</td><td class='right'>2023-06-27 09:35:08 +0200</td></tr>
<tr><th>commit</th><td colspan='2' class='oid'><a href='/notmuch/commit/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master&amp;id=fd54908da2b05c526dd3bee9b6dcd093214a220d'>fd54908da2b05c526dd3bee9b6dcd093214a220d</a> (<a href='/notmuch/patch/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?id=fd54908da2b05c526dd3bee9b6dcd093214a220d'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='oid'><a href='/notmuch/tree/?h=master'>c69c845069c99d1d01044f6fafda7c08433329c6</a> /<a href='/notmuch/tree/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian</a></td></tr>
<tr><th>parent</th><td colspan='2' class='oid'><a href='/notmuch/commit/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master&amp;id=ba46132213560cf3335d53560d519c0ec0190da2'>ba46132213560cf3335d53560d519c0ec0190da2</a> (<a href='/notmuch/diff/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master&amp;id2=ba46132213560cf3335d53560d519c0ec0190da2'>diff</a>)</td></tr></table>
<div class='commit-subject'><span class='decoration'><a class='branch-deco' href='/notmuch/log/tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian?h=master'>master</a></span></div><div class='commit-msg'></div><div class='diffstat-header'><a href='/notmuch/diff/?h=master'>Diffstat</a> (limited to 'tags/2c/02/151669742024.1392.3383817174904863181.reportbug@mail.an3as.eu/debian')</div><table summary='diffstat' class='diffstat'>