Location: PHPKode > projects > ProNuke. Postnuke To Oracle > postnuke/html/includes/blocks/phpscript.php
<?php
// File: $Id: phpscript.php,v 1.11 2001/12/06 19:54:39 jgm Exp $ $Name:  $
// ----------------------------------------------------------------------
// POST-NUKE Content Management System
// Copyright (C) 2001 by the Post-Nuke Development Team.
// http://www.postnuke.com/
// ----------------------------------------------------------------------
// Based on:
// PHP-NUKE Web Portal System - http://phpnuke.org/
// Thatware - http://thatware.org/
// ----------------------------------------------------------------------
// LICENSE
//
// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License (GPL)
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// To read the license please visit http://www.gnu.org/copyleft/gpl.html
// ----------------------------------------------------------------------
// Original Author of file: Patrick Kellum
// Purpose of file: Execute very simple PHP code
// ----------------------------------------------------------------------

$blocks_modules['php'] = array(
    'func_display' => 'blocks_php_block',
    'text_type' => 'PHP',
    'text_type_long' => 'PHP Script',
    'allow_multiple' => true,
    'form_content' => true,
    'form_refresh' => false,
    'show_preview' => true
);

// Security
addinstanceschemainfo('PHPblock::', 'Block name::');

function blocks_php_block($row) {

    if (!authorised(0, 'Textblock::', "$row[title]::", ACCESS_OVERVIEW)) {
        return;
    }

    ob_start();
    print eval($row[content]);
    $row[content] = ob_get_contents();
    ob_end_clean();
    themesideblock($row);
}
?>
Return current item: ProNuke. Postnuke To Oracle