website/common/code/boost_archive.php

<?php
/*
  Copyright 2005-2008 Redshift Software, Inc.
  Distributed under the Boost Software License, Version 1.0.
  (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)
*/
require_once(dirname(__FILE__) . '/boost.php');

function get_archive_location(
    $pattern,
    $vpath,
    $archive_subdir = true,
    $zipfile = true,
    $archive_dir = ARCHIVE_DIR,
    $archive_file_prefix = ARCHIVE_FILE_PREFIX)
{
    $path_parts = array();
    preg_match($pattern, $vpath, $path_parts);

    $version = $path_parts[1];
    $key = $path_parts[2];

    $file = ($zipfile ? '' : $archive_dir . '/');

    if ($archive_subdir)
    {
        $file = $file . $archive_file_prefix . $version . '/' . $key;
    }
    else
    {
        $file = $file . $archive_file_prefix . $key;
    }

    $archive = $zipfile ? str_replace('\\','/', $archive_dir . '/' . $version . '.zip') : Null;
    
    return array(
        'version' => $version,
        'key' => $key,
        'file' => $file,
        'archive' => $archive,
        'zipfile' => $zipfile
    );
}

function display_from_archive(
    $params,
    $content_map = array(),
    $override_extractor = null)
{
    $params['template'] = dirname(__FILE__)."/template.php";
    $params['title'] = NULL;
    $params['charset'] = NULL;
    $params['content'] = NULL;
    
    $info_map = array_merge($content_map, array(
        array('@.*@','@[.](txt|py|rst|jam|v2|bat|sh|xml|qbk)$@i','text','text/plain'),
        array('@.*@','@[.](c|h|cpp|hpp)$@i','cpp','text/plain'),
        array('@.*@','@[.]png$@i','raw','image/png'),
        array('@.*@','@[.]gif$@i','raw','image/gif'),
        array('@.*@','@[.](jpg|jpeg|jpe)$@i','raw','image/jpeg'),
        array('@.*@','@[.]css$@i','raw','text/css'),
        array('@.*@','@[.]js$@i','raw','application/x-javascript'),
        array('@.*@','@[.]pdf$@i','raw','application/pdf'),
        array('@.*@','@[.](html|htm)$@i','raw','text/html'),
        array('@.*@','@[^.](Jamroot|Jamfile|ChangeLog)$@i','text','text/plain'),
        array('@.*@','@[.]dtd$@i','raw','application/xml-dtd'),
        ));

    $preprocess = null;
    $extractor = null;
    $type = null;

    foreach ($info_map as $i)
    {
        if (preg_match($i[1],$params['key']))
        {
            $extractor = $i[2];
            $type = $i[3];
            $preprocess = isset($i[4]) ? $i[4] : NULL;
            break;
        }
    }
    
    if ($override_extractor) $extractor = $override_extractor;

    if (!$extractor) {
        file_not_found($params);
        return;
    }

    // Check zipfile.

    $check_file = $params['zipfile'] ? $params['archive'] : $params['file'];

    if (!is_file($check_file)) {
        file_not_found($params,
            $params['zipfile'] ?
                'Unable to find zipfile.' :
                'Unable to find file.');
        return;        
    }

    $last_modified = max(
        strtotime("Sun, 11 Jul 2010 18:55:24 +0100"),
        filemtime($check_file));

    if (!conditional_get($last_modified))
        return;

    // Extract the file from the zipfile

    if ($params['zipfile'])
    {
        $unzip =
          UNZIP
          .' -p '.escapeshellarg($params['archive'])
          .' '.escapeshellarg($params['file']);

        if($extractor == 'raw') {
            display_raw_file($unzip, $type);
            return;
        }

        // Note: this sets $params['content'] with either the content or an error
        // message:
        if(!extract_file($unzip, $params['content'])) {
            file_not_found($params, $params['content']);
            return;
        }
    }
    else
    {
        if($extractor == 'raw') {
            display_unzipped_file($params['file'], $type);
            return;
        }

        // Note: this sets $params['content'] with either the content or an error
        // message:
        if(!extract_unzipped_file($params['file'], $params['content'])) {
            file_not_found($params, $params['content']);
            return;
        }
    }
    
    if($type == 'text/html') {
        if(html_headers($params['content'])) {
            if($_SERVER['REQUEST_METHOD'] != 'HEAD') echo $params['content'];
            return;
        }
    }

    if($_SERVER['REQUEST_METHOD'] == 'HEAD') return;

    if ($preprocess) {
        $params['content'] = call_user_func($preprocess, $params['content']);
    }
    
    echo_filtered($extractor, $params);
}

function conditional_get($last_modified) {
    if(!$last_modified) return true;

    $last_modified_text = date(DATE_RFC2822, $last_modified);
    $etag = '"'.md5($last_modified).'"';

    header("Last-Modified: $last_modified_text");
    header("ETag: $etag");

    $checked = false;

    if(isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])) {
        $checked = true;
        $if_modified_since = strtotime(stripslashes($_SERVER['HTTP_IF_MODIFIED_SINCE']));
        if(!$if_modified_since || $if_modified_since < $last_modified)
            return true;
    }

    if(isset($_SERVER['HTTP_IF_NONE_MATCH'])) {
        $checked = true;
        if(stripslashes($_SERVER['HTTP_IF_NONE_MATCH'] != $etag))
            return true;
    }
    
    if(!$checked) return true;
    
    header($_SERVER["SERVER_PROTOCOL"].' 304 Not Modified');
    return false;
}

class boost_archive_render_callbacks {
    var $content_callback, $params;
    
    function boost_archive_render_callbacks($content, $params) {
        $this->content_callback = $content;
        $this->archive = $params;
    }

    function content_head()
    {
        $charset = $this->archive['charset'] ? $this->archive['charset'] : 'us-ascii';
        $title = $this->archive['title'] ? 'Boost C++ Libraries - '.$this->archive['title'] : 'Boost C++ Libraries';

        print <<<HTML
<meta http-equiv="Content-Type" content="text/html; charset=${charset}" />
<title>${title}</title>
HTML;
    }
    
    function content()
    {
        if ($this->content_callback)
        {
            call_user_func($this->content_callback, $this->archive);
        }
    }
}

function display_raw_file($unzip, $type) {
    header('Content-type: '.$type);
    switch($type) {
        case 'image/png':
        case 'image/gif':
        case 'image/jpeg':
        case 'text/css':
        case 'application/x-javascript':
        case 'application/pdf':
        case 'application/xml-dtd':
            header('Expires: '.date(DATE_RFC2822, strtotime("+1 year")));
            header('Cache-Control: max-age=31556926'); // A year, give or take a day.
    }

    // Since we're not returning a HTTP error for non-existant files,
    // might as well not bother checking for the file
    if($_SERVER['REQUEST_METHOD'] == 'HEAD') return;

    ## header('Content-Disposition: attachment; filename="downloaded.pdf"');
    $file_handle = popen($unzip,'rb');
    fpassthru($file_handle);
    $exit_status = pclose($file_handle);
    
    // Don't display errors for a corrupt zip file, as we seemd to
    // be getting them for legitimate files.

    if($exit_status > 3)
        echo 'Error extracting file: '.unzip_error($exit_status);
};

function display_unzipped_file($file, $type) {
    header('Content-type: '.$type);
    switch($type) {
        case 'image/png':
        case 'image/gif':
        case 'image/jpeg':
        case 'text/css':
        case 'application/x-javascript':
        case 'application/pdf':
        case 'application/xml-dtd':
            header('Expires: '.date(DATE_RFC2822, strtotime("+1 year")));
            header('Cache-Control: max-age=31556926'); // A year, give or take a day.
    }

    // Since we're not returning a HTTP error for non-existant files,
    // might as well not bother checking for the file
    if($_SERVER['REQUEST_METHOD'] == 'HEAD') return;

    ## header('Content-Disposition: attachment; filename="downloaded.pdf"');
    $file_handle = fopen($file,'rb');
    // TODO: Check $file_handle (should be okay, because already checked for file).
    fpassthru($file_handle);
    $exit_status = fclose($file_handle);
    
    // TODO: What if !$exit_status?
};


function extract_file($unzip, &$content) {
    $file_handle = popen($unzip,'r');
    $text = '';
    while ($file_handle && !feof($file_handle)) {
        $text .= fread($file_handle,8*1024);
    }
    $exit_status = pclose($file_handle);

    if($exit_status == 0) {
        $content = $text;
        return true;
    }
    else {
        $content = strstr($_SERVER['HTTP_HOST'], 'beta') ? unzip_error($exit_status) : null;
        return false;
    }
}

function extract_unzipped_file($file, &$content) {
    $file_handle = fopen($file,'r');

    if($file_handle === FALSE) {
        $content = null;
        return false;
    }

    $text = '';
    while ($file_handle && !feof($file_handle)) {
        $text .= fread($file_handle,8*1024);
    }
    $exit_status = fclose($file_handle);

    if($exit_status) {
        $content = $text;
        return true;
    }
    else {
        $content = null;
        return false;
    }
}


//
// Filters
//

function echo_filtered($extractor, $params) {
    $extractor_name = $extractor.'_filter';
    call_user_func($extractor_name, $params);
}

function text_filter($params)
{
    $params['title'] = htmlentities($params['key']);

    display_template($params['template'],
        new boost_archive_render_callbacks('text_filter_content', $params));
}

function text_filter_content($params)
{
    print "<h3>".htmlentities($params['key'])."</h3>\n";
    print "<pre>\n";
    print_encoded_text($params, 'text');
    print "</pre>\n";
}

function cpp_filter($params) {
    $params['title'] = htmlentities($params['key']);

    display_template($params['template'],
        new boost_archive_render_callbacks('cpp_filter_content', $params));
}

function cpp_filter_content($params)
{
    print "<h3>".htmlentities($params['key'])."</h3>\n";
    print "<pre>\n";
    print_encoded_text($params, 'cpp');
    print "</pre>\n";
}

function boost_book_html_filter($params) {
    html_init($params);
    display_template($params['template'],
        new boost_archive_render_callbacks('boost_book_html_filter_content', $params));
}

function boost_book_html_filter_content($params)
{
    $text = prepare_html($params['content']);
    
    $text = substr($text,strpos($text,'<div class="spirit-nav">'));
    $text = substr($text,0,strpos($text,'</body>'));
    $text = str_replace('<hr>','',$text);
    $text = str_replace('<table width="100%">','<table class="footer-table">',$text);
    $text = str_replace('<table xmlns:rev="http://www.cs.rpi.edu/~gregod/boost/tools/doc/revision" width="100%">','<table class="footer-table">',$text);
    $text = preg_replace(
        '@[\s]+(border|cellpadding|cellspacing|width|height|valign|frame|rules|naturalsizeflag|background)=[^\s>]+@i',
        '',
        $text );
    ##
    for ($i = 0; $i < 8; $i++) {
        $text = preg_replace(
            '@<img src="[\./a-z]*images/(prev|up|home|next|tip|note|warning|important|caution|sidebar|hint|alert)\.png" alt="([^"]+)"([ /]*)>@Ssm',
            '<img src="/gfx/space.png" alt="${2}" class="${1}_image" />',
            $text );
    }
    ##
    
    print $text;
}

function boost_libs_filter($params)
{
    html_init($params);
    $text = extract_html_body($params['content']);
    if($text) {
        $text = prepare_html($text);
        $text = remove_html_banner($text);
        $text = prepare_themed_html($text);
        $params['content'] = $text;
        
        display_template($params['template'],
            new boost_archive_render_callbacks('boost_libs_filter_content', $params));
    }
    else {
        print $params['content'];
    }
}

function boost_libs_filter_content($params)
{
    return $params['content'];
}

function boost_frame1_filter($params) {
    html_init($params);
    display_template($params['template'],
        new boost_archive_render_callbacks(new boost_frame1_filter_content, $params));
}

function boost_frame1_filter_content($params)
{
    $text = prepare_html($params['content']);
    
    $text = substr($text,strpos($text,'<div class="spirit-nav">'));
    $text = substr($text,0,strpos($text,'</body>'));
    for ($i = 0; $i < 8; $i++) {
        $text = preg_replace(
            '@<img src="[\./]*images/(.*\.png)" alt="(.*)"([ ][/])?>@Ssm',
            '<img src="/style-v2/css_0/${1}" alt="${2}" />',
            $text );
    }
    $text = str_replace('<hr>','',$text);
    $text = str_replace('<table width="100%">','<table class="footer-table">',$text);
    $text = preg_replace(
        '@[\s]+(border|cellpadding|cellspacing|width|height|valign|frame|rules|naturalsizeflag|background)=[^\s>]+@i',
        '',
        $text );
    
    print $text;
}

function simple_filter($params)
{
    print prepare_html($params['content']);
}

function basic_filter($params)
{
    $text = prepare_html($params['content']);
    $text = remove_html_banner($text);

    $is_xhtml = preg_match('@<!DOCTYPE[^>]*xhtml@i', $text);
    $tag_end = $is_xhtml ? '/>' : '>';
    
    $sections = preg_split('@(</head>|<body[^>]*>)@i',$text,-1,PREG_SPLIT_DELIM_CAPTURE);

    $body_index = 0;
    $index = 0;
    foreach($sections as $section) {
        if(stripos($section, '<body') === 0) {
            $body_index = $index;
            break;
        }
        ++$index;
    }

    if(!$body_index) {
        print($text);
    }
    else {
        $index = 0;
        foreach($sections as $section) {
            print($section);
            if($index == 0) {
                print '<link rel="icon" href="/favicon.ico" type="image/ico"'.$tag_end;
                print '<link rel="stylesheet" type="text/css" href="/style-v2/section-basic.css"'.$tag_end;
            }
            else if($index == $body_index) {
                virtual("/common/heading-doc.html");
            }
            ++$index;
        }
    }
}

/* File Not Found */

function file_not_found($params, $message = null)
{
    if(is_string($params)) {
        $params = Array(
            'file' => $params,
            'template' => dirname(__FILE__)."/template.php"
        );
    }

    header($_SERVER["SERVER_PROTOCOL"]." 404 Not Found");
    display_template($params['template'],
        new file_not_found_render_callbacks($params['file'],
            $params['zipfile'] ? "Unzip error: $message" : $message));
}

class file_not_found_render_callbacks
{
    var $file, $message;
    
    function file_not_found_render_callbacks($file, $message) {
        $this->file = $file;
        $this->message = $message;
    }

    function content_head()
    {
        print <<<HTML
  <meta http-equiv="Content-Type" content="text/html; charset=us-ascii" />
  <title>Boost C++ Libraries - 404 Not Found</title>
HTML;
    }
    
    function content()
    {
        print '<h1>404 Not Found</h1><p>File "' . $this->file . '" not found.</p>';
        if($this->message) {
            print '<p>'.htmlentities($this->message).'</p>';
        }
    }
}

/*
 * HTML processing functions
 */

function html_headers($content)
{
    if(preg_match(
        '@<meta\s+http-equiv\s*=\s*["\']?refresh["\']?\s+content\s*=\s*["\']0;\s*URL=([^"\']*)["\']\s*/?>@i',
        $content,
        $redirect))
    {
        header('Location: '.resolve_url($redirect[1]), TRUE, 301);
        return true;
    }
}

// Not a full implementation. Just good enough for redirecting.
function resolve_url($url) {
    $url = parse_url($url);

    if(isset($url['schme'])) return $url;

    $url['scheme'] = 'http'; # Detect other schemes?

    if(!isset($url['host'])) {
        $url['host'] = $_SERVER['SERVER_NAME'];
        
        if($url['path'][0] != '/') {
            $path = explode('/', $_SERVER['REQUEST_URI']);
            array_pop($path);
            $rel_path = explode('/', $url['path']);
            while(isset($rel_path[0]) && $rel_path[0] == '..') {
                array_pop($path);
                array_shift($rel_path);
            }
            $url['path'] = implode('/', $path).'/'.implode('/', $rel_path);
        }
    }
    
    return $url['scheme'].'://'.$url['host'] . $url['path'];
}

function html_init($params)
{
    preg_match('@text/html; charset=([^\s"\']+)@i',$params['content'],$charset);
    if (isset($charset[1]))
    {
        $params['charset'] = $charset[1];
    }
    
    preg_match('@<title>([^<]+)</title>@i',$params['content'],$title);
    if (isset($title[1]))
    {
        $params['title'] = $title[1];
    }
}

function extract_html_body($text) {
    preg_match('@<body[^>]*>@i',$text,$body_begin,PREG_OFFSET_CAPTURE);
    preg_match('@</body>@i',$text,$body_end,PREG_OFFSET_CAPTURE);
    if (!isset($body_begin[0]))
    {
        //~ Attempt to recover some content from illegal HTML that is missing the body tag.
        preg_match('@</head>@i',$text,$body_begin,PREG_OFFSET_CAPTURE);
    }
    if (!isset($body_begin[0]))
    {
        //~ Attempt to recover some content from illegal HTML that is missing the body tag.
        preg_match('@<html[^>]*>@i',$text,$body_begin,PREG_OFFSET_CAPTURE);
    }
    if (!isset($body_begin[0]))
    {
        //~ Attempt to recover some content from illegal HTML that is missing the body tag.
        preg_match('@<(hr|div|img|p|h1|h2|h3|h4)[^>]*>@i',$text,$body_begin,PREG_OFFSET_CAPTURE);
    }
    if (!isset($body_begin[0]))
    {
        return;
    }
    else if (!isset($body_end[0]))
    {
        $text = substr($text,
            $body_begin[0][1]+strlen($body_begin[0][0]));
    }
    else
    {
        $text = substr($text,
            $body_begin[0][1]+strlen($body_begin[0][0]),
            $body_end[0][1]-($body_begin[0][1]+strlen($body_begin[0][0])) );
    }

    return $text;
}

function prepare_html($text) {
    $text = preg_replace(
        '@href="?http://www.boost.org/?([^"\s]*)"?@i',
        'href="/${1}"',
        $text );
    $text = preg_replace(
        '@href="?http://boost.org/?([^"\s]*)"?@i',
        'href="/${1}"',
        $text );
    $text = preg_replace(
        '@href="?(?:\.\./)+people/(.*\.htm)"?@i',
        'href="/users/people/${1}l"',
        $text );
    $text = preg_replace(
        '@href="?(?:\.\./)+(LICENSE_[^"\s]*\.txt)"?@i',
        'href="/${1}"',
        $text );
    $text = preg_replace(
        '@<a\s+(class="[^"]+")?\s*href="?(http|mailto)(:[^"\s]*)"?@i',
        '<a class="external" href="${2}${3}"',
        $text );
    
    return $text;
}

function remove_html_banner($text) {

    # nasty code, because (?!fubar) causes an ICE...
    preg_match('@<table[^<>]*>?@i',$text,$table_begin,PREG_OFFSET_CAPTURE);
    preg_match('@</table>@i',$text,$table_end,PREG_OFFSET_CAPTURE);
    if (isset($table_begin[0]) && isset($table_end[0])) {
        $table_contents_start = $table_begin[0][1] + strlen($table_begin[0][0]);
        $table_contents = substr($text, $table_contents_start,
            $table_end[0][1] - $table_contents_start);

        if(strpos($table_contents, 'boost.png') !== FALSE) {
            preg_match('@<td[^<>]*>?([^<]*<(h[12]|p).*?)</td>@is', $table_contents,
                $table_contents_header, PREG_OFFSET_CAPTURE);
            
            $head = substr($text, 0, $table_begin[0][1]);
            $header = isset($table_contents_header[1]) ? $table_contents_header[1][0] : '';
            $tail = substr($text, $table_end[0][1] + strlen($table_end[0][0]));
            $tail = preg_replace('@^\s*<hr\s*/?>\s*@', '', $tail);
                
            $text = $head.$header.$tail;
            return $text;
        }
    }

    $parts = preg_split('@(?=<(p|blockquote))@', $text, 2);
    $header = $parts[0];
    $content = $parts[1];
    
    $header = preg_replace('@(<h\d>\s*)<img[^>]*src="(\.\.\/)*boost\.png"[^>]*>@', '$1', $header);    
    $header = preg_replace('@<img[^>]*src="(\.\.\/)*boost\.png"[^>]*>\s*<[hb]r.*?>@', '', $header);

    return $header.$content;
}

function prepare_themed_html($text) {
    $text = preg_replace(
        '@(<a[^>]+>[\s]*)?<img.*boost\.png[^>]*>([\s]*</a>)?@i',
        '',
        $text );
    $text = preg_replace(
        '@<img(.*)align="?right"?[^>]*>@i',
        '<img${1} class="right-inset" />',
        $text );
    $text = preg_replace(
        '@<img(.*)align="?absmiddle"?[^>]*>@i',
        '<img${1} class="inline" />',
        $text );
    /* Remove certain attributes */
    $text = preg_replace(
        '@[\s]+(border|cellpadding|cellspacing|width|height|valign|align|frame|rules|naturalsizeflag|background)=("[^"]*"?|\'[^\']*\'?|[^\s/>]+)@i',
        '',
        $text );
    $text = preg_replace(
        '@<table[\s]+(border)[^\s>]*@i',
        '<table',
        $text );
    $text = preg_replace(
        '@<[/]?(font|hr)[^>]*>@i',
        '',
        $text );
    $text = preg_replace(
        '@<([^\s]+)[\s]+>@i',
        '<${1}>',
        $text );
    $text = _preg_replace_bounds(
        '@<blockquote>[\s]*(<pre>)@i','@(</pre>)[\s]*</blockquote>@i',
        '${1}','${1}',
        $text );
    $text = _preg_replace_bounds(
        '@<blockquote>[\s]*(<p>)@i','@(</p>)[\s]*</blockquote>@i',
        '${1}','${1}',
        $text );
    $text = _preg_replace_bounds(
        '@<blockquote>[\s]*(<table>)@i','@(</table>)[\s]*</blockquote>@i',
        '${1}','${1}',
        $text );
    $text = _preg_replace_bounds(
        '@<blockquote>[\s]*<li>@i','@</li>[\s]*</blockquote>@i',
        '<ul><li>','</li></ul>',
        $text );
    $text = _preg_replace_bounds(
        '@(?:<blockquote>[\s]*)+<h2>@i','@</h2>(?:[\s]*</blockquote>)+@i',
        '<h2>','</h2>',
        $text );
    $text = preg_replace(
        '@(<a name=[^\s>]+[\s]*>)[\s]*(</?[^a])@i',
        '${1}</a>${2}',
        $text );
    $text = preg_replace(
        '@<table>([\s]+<tr>[\s]+<td>.*_arr.*</td>[\s]+<td>.*</td>[\s]+<td>.*</td>[\s]+</tr>[\s]+)</table>@i',
        '<table class="pyste-nav">${1}</table>',
        $text );
    $text = preg_replace(
        '@<table>([\s]+<tr>[\s]+<td)[\s]+class="note_box">@i',
        '<table class="note_box">${1}>',
        $text );
    $text = preg_replace(
        '@<table>([\s]+<tr>[\s]+<td[\s]+class="table_title">)@i',
        '<table class="toc">${1}',
        $text );
    $text = preg_replace(
        '@src=".*theme/u_arr\.gif"@i',
        'src="/gfx/space.png" class="up_image"',
        $text );
    $text = preg_replace(
        '@src=".*theme/l_arr\.gif"@i',
        'src="/gfx/space.png" class="prev_image"',
        $text );
    $text = preg_replace(
        '@src=".*theme/r_arr\.gif"@i',
        'src="/gfx/space.png" class="next_image"',
        $text );
    $text = preg_replace(
        '@src=".*theme/u_arr_disabled\.gif"@i',
        'src="/gfx/space.png" class="up_image_disabled"',
        $text );
    $text = preg_replace(
        '@src=".*theme/l_arr_disabled\.gif"@i',
        'src="/gfx/space.png" class="prev_image_disabled"',
        $text );
    $text = preg_replace(
        '@src=".*theme/r_arr_disabled\.gif"@i',
        'src="/gfx/space.png" class="next_image_disabled"',
        $text );
    $text = preg_replace(
        '@src=".*theme/note\.gif"@i',
        'src="/gfx/space.png" class="note_image"',
        $text );
    $text = preg_replace(
        '@src=".*theme/alert\.gif"@i',
        'src="/gfx/space.png" class="caution_image"',
        $text );
    $text = preg_replace(
        '@src=".*theme/bulb\.gif"@i',
        'src="/gfx/space.png" class="tip_image"',
        $text );
    $text = preg_replace(
        '@<img src=".*theme/(?:bullet|lens)\.gif">@i',
        '',
        $text );
    $text = preg_replace(
        '@(<img src=".*theme/(?:arrow)\.gif")>@i',
        '${1} class="inline">',
        $text );
    return $text;
}

// This takes a plain text file and outputs encoded html with marked
// up links.

function print_encoded_text($params, $type) {
    $root = dirname(preg_replace('@([^/]+/)@','../',$params['key']));

    // John Gruber's regular expression for finding urls
    // http://daringfireball.net/2009/11/liberal_regex_for_matching_urls
    
    foreach(preg_split(
        '@\b((?:[\w-]+://?|www[.])[^\s()<>]+(?:\([\w\d]+\)|[^[:punct:]\s]|/))@',
        $params['content'], -1, PREG_SPLIT_DELIM_CAPTURE)
        as $index => $part)
    {
        if($index % 2 == 0) {
            $html = htmlentities($part);
        
            if($type == 'cpp') {
                $html = preg_replace(
                    '@(#[ ]*include[ ]+&lt;)(boost[^&]+)@Ssm',
                    '${1}<a href="'.$root.'/${2}">${2}</a>',
                    $html );
                $html = preg_replace(
                    '@(#[ ]*include[ ]+&quot;)(boost[^&]+)@Ssm',
                    '${1}<a href="'.$root.'/${2}">${2}</a>',
                    $html );
            }

            print $html;
        }
        else {
            $url = process_absolute_url($part, $root);
            if($url) {
                 print '<a href="'.htmlentities($url).'">'.htmlentities($part).'</a>';
            }
            else {
                print htmlentities($part);
            }
       }
    }
}

function process_absolute_url($url, $root = null) {
    // Simplified version of the 'loose' regular expression from
    // http://blog.stevenlevithan.com/archives/parseuri
    //
    // (c) Steven Levithan <stevenlevithan.com>
    // MIT License

    if(!preg_match(
        '~^'.
        // Protocol(1): (Could also remove the userinfo detection stuff?)
        '(?:(?![^:@]+:[^:@\/]*@)([^:\/?#.]+):)?'.
        '(?:\/\/)?'.
        // Authority(2)
        '('.
            // User info
            '(?:[^:@]*:?[^:@]*@)?'.
            // Host(3)
            '([^:\/?#]*)'.
            // Port
            '(?::\d*)?'.
        ')'.
        // Relative(4)
        '(\/.*)'.
        '~',
        $url, $matches))
    {
        return;
    }

    $protocol = $matches[1];
    $authority = $matches[2];
    $host = $matches[3];
    $relative = $matches[4];
        
    if(!$authority) return;

    if($root &&
        ($host == 'boost.org' || $host == 'www.boost.org') &&
        (strpos($relative, '/lib') === 0))
    {
        $url = $root.$relative;
    }
    else
    {
        $url = ($protocol ? $protocol : 'http').'://'.$authority.$relative;
    }
    
    return $url;
}

// Display the content in the standard boost template

function display_template($template, $callbacks) {
    $_file = $callbacks;
    include($template);
}

// Return a readable error message for unzip exit state.

function unzip_error($exit_status) {
    switch($exit_status) {
    case 0: return 'No error.';
    case 1: return 'One  or  more  warning  errors  were  encountered.';
    case 2: return 'A generic error in the zipfile format was detected.';
    case 3: return 'A severe error in the zipfile format was detected.';
    case 4: return 'Unzip was unable to allocate memory for one or more buffers during program initialization.';
    case 5: return 'Unzip was unable to allocate memory or unable to obtain a tty to read the decryption password(s).';
    case 6: return 'Unzip was unable to allocate memory during decompression to disk.';
    case 7: return 'Unzip was unable to allocate memory during in-memory decompression.';
    case 9: return 'The specified zipfile was not found.';
    case 10: return 'Invalid options were specified on the command line.';
    case 11: return 'No matching files were found.';
    case 50: return 'The disk is (or was) full during extraction.';
    case 51: return 'The end of the ZIP archive was encountered prematurely.';
    case 80: return 'The user aborted unzip prematurely with control-C (or similar).';
    case 81: return 'Testing or extraction of one or more files failed due to unsupported compression methods or unsupported decryption.';
    case 82: return 'No files were found due to bad decryption password(s).';
    default: return 'Unknown unzip error code: ' + $exit_status;
    }
}

?>