::xotcl::Class ::xowiki::Link::swf

Class Hierarchy of ::xowiki::Link::swf

• ::xotcl::Object

  Meta-class:

  ::xotcl::Class

  Methods for instances:

  __api_make_doc, __api_make_forward_doc, __next^C, __timediff, abstract, ad_doc, ad_forward, ad_proc, append^C, array^C, asHTML, autoname^C, check^C, class^C, cleanup^C, configure^C, contains, copy, db_1row^C, debug, defaultmethod, destroy^C, destroy_on_cleanup, eval^C, exists^C, extractConfigureArg, filter^C, filterguard^C, filtersearch^C, forward^C, hasclass, incr^C, info^C, init, instvar^C, invar^C, isclass^C, ismetaclass^C, ismixin^C, isobject^C, istype^C, lappend^C, log, method, mixin^C, mixinguard^C, move, msg, noinit^C, parametercmd^C, proc^C, procsearch^C, qn, requireNamespace^C, self, serialize, set^C, subst^C, trace^C, unset^C, uplevel^C, upvar^C, volatile^C, vwait^C

  Methods to be applied on the class (in addition to the methods provided by the meta-class):

  __exitHandler, getExitHandler, setExitHandler, unsetExitHandler

• ::xowiki::BaseLink

  Meta-class:

  ::xotcl::Class

  Parameter for instances:

  anchor (default ""), cssclass, extra_query_parameter, href, label, target, title

  Methods for instances:

  mk_css_class

  Methods to be applied on the class:

  Methods provided by the meta-class

• ::xowiki::Link

  Meta-class:

  ::xotcl::Class

  Parameter for instances:

  lang, name, package_id, page, parent_id, stripped_name, type

  Methods for instances:

  atts, folder_id, init, lookup_xowiki_package_by_name, render, render_found, render_not_found, resolve

  Methods to be applied on the class:

  Methods provided by the meta-class

• ::xowiki::Link::image

  Meta-class:

  ::xotcl::Class

  Parameter for instances:

  border, border-width, botton, center, float, height, href, left, margin, margin-bottom, margin-left, margin-right, margin-top, padding, padding-bottom, padding-left, padding-right, padding-top, position, right, top, width

  Methods for instances:

  render, render_found

  Methods to be applied on the class:

  Methods provided by the meta-class

• ::xowiki::Link::file

  Meta-class:

  ::xotcl::Class

  Parameter for instances:

  align, autostart, controller, controls, endtime, height, hidden, href, loop, mastersound, pluginspage, pluginurl, starttime, target, volume, width

  Methods for instances:

  render_found, resolve

  Methods to be applied on the class:

  Methods provided by the meta-class

• ::xowiki::Link::swf

  Meta-class:

  ::xotcl::Class

  Parameter for instances:

  align, bgcolor, height, loop, menu, play, quality, salign, scale, version, width, wmode

  Methods for instances:

  render_found, resolve

  Methods to be applied on the class:

  Methods provided by the meta-class

Class Relations

• superclass: ::xowiki::Link::file

::xotcl::Class create ::xowiki::Link::swf \
     -superclass ::xowiki::Link::file \
     -parameter {align bgcolor height loop menu play quality salign scale version width wmode}

Methods

• instproc render_found

  ::xowiki::Link::swf instproc render_found {href label} {
      ::xo::Page requireJS /resources/xowiki/swfobject.js
      my instvar package_id name
      #set link [$package_id pretty_link -absolute true  -siteurl http://localhost:8003 $name]/download.swf
      foreach {width height bgcolor version} {320 240 #999999 7} break
      foreach a {width height bgcolor version} {if {[my exists $a]} {set $a [my set $a]}}
      set id [::xowiki::Includelet self_id]
      set addParams ""
      foreach a {quality wmode align salign play loop menu scale} {
        if {[my exists $a]} {append addParams "so.addParam('$a', '[my set $a]');\n"}
      }
      
      return "<div id='$id'>$label</div>
      <script type='text/javascript'>
      var so = new SWFObject('$href', '$name', '$width', '$height', '$version', '$bgcolor');
      $addParams so.write('$id');
      </script>
      "
    }

• instproc resolve

  ::xowiki::Link::swf instproc resolve {} {
      set item_id [next]
      my log "--file, lookup of [my name] returned $item_id"
      if {$item_id == 0 && [regsub {^swf:} [my name] file: name]} {
        set item_id [::xo::db::CrClass lookup -name $name -parent_id [my parent_id]]
        my log "--file, 2nd lookup of $name returned $item_id"
      }
      return $item_id
    }