User:1Veertje/iMacros/replace
< User:1Veertje | iMacros
The PHP script I used to generate a iMacros script that corrects source information
<?php
$servername = "localhost";
$username = "root";
$password = "";
$dbname = "dbname";
// Create connection
$conn = new mysqli($servername, $username, $password, $dbname);
// Check connection
if ($conn->connect_error) {
die("Connection failed: " . $conn->connect_error);
}
ini_set('max_execution_time', 3000);
$text = "VERSION BUILD=8940826 RECORDER=FX
SET !TIMEOUT 240
SET !ERRORIGNORE YES
SET !EXTRACT_TEST_POPUP NO
TAB T=1\n";
$sql = "SELECT title, amsid FROM ams_olie";
$result = $conn->query($sql);
if ($result->num_rows > 0) {
while($row = $result->fetch_assoc()) {
$text .="SET !EXTRACT NULL
URL GOTO=https://commons.wikimedia.org/w/?title=".str_replace(" ", "_",$row['title'])."&action=edit
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 EXTRACT=TXT
SET !VAR1 EVAL(\"var s=\\\"{{!EXTRACT}}\\\"; s.replace('|Source=http://stadsarchief.amsterdam.nl/archief/10019', '|Source=http://beeldbank.amsterdam.nl/afbeelding/".$row['amsid']."')\")
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 CONTENT=\"{{!VAR1}}\"
TAG POS=1 TYPE=INPUT:TEXT FORM=ID:editform ATTR=ID:wpSummary CONTENT=\"Cleanup AMS-identifiers\"
TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:editform ATTR=ID:wpSave\n";
}
} else {
echo "0 results";
}
$myfile = fopen( "cleanup_amsid.iim", "w") or die("Unable to open file!");
fwrite($myfile, $text);
fclose($myfile);
$conn->close();
?>
The resulting iMacros script looks like this:
VERSION BUILD=8940826 RECORDER=FX
SET !TIMEOUT 240
SET !ERRORIGNORE YES
SET !EXTRACT_TEST_POPUP NO
TAB T=1
SET !EXTRACT NULL
URL GOTO=https://commons.wikimedia.org/w/?title=File:Aagje_en_Willem_Olie_en_twee_onbekende_kinderen,_1898_(max_res).jpg&action=edit
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 EXTRACT=TXT
SET !VAR1 EVAL("var s=\"{{!EXTRACT}}\"; s.replace('|Source=http://stadsarchief.amsterdam.nl/archief/10019', '|Source=http://beeldbank.amsterdam.nl/afbeelding/010019001679')")
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 CONTENT="{{!VAR1}}"
TAG POS=1 TYPE=INPUT:TEXT FORM=ID:editform ATTR=ID:wpSummary CONTENT="Cleanup AMS-identifiers"
TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:editform ATTR=ID:wpSave
SET !EXTRACT NULL
URL GOTO=https://commons.wikimedia.org/w/?title=File:Aagje_Olie_aan_het_schilderen,_1903-10_(max_res).jpg&action=edit
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 EXTRACT=TXT
SET !VAR1 EVAL("var s=\"{{!EXTRACT}}\"; s.replace('|Source=http://stadsarchief.amsterdam.nl/archief/10019', '|Source=http://beeldbank.amsterdam.nl/afbeelding/010019001776')")
TAG POS=1 TYPE=TEXTAREA FORM=ID:editform ATTR=ID:wpTextbox1 CONTENT="{{!VAR1}}"
TAG POS=1 TYPE=INPUT:TEXT FORM=ID:editform ATTR=ID:wpSummary CONTENT="Cleanup AMS-identifiers"
TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:editform ATTR=ID:wpSave