(function($){
	
	var popupviewer = function() {
	};
	
	/* singleton */
	var instance = null;
	$.popupviewer = function() {
		return instance || (instance = new popupviewer());
	};
	
	// Static functions
	(function(_){

		var viewer = null;
		var content = null;
		var additionalContent = null;
		var BASE_URL = DOKU_BASE + 'lib/exe/ajax.php';
		var viewerIsFixed = false;
		var next = null;
		var previous = null;
		
		_.popupImageStack = null;
		
		_.log = function(message) {
			console.log(message);	
		};
		
		_.showViewer = function() {
			
			if ( viewer == null ) {
				
				viewer = $('<div id="popupviewer"/>').click(_.hideViewer).appendTo('body');
				content = $('<div class="content"/>').click(function(e){e.stopPropagation()});
				content.current = $();

				additionalContent = $('<div class="additionalContent dokuwiki"/>');
				viewerIsFixed = viewer.css('position');

				$('<div class="controls"/>').
					append(content).
					append(additionalContent).
					append(previous = $('<a class="previous"/>').click({'direction': -1}, _.skipImageInDirection)).
					append(next = $('<a class="next"/>').click({'direction': 1}, _.skipImageInDirection)).
					append($('<a class="close"/>').click(_.hideViewer)).
					appendTo(viewer);
					
				$(document).keydown(_.globalKeyHandler);
				
			}
			
			content.empty();
			additionalContent.empty();
			$('body').css('overflow', 'hidden');
			viewer.show();
			return _;
		};
		
		_.hideViewer = function(e, finalFunction) {
			if ( viewer != null ) {
				$('body').css('overflow', 'auto');

				additionalContent.animate({
					opacity: 0,
					height: 0
				});

				content.animate({
					width : 208,
					height : 13,
				}).parent('.controls').animate({
					top : '50%',
					left : '50%',
					'margin-left' : -104
				}).parent('#popupviewer').animate({
					opacity: finalFunction ? 1 : 0
				}, function(){
					viewer.hide();

					content.empty();
					additionalContent.empty();
					content.current = null;
					
					additionalContent.css({
						opacity: 1,
						height: ''
					});
	
					content.css({
						width : '',
						height : '',
					}).parent('.controls').css({
						top : '',
						left : '',
						'margin-left' : ''
					}).parent('#popupviewer').css({
						opacity : 1
					});
					
					if ( typeof finalFunction == 'function' ) {
						finalFunction();
					}
				});
			}
			
			return _;
		};
		
		_.globalKeyHandler = function(e) {
			
			if ( !viewer.is(":visible") ) return;
			
			switch(e.keyCode) {
				case 39: // Right
					e.stopPropagation();
					next.click();
					break;
				case 37: // Left
					e.stopPropagation();
					previous.click();
					break;
				case 27: // Escape
					e.stopPropagation();
					_.hideViewer();
					break;
			}
		};
	
		_.clickHandler = function(e, popupData) {
			e && e.preventDefault();
			_.showViewer();
			
			popupData = popupData || this.popupData; // Either as param or from object
			content.current = $(this);
			
			_.log(popupData);
			
			if ( popupData.isImage ) {
				
				// Load image routine
				_.log("loading an image");
				popupData.call = '_popup_load_image_meta';
				$(new Image()).attr('src', popupData.src || this.href).waitForImages(function(){

					var image = $(this);

					var wrapper = $('<div/>').load(BASE_URL, popupData, function() {
						
						// Force size for the moment
						content.css({
							width: content.width(),
							height: content.height(),
							overflow: 'hidden'
						})
	
						content.append(image);
						content.popupData = popupData;
	
						additionalContent.html(wrapper.html());
						_.setContentSizeAndPosition(popupData.width, popupData.height, additionalContent.innerHeight(), image);
					});
				});
				
			} else {
				
				popupData.call = '_popup_load_file';
				var wrapper = $('<div/>').load(BASE_URL + " div.dokuwiki", popupData, function(response, status, xhr) {

					var success = function(node)
					{
						node.find('body,div.dokuwiki').first().waitForImages({
							finished: function() {
						
							// Force size for the moment
							content.css({
								width: content.width(),
								height: content.height()
							})

							node.find('[href],[src],[action]').
							extend(node.filter('[href],[src],[action]')).
							each(function(){
								// Replace all event handler
								
								if ( this.getAttribute('popupviewerdata') ) {
									this.popupData = $.parseJSON(this.getAttribute('popupviewerdata'));
									this.removeAttribute('popupviewerdata');
								} else {
									this.popupData = popupData;
									this.popupData.id = '';
								}
								
								$(this).click(_.clickHandler);									
							});

							// Check for Javascript to execute
							var script = "";
							node.find('script').
							extend(node.filter('script')).
							each(function(){
								script += $(this).text() /*.replace(new RegExp("(<!--\/\/--><!\\[CDATA\\[\/\/><!--|\/\/--><!\\]\\]>)", "gi"), "")*/ + "\n";
							})
							
							try {
								eval(script); // This might be a problem!
							} catch(scriptError) {
								alert("A script error occurred in PopUpViewer. This problem may not be as problematic and the site will run fine. But please get in contact with the sites owner and tell them what you did.\n\n" + scriptError);
							}

							content.html(this);
							_.setContentSizeAndPosition(popupData.width, popupData.height, null, content, true);

						}, waitForAll: true});
					}
				
				
					if ( status == "error") {
						// Go for an iframe
						var finished = false;
						var iframe = null;
						
						var messageFunction = function(event) {
				
							finished = true;
							var data = event.data || event.originalEvent.data;
							// If this message does not come with what we want, discard it.
							if ((typeof data).toLowerCase() == "string" || !data.message
									|| data.message != 'frameContent') {
								alert("Could not load page via popupviewer. The page responded with a wrong message.");
								return;
							}
				
							iframe.remove();

							// Clear the window Event after we are done!
							$(window).unbind("message", messageFunction);

							success($(data.body));
						};
						
						iframe = $('<iframe/>').load(function(){

							var frame = iframe.get(0);
							if ( frame.contentWindow.postMessage ) {
							
								// Register the Message Event for PostMessage receival
								$(window).bind("message", messageFunction);
								
								// Send a message
								var message = "getFrameContent";
								frame.contentWindow.postMessage(message, "*");
							}
							
						}).hide().attr('src', _.getCurrentLocation() ).appendTo('body');
						
						window.setTimeout(function() {
							if (!finished) {
								iframe.remove();
								alert("Could not load page via popupviewer. The page is not available.");
							}
						}, 30000);
						
					} else {
						success(wrapper)
					}

				});
			}
		};
		
		_.getCurrentLocation = function() {
			return content.current.attr('href') || content.current.attr('src') || content.current.attr('action');
		};
		
		_.setContentSizeAndPosition = function(width, height, additionalHeight, offsetElement, isPageContent) {
		
			if ( offsetElement && !width && !height) {
			
				var prevWidth = content.width();
				var prevHeight = content.height();
			
				offsetElement.css({width:'', height: ''});
				
				width = offsetElement.width();
				height = offsetElement.height(); 

				// Reset to previous size so the whole thing will animate from the middle
				offsetElement.css({width:prevWidth, height: prevHeight});
			}
			
			width = parseInt(width) || ($(window).width() * 0.7);
			height = parseInt(height) || ($(window).height() * 0.8);
			
			var ratio = width / height;
			var maxHeight = ( $(window).height() * 0.99 ) - 60;
			var maxWidth = ( $(window).width() * 0.99 ) - 40;
			
			additionalHeight = additionalHeight || 0;
			height += additionalHeight;
			
			if ( height > maxHeight ) {
				height = maxHeight;
				if ( !isPageContent ) { // If this is an image we will have to fix the size
					width = (height - additionalHeight) * ratio;
				} else {
					width += 20; // For the scroller Bar that will apear;
				}
			}
			
			if ( width > maxWidth ) {
				width = maxWidth;
				if ( !isPageContent ) { // If this is an image we will have to fix the size
					height = width / ratio + additionalHeight;
				}
			}
			
			var xOffset = viewerIsFixed ? 0 : $(document).scrollLeft() || 0;
			var yOffset = viewerIsFixed ? 0 : $(document).scrollTop() || 0;
			
			yOffset = Math.max(($(window).height() - height) * 0.5 + yOffset, 5);
			xOffset += ($(window).width() - width) * 0.5;
			
			_.log(width + " " + height);
			_.log(xOffset + " " + yOffset);
			
			if ( !isPageContent && offsetElement.is('img') ) {
				offsetElement.animate({
					width : width,
					height : 'auto'
				});
				content.css({
					width : '',
					height : '',
					overflow: ''
				});

			} else {
				content.animate({
					width : width,
					height : isPageContent ? height : 'auto',
				});
			}
			
			content.parent().animate({
				top : yOffset,
				left : xOffset,
				'margin-left' : 0
			});
			
			if ( isPageContent ) {
				content.removeClass('isImage');
			} else {
				content.addClass('isImage');
			}
			
			_.handleNextAndPrevious();
			return _;
		};
		
		_.skipImageInDirection = function(e)
		{
			e.stopPropagation();
			
			var skipTo =  $.inArray(content.current.get(0), _.popupImageStack) + e.data.direction;
			skipTo = Math.min(_.popupImageStack.length-1, Math.max(skipTo, 0));
			
			_.log("skipping " + (e.data.direction < 0 ? 'previous' : 'next') + ' ' + skipTo );
			return _.skipToImage(skipTo, e.data.direction);
			
		};

		_.skipToImage = function(skipTo, inDirection)
		{
			if ( !$(_.popupImageStack[skipTo]).is(content.current) ) {
				_.hideViewer(null, function() {
					// Deliver extra functionality to clicked item.
					var nextItem = _.popupImageStack[skipTo];
					(nextItem.popupData && nextItem.popupData.click && nextItem.popupData.click(skipTo, inDirection)) || $(nextItem).click();
				});
			}
			
			return _;
		}

		_.isFirst = function() {
			return _.popupImageStack.first().is(content.current);
		}

		_.isLast = function() {
			return _.popupImageStack.last().is(content.current);
		}
		
		_.handleNextAndPrevious = function() {
		
			if ( _.popupImageStack && _.popupImageStack.length > 1 ) {
			
				if ( _.isFirst() ) {
					previous.addClass('inactive');
				} else {
					previous.removeClass('inactive');
				}

				if ( _.isLast() ) {
					next.addClass('inactive');
				} else {
					next.removeClass('inactive');
				}

				$([next, previous]).removeClass('hidden');
			} else {
				$([next, previous]).addClass('hidden');
			}
			
			return _;
		};

		_.init = function(popupImageStack) {

			_.popupImageStack = $(popupImageStack || 'a[popupviewerdata]').each(function(){
				this.popupData = this.popupData || $.parseJSON(this.getAttribute('popupviewerdata'));
				if (this.removeAttribute) this.removeAttribute('popupviewerdata');
				$(this).unbind('click').click(_.clickHandler);
			});
			
			return _;
		};
	
	})(popupviewer.prototype);
	
    // Namespace all events.
    var eventNamespace = 'waitForImages';

    // CSS properties which contain references to images.
    $.waitForImages = {
        hasImageProperties: ['backgroundImage', 'listStyleImage', 'borderImage', 'borderCornerImage', 'cursor']
    };

    // Custom selector to find `img` elements that have a valid `src` attribute and have not already loaded.
    $.expr[':'].uncached = function (obj) {
        // Ensure we are dealing with an `img` element with a valid `src` attribute.
        if (!$(obj).is('img[src!=""]')) {
            return false;
        }

        // Firefox's `complete` property will always be `true` even if the image has not been downloaded.
        // Doing it this way works in Firefox.
        var img = new Image();
        img.src = obj.src;
        return !img.complete;
    };

    $.fn.waitForImages = function (finishedCallback, eachCallback, waitForAll) {

        var allImgsLength = 0;
        var allImgsLoaded = 0;

        // Handle options object.
        if ($.isPlainObject(arguments[0])) {
            waitForAll = arguments[0].waitForAll;
            eachCallback = arguments[0].each;
			// This must be last as arguments[0]
			// is aliased with finishedCallback.
            finishedCallback = arguments[0].finished;
        }

        // Handle missing callbacks.
        finishedCallback = finishedCallback || $.noop;
        eachCallback = eachCallback || $.noop;

        // Convert waitForAll to Boolean
        waitForAll = !! waitForAll;

        // Ensure callbacks are functions.
        if (!$.isFunction(finishedCallback) || !$.isFunction(eachCallback)) {
            throw new TypeError('An invalid callback was supplied.');
        }

        return this.each(function () {
            // Build a list of all imgs, dependent on what images will be considered.
            var obj = $(this);
            var allImgs = [];
            // CSS properties which may contain an image.
            var hasImgProperties = $.waitForImages.hasImageProperties || [];
            // To match `url()` references.
            // Spec: http://www.w3.org/TR/CSS2/syndata.html#value-def-uri
            var matchUrl = /url\(\s*(['"]?)(.*?)\1\s*\)/g;

            if (waitForAll) {

                // Get all elements (including the original), as any one of them could have a background image.
                obj.find('*').addBack().each(function () {
                    var element = $(this);

                    // If an `img` element, add it. But keep iterating in case it has a background image too.
                    if (element.is('img:uncached')) {
                        allImgs.push({
                            src: element.attr('src'),
                            element: element[0]
                        });
                    }

                    $.each(hasImgProperties, function (i, property) {
                        var propertyValue = element.css(property);
                        var match;

                        // If it doesn't contain this property, skip.
                        if (!propertyValue) {
                            return true;
                        }

                        // Get all url() of this element.
                        while (match = matchUrl.exec(propertyValue)) {
                            allImgs.push({
                                src: match[2],
                                element: element[0]
                            });
                        }
                    });
                });
            } else {
                // For images only, the task is simpler.
                obj.find('img:uncached')
                    .each(function () {
                    allImgs.push({
                        src: this.src,
                        element: this
                    });
                });
            }

            allImgsLength = allImgs.length;
            allImgsLoaded = 0;

            // If no images found, don't bother.
            if (allImgsLength === 0) {
                finishedCallback.call(obj[0]);
            }

            $.each(allImgs, function (i, img) {

                var image = new Image();

                // Handle the image loading and error with the same callback.
                $(image).on('load.' + eventNamespace + ' error.' + eventNamespace, function (event) {
                    allImgsLoaded++;

                    // If an error occurred with loading the image, set the third argument accordingly.
                    eachCallback.call(img.element, allImgsLoaded, allImgsLength, event.type == 'load');

                    if (allImgsLoaded == allImgsLength) {
                        finishedCallback.call(obj[0]);
                        return false;
                    }

                });

                image.src = img.src;
            });
        });
    };
    	
	$(function(){
		$.popupviewer().init();
	});
	
})(jQuery);


/* Loading the content for locally exported content */
(function($){
	$(window).bind("message", function(event){

		var data = event.data || event.originalEvent.data;
		var source = event.source || event.originalEvent.source;
		if (data != "getFrameContent") {
			return;
		}

		try {
			source.postMessage({
				message : "frameContent",
				body : jQuery('html').html()
			}, "*");
		} catch (e) {
			alert("Fatal Exception! Could not load page via popupviewer.\n" + e);
		}
	});
})(jQuery);