<?php // File: $Id: modules.php,v 1.14.2.3 2002/05/16 12:03:34 eugeniobaldi Exp $ $Name:  $
// ----------------------------------------------------------------------
// Original Author of file: Francisco Burzi
// Purpose of file: Load the module in a safe and friendly enviornment
// ----------------------------------------------------------------------

// Some defaults
$op = 'modload';
$name = 'News';
$file = 'index';

// Compatibility note : some webserver versions seem to include the
// REQUEST_URI in front of PATH_INFO, so you'll want to remove that part
$path_info = $_SERVER['PATH_INFO'];
//$path_info = pnServerGetVar('PATH_INFO');
$path_info = trim($path_info,'/');

if (!empty($path_info)) {
    // extract the list of parameters
    $params = explode('/',$path_info);

    // Format : /site.php/articles/NN.html
    //          (optionally with ?mode=...&order=...&thold=...)
    if ($params[0] == 'articles') {
        $sid = preg_replace('/\.html/','',$params[1]);
        if (preg_match('/^[0-9]+$/',$sid)) {
            $file = 'article';
        }
        // add your comment defaults here
        if (!isset($mode)) {
            $mode = 'thread';
        }
        if (!isset($order)) {
            $order = 0;
        }
        if (!isset($thold)) {
            $thold = 0;
        }
    }
    // Format : /site.php/topics/index.html and /site.php/topics/NN.html
    //          (optionally with ?allstories=1)
    elseif ($params[0] == 'topics') {
        if (empty($params[1]) || $params[1] == 'index.html') {
            $name = 'Topics';
        } else {
            $topic = preg_replace('/\.html/','',$params[1]);
        }
    }
    // Format : /site.php/categories/NN.html (no /index.html here)
    //          (optionally with ?allstories=1)
    elseif ($params[0] == 'categories') {
        $catid = preg_replace('/\.html/','',$params[1]);
    }
    // Format : /site.php/sections/index.html (and /site.php/sections/NN.html)
    // and /site.php/sections/NN/index.html and /site.php/sections/NN/MM.html
    elseif ($params[0] == 'sections') {
        $name = 'Sections';
        if (empty($params[1]) || $params[1] == 'index.html') {
        } else {
            if (preg_match('/^\d+$/',$params[1])) {
                if (empty($params[2]) || $params[2] == 'index.html') {
                    $req = 'listarticles';
                    $secid = $params[1];
                } else {
                    $req = 'viewarticle';
                    $artid = preg_replace('/\.html/','',$params[2]);
                }
            } else {
                $req = 'listarticles';
                $secid = preg_replace('/\.html/','',$params[1]);
            }
        }
    }
    // Format : /site.php/weblinks/index.html and /site.php/weblinks/NN.html
    elseif ($params[0] == 'weblinks') {
        $name = 'Web_Links';
        if (empty($params[1]) || $params[1] == 'index.html') {
        } else {
            $req = 'viewlink';
            $cid = preg_replace('/\.html/','',$params[1]);
        }
    }
    // Format : /site.php/polls/index.html and /site.php/polls/NN.html
    elseif ($params[0] == 'polls') {
        $name = 'NS-Polls';
        if (empty($params[1]) || $params[1] == 'index.html') {
        } elseif ($params[1] == 'results') {
            if (!empty($params[2])) {
                $req = 'results';
                $pollID = preg_replace('/\.html/','',$params[2]);
            }
        } else {
            $pollID = preg_replace('/\.html/','',$params[1]);
        }
    }
    // Format : /site.php/memberslist/index.html and
    //          /site.php/memberslist/ABC.html
    elseif ($params[0] == 'memberslist') {
        $name = 'Members_List';
        if (empty($params[1]) || $params[1] == 'index.html') {
        } else {
            $letter = preg_replace('/\.html/','',$params[1]);
        }
    }
    // Format : /site.php/superbb/NN/index.html and /site.php/superbb/NN/MM.html
    elseif ($params[0] == 'superbb') {
        $name = 'superbb';
        $board = $params[1];
        if (empty($params[2]) || $params[2] == 'index.html') {
            $file = 'forum';
        } else {
            $file = 'read';
            $id = preg_replace('/\.html/','',$params[2]);
        }
    }
    // Format : /site.php/stats/index.html, search, toplist, ...
    else {
        $name = ucfirst($params[0]);
        $name = preg_replace('/list/','_List',$name);
    }
}
header('Content-Type: text/html');

switch ($op) {
    case 'modload':
        define("LOADED_AS_MODULE","1");
        include 'includes/pnAPI.php';
        pnInit();
        include 'includes/legacy.php';
// eugenio themeover 20020413
//        pnThemeLoad();
        include 'modules/' . pnVarPrepForOS($name) . '/' . pnVarPrepForOS($file) . '.php';
        if (function_exists('session_write_close')) {
            session_write_close();
        } else {
            // Hack for old versions of PHP with bad session save
            $sessvars = '';
            foreach ($GLOBALS as $k => $v) {
                if ((preg_match('/^PNSV/', $k)) &&
                    (isset($v))) {
                    $sessvars .= "$k|" . serialize($v);
                }
            }
            pnSessionWrite(session_id(), $sessvars);
        }

        break;
    default:
        die ("Sorry, you can't access this file directly...");
        break;
}
?>