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

   1 /**\r
   2  * Class を定義し システムの管理下に置く．\r
   3  * 全てのクラスと pool が有効の場合インスタンスへの参照が保持される．\r
   4  *  1. X.Class.create( opt_settings, opt_name, opt_privateClass, opt_props ) でクラスを登録．\r
   5  *  2. コンストラクタ となるメソッドは、Constructor : function( arg ){ ... }, に書く．\r
   6  *  3. 通常通り new で インスタンス生成\r
   7  *  4. kill() でオブジェクトをクリーンして削除、pool が有効の場合は pool される．\r
   8  *  5. pool が有効の場合、new で pool されたインスタンスが返される．\r
   9  *  6. \r
  10  * \r
  11  */\r
  12 \r
  13 // ------------------------------------------------------------------------- //\r
  14 // ------------ local variables -------------------------------------------- //\r
  15 // ------------------------------------------------------------------------- //\r
  16 var X_Class_CLASS_LIST         = [],\r
  17         X_Class_DEF_LIST           = [],\r
  18         X_Class_PRIVATE_CLASS_LIST = [],\r
  19         X_Class_PRIVATE_DEF_LIST   = [],\r
  20         X_Class_CALLING_SUPER      = [],\r
  21         X_Class_CALL_SUPER_STACK   = [],\r
  22         X_Class_killPrivateFlag    = false,\r
  23         X_Class_traits             = null,\r
  24         X_Class_useObjectCreate    = false, // !!Object.create, http://jsperf.com/prototype-vs-object-create-perf\r
  25         X_Class_use_proto_         = !!X.emptyFunction.prototype.__proto__;\r
  26 \r
  27 /* \r
  28  * X.Class.create で作られたクラスのインスタンスが共通で備えるメソッド \r
  29  */\r
  30 var X_Class_CommonProps = {\r
  31         kill : function(){\r
  32                 var instance = this,\r
  33                         klass    = X_Class_getClass( instance ),\r
  34                         def      = X_Class_getClassDef( klass ),\r
  35                         data, p, i;\r
  36                 if( def.isPrivate && !X_Class_killPrivateFlag ){\r
  37                         X.Logger.critical( 'PrivateInstance.kill() work in PrivateUser.kill().' );\r
  38                         return;\r
  39                 };\r
  40                 X_Class_killPrivateFlag = false; // onKill 内で PrivateInstance.kill() を防ぐため\r
  41                 \r
  42                 // onKill() === false の場合、kill のキャンセル\r
  43                 // private      は false での キャンセル は無視される\r
  44                 \r
  45                 if( this.instanceOf( X.EventDispatcher ) ){\r
  46                         //console.log( 'this.instanceOf( X.EventDispatcher )! ' + this._dispatching );\r
  47                         if( !def.isPrivate ){\r
  48                                 if( this._dispatching ){\r
  49                                         this.dispatch( X.Event.BEFORE_KILL_INSTANCE );\r
  50                                         this._killReserved = true;\r
  51                                         this.dispatch( X.Event.KILL_INSTANCE_CANCELED );\r
  52                                         return;\r
  53                                 } else\r
  54                                 if( this.dispatch( X.Event.BEFORE_KILL_INSTANCE ) & X.Callback.PREVENT_DEFAULT ){\r
  55                                         this.dispatch( X.Event.KILL_INSTANCE_CANCELED );\r
  56                                         return;\r
  57                                 };\r
  58                         } else {\r
  59                                 this.dispatch( X.Event.BEFORE_KILL_INSTANCE );  \r
  60                         };\r
  61                         this.dispatch( X.Event.KILL_INSTANCE );\r
  62                         this._listeners && X_EventDispatcher_systemUnlisten( this ); //.unlisten();\r
  63                 } else\r
  64                 if( X.Type.isFunction( instance.onKill ) && instance.onKill() === false && !def.isPrivate ){\r
  65                         return;\r
  66                 };\r
  67                 \r
  68                 for( p in instance ){\r
  69                         if( instance.hasOwnProperty && !instance.hasOwnProperty( p ) ) continue;\r
  70                         delete instance[ p ];\r
  71                 };\r
  72                 if( def.pool ){\r
  73                         def.live && def.live.splice( def.live.indexOf( instance ), 1 );\r
  74                         def.pool[ def.pool.length ] = instance;\r
  75                 };\r
  76                 if( def.privateClass ){\r
  77                         i = def.userList.indexOf( instance );\r
  78                         if( i !== -1 ){\r
  79                                 data = X_Class_getPrivate( instance );\r
  80                                 X_Class_killPrivateFlag = true;\r
  81                                 if( data._dispatching && data.instanceOf( X.EventDispatcher ) ){\r
  82                                         data._killReserved = true;\r
  83                                 } else {\r
  84                                         data.kill();\r
  85                                 };\r
  86                                 def.dataList.splice( i, 1 );\r
  87                                 def.userList.splice( i, 1 );\r
  88                         };\r
  89                 };\r
  90         },\r
  91         \r
  92         // TODO Super\r
  93         // superCall\r
  94         \r
  95         instanceOf : function( klass ){\r
  96                 var Super = this;\r
  97                 if( this.constructor === klass ) return true;\r
  98                 while( Super = X_Class_getClassDef( Super ).SuperClass ){\r
  99                         if( Super === klass ) return true;\r
 100                 };\r
 101                 return false;\r
 102         }\r
 103 };\r
 104 // ------------------------------------------------------------------------- //\r
 105 // --- interface ----------------------------------------------------------- //\r
 106 // ------------------------------------------------------------------------- //\r
 107 X.Class = {\r
 108         \r
 109         POOL_OBJECT  :  1,\r
 110         ABSTRACT     :  2,\r
 111         FINAL        :  4,\r
 112         SUPER_ACCESS :  8,\r
 113         PRIVATE_DATA : 16,\r
 114         \r
 115         SINGLETON    : 32, // 未実装\r
 116         \r
 117         create : function( /* displayName, classSetting, opt_PrivateClass, props */ ){\r
 118                 var args        = X_Object_cloneArray( arguments ),\r
 119                         displayName = args[ 0 ],\r
 120                         classSetting,\r
 121                         opt_pool, opt_abstract, opt_final, opt_private,\r
 122                         privateDef,\r
 123                         props,\r
 124                         klass,\r
 125                         classDef = {}, hash;\r
 126                 if( X.Type.isString( displayName ) === true ){\r
 127                         classDef.displayName = displayName;\r
 128                         args.shift();\r
 129                 };\r
 130                 \r
 131                 // クラス設定\r
 132                 classDef.setting = classSetting = args[ 0 ];\r
 133                 if( X.Type.isNumber( classSetting ) ){\r
 134                         opt_pool     = !!( classSetting & X.Class.POOL_OBJECT  );\r
 135                         opt_abstract = !!( classSetting & X.Class.ABSTRACT     );\r
 136                         opt_final    = !!( classSetting & X.Class.FINAL        );\r
 137                         opt_private  = !!( classSetting & X.Class.PRIVATE_DATA );\r
 138                         if( opt_final && opt_abstract ){\r
 139                                 X.Logger.critical( 'final & Abstract!' );\r
 140                                 return;\r
 141                         };      \r
 142                         args.shift();\r
 143                 } else {\r
 144                         classDef.setting = 0;\r
 145                 };\r
 146                 \r
 147                 // シャドウクラス\r
 148                 if( X_Class_PRIVATE_CLASS_LIST.indexOf( args[ 0 ] ) !== -1 ){\r
 149                         privateDef = X_Class_getClassDef( args[ 0 ] );\r
 150                         if( privateDef.isPrivate !== true ){\r
 151                                 X.Logger.critical( 'PrivateClass not found! please, X.Class.create( X.Class.PRIVATE, {...} ).' );\r
 152                                 return;\r
 153                         } else\r
 154                         if( privateDef.Abstract === true ){\r
 155                                 X.Logger.critical( 'PrivateClass is Abstract!' );\r
 156                                 return;\r
 157                         };\r
 158                         classDef.privateClass = args.shift();\r
 159                 };\r
 160                 \r
 161                 // インスタンスのメンバー\r
 162                 props = args[ 0 ];\r
 163                 if( !X.Type.isObject( props ) ){\r
 164                         // サブクラスの場合、クラス定義の上書きがなくても作成可能\r
 165                         // サブクラスでなくても、クラスメンバ用オブジェクトが無しでも作成可能\r
 166                         //if( !X_Class_traits ){\r
 167                         //      X.Logger.critical( 'No Class Def!' );\r
 168                         //      return;\r
 169                         //};\r
 170                         props = {};\r
 171                 } else\r
 172                 if( props.Constructor && X.Type.isFunction( props.Constructor ) ){\r
 173                         classDef.Constructor = props.Constructor;\r
 174                 };\r
 175 \r
 176                 klass  = X_Closure_actualClosure( hash = { _ : X_Class_actualConstructor } ); // TODO hash = classDef\r
 177                 hash.c = klass;\r
 178                 klass.superClassOf = X_Class_superClassOf;\r
 179                 klass.subClassOf   = X_Class_subClassOf;\r
 180                 \r
 181                 if( X_Class_useObjectCreate ){\r
 182                         klass.prototype = X_Class_override( X_Class_override( X_Class_traits || klass.prototype, props, true ), X_Class_CommonProps, false );\r
 183                         klass.prototype.constructor = klass;\r
 184                 } else\r
 185                 if( X_Class_use_proto_ ){\r
 186                         X_Class_override( klass.prototype, props, true );\r
 187                         if( X_Class_traits ){\r
 188                                 klass.prototype.__proto__ = X_Class_traits;\r
 189                         } else {\r
 190                                 X_Class_override( klass.prototype, X_Class_CommonProps, false );\r
 191                         };\r
 192                 } else {\r
 193                         klass.prototype = X_Class_override( X_Class_override( X_Class_traits || klass.prototype, props, true ), X_Class_CommonProps, false );\r
 194                         klass.prototype.constructor = klass;\r
 195                 };\r
 196                 klass.name = displayName;\r
 197                 \r
 198                 if( opt_abstract ){\r
 199                         classDef.Abstract = true;\r
 200                 } else\r
 201                 if( opt_pool ){\r
 202                         classDef.pool = [];\r
 203                         if( opt_private === false ) classDef.live = [];\r
 204                 };                      \r
 205                 if( opt_final ){\r
 206                         classDef.Final = true;\r
 207                 } else {\r
 208                         klass.inherits = X_Class_inherits;\r
 209                 };                      \r
 210                 if( opt_private ){\r
 211                         if( classDef.privateClass ){\r
 212                                 X.Logger.critical( 'Private Data Class has no PrivateClass!' );\r
 213                                 return;\r
 214                         };\r
 215                         classDef.isPrivate = true;\r
 216                         X_Class_PRIVATE_CLASS_LIST.push( klass );\r
 217                         X_Class_PRIVATE_DEF_LIST.push( classDef );\r
 218                 } else {\r
 219                         X_Class_CLASS_LIST.push( klass );\r
 220                         X_Class_DEF_LIST.push( classDef );                              \r
 221                 };\r
 222                 return klass;\r
 223         },\r
 224         \r
 225         _newPrivate  : X_Class_newPrivate,\r
 226         \r
 227         _getPrivate  : X_Class_getPrivate\r
 228         \r
 229 };\r
 230 \r
 231 // ------------------------------------------------------------------------- //\r
 232 // --- implements ---------------------------------------------------------- //\r
 233 // ------------------------------------------------------------------------- //\r
 234 function X_Class_getClass( instance ){\r
 235         var cList    = X_Class_CLASS_LIST,\r
 236                 i        = cList.length,\r
 237                 klass;\r
 238         for( ; i; ){\r
 239                 klass = cList[ --i ];\r
 240                 if( instance.constructor === klass ) return klass;\r
 241         };\r
 242         cList = X_Class_PRIVATE_CLASS_LIST;\r
 243         i     = cList.length;\r
 244         for( ; i; ){\r
 245                 klass = cList[ --i ];\r
 246                 if( instance.constructor === klass ) return klass;\r
 247         };\r
 248         \r
 249         if( cList.indexOf( instance ) !== -1 ) return instance;\r
 250         if( X_Class_CLASS_LIST.indexOf( instance ) !== -1 ) return instance;\r
 251 };\r
 252 \r
 253 function X_Class_getClassDef( KlassOrInstance ){\r
 254         var i = X_Class_CLASS_LIST.indexOf( KlassOrInstance );\r
 255         if( i === -1 ) i = X_Class_CLASS_LIST.indexOf( X_Class_getClass( KlassOrInstance ) );\r
 256         if( i !== -1 ) return X_Class_DEF_LIST[ i ];\r
 257         \r
 258         i = X_Class_PRIVATE_CLASS_LIST.indexOf( KlassOrInstance );\r
 259         if( i === -1 ) i = X_Class_PRIVATE_CLASS_LIST.indexOf( X_Class_getClass( KlassOrInstance ) );\r
 260         if( i !== -1 ) return X_Class_PRIVATE_DEF_LIST[ i ];\r
 261         \r
 262         if( X_Class_DEF_LIST.indexOf( KlassOrInstance ) !== -1 ) return KlassOrInstance;\r
 263         if( X_Class_PRIVATE_DEF_LIST.indexOf( KlassOrInstance ) !== -1 ) return KlassOrInstance;\r
 264 };\r
 265 \r
 266 function X_Class_newPrivate( /* instance, args */ ){\r
 267         var args         = X_Object_cloneArray( arguments ),\r
 268                 user         = args.shift(),\r
 269                 def          = X_Class_getClassDef( user ),\r
 270                 privateClass = def.privateClass,\r
 271                 privateDef   = X_Class_getClassDef( privateClass ),\r
 272                 i            = -1;\r
 273         if( def.userList ){\r
 274                 i = def.userList.indexOf( user );\r
 275         } else {\r
 276                 def.userList = [];\r
 277                 def.dataList = [];\r
 278         };\r
 279         if( i !== -1 ){\r
 280                 X.Logger.critical( 'PrivateData already exist!' );\r
 281                 return;\r
 282         };\r
 283         if( privateDef._tempUser ){\r
 284                 X.Logger.critical( 'newPrivate を連続呼び出しされたところ破綻' );\r
 285                 return;\r
 286         };\r
 287         privateDef._tempUser = user;\r
 288         return X_Class_actualConstructor( privateClass( X_Closure_COMMAND_BACK ), args );// privateClass.__new( args );\r
 289 };\r
 290 \r
 291 function X_Class_getPrivate( instance ){\r
 292         var def = X_Class_getClassDef( instance ),\r
 293                 i   = def.userList.indexOf( instance );\r
 294         if( i !== -1 ) return def.dataList[ i ];\r
 295 };\r
 296 \r
 297 /* over のプロパティを target にコピーする．ただし target の プロパティが優先, force で解除 */\r
 298 function X_Class_override( target, src, force ){\r
 299         var p;\r
 300         for( p in src ){\r
 301                 if( p === 'Super' || p === 'SuperConstructor' || p === '__proto__' || p === 'prototype' || p === 'constructor' ){\r
 302                         X.Logger.critical( 'Super & SuperConstructor is reserved!' );\r
 303                         return;\r
 304                 };\r
 305                 if( force || target[ p ] === void 0 ){\r
 306                         target[ p ] = src[ p ];\r
 307                 };\r
 308         };\r
 309         return target;\r
 310 };\r
 311 \r
 312 function X_Class_superClassOf( klass ){\r
 313         var myDef      = X_Class_getClassDef( this ),\r
 314                 targetDef  = X_Class_getClassDef( klass ),\r
 315                 SuperClass = klass;\r
 316 \r
 317         if( !myDef || !targetDef || this === klass ) return false;\r
 318         \r
 319         while( SuperClass = X_Class_getClassDef( SuperClass ).SuperClass ){\r
 320                 if( SuperClass === this ) return true;\r
 321         };\r
 322         \r
 323         return false;\r
 324 };\r
 325 \r
 326 function X_Class_subClassOf( klass ){\r
 327         return X_Class_superClassOf.call( klass, this );\r
 328 };\r
 329         \r
 330 /* サブクラスを作るメソッド  \r
 331  * var subClass = superClass.inherits( ... ) \r
 332  * http://d.hatena.ne.jp/m-hiyama/20051018/1129605002\r
 333  */\r
 334 function X_Class_inherits( /* displayName, classSetting, opt_PrivateClass, props */ ){\r
 335         var args        = X_Object_cloneArray( arguments ),\r
 336                 params      = [],\r
 337                 Super       = this,\r
 338                 superDef    = X_Class_getClassDef( Super ),\r
 339                 displayName = args[ 0 ],\r
 340                 classSetting,\r
 341                 opt_super,\r
 342                 klass, def;\r
 343         if( superDef.Final ) X.Logger.critical( 'X.Class inherits, Class is final!' );\r
 344         \r
 345         // サブクラス名\r
 346         if( X.Type.isString( displayName ) ){\r
 347                 args.shift();\r
 348         } else {\r
 349                 displayName = 'SubClass of ' + superDef.displayName;\r
 350         };\r
 351         params.push( displayName );\r
 352         \r
 353         // サブクラス設定\r
 354         classSetting = args[ 0 ];\r
 355         if( X.Type.isNumber( classSetting ) ){\r
 356                 args.shift();\r
 357         } else {\r
 358                 // クラス設定がない場合、親からコピーして、Abstract flag は落とす??\r
 359                 classSetting = superDef.setting;// &= ~X.Class.ABSTRACT;\r
 360         };\r
 361         if( superDef.isPrivate ) classSetting = classSetting | X.Class.PRIVATE_DATA;\r
 362         opt_super = !!( classSetting & X.Class.SUPER_ACCESS );\r
 363         params.push( classSetting );\r
 364 \r
 365         // サブクラスのシャドウ\r
 366         if( args[ 0 ] && X_Class_getClass( args[ 0 ] ) ){\r
 367                 params.push( args.shift() );\r
 368         } else\r
 369         if( superDef.privateClass ){\r
 370                 params.push( superDef.privateClass );\r
 371         };\r
 372         params.push( args[ 0 ] ); /* props サブクラスでは未定義でも可 */\r
 373         \r
 374         // 継承クラスの作成\r
 375         if( X_Class_useObjectCreate ){\r
 376                 X_Class_traits = Object.create( Super.prototype );\r
 377         } else\r
 378         if( X_Class_use_proto_ ){\r
 379                 X_Class_traits = Super.prototype;\r
 380         } else {\r
 381                 //Super.__new = null;\r
 382                 X_Class_traits = new Super( X_Closure_COMMAND_DROP );\r
 383                 //Super.__new = X_Class_actualConstructor;                      \r
 384         };\r
 385         klass  = X.Class.create.apply( X.Class, params );\r
 386         X_Class_traits = null;\r
 387         \r
 388         def    = X_Class_getClassDef( klass );\r
 389         // 継承用プロパティを控える\r
 390         if( opt_super === true ){\r
 391                 def.superAccess = true;\r
 392                 def.SuperClass  = Super;\r
 393                 def.SuperProto  = Super.prototype;\r
 394                 def.SuperConstructor = superDef.Constructor || superDef.SuperConstructor;\r
 395         } else {\r
 396                 def.SuperClass = Super; // instanceOf() で親クラスを調べる！\r
 397         };\r
 398         \r
 399         return klass;\r
 400 };\r
 401         \r
 402 /*\r
 403  * new の実体．コンストラクタの機能は instance.Constructor に書く．\r
 404  * これにより pool された オブジェクト（破棄されたインスタンス） を再利用できる\r
 405  */\r
 406 function X_Class_actualConstructor( obj, args ){\r
 407         var klass    = obj.c,//this,\r
 408                 def      = X_Class_getClassDef( klass ),\r
 409                 dataUser = def._tempUser,\r
 410                 instance, obj,\r
 411                 userDef;\r
 412         if( def.Abstract ){\r
 413                 X.Logger.critical( 'AbstractClass!' );\r
 414                 return;\r
 415         };\r
 416         if( def.isPrivate && !dataUser ){\r
 417                 X.Logger.critical( 'use myClass.newPrivate( instance, ...args )!' );\r
 418                 return;\r
 419         };\r
 420         //klass.__new = null;\r
 421         instance = def.pool && def.pool.length > 0 ?\r
 422                                         def.pool.pop() :\r
 423                                 X_Class_useObjectCreate ?\r
 424                                         Object.create( klass.prototype ) :\r
 425                                         new klass( X_Closure_COMMAND_DROP );\r
 426         //klass.__new = X_Class_actualConstructor;\r
 427         \r
 428         if( def.isPrivate ){\r
 429                 userDef = X_Class_getClassDef( dataUser );\r
 430                 userDef.dataList.push( instance );\r
 431                 userDef.userList.push( dataUser );\r
 432                 instance.User = dataUser;\r
 433                 def._tempUser = null;\r
 434         } else {\r
 435                 def.live && def.live.push( instance );\r
 436         };\r
 437         if( def.superAccess ){\r
 438                 // TODO klass.prototype に移動\r
 439                 instance.Super = def.SuperProto;\r
 440                 instance.SuperConstructor = X_Class_superConstructor;\r
 441         };\r
 442         obj = def.Constructor ?\r
 443                         def.Constructor.apply( instance, args ) :\r
 444                 def.SuperConstructor &&\r
 445                         def.SuperConstructor.apply( instance, args );\r
 446         if( ( X.Type.isObject( obj ) && obj !== instance ) || X.Type.isFunction( obj ) ){ // Class\r
 447                 instance.kill();\r
 448                 return obj;\r
 449         };\r
 450         return instance;\r
 451 };\r
 452 /*  クラス定義を辿ってスーパークラスのコンストラクタを探す。\r
 453  *  呼び出したコンストラクタは配列に控える。\r
 454  *  さらに呼ばれた場合、配列を元にさらに奥のコンストラクタを取得\r
 455  *  TODO 現在 new しているインスタンスを保持してチェックする\r
 456  */\r
 457 function X_Class_superConstructor(){\r
 458         var sClass = this,\r
 459                 i      = X_Class_CALLING_SUPER.indexOf( sClass ),\r
 460                 n      = -1,\r
 461                 l, sList, def, sConst, ret;\r
 462 \r
 463         if( i === -1 ){\r
 464                 X_Class_CALLING_SUPER[ l = X_Class_CALLING_SUPER.length ] = sClass;\r
 465                 X_Class_CALL_SUPER_STACK[ l ] = sList = [];\r
 466         } else {\r
 467                 sList = X_Class_CALL_SUPER_STACK[ i ];\r
 468         };\r
 469         \r
 470         while( sClass ){\r
 471                 def    = X_Class_getClassDef( sClass );\r
 472                 sClass = def.SuperClass;\r
 473                 sConst = def.SuperConstructor;\r
 474                 if( sConst && sList[ ++n ] !== sConst ){\r
 475                         sList[ n ] = sConst;\r
 476                         ret = sConst.apply( this, arguments );\r
 477                         --sList.length;\r
 478                         if( !sList.length ){\r
 479                                 X_Class_CALLING_SUPER.splice( i, 1 );\r
 480                                 X_Class_CALL_SUPER_STACK.splice( i, 1 );\r
 481                         };\r
 482                         return ret;\r
 483                 };\r
 484         };\r
 485 };\r
 486 \r
 487 console.log( 'X.Core.Class' );\r