source: build-tools/dh-make-dotclear @ 2566:9bf417837888

#!/usr/bin/env php
<?php
class lambdaModule
{
     private $deb;
     private $type;
     private $today;

     private $id;
     private $package_name;
     private $name;
     private $desc;
     private $author;
     private $version;

     public function __construct($module,$type)
     {
          if ($type != 'plugin' && $type != 'theme') {
               throw new Exception('Invalid module type');
          }
          $this->type = $type;

          if (!$module || !is_dir($module)) {
               throw new Exception(sprintf('Module %s does not exist',$module));
          }

          $mod_define = $module.'/_define.php';

          if (!is_file($mod_define)) {
               throw new Exception(sprintf('Module %s does not have _define.php file',$module));
          }

          if (is_dir($module.'/debian')) {
               throw new Exception(sprintf('Module %s already have a debian directory',$module));
          }

          include $mod_define;
          $this->id = strtolower(basename(realpath($module)));
          $this->package_name = 'libdotclear-'.$this->type.'-'.$this->id;

          # Creating debian directory
          $this->deb = $module.'/debian';
          mkdir($this->deb);

          $this->createFile('changelog',$this->changelogTPL());
          $this->createFile('compat',"4\n");
          $this->createFile('control',$this->controlTPL());
          $this->createFile('copyright',$this->copyrightTPL());
          $this->createFile('dirs',$this->dirsTPL());
          $this->createFile('rules',$this->rulesTPL());
          chmod($this->deb.'/rules',0755);
     }

     private function registerModule($name,$desc,$author,$version)
     {
          $this->name = $name;
          $this->desc = $desc;
          $this->author = $author;
          $this->version = $version;
     }

     private function createFile($name,$content='')
     {
          $fp = fopen($this->deb.'/'.$name,'wb');
          fwrite($fp,$content);
          fclose($fp);
     }

     private function changelogTPL()
     {
          return
          $this->package_name.' ('.$this->version.') unstable; urgency=low'."\n".
          "\n".
          "  Initial upstream release\n".
          "\n".
          " -- ".$this->author." <email@example.com>  ".date('r')."\n\n";
     }

     private function controlTPL()
     {
          return
          "Source: ".$this->package_name."\n".
          "Section: web\n".
          "Priority: optional\n".
          "Maintainer: ".$this->author." <email@example.com>\n".
          "Build-Depends: debhelper (>= 4.0.0), php5-cli\n".
          "Standards-Version: 3.6.1\n".
          "\n".
          "Package: ".$this->package_name."\n".
          "Architecture: all\n".
          'Depends: ${misc:Depends}, dotclear'."\n".
          "Description: Dotclear ".$this->name." Module \n".
          " DotClear is a bloging tool.\n".
          " .\n".
          " ".$this->desc."\n".
          "\n";
     }

     private function copyrightTPL()
     {
          return
          "This is Dotclear ".$this->name." Module, written and maintained by ".$this->author."\n".
          "on ".date('r').".\n".
          "\n".
          "Copyright (C) ".date('Y')." ".$this->author."\n".
          "\n".
          "License:\n".
          "\n".
          "  This program is free software; you can redistribute it and/or modify\n".
          "  it under the terms of the GNU General Public License as published by\n".
          "  the Free Software Foundation; either version 2 of the License, or\n".
          "  (at your option) any later version.\n".
          "\n".
          "  This program is distributed in the hope that it will be useful,\n".
          "  but WITHOUT ANY WARRANTY; without even the implied warranty of\n".
          "  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\n".
          "  GNU General Public License for more details.\n".
          "\n".
          "  You should have received a copy of the GNU General Public License\n".
          "  along with this package; if not, write to the Free Software\n".
          "  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA\n".
          "  02111-1307, USA.\n".
          "\n".
          "On Debian systems, the complete text of the GNU General\n".
          "Public License can be found in `/usr/share/common-licenses/GPL'.".
          "\n";
     }

     private function dirsTPL()
     {
          return
          '/usr/share/dotclear/'.$this->type.'s/'.$this->id."\n";
     }

     private function rulesTPL()
     {
          return
          "#!/usr/bin/make -f\n".
          "# -*- makefile -*-\n".
          "\n".
          "DEST=debian/".$this->package_name."/usr/share/dotclear/".$this->type.'s/'.$this->id."\n".
          "\n".
          "configure: configure-stamp\n".
          "configure-stamp:\n".
          "    dh_testdir\n".
          "    # Add here commands to configure the package.\n".
          "\n".
          "    touch configure-stamp\n".
          "\n".
          "build: build-stamp\n".
          "\n".
          "build-stamp: configure-stamp\n".
          "    dh_testdir\n".
          "\n".
          "    # Add here commands to compile the package.\n".
          '    test -f Makefile && $(MAKE) config || echo "No Makefile"'."\n".
          "    touch build-stamp\n".
          "\n".
          "clean:\n".
          "    dh_testdir\n".
          "    dh_testroot\n".
          "    rm -f build-stamp configure-stamp\n".
          "\n".
          "    # Add here commands to clean up after the build process.\n".
          '    test -f Makefile && $(MAKE) clean || echo "No Makefile"'."\n".
          "\n".
          "    dh_clean\n".
          "\n".
          "install: build\n".
          "    dh_testdir\n".
          "    dh_testroot\n".
          "    dh_clean -k\n".
          "    dh_installdirs\n".
          "\n".
          "    test -d _dist/module \\\n".
          '    && cp -af _dist/module ./$(DEST) \\'."\n".
          "    || ( \\\n".
          "         find ./ -mindepth 1 -type d -not -regex '.*.svn.*' \\\n".
          "         -not -regex '.*debian.*' -exec mkdir ./\$(DEST)/\{\} \; \\\n".
          "         && find ./ -type f -not -regex '.*.svn.*' -not -regex '.*debian.*' \\\n".
          "         -not -name 'Makefile' -not -name 'configure-stamp' \\\n".
          "         -not -name 'build-stamp' -exec cp -f \{\} ./\$(DEST) \; \\\n".
          "    )\n".
          "\n".
          "# Build architecture-independent files here.\n".
          "binary-indep: build install\n".
          "# We have nothing to do by default.\n".
          "\n".
          "# Build architecture-dependent files here.\n".
          "binary-arch: build install\n".
          "    dh_testdir\n".
          "    dh_testroot\n".
          "    dh_installchangelogs\n".
          "    dh_installdocs\n".
          "    dh_installexamples\n".
          "    dh_installman\n".
          "    dh_link\n".
          "    dh_strip\n".
          "    dh_compress\n".
          "    dh_fixperms\n".
          "    dh_installdeb\n".
          "    dh_gencontrol\n".
          "    dh_md5sums\n".
          "    dh_builddeb\n".
          "\n".
          "binary: binary-indep binary-arch\n".
          ".PHONY: build clean binary-indep binary-arch binary install configure\n".
          "\n";
     }
}

# Main
try
{
     $module = !empty($_SERVER['argv'][1]) ? $_SERVER['argv'][1] : '.';
     $type = !empty($_SERVER['argv'][2]) ? $_SERVER['argv'][2] : 'plugin';
     $m = new lambdaModule($module,$type);
}
catch (Exception $e)
{
     fwrite(STDERR,$e->getMessage()."\n");
     exit(1);
}
?>