0.6.x/js/01_core/11_XClass.js

   1 \r
   2 // ------------------------------------------------------------------------- //\r
   3 // ------------ local variables -------------------------------------------- //\r
   4 // ------------------------------------------------------------------------- //\r
   5 var\r
   6         /**\r
   7          * 全てのクラスのスーパークラスのようなもの。(ライブラリ内にカプセル化されているため、ユーザが触ることはありません)<br>\r
   8          * X_Class.create() で定義されたクラスのインスタンスが共通で備えるメソッド を確認してください。\r
   9          * @class __ClassBase__\r
  10          * @private\r
  11          * @abstract\r
  12          */\r
  13         __ClassBase__ = {\r
  14                         /**\r
  15                          * クラス名\r
  16                          * @type {string}\r
  17                          */\r
  18                         name         : ''\r
  19                 },\r
  20 \r
  21         X_Class_CLASS_LIST         = [],\r
  22         X_Class_DEF_LIST           = [],\r
  23         X_Class_PRIVATE_CLASS_LIST = [],\r
  24         X_Class_PRIVATE_DEF_LIST   = [],\r
  25         X_Class_CALLING_SUPER      = [],\r
  26         X_Class_CALL_SUPER_STACK   = [],\r
  27         X_Class_killPrivateFlag    = false,\r
  28         X_Class_traits             = null,\r
  29         X_Class_useObjectCreate    = false, // !!Object.create, http://jsperf.com/prototype-vs-object-create-perf\r
  30         X_Class_use_proto_         = !X_UA[ 'OperaMobile' ] && !X_UA[ 'OperaTablet' ] && !!X_emptyFunction.prototype.__proto__,\r
  31                 // Opera Mobile 12.10 Android11 IS01 でクラスのメンバが欠落する問題に遭遇。__proto__ を使わないと動作,,,\r
  32 \r
  33 X_Class_CommonMethods =\r
  34 /** @lends __ClassBase__.prototype */\r
  35 {\r
  36         /**\r
  37          * 全ての動的メンバを削除して、インスタンスを破棄する。<br>\r
  38          * インスタンスが X.EventDispatcher とそのサブクラスの場合、次の動作をする。\r
  39          * <ol>\r
  40          * <li>X.Event.BEFORE_KILL_INSTANCE を発火する。戻り値のビットフラグに X_Callback_PREVENT_DEFAULT が立つ場合、破棄をキャンセルし X.Event.KILL_INSTANCE_CANCELED を発火する。\r
  41          * <li>破棄に進む場合は、X.Event.KILL_INSTANCE を発火する。\r
  42          * <li>dispatch 中は、インスタンスの全ての dispatch が終了するまで実際の破棄を待つ。\r
  43          * <li>実際の破棄では、インスタンスのメンバの削除に加えて全てのイベントリスナを解除する。\r
  44          */\r
  45         // TODO kill したインスタンスのイベントが残っていないか？これは開発用のみ\r
  46         'kill' : function(){\r
  47                 var instance = this,\r
  48                         klass    = X_Class_getClass( instance ),\r
  49                         def      = X_Class_getClassDef( klass ),\r
  50                         data, p, i;\r
  51                 if( def.isPrivate && !X_Class_killPrivateFlag && ( !this[ '_listeners' ] || !this[ '_listeners' ][ X_Listeners_.KILL_RESERVED ] ) ){\r
  52                         X.Logger.critical( 'PrivateInstance.kill() work in PrivateUser.kill().' );\r
  53                         return;\r
  54                 };\r
  55                 X_Class_killPrivateFlag = false; // instance.kill() 内で PrivateInstance.kill() を防ぐため\r
  56                 \r
  57                 if( this[ 'instanceOf' ]( X_EventDispatcher ) ){\r
  58                         if( !def.isPrivate ){\r
  59                                 if( this[ 'dispatch' ]( X_EVENT_BEFORE_KILL_INSTANCE ) & X_Callback_PREVENT_DEFAULT ){\r
  60                                         this[ 'dispatch' ]( X_EVENT_KILL_INSTANCE_CANCELED );\r
  61                                         return;\r
  62                                 };\r
  63                                 if( this[ '_listeners' ] && this[ '_listeners' ][ X_Listeners_.DISPATCHING ] ){\r
  64                                         this[ '_listeners' ][ X_Listeners_.KILL_RESERVED ] = true;\r
  65                                         return;\r
  66                                 };\r
  67                         } else {\r
  68                                 this[ 'dispatch' ]( X_EVENT_BEFORE_KILL_INSTANCE );     \r
  69                         };\r
  70 \r
  71                         // asyncDispatch の削除\r
  72                         for( p in X_EventDispatcher_LAZY_TIMERS ){\r
  73                                 if( X_EventDispatcher_LAZY_TIMERS[ p ] === this ){\r
  74                                         delete X_EventDispatcher_LAZY_TIMERS[ p ]; // 削除が先！理由は X.Timer.removeを確認。\r
  75                                         X_Timer_remove( parseFloat( p ) );\r
  76                                 };\r
  77                         };\r
  78                         \r
  79                         this[ 'dispatch' ]( X_EVENT_KILL_INSTANCE );\r
  80                         this[ '_listeners' ] && X_EventDispatcher_unlistenAll( this );\r
  81                 };\r
  82                 \r
  83                 for( p in instance ){\r
  84                         if( instance.hasOwnProperty && !instance.hasOwnProperty( p ) ) continue;\r
  85                         delete instance[ p ];\r
  86                 };\r
  87                 if( def.pool ){\r
  88                         def.live && def.live.splice( def.live.indexOf( instance ), 1 );\r
  89                         def.pool[ def.pool.length ] = instance;\r
  90                 };\r
  91                 if( def.privateClass ){\r
  92                         i = def.userList.indexOf( instance );\r
  93                         if( i !== -1 ){\r
  94                                 data = X_Class_getPrivate( instance );\r
  95                                 if( data[ '_listeners' ] && data[ '_listeners' ][ X_Listeners_.DISPATCHING ] && data[ 'instanceOf' ]( X.EventDispatcher ) ){\r
  96                                         data[ '_listeners' ][ X_Listeners_.KILL_RESERVED ] = true;\r
  97                                 } else {\r
  98                                         X_Class_killPrivateFlag = true;\r
  99                                         data[ 'kill' ]();\r
 100                                 };\r
 101                                 def.dataList.splice( i, 1 );\r
 102                                 def.userList.splice( i, 1 );\r
 103                         };\r
 104                 };\r
 105         },\r
 106         \r
 107         /**\r
 108          * 関数は Constructor 内で使用します。クラス定義を辿ってスーパークラスのコンストラクタを探します。<br>\r
 109          * 内部的には、呼び出したコンストラクタは配列に控え(X_Class_CALLING_SUPER)、呼び出したコンストラクタ内でさらに Super が呼ばれた場合、配列を元にさらにスーパーなコンストラクタを辿ります。\r
 110          * @example Constructor : function( arg1, arg2 ){\r
 111          *      this.Super( aeg1, arg2 );\r
 112          * }\r
 113          * @param var_args {...?} 親コンストラクタを呼ぶ際に渡す任意の数の引数\r
 114          * @return {*}\r
 115          */\r
 116         // TODO 現在 new しているインスタンスを保持してチェックする\r
 117         'Super' : function( var_args ){\r
 118                 var sClass = this,\r
 119                         i      = X_Class_CALLING_SUPER.indexOf( sClass ),\r
 120                         n      = -1,\r
 121                         l, sList, def, sConst, ret;\r
 122         \r
 123                 if( i === -1 ){\r
 124                         X_Class_CALLING_SUPER[ l = X_Class_CALLING_SUPER.length ] = sClass;\r
 125                         X_Class_CALL_SUPER_STACK[ l ] = sList = [];\r
 126                 } else {\r
 127                         sList = X_Class_CALL_SUPER_STACK[ i ];\r
 128                 };\r
 129                 \r
 130                 while( sClass ){\r
 131                         def    = X_Class_getClassDef( sClass );\r
 132                         sClass = def.SuperClass;\r
 133                         sConst = def.SuperConstructor;\r
 134                         if( sConst && sList[ ++n ] !== sConst ){\r
 135                                 sList[ n ] = sConst;\r
 136                                 ret = sConst.apply( this, arguments );\r
 137                                 --sList.length;\r
 138                                 if( !sList.length ){\r
 139                                         X_Class_CALLING_SUPER.splice( i, 1 );\r
 140                                         X_Class_CALL_SUPER_STACK.splice( i, 1 );\r
 141                                 };\r
 142                                 return ret;\r
 143                         };\r
 144                 };\r
 145                 console.log( 'スーパークラスのコンストラクタが見つかりません' );\r
 146         },\r
 147 \r
 148         /**\r
 149          * func について、親クラスで設定されている同名の関数メンバーを呼び出す。<br>\r
 150          * 第一引数に関数を指定し、2つ以上の異なる名前で同じ関数がメンバーがいた場合、動作が不確実になります。<br>\r
 151          * 参考:<a href="http://qiita.com/no22@github/items/d3bead2acbb7ff1fb86b" target="_blank">ES5なJavascriptでモダンなクラス的継承＆スーパー呼び出し </a>\r
 152          * @param funcNameOrFunc {Function|string} スーパークラスの関数名 または、オーバーライド済の自身の関数。\r
 153          * @param var_args {...*} オーバーライド元関数に渡す任意の数の引数\r
 154          * @example return this.superCall( arguments.callee, param0, param1, ... );\r
 155          * @return {*} オーバーライド元の関数を呼び出した戻り値。\r
 156          */\r
 157         'superCall' : function( funcNameOrFunc, var_args ){\r
 158                 var sClass = this,\r
 159                         args   = arguments,\r
 160                         name, p, sFunc, hit = false;\r
 161                 if( X_Type_isFunction( funcNameOrFunc ) ){\r
 162                         for( p in this.constructor.prototype ){\r
 163                                 if( this.constructor.prototype[ p ] === funcNameOrFunc ){\r
 164                                         name = p;\r
 165                                         break;\r
 166                                 };\r
 167                         };\r
 168                         if( !name ) return;\r
 169                 } else {\r
 170                         return;\r
 171                 };\r
 172                 \r
 173                 if( X_EMPTY_OBJECT[ name ] ) return;\r
 174                 \r
 175                 while( sClass ){\r
 176                         def    = X_Class_getClassDef( sClass );\r
 177                         sClass = def.SuperClass;\r
 178                         sFunc  = sClass.prototype[ name ];\r
 179                         if( sFunc === funcNameOrFunc ){\r
 180                                 hit = true; // 現在の関数にヒット\r
 181                         } else\r
 182                         if( hit && X_Object_inObject( name, this ) ){\r
 183                                 if( X_Type_isFunction( sFunc ) ){\r
 184                                         switch( args.length ){\r
 185                                                 case 1 :\r
 186                                                         return sFunc.call( this );\r
 187                                                 case 2 :\r
 188                                                         return sFunc.call( this, args[ 1 ] );\r
 189                                                 case 3 :\r
 190                                                         return sFunc.call( this, args[ 1 ], args[ 2 ] );\r
 191                                                 case 4 :\r
 192                                                         return sFunc.call( this, args[ 1 ], args[ 2 ], args[ 3 ] );\r
 193                                                 default :\r
 194                                                         args = X_Object_cloneArray( args );\r
 195                                                         args.shift();\r
 196                                                         return sFunc.apply( this, args );\r
 197                                         };\r
 198                                 };\r
 199                                 break;\r
 200                         };\r
 201                 };\r
 202         },\r
 203         \r
 204         /**\r
 205          * インスタンスのクラスか？またはスーパークラスか？調べる。<br>\r
 206          * instanceof 構文をサポートしない環境(IE4,Mac IE5)を想定する場合、必ずこのメソッドを使用すること。<br>\r
 207          * クラスのインスタンスか？だけ調べたい場合は this.constructor === klass が高速。\r
 208          * @param klass {__ClassBase__} クラス定義\r
 209          * @return {boolean}\r
 210          */\r
 211         // TODO instanceof に対応したブラウザはそちらを使用\r
 212         'instanceOf' : function( klass ){\r
 213                 var Super = this;\r
 214                 if( this.constructor === klass ) return true;\r
 215                 while( Super = X_Class_getClassDef( Super ).SuperClass ){\r
 216                         if( Super === klass ) return true;\r
 217                 };\r
 218                 return false;\r
 219         }\r
 220 };\r
 221 \r
 222 // ------------------------------------------------------------------------- //\r
 223 // --- interface ----------------------------------------------------------- //\r
 224 // ------------------------------------------------------------------------- //\r
 225 \r
 226 /*\r
 227  * @enum {number}\r
 228  * @const\r
 229  */\r
 230 var X_Class = {\r
 231         NONE         :  0,\r
 232         POOL_OBJECT  :  1,\r
 233         ABSTRACT     :  2,\r
 234         FINAL        :  4,\r
 235         SUPER_ACCESS :  8,\r
 236         PRIVATE_DATA : 16,\r
 237         SINGLETON    : 32\r
 238 };\r
 239 \r
 240 /**\r
 241  * <p>Class を定義し システムの管理下に置く。\r
 242  * <p>prototype 継承のブラウザ毎の差異も吸収し、 以下から最適な方法をしてくれる。\r
 243  * \r
 244  * <ol>\r
 245  * <li>Object.create はパフォーマンスが悪そうなので現在は使っていない。\r
 246  * <li>SubClass.prototype.__proto__ = SuperClass.prototype;\r
 247  * <li>SubClass.prototype = new SuperClass;\r
 248  * </ol>\r
 249  * \r
 250  * <ol>\r
 251  * <li>X_Class.create( opt_settings, opt_name, opt_privateClass, opt_props ) でクラスを登録．\r
 252  * <li>コンストラクタ となるメソッドは、opt_props 内の Constructor : function( arg ){ ... }, に書く．\r
 253  * <li>通常通り new で インスタンス生成\r
 254  * <li>kill() でオブジェクトをクリーンして削除、pool が有効の場合は pool される．\r
 255  * <li>pool が有効の場合、new で pool されたインスタンスが返される．\r
 256  * </ol>\r
 257  * @namespace X.Class\r
 258  * @alias X.Class\r
 259  */ \r
 260 X[ 'Class' ] = {\r
 261 \r
 262     /**\r
 263      * 設定なし。\r
 264      * @const\r
 265      */ \r
 266         'NONE'         : X_Class.NONE,\r
 267         \r
 268     /**\r
 269      * インスタンスは破棄時(this.kill())に回収され、次回の new MyClass() 時に再利用されます。\r
 270      * @const\r
 271      */\r
 272         'POOL_OBJECT'  :  X_Class.POOL_OBJECT,\r
 273         \r
 274         /**\r
 275          * 定義するクラスは抽象クラスになります。new AbstractClass() とするとエラーになります。\r
 276          * @const\r
 277          */\r
 278         'ABSTRACT'     :  X_Class.ABSTRACT,\r
 279 \r
 280         /**\r
 281          * クラスの継承を禁止する。\r
 282          * @const\r
 283          */\r
 284         'FINAL'        :  X_Class.FINAL,\r
 285 \r
 286         /**\r
 287          * 使用を中止。petanR ライブラリ使用プロジェクトから SUPER_ACCESS を消したらここも削除。\r
 288          * @const\r
 289          */\r
 290         'SUPER_ACCESS' :  X_Class.SUPER_ACCESS,\r
 291 \r
 292         /**\r
 293          * 内部コード、主に X.UI フレームワークに対して、フレーム外に露出するインスタンスとペアで動作する、シャドウなインスタンスの使用を宣言する。\r
 294          * Javascript はインスタンス毎のカプセル化がとてもコスト高。微妙なコスト増で隠蔽されたインスタンスを使う。\r
 295          * @const\r
 296          */\r
 297         'PRIVATE_DATA' : X_Class.PRIVATE_DATA,\r
 298 \r
 299         /**\r
 300          * 未実装。でも目印になるので付けておきましょう。\r
 301          * @const\r
 302          */\r
 303         'SINGLETON'    : X_Class.SINGLETON,\r
 304 \r
 305         'create'       : X_Class_create,\r
 306         \r
 307         // TODO collect\r
 308         \r
 309         '_newPrivate'  : X_Class_newPrivate,\r
 310         \r
 311         '_getPrivate'  : X_Class_getPrivate\r
 312         \r
 313 };\r
 314 \r
 315 \r
 316 \r
 317 // ------------------------------------------------------------------------- //\r
 318 // --- implements ---------------------------------------------------------- //\r
 319 // ------------------------------------------------------------------------- //\r
 320         /**\r
 321          * クラスを定義する。<br>\r
 322          * X_Class.create() によるクラス定義は必ずしもコンストラクタを必要としません。クラス定義時にコンストラクタが未設定の場合、スーパークラスがあればそのコンストラクタを使用します。\r
 323          * @alias X_Class.create\r
 324          * @param {string} [displayName] クラスの名前\r
 325          * @param {number} [classSetting=0] X_Class.POOL_OBJECT | X_Class.FINAL など\r
 326          * @param {__ClassBase__=} [privateClass] このクラスとペアで動作するシャドウクラス\r
 327          * @param {object} [props={}] このクラスのメンバと関数。コンストラクタは Constructor と書くこと\r
 328          * @return {__ClassBase__}\r
 329          */\r
 330         function X_Class_create( /* displayName, classSetting, privateClass, props */ ){\r
 331                 var args        = X_Object_cloneArray( arguments ),\r
 332                         displayName = args[ 0 ],\r
 333                         classSetting,\r
 334                         opt_pool, opt_abstract, opt_final, opt_private,\r
 335                         privateDef,\r
 336                         props,\r
 337                         klass,\r
 338                         classDef = {}, hash;\r
 339                 if( X_Type_isString( displayName ) === true ){\r
 340                         classDef.displayName = displayName;\r
 341                         args.shift();\r
 342                 };\r
 343                 \r
 344                 // クラス設定\r
 345                 classDef.setting = classSetting = args[ 0 ];\r
 346                 if( X_Type_isNumber( classSetting ) ){\r
 347                         opt_pool     = !!( classSetting & X_Class.POOL_OBJECT  );\r
 348                         opt_abstract = !!( classSetting & X_Class.ABSTRACT     );\r
 349                         opt_final    = !!( classSetting & X_Class.FINAL        );\r
 350                         opt_private  = !!( classSetting & X_Class.PRIVATE_DATA );\r
 351                         if( opt_final && opt_abstract ){\r
 352                                 X.Logger.critical( 'final & Abstract!' );\r
 353                                 return;\r
 354                         };      \r
 355                         args.shift();\r
 356                 } else {\r
 357                         classDef.setting = 0;\r
 358                 };\r
 359                 \r
 360                 // シャドウクラス\r
 361                 if( X_Class_PRIVATE_CLASS_LIST.indexOf( args[ 0 ] ) !== -1 ){\r
 362                         privateDef = X_Class_getClassDef( args[ 0 ] );\r
 363                         if( privateDef.isPrivate !== true ){\r
 364                                 X.Logger.critical( 'PrivateClass not found! please, X_Class.create( X_Class.PRIVATE, {...} ).' );\r
 365                                 return;\r
 366                         } else\r
 367                         if( privateDef.Abstract === true ){\r
 368                                 X.Logger.critical( 'PrivateClass is Abstract!' );\r
 369                                 return;\r
 370                         };\r
 371                         classDef.privateClass = args.shift();\r
 372                 };\r
 373                 \r
 374                 // インスタンスのメンバー\r
 375                 props = args[ 0 ];\r
 376                 if( !X_Type_isObject( props ) ){\r
 377                         // クラスメンバ用オブジェクトが無しでもクラスは作成可能\r
 378                         props = {};\r
 379                 } else\r
 380                 if( props[ 'Constructor' ] && X_Type_isFunction( props[ 'Constructor' ] ) ){\r
 381                         classDef.Constructor = props[ 'Constructor' ];\r
 382                 };\r
 383 \r
 384                 klass  = X_Callback_actualClosure( hash = { proxy : X_Class_actualConstructor } ); // TODO hash = classDef\r
 385                 hash.klass = klass;\r
 386                 klass[ 'superClassOf' ] = X_Class_superClassOf;\r
 387                 klass[ 'subClassOf' ]   = X_Class_subClassOf;\r
 388                 \r
 389                 if( X_Class_useObjectCreate ){\r
 390                         klass.prototype = X_Class_override( X_Class_override( X_Class_traits || klass.prototype, props, true ), X_Class_CommonMethods, false );\r
 391                         klass.prototype.constructor = klass;\r
 392                 } else\r
 393                 if( X_Class_use_proto_ ){\r
 394                         X_Class_override( klass.prototype, props, true );\r
 395                         if( X_Class_traits ){\r
 396                                 klass.prototype.__proto__ = X_Class_traits;\r
 397                         } else {\r
 398                                 X_Class_override( klass.prototype, X_Class_CommonMethods, false );\r
 399                         };\r
 400                 } else {\r
 401                         klass.prototype = X_Class_override( X_Class_override( X_Class_traits || klass.prototype, props, true ), X_Class_CommonMethods, false );\r
 402                         klass.prototype.constructor = klass;\r
 403                 };\r
 404                 \r
 405                 klass[ 'name' ] = displayName;\r
 406                 \r
 407                 if( opt_abstract ){\r
 408                         classDef.Abstract = true;\r
 409                 } else\r
 410                 if( opt_pool ){\r
 411                         classDef.pool = [];\r
 412                         if( opt_private === false ) classDef.live = [];\r
 413                 };                      \r
 414                 if( opt_final ){\r
 415                         classDef.Final = true;\r
 416                 } else {\r
 417                         klass[ 'inherits' ] = X_Class_inherits;\r
 418                 };                      \r
 419                 if( opt_private ){\r
 420                         if( classDef.privateClass ){\r
 421                                 X.Logger.critical( 'Private Data Class has no PrivateClass!' );\r
 422                                 return;\r
 423                         };\r
 424                         classDef.isPrivate = true;\r
 425                         X_Class_PRIVATE_CLASS_LIST.push( klass );\r
 426                         X_Class_PRIVATE_DEF_LIST.push( classDef );\r
 427                 } else {\r
 428                         X_Class_CLASS_LIST.push( klass );\r
 429                         X_Class_DEF_LIST.push( classDef );                              \r
 430                 };\r
 431                 return klass;\r
 432         };\r
 433 \r
 434 \r
 435 \r
 436 function X_Class_getClass( instance ){\r
 437         var cList    = X_Class_CLASS_LIST,\r
 438                 i        = cList.length,\r
 439                 klass;\r
 440         for( ; i; ){\r
 441                 klass = cList[ --i ];\r
 442                 if( instance.constructor === klass ) return klass;\r
 443         };\r
 444         cList = X_Class_PRIVATE_CLASS_LIST;\r
 445         i     = cList.length;\r
 446         for( ; i; ){\r
 447                 klass = cList[ --i ];\r
 448                 if( instance.constructor === klass ) return klass;\r
 449         };\r
 450         \r
 451         if( cList.indexOf( instance ) !== -1 ) return instance;\r
 452         if( X_Class_CLASS_LIST.indexOf( instance ) !== -1 ) return instance;\r
 453 };\r
 454 \r
 455 function X_Class_getClassDef( KlassOrInstance ){\r
 456         var i = X_Class_CLASS_LIST.indexOf( KlassOrInstance );\r
 457         if( i === -1 ) i = X_Class_CLASS_LIST.indexOf( X_Class_getClass( KlassOrInstance ) );\r
 458         if( i !== -1 ) return X_Class_DEF_LIST[ i ];\r
 459         \r
 460         i = X_Class_PRIVATE_CLASS_LIST.indexOf( KlassOrInstance );\r
 461         if( i === -1 ) i = X_Class_PRIVATE_CLASS_LIST.indexOf( X_Class_getClass( KlassOrInstance ) );\r
 462         if( i !== -1 ) return X_Class_PRIVATE_DEF_LIST[ i ];\r
 463         \r
 464         if( X_Class_DEF_LIST.indexOf( KlassOrInstance ) !== -1 ) return KlassOrInstance;\r
 465         if( X_Class_PRIVATE_DEF_LIST.indexOf( KlassOrInstance ) !== -1 ) return KlassOrInstance;\r
 466 };\r
 467 \r
 468 function X_Class_newPrivate( /* instance, args */ ){\r
 469         var args         = X_Object_cloneArray( arguments ),\r
 470                 user         = args.shift(),\r
 471                 def          = X_Class_getClassDef( user ),\r
 472                 privateClass = def.privateClass,\r
 473                 privateDef   = X_Class_getClassDef( privateClass ),\r
 474                 i            = -1;\r
 475         if( def.userList ){\r
 476                 i = def.userList.indexOf( user );\r
 477         } else {\r
 478                 def.userList = [];\r
 479                 def.dataList = [];\r
 480         };\r
 481         if( i !== -1 ){\r
 482                 X.Logger.critical( 'PrivateData already exist!' );\r
 483                 return;\r
 484         };\r
 485         if( privateDef._tempUser ){\r
 486                 X.Logger.critical( 'newPrivate を連続呼び出しされたところ破綻' );\r
 487                 return;\r
 488         };\r
 489         privateDef._tempUser = user;\r
 490         return X_Class_actualConstructor( privateClass( X_Closure_COMMAND_BACK ), args );// privateClass.__new( args );\r
 491 };\r
 492 \r
 493 function X_Class_getPrivate( instance ){\r
 494         var def = X_Class_getClassDef( instance ),\r
 495                 i   = def.userList.indexOf( instance );\r
 496         if( i !== -1 ) return def.dataList[ i ];\r
 497 };\r
 498 \r
 499 /* over のプロパティを target にコピーする．ただし target の プロパティが優先, force で解除 */\r
 500 function X_Class_override( target, src, force ){\r
 501         var p;\r
 502         for( p in src ){\r
 503                 if( p === 'Constructor' ) continue;\r
 504                 if( p === '__proto__' || p === 'prototype' || p === 'constructor' ){\r
 505                         X.Logger.critical( p + ' is reserved!' );\r
 506                         return;\r
 507                 };\r
 508                 if( force || target[ p ] === undefined ){\r
 509                         target[ p ] = src[ p ];\r
 510                 };\r
 511         };\r
 512         return target;\r
 513 };\r
 514 \r
 515 /**\r
 516  * スーパークラスか？調べます。\r
 517  * @alias __ClassBase__.superClassOf\r
 518  * @param klass {__ClassBase__}\r
 519  * @return {boolean}\r
 520  */\r
 521 function X_Class_superClassOf( klass ){\r
 522         var myDef      = X_Class_getClassDef( this ),\r
 523                 targetDef  = X_Class_getClassDef( klass ),\r
 524                 SuperClass = klass;\r
 525 \r
 526         if( !myDef || !targetDef || this === klass ) return false;\r
 527         \r
 528         while( SuperClass = X_Class_getClassDef( SuperClass ).SuperClass ){\r
 529                 if( SuperClass === this ) return true;\r
 530         };\r
 531         \r
 532         return false;\r
 533 };\r
 534 \r
 535 /**\r
 536  * サブクラスか？調べます。\r
 537  * @alias __ClassBase__.subClassOf\r
 538  * @type {Function}\r
 539  * @param klass {__ClassBase__}\r
 540  * @return {boolean}\r
 541  */\r
 542 function X_Class_subClassOf( klass ){\r
 543         return klass && X_Class_superClassOf.call( klass, this );\r
 544 };\r
 545                         \r
 546 /**\r
 547  * サブクラスを作ります。与える引数は X_Class.create と同じです。http://d.hatena.ne.jp/m-hiyama/20051018/1129605002\r
 548  * @alias __ClassBase__.inherits\r
 549  * @example var SubClass = SuperClass.inherits( 'Sub', X_Class.FINAL, { ... } );\r
 550  * @param {string} [displayName] クラスの名前\r
 551  * @param {number} [classSetting=0] X_Class.POOL_OBJECT | X_Class.FINAL など\r
 552  * @param {__ClassBase__=} [privateClass] このクラスとペアで動作するシャドウクラス\r
 553  * @param {object} [props={}] このクラスのメンバと関数。コンストラクタは Constructor と書くこと\r
 554  * @return {__ClassBase__}\r
 555  */\r
 556 function X_Class_inherits( /* displayName, classSetting, opt_PrivateClass, props */ ){\r
 557         var args        = X_Object_cloneArray( arguments ),\r
 558                 params      = [],\r
 559                 Super       = this,\r
 560                 superDef    = X_Class_getClassDef( Super ),\r
 561                 displayName = args[ 0 ],\r
 562                 classSetting,\r
 563                 //opt_super,\r
 564                 klass, def;\r
 565         if( superDef.Final ) X.Logger.critical( 'X.Class inherits, Class is final!' );\r
 566         \r
 567         // サブクラス名\r
 568         if( X_Type_isString( displayName ) ){\r
 569                 args.shift();\r
 570         } else {\r
 571                 displayName = 'SubClass of ' + superDef.displayName;\r
 572         };\r
 573         params.push( displayName );\r
 574         \r
 575         // サブクラス設定\r
 576         classSetting = args[ 0 ];\r
 577         if( X_Type_isNumber( classSetting ) ){\r
 578                 args.shift();\r
 579         } else {\r
 580                 // クラス設定がない場合、親からコピーして、Abstract flag は落とす??\r
 581                 classSetting = superDef.setting;// &= ~X_Class.ABSTRACT;\r
 582         };\r
 583         if( superDef.isPrivate ) classSetting = classSetting | X_Class.PRIVATE_DATA;\r
 584 \r
 585         params.push( classSetting );\r
 586 \r
 587         // サブクラスのシャドウ\r
 588         if( args[ 0 ] && X_Class_getClass( args[ 0 ] ) ){\r
 589                 params.push( args.shift() );\r
 590         } else\r
 591         if( superDef.privateClass ){\r
 592                 params.push( superDef.privateClass );\r
 593         };\r
 594         \r
 595         /* props 未定義でも可 */\r
 596         params.push( args[ 0 ] );\r
 597         \r
 598         // 継承クラスの作成\r
 599         if( X_Class_useObjectCreate ){\r
 600                 X_Class_traits = Object.create( Super.prototype );\r
 601         } else\r
 602         if( X_Class_use_proto_ ){\r
 603                 X_Class_traits = Super.prototype;\r
 604         } else {\r
 605                 X_Class_traits = new Super( X_Closure_COMMAND_DROP );\r
 606         };\r
 607         klass  = X_Class_create.apply( X.Class, params );\r
 608         X_Class_traits = null;\r
 609         \r
 610         def    = X_Class_getClassDef( klass );\r
 611         // 継承用プロパティを控える\r
 612         def.SuperClass       = Super;\r
 613         def.SuperProto       = Super.prototype;\r
 614         def.SuperConstructor = superDef.Constructor || superDef.SuperConstructor;\r
 615         \r
 616         return klass;\r
 617 };\r
 618         \r
 619 /*\r
 620  * new の実体．コンストラクタの機能は instance.Constructor に書く．\r
 621  * これにより pool された オブジェクト（破棄されたインスタンス） を再利用できる\r
 622  */\r
 623 function X_Class_actualConstructor( f, args ){\r
 624         var klass    = f.klass,\r
 625                 def      = X_Class_getClassDef( klass ),\r
 626                 dataUser = def._tempUser,\r
 627                 instance, obj,\r
 628                 userDef;\r
 629         if( def.Abstract ){\r
 630                 X.Logger.critical( 'AbstractClass!' );\r
 631                 return;\r
 632         };\r
 633         if( def.isPrivate && !dataUser ){\r
 634                 X.Logger.critical( 'use myClass.newPrivate( instance, ...args )!' );\r
 635                 return;\r
 636         };\r
 637         \r
 638         instance = def.pool && def.pool.length > 0 ?\r
 639                                         def.pool.pop() :\r
 640                                 X_Class_useObjectCreate ?\r
 641                                         Object.create( klass.prototype ) :\r
 642                                         new klass( X_Closure_COMMAND_DROP );\r
 643         \r
 644         if( def.isPrivate ){\r
 645                 userDef = X_Class_getClassDef( dataUser );\r
 646                 userDef.dataList.push( instance );\r
 647                 userDef.userList.push( dataUser );\r
 648                 instance.User = dataUser;\r
 649                 def._tempUser = null;\r
 650         } else {\r
 651                 def.live && def.live.push( instance );\r
 652         };\r
 653 \r
 654         obj = def.Constructor ?\r
 655                         def.Constructor.apply( instance, args ) :\r
 656                 def.SuperConstructor &&\r
 657                         def.SuperConstructor.apply( instance, args );\r
 658         if( ( X_Type_isObject( obj ) && obj !== instance ) || X_Type_isFunction( obj ) ){ // Class\r
 659                 instance[ 'kill' ]();\r
 660                 return obj;\r
 661         };\r
 662         return instance;\r
 663 };\r
 664 \r
 665 console.log( 'X.Core.Class' );\r