File: admin/clone.php

Recommend this page to a friend!
  Classes of Michael Beck  >  XOOPS Publisher Module  >  admin/clone.php  >  Download  
File: admin/clone.php
Role: Example script
Content type: text/plain
Description: Example script
Class: XOOPS Publisher Module
Publish static HTML content and article with XOOPS
Author: By
Last change:
Date: 1 year ago
Size: 3,611 bytes
 

 

Contents

Class file image Download
<?php
/*
 You may not change or alter any portion of this comment or credits
 of supporting developers from this source code or any supporting source code
 which is considered copyrighted (c) material of the original comment or credit authors.

 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.
 */

/**
 * @copyright The XUUPS Project http://sourceforge.net/projects/xuups/
 * @license http://www.fsf.org/copyleft/gpl.html GNU public license
 * @package Publisher
 * @since 1.0
 * @author trabis <lusopoemas@gmail.com>
 */

use Xmf\Request;
use
XoopsModules\Publisher;

require_once
__DIR__ . '/admin_header.php';

Publisher\Utility::cpHeader();
//publisher_adminMenu(-1, _AM_PUBLISHER_CLONE);
Publisher\Utility::openCollapsableBar('clone', 'cloneicon', _AM_PUBLISHER_CLONE, _AM_PUBLISHER_CLONE_DSC);

if (
'submit' === Request::getString('op', '', 'POST')) {
    if (!
$GLOBALS['xoopsSecurity']->check()) {
       
redirect_header('clone.php', 3, implode('<br>', $GLOBALS['xoopsSecurity']->getErrors()));
    }

   
// $clone = $_POST['clone'];
   
$clone = Request::getString('clone', '', 'POST');

   
//check if name is valid
   
if (empty($clone) || preg_match('/[^a-zA-Z0-9\_\-]/', $clone)) {
       
redirect_header('clone.php', 3, sprintf(_AM_PUBLISHER_CLONE_INVALIDNAME, $clone));
    }

   
// Check wether the cloned module exists or not
   
if ($clone && is_dir($GLOBALS['xoops']->path('modules/' . $clone))) {
       
redirect_header('clone.php', 3, sprintf(_AM_PUBLISHER_CLONE_EXISTS, $clone));
    }

   
$patterns = [
       
mb_strtolower(PUBLISHER_DIRNAME) => mb_strtolower($clone),
       
mb_strtoupper(PUBLISHER_DIRNAME) => mb_strtoupper($clone),
       
ucfirst(mb_strtolower(PUBLISHER_DIRNAME)) => ucfirst(mb_strtolower($clone)),
    ];

   
$patKeys = array_keys($patterns);
   
$patValues = array_values($patterns);
   
Publisher\Cloner::cloneFileFolder(PUBLISHER_ROOT_PATH);
   
$logocreated = Publisher\Cloner::createLogo(mb_strtolower($clone));

   
$msg = '';
    if (
is_dir($GLOBALS['xoops']->path('modules/' . mb_strtolower($clone)))) {
       
$msg .= sprintf(_AM_PUBLISHER_CLONE_CONGRAT, "<a href='" . XOOPS_URL . "/modules/system/admin.php?fct=modulesadmin'>" . ucfirst(mb_strtolower($clone)) . '</a>') . "<br>\n";
        if (!
$logocreated) {
           
$msg .= _AM_PUBLISHER_CLONE_IMAGEFAIL;
        }
    } else {
       
$msg .= _AM_PUBLISHER_CLONE_FAIL;
    }
    echo
$msg;
} else {
    require_once
$GLOBALS['xoops']->path('class/xoopsformloader.php');
   
$form = new \XoopsThemeForm(sprintf(_AM_PUBLISHER_CLONE_TITLE, $helper->getModule()->getVar('name', 'E')), 'clone', 'clone.php', 'post', true);
   
$clone = new \XoopsFormText(_AM_PUBLISHER_CLONE_NAME, 'clone', 20, 20, '');
   
$clone->setDescription(_AM_PUBLISHER_CLONE_NAME_DSC);
   
$form->addElement($clone, true);
   
$form->addElement(new \XoopsFormHidden('op', 'submit'));
   
$form->addElement(new \XoopsFormButton('', '', _SUBMIT, 'submit'));
   
$form->display();
}

// End of collapsable bar
Publisher\Utility::closeCollapsableBar('clone', 'cloneicon');

require_once
__DIR__ . '/admin_footer.php';

// work around for PHP < 5.0.x
/*
if (!function_exists('file_put_contents')) {
    function file_put_contents($filename, $data, $file_append = false)
    {
        if ($fp == fopen($filename, (!$file_append ? 'w+' : 'a+'))) {
            fwrite($fp, $data);
            fclose($fp);
        }
    }
}
*/


For more information send a message to info at phpclasses dot org.