Source for file Ethna_Plugin_Generator.php

Documentation is available at Ethna_Plugin_Generator.php

  1. <?php
  2. // vim: foldmethod=marker
  3. /**
  4.  *  Ethna_Plugin_Generator.php
  5.  *
  6.  *  @author     Masaki Fujimoto <fujimoto@php.net>
  7.  *  @license    http://www.opensource.org/licenses/bsd-license.php The BSD License
  8.  *  @package    Ethna
  9.  *  @version    $Id$
  10.  */
  11.  
  12. // {{{ Ethna_Plugin_Generator
  13. /**
  14.  *  スケルトン生成プラグイン
  15.  *
  16.  *  @author     Masaki Fujimoto <fujimoto@php.net>
  17.  *  @access     public
  18.  *  @package    Ethna
  19.  */
  20. class Ethna_Plugin_Generator
  21. {
  22.     /** @var    object  Ethna_Controller    スケルトン生成に使うコントローラ */
  23.     var $ctl;
  24.  
  25.     /**
  26.      *  コンストラクタ
  27.      *
  28.      *  @access public
  29.      */
  30.     function Ethna_Plugin_Generator(&$controller, $type, $name)
  31.     {
  32.         // Ethna_Generatorでpluginを取得するときに使ったコントローラ
  33.         // ex, add-projectではEthna_Controller, app-actionではApp_Controller
  34.         $this->ctl =& $controller;
  35.     }
  36.  
  37.     /**
  38.      *  スケルトンファイルの絶対パスを解決する
  39.      *
  40.      *  @access private
  41.      *  @param  string  $skel   スケルトンファイル
  42.      */
  43.     function _resolveSkelfile($skel)
  44.     {
  45.         $file = realpath($skel);
  46.         if (file_exists($file)) {
  47.             return $file;
  48.         }
  49.  
  50.         // アプリの skel ディレクトリ
  51.         $base = $this->ctl->getBasedir();
  52.         $file = "$base/skel/$skel";
  53.         if (file_exists($file)) {
  54.             return $file;
  55.         }
  56.  
  57.         // Ethna本体の skel ディレクトリ
  58.         $base = dirname(dirname(dirname(__FILE__)));
  59.         $file = "$base/skel/$skel";
  60.         if (file_exists($file)) {
  61.             return $file;
  62.         }
  63.  
  64.         return false;
  65.     }
  66.  
  67.     /**
  68.      *  スケルトンファイルにマクロを適用してファイルを生成する
  69.      *
  70.      *  @access private
  71.      *  @param  string  $skel       スケルトンファイル
  72.      *  @param  string  $entity     生成ファイル名
  73.      *  @param  array   $macro      置換マクロ
  74.      *  @param  bool    $overwrite  上書きフラグ
  75.      *  @return bool    true:正常終了 false:エラー
  76.      */
  77.     function _generateFile($skel, $entity, $macro, $overwrite = false)
  78.     {
  79.         if (file_exists($entity)) {
  80.             if ($overwrite === false) {
  81.                 printf("file [%s] already exists -> skip\n", $entity);
  82.                 return true;
  83.             } else {
  84.                 printf("file [%s] already exists, to be overwriten.\n", $entity);
  85.             }
  86.         }
  87.  
  88.         $resolved = $this->_resolveSkelfile($skel);
  89.         if ($resolved === false) {
  90.             printf("skelton file [%s] not found.\n", $skel);
  91.             return false;
  92.         } else {
  93.             $skel = $resolved;
  94.         }
  95.  
  96.         $rfp = fopen($skel, "r");
  97.         if ($rfp == null) {
  98.             return false;
  99.         }
  100.         $wfp = fopen($entity, "w");
  101.         if ($wfp == null) {
  102.             fclose($rfp);
  103.             return false;
  104.         }
  105.  
  106.         for (;;) {
  107.             $s = fread($rfp, 4096);
  108.             if (strlen($s) == 0) {
  109.                 break;
  110.             }
  111.  
  112.             foreach ($macro as $k => $v) {
  113.                 $s = preg_replace("/{\\\$$k}/", $v, $s);
  114.             }
  115.             fwrite($wfp, $s);
  116.         }
  117.  
  118.         fclose($wfp);
  119.         fclose($rfp);
  120.  
  121.         $st = stat($skel);
  122.         if (chmod($entity, $st[2]) == false) {
  123.             return false;
  124.         }
  125.  
  126.         printf("file generated [%s -> %s]\n", $skel, $entity);
  127.  
  128.         return true;
  129.     }
  130.  
  131.     /**
  132.      *  ユーザ定義のマクロを設定する(~/.ethna)
  133.      *
  134.      *  @access private
  135.      */
  136.     function _getUserMacro()
  137.     {
  138.         if (isset($_SERVER['USERPROFILE']) && is_dir($_SERVER['USERPROFILE'])) {
  139.             $home = $_SERVER['USERPROFILE'];
  140.         } else {
  141.             $home = $_SERVER['HOME'];
  142.         }
  143.  
  144.         if (is_file("$home/.ethna") == false) {
  145.             return array();
  146.         }
  147.  
  148.         $user_macro = parse_ini_file("$home/.ethna");
  149.         return $user_macro;
  150.     }
  151. }
  152. // }}}
  153. ?>

Documentation generated on Fri, 11 Nov 2011 04:00:10 +0900 by phpDocumentor 1.4.3