[62822] users/nox/make-hunspell-dict-ports.php

[nox at macports.org]

Revision: 62822
          http://trac.macports.org/changeset/62822
Author:   nox at macports.org
Date:     2010-01-18 07:11:19 -0800 (Mon, 18 Jan 2010)
Log Message:
-----------
Commit `make-hunspell-dict-ports.php` script used in r62758

Revision Links:
--------------
    http://trac.macports.org/changeset/62758

Added Paths:
-----------
    users/nox/make-hunspell-dict-ports.php

Added: users/nox/make-hunspell-dict-ports.php
===================================================================
--- users/nox/make-hunspell-dict-ports.php	                        (rev 0)
+++ users/nox/make-hunspell-dict-ports.php	2010-01-18 15:11:19 UTC (rev 62822)
@@ -0,0 +1,93 @@
+<?php
+
+define('MAINTAINERS', 'nox openmaintainer');
+
+function burn($sException, $sMsg = null)
+{
+    throw new $sException($sMsg);
+}
+
+function build_port($locale, $version, $lang, $checksums)
+{
+    ob_start();
+    eval(file_get_contents(__FILE__, null, null, __COMPILER_HALT_OFFSET__));
+    return ob_get_clean();
+}
+
+$oDoc = new DOMDocument;
+@$oDoc->loadHTMLFile('http://wiki.services.openoffice.org/wiki/Dictionaries') or
+    burn('UnexceptedValueException', 'Could not load dictionaries page.');
+
+$oContent = $oDoc->getElementById('bodyContent');
+$oContent !== false or burn('UnexceptedValueException') or
+    burn('UnexceptedValueException', 'Could not find page content.');
+
+$oXPath = new DOMXPath($oDoc);
+
+$iDictCount = 0;
+
+foreach ($oXPath->query('./h2', $oContent) as $oTitle) {
+    $sLang = trim($oTitle->textContent);
+    echo 'Reading "', $sLang, '" section', "\n";
+
+    echo 'Searching dictionary link...';
+    $oLinks = $oXPath->query(
+        './/li/a[starts-with(@href, "http://ftp.services.openoffice.org/pub/OpenOffice.org/contrib/dictionaries/")]',
+        $oTitle->nextSibling->nextSibling);
+    if (!$oLinks->length) {
+        echo " not found\n\n";
+        continue;
+    }
+    
+    echo ' found ', $oLinks->length, " canditate(s)\n";
+    foreach ($oLinks as $oLink) {
+        $sHREF = $oLink->getAttribute('href');
+        $sLocale = basename($sHREF, '.zip');
+        if (!preg_match('/^[a-z]{2,3}_[A-Z]{2}$/', $sLocale))
+            continue;
+
+        $sName = $oLink->textContent;
+        if (strpos($sName, 'Spelling') !== false)
+            $sName = $sLang;
+        preg_replace('/\( *([^)]*?) *\)/', '(\1)', $sName);
+
+        $aMatches = array();
+        preg_match('/\d{4}-\d{2}-\d{2}/',
+            trim($oLink->nextSibling->textContent), $aMatches);
+        $sVersion = $aMatches[0];
+
+        echo "\t", $sName, ': ', $oLink->getAttribute('href'),
+            ' (', $sVersion, ")\n";
+
+        $sZIP = file_get_contents($sHREF);
+        $aChecksums = array(
+            'md5'       => md5($sZIP),
+            'sha1'      => sha1($sZIP),
+            'rmd160'    => openssl_digest($sZIP, 'rmd160'),
+        );
+
+        $sPort = 'hunspell-dict-' . $sLocale;
+        if (!is_dir($sPort))
+            mkdir($sPort, 0755);
+        file_put_contents($sPort . '/Portfile', build_port(
+            $sLocale, $sVersion, $sName, $aChecksums));
+
+        ++$iDictCount;
+    }
+    echo "\n";
+}
+
+echo 'Found ', $iDictCount, " dictionary(ies)\n";
+
+__halt_compiler();?>
+# $Id$
+
+PortSystem      1.0
+PortGroup       hunspelldict 1.0
+
+hunspelldict.setup <?=$locale?> <?=$version?> {<?=$lang?>} ooo
+maintainers     <?=MAINTAINERS, "\n"?>
+
+checksums       md5     <?=$checksums['md5']?> \
+                sha1    <?=$checksums['sha1']?> \
+                rmd160  <?=$checksums['rmd160'], "\n"?>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100118/34e59bb6/attachment-0001.html>