blfs-chapter11.php

#! /usr/bin/php
<?php

include 'blfs-include.php';

$CHAPTER       = '11';
$CHAPTERS      = 'Chapter 11';
$START_PACKAGE = 'compface';
$STOP_PACKAGE  = 'unixODBC';

$renames = array();
$renames[ 'lsof_'     ] = 'lsof';
$renames[ 'rep-gtk_'  ] = 'rep-gtk';
$renames[ 'tidy-cvs_' ] = 'tidy-cvs';

$ignores = array();

$regex = array();
$regex[ 'ibus'          ] = "/^.*Release (\d[\d\.]+\d).*$/";
$regex[ 'intltool'      ] = "/^.*Latest version is (\d[\d\.]+\d).*$/";
$regex[ 'xscreensaver'  ] = "/^.*xscreensaver-(\d[\d\.]+\d).tar.*$/";

//$current="ImageMagick";  // For debugging

$url_fix = array (
   array( //'pkg'     => 'gnome',
          'match'   => '^ftp:\/\/ftp.gnome',
          'replace' => "http://ftp.gnome" ),

   array( 'pkg'     => 'highlight',
          'match'   => '^.*$', 
          'replace' => "http://www.andre-simon.de/zip/download.php" ),

   array( 'pkg'     => 'ibus',
          'match'   => '^.*$', 
          'replace' => "https://github.com/ibus/ibus/releases" ),

   array( 'pkg'     => 'intltool',
          'match'   => '^.*$', 
          'replace' => "https://launchpad.net/intltool/trunk" ),

   array( 'pkg'     => 'unixODBC',
          'match'   => '^.*$', 
          'replace' => "ftp://ftp.unixodbc.org/pub/unixODBC" ),

   array( 'pkg'     => 'xscreensaver',
          'match'   => '^.*$', 
          'replace' => "http://www.jwz.org/xscreensaver/download.html" ),
);

function get_packages( $package, $dirpath )
{
  global $regex;
  global $book_index;
  global $url_fix;
  global $current;

  if ( isset( $current ) && $book_index != "$current" ) return 0;

  // Fix up directory path
  foreach ( $url_fix as $u )
  {
     $replace = $u[ 'replace' ];
     $match   = $u[ 'match'   ];

     if ( isset( $u[ 'pkg' ] ) )
     {
        if ( $package == $u[ 'pkg' ] )
        {
           $dirpath = preg_replace( "/$match/", "$replace", $dirpath );
           break;
        }
     }
     else
     {
        if ( preg_match( "/$match/", $dirpath ) )
        {
           $dirpath = preg_replace( "/$match/", "$replace", $dirpath );
           break;
        }
     }
  }

  // Check for ftp
  if ( preg_match( "/^ftp/", $dirpath ) ) 
  { 

    // Get listing
    $lines = http_get_file( "$dirpath/" );
  }
  else // http
  {
    // glib type packages
    if ( $book_index == "gtk-doc" )
    {
      // Parent listing
      $dirpath  = rtrim  ( $dirpath, "/" );    // Trim any trailing slash
      $position = strrpos( $dirpath, "/" );
      $dirpath  = substr ( $dirpath, 0, $position );
      $lines    = http_get_file( $dirpath );
      $dir      = find_max( $lines, '/^\s+[\d\.]+\//', '/^\s+([\d\.]+)\/.*$/' );
      $dirpath .= "/$dir/";
    }

    // babl and similar
    if ( $book_index == "rarian" )
    {
       // Get the max directory and adjust the directory path
      $dirpath  = rtrim  ( $dirpath, "/" );    // Trim any trailing slash
      $position = strrpos( $dirpath, "/" );
      $dirpath  = substr ( $dirpath, 0, $position );
      $lines    = http_get_file( $dirpath );
      $dir      = find_max( $lines, '/^\s+[\d\.]+\//', '/^\s+([\d\.]+)\/.*$/' );
      $dirpath .= "/$dir/";
    }

    // Customize http directories as needed
     $lines = http_get_file( $dirpath );
     if ( ! is_array( $lines ) ) return $lines;
  } // End fetch

  if ( isset( $regex[ $package ] ) )
  {
     // Custom search for latest package name
     foreach ( $lines as $l )
     {
        if ( preg_match( '/^\h*$/', $l ) ) continue;
        $ver = preg_replace( $regex[ $package ], "$1", $l );
        if ( $ver == $l ) continue;

        if ( $book_index == "exiv" ) $ver = "2-$ver";
        
        return $ver;  // Return first match of regex
     }

     return 0;  // This is an error
  }

  if ( $book_index == "hd2u" )
    return find_max( $lines, '/hd2u/', '/^.*hd2u-([\d\.]+).tgz.*$/' );

  if ( $book_index == "ImageMagick" )
    return find_max( $lines, '/ImageMagick/', '/^.*ImageMagick-([\d\.-]+).tar.*$/' );

  if ( $book_index == "js" )
    return find_max( $lines, '/js/', '/^.*js(\d[\d\.-]+\d).tar.*$/' );

  if ( $book_index == "lsof_" )
    return find_max( $lines, '/lsof_/', '/^.*lsof_([\d\.]+).tar.*$/' );

  if ( $book_index == "qtchooser" )
    return find_max( $lines, '/qtchooser/', '/^.*qtchooser-([\d\.]+)-.*.tar.gz.*$/' );

  if ( $book_index == "tree" )
    return find_max( $lines, '/tree/', '/^.*tree-([\d\.]+).tgz.*$/' );

  if ( $book_index == "tidy-cvs_" )
    return find_max( $lines, '/tidy-cvs/', '/^.*_(\d+).tar.*$/' );

  if ( $book_index == "rep-gtk_" )
    return find_max( $lines, '/rep-gtk/', '/^.*[_-]([\d\.]+).tar.*$/' );

  // Most packages are in the form $package-n.n.n
  // Occasionally there are dashes (e.g. 201-1)
  $max = find_max( $lines, "/$package/", "/^.*$package-([\d\.]*\d)\.tar.*$/" );
  return $max;
}

Function get_pattern( $line )
{
   // Set up specific patter matches for extracting book versions
   $match = array();

   $match = array(
     array( 'pkg'   => 'hd2u', 
            'regex' => "/hd2u-([\d\.]+)/" ),

     array( 'pkg'   => 'qtchooser', 
            'regex' => "/qtchooser-([\d\.]+)-.*/" ),
   );

   foreach( $match as $m )
   {
      $pkg = $m[ 'pkg' ];
      if ( preg_match( "/$pkg/", $line ) ) 
         return $m[ 'regex' ];
   }

   return "/\D*(\d.*\d)\D*$/";
}

get_current();  // Get what is in the book

// Get latest version for each package 
foreach ( $book as $pkg => $data )
{
   $book_index = $pkg; 

   $base = $data[ 'basename' ];
   $url  = $data[ 'url' ];
   $bver = $data[ 'version' ];

   echo "book index: $book_index $bver $url\n";

   $v = get_packages( $book_index, $url );
   $vers[ $book_index ] = $v;
}

html();  // Write html output
?>