<?
################################################################################
# phpQuestionnaire Junior                    Version 1.0A                      #
# Copyright 2003-2004 chumpsoft, inc.        January 12, 2004                  #
# http://www.chumpsoft.com/products/phpqjr/  support@chumpsoft.com             #
################################################################################
# Use of this program constitutes your agreement to the terms contained in the #
# LICENSE file within this distribution.                                       #
################################################################################

$base_url = preg_replace('/(.*)\/.*/', '\\1', $HTTP_SERVER_VARS['PHP_SELF']);
$pid = $HTTP_GET_VARS['pid'];
$gid = $HTTP_GET_VARS['gid'];
$w = $HTTP_GET_VARS['w'];
$h = $HTTP_GET_VARS['h'];
$r = $HTTP_GET_VARS['r'];
$jr_url = $gid ? $base_url.'/poll.php?gid='.$gid : $base_url.'/poll.php?pid='.$pid;
$jr_url = $r ? "$jr_url&rpid=$pid&rsubmit=1" : $jr_url;

$js = <<<END
jr_url = '';
jr_error_handler = window.onerror;

function show_jr() {
	var w = window;
	w.onerror = w.jr_error_handler;
	w.jr_url = '$jr_url';
	
	w.jr_url = w.jr_url + '&url=' + escape(w.jr_page_url);
	w.jr_url = w.jr_url.substring(0, 1000);
	w.jr_url = w.jr_url.replace(/%\w?$/, '');

	document.write('<ifr' + 'ame' +
									' width=$w' +
									' height=$h' +
									' frameborder=' + w.jr_frameborder +
									' src=' + w.jr_url +
									' marginwidth=0' +
									' marginheight=0' +
									' vspace=0' +
									' hspace=0' +
									' allowtransparency=true' +
									' scrolling=no></ifr' + 'ame>');
	w.jr_frameborder = null;
	w.jr_page_url = null;
}

function jr_error_handler(message, url, line) {
	show_jr();
	return true;
}

window.onerror = jr_error_handler;

if (window.jr_frameborder == null) {
	jr_frameborder = 0;
}

if (window.jr_page_url == null) {
	jr_page_url = document.referrer;
	if (window.top.location == document.location) {
		jr_page_url = document.location;
	}
}

show_jr();
END;

print($js);

?>