"
Team:Heidelberg/Project/Visualization
From 2008.igem.org
Revision as of 09:29, 28 October 2008 by Heidelberg2008 (Talk | contribs)
Visualization
Colicin
 |  | 
|
 |  | 
|
 |  | 
|
Movie
class QT {
/* Constructor */
function QT( $input ) {
QT::parseInput( $input ); // Parse the input
QT::genCode(); // Generate the final code
}
/* Parser */
function parseInput( $input ) {
for($pos=0; $pos<strlen($input); $pos++) { // go through all arguments
if($input{$pos}=='=') { // separator between command
//ignore '=' if the attribute is QTvars
//this will enable to pass query string to QT files
if($gotQTvars) {
$this->tmp .= $input{$pos};
continue;
}
$this->instr = $this->tmp;
$this->tmp = ;
//set the flag for QTvars
if($this->instr == 'QTvars') $gotQTvars = 1;
}
else if($input{$pos}=='|') { // separator between arguments
//reset the flags for other attributes
if($gotQTvars) $gotQTvars = 0;
QT::setValue();
$this->tmp=;
} else {
$this->tmp .= $input{$pos};
}
}
if($this->tmp!=) QT::setValue(); // Deal with the rest of the input string
}
/* Coordinate commands with values */
function setValue() {
$this->value = $this->tmp;
$this->{$this->instr} = $this->value;
if($this->instr=='autoplay'|| // Whitelist of QT commands. Anything else but QT commands is ignored.
$this->instr=='controller') {
/* Create code for <embed> and <object> */
if($this->instr!='id') $this->codeEmbed .= ' ' . $this->instr . '="' . $this->value . '"';
if($this->instr!='name') $this->codeObject .= '<param name="' . $this->instr . '" value="' . $this->value . '">';
}
}
/* Generate big, final chunk of code */
function genCode() {
// Possibly malicious settings:
$codebase = 'http://www.apple.com/qtactivex/qtplugin.cab'; // Code Base /No need to change
$classID = 'clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B'; // ClassID / No need to change
// Default version Setting:
$this->version='7,0,0,0'; // Version settings for <object>
$this->url = $this->getTitle($this->file);//QT::imageUrl( $this->file, $this->fromSharedDirectory ); // get Wiki internal url
// if QTvars is set append to the url
if($this->QTvars) $this->url .= $this->QTvars;
/* Final Code */
$this->code = '<OBJECT CLASSID="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B" WIDTH="160"HEIGHT="144" CODEBASE="http://www.apple.com/qtactivex/qtplugin.cab"><PARAM name="SRC" VALUE="' . $this->url . '">' . $this->codeObject . '<EMBED SRC="' . $this->url . '" WIDTH="' . $this->width . '" HEIGHT="' . $this->height . '" ' . $this->codeEmbed . ' PLUGINSPAGE="http://www.apple.com/quicktime/download/"></EMBED></OBJECT> ';
return $this->code;
}
function getTitle($file) {
$title = Title::makeTitleSafe("Image",$file);
$img = new Image($title);
$path = $img->getViewURL(false);
return $path;
}
} function wfQTExtension() {
global $wgParser;
$wgParser->setHook( "QT", "renderQT" );
} function renderQT( $input ) {
global $code;
// Constructor
$QTFile = new QT( $input );
$code = $QTFile->code;
return $code; // send the final code to the wiki
}
var $QTvars; var $gotQTvars;
<qt>file=pk.mov|width=320|height=240|autoplay=true</qt>
