A PHP Script to sort Scripture references.

sort.php

<?php
    /*
     * Roughly sorts a list of scripture references in the following format:
     * Ezekiel 8:5-18; Psalm 44:20-21; 1 Chronicles 28:9;
     *
     * I'm not proud of this script, and there is no real bounds or value checking. Recycle this code at your own risk!
     */
    $books = array(
        'Genesis',
        'Exodus',
        'Leviticus',
        'Numbers',
        'Deuteronomy',
        'Joshua',
        'Judges',
        'Ruth',
        '1 Samuel',
        '2 Samuel',
        '1 Kings',
        '2 Kings',
        '1 Chronicles',
        '2 Chronicles',
        'Ezra',
        'Nehemiah',
        'Esther',
        'Job',
        'Psalm',
        'Proverbs',
        'Ecclesiastes',
        'Song of Solomon',
        'Isaiah',
        'Jeremiah',
        'Lamentations',
        'Ezekiel',
        'Daniel',
        'Hosea',
        'Joel',
        'Amos',
        'Obadiah',
        'Jonah',
        'Micah',
        'Nahum',
        'Habakkuk',
        'Zephaniah',
        'Haggai',
        'Zechariah',
        'Malachi',
        'Matthew',
        'Mark',
        'Luke',
        'John',
        'Acts',
        'Romans',
        '1 Corinthians',
        '2 Corinthians',
        'Galatians',
        'Ephesians',
        'Philippians',
        'Colossians',
        '1 Thessalonians',
        '2 Thessalonians',
        '1 Timothy',
        '2 Timothy',
        'Titus',
        'Philemon',
        'Hebrews',
        'James',
        '1 Peter',
        '2 Peter',
        '1 John',
        '2 John',
        '3 John',
        'Jude',
        'Revelation'
    );
    $references = trim(isset($_POST['references']) ? $_POST['references'] : '', ' \t;');
    $references = str_replace('Gen.', 'Genesis', $references);
    $references = str_replace('Ex.', 'Exodus', $references);
    $references = str_replace('Exod.', 'Exodus', $references);
    $references = str_replace('Lev.', 'Leviticus', $references);
    $references = str_replace('Num.', 'Numbers', $references);
    $references = str_replace('Deu.', 'Deuteronomy', $references);
    $references = str_replace('Deut.', 'Deuteronomy', $references);
    $references = str_replace('Deut ', 'Deuteronomy ', $references);
    $references = str_replace('Josh.', 'Joshua', $references);
    $references = str_replace('1 Sam.', '1 Samuel', $references);
    $references = str_replace('2 Sam.', '2 Samuel', $references);
    $references = str_replace('1 Chr.', '1 Chronicles', $references);
    $references = str_replace('2 Chr.', '2 Chronicles', $references);
    $references = str_replace('1 Chron.', '1 Chronicles', $references);
    $references = str_replace('2 Chron.', '2 Chronicles', $references);
    $references = str_replace('Neh.', 'Nehemiah', $references);
    $references = str_replace('Ps.', 'Psalm', $references);
    $references = str_replace('Psa.', 'Psalm', $references);
    $references = str_replace('Prov.', 'Proverbs', $references);
    $references = str_replace('Eccl.', 'Ecclesiastes', $references);
    $references = str_replace('Eccles.', 'Ecclesiastes', $references);
    $references = str_replace('Is.', 'Isaiah', $references);
    $references = str_replace('Isa ', 'Isaiah ', $references);
    $references = str_replace('Isa.', 'Isaiah', $references);
    $references = str_replace('Jer.', 'Jeremiah', $references);
    $references = str_replace('Ezek.', 'Ezekiel', $references);
    $references = str_replace('Dan.', 'Daniel', $references);
    $references = str_replace('Hos.', 'Hosea', $references);
    $references = str_replace('Zech.', 'Zechariah', $references);
    $references = str_replace('Mal.', 'Malachi', $references);
    $references = str_replace('Matt.', 'Matthew', $references);
    $references = str_replace('Act ', 'Acts ', $references);
    $references = str_replace('Rom.', 'Romans', $references);
    $references = str_replace('Gal.', 'Galatians', $references);
    $references = str_replace('Eph.', 'Ephesians', $references);
    $references = str_replace('Phil.', 'Philippians', $references);
    $references = str_replace('Col.', 'Colossians', $references);
    $references = str_replace('1 Cor.', '1 Corinthians', $references);
    $references = str_replace('2 Cor.', '2 Corinthians', $references);
    $references = str_replace('1 Cor ', '1 Corinthians ', $references);
    $references = str_replace('2 Cor ', '2 Corinthians ', $references);
    $references = str_replace('1 Thess.', '1 Thessalonians', $references);
    $references = str_replace('2 Thess.', '2 Thessalonians', $references);
    $references = str_replace('1 Thess ', '1 Thessalonians ', $references);
    $references = str_replace('2 Thess ', '2 Thessalonians ', $references);
    $references = str_replace('1 Tim.', '1 Timothy', $references);
    $references = str_replace('2 Tim.', '2 Timothy', $references);
    $references = str_replace('1 Pet.', '1 Peter', $references);
    $references = str_replace('2 Pet.', '2 Peter', $references);
    $references = str_replace('Heb.', 'Hebrews', $references);
    $references = str_replace('Heb ', 'Hebrews ', $references);
    $references = str_replace('Rev.', 'Revelation', $references);
    $references = str_replace('Reve ', 'Revelation ', $references);
    $references = str_replace('  ', ' ', $references);
    $references = str_replace(', ', ',', $references);
    $references = str_replace('–', '-', $references);
    $references = str_replace('.', ';', $references);
    $references = str_replace('\r\n', ' ', $references);
    $references = trim($references);
    $references = trim($references, ';');
    $references = array_map('trim', explode(';', $references));
    $lastBook = '';
    foreach ($references as $pos => $reference)
    {
        $hasLastBook = false;
        foreach ($books as $book)
        {
            if (substr($reference, 0, strlen($book)) == $book)
            {
                $lastBook = $book;
                $hasLastBook = true;
                break;
            }
        }
        
        if (!$hasLastBook)
        {
            $references[$pos] = $lastBook . ' ' . $reference;
        }
    }
    
    usort($references, function($a, $b) use ($books) {
        $aPos = -1;
        $bPos = -1;
        $aChapter = 0;
        $bChapter = 0;
        foreach ($books as $pos => $book)
        {
            if (substr($a, 0, strlen($book)) == $book)
            {
                $aPos = $pos;
                $aChapter = trim(substr(explode(':', $a)[0], strlen($book)));
            }
            
            if (substr($b, 0, strlen($book)) == $book)
            {
                $bPos = $pos;
                $bChapter = trim(substr(explode(':', $b)[0], strlen($book)));
            }
        }

        if (intval($aPos) == intval($bPos))
        {
            if (intval($aChapter) == intval($bChapter))
            {
                $aChapter = explode(':', $a)[0];
                $bChapter = explode(':', $b)[0];
                return strcmp(substr($a, strlen($aChapter)), substr($b, strlen($bChapter)));
            }
            else
            {
                return intval($aChapter) > intval($bChapter) ? 1 : -1;
            }
        }
        else
        {
            return intval($aPos) > intval($bPos) ? 1 : -1;
        }
    });
    if (isset($_GET['api']) && $_GET['api'] == "1")
    {
        echo htmlentities(implode('; ', $references)) . '.';
    }
    else
    {
?>
<form method="POST">
    <h1>Sort Scripture References</h1>
    <p>Separate each reference with a semi colon.</p>
    <p><textarea name="references" rows="15" cols="60"><?php echo htmlentities(isset($_POST['references']) ? $_POST['references'] : ''); ?></textarea></p>
    <p><input type="submit" value="Submit"></p>
    <h2>Output</h2>
    <p><?php echo htmlentities(implode('; ', $references)) . '.'; ?></p>
</form>
<?php } ?>