module BcmsTools
	module Thumbnails
			
		def self.thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)
			extThumb = aAttachment.file_extension
			size = "#{aWidth.to_s}x#{aHeight.to_s}"
			result = File.basename(aAttachment.file_location)+'-'
			result += if aWidth && aHeight
				size+'.'+extThumb
			else
				'*'
			end
			result
		end
		
		def self.remove_attachment_thumbnails(aAttachment)
			nameThumb = thumbnail_name_from_attachment(aAttachment,nil,nil)		
			pathThumbWildcard = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
			FileUtils.rm(Dir.glob(pathThumbWildcard))
		end		
		
		def self.attachment_from_url(aUrl)
			if aUrl.begins_with?('/cms/attachments/')
				id,version = aUrl.scan(/\/cms\/attachments\/([0-9]+)\?version=([0-9]+)/).flatten.map {|i| i.to_i}
				att = Attachment.find_by_id_and_version(id,version)																												 
			else
				att = Attachment.find_live_by_file_path(aUrl)
			end
		end
		
		def self.image_location_from_url(aUrl)
			att = attachment_from_url(aUrl)
			return att && att.full_file_location
		end
		
		# Scale given aWidth,aHeight up to fit within aDestWidth,aDestHeight
		# return original width and height if nil given for both aDestWidth & aDestHeight
		# If either aDestWidth or aDestHeight are nil, it will scale to fit the other dimension
		# If both are non-nil, the maximum scaled size that will fit inside the given width and height will be returned.
		def self.scale_to_fit(aWidth,aHeight,aDestWidth,aDestHeight)
			if aDestWidth.nil? && aDestHeight.nil?
				ratio = 1
			else
				wRatio = aDestWidth && (aDestWidth / aWidth)
				hRatio = (aDestHeight.nil? ? wRatio : (aDestHeight / aHeight))
				wRatio ||= hRatio
				ratio = Math.min(wRatio,hRatio)
			end
			return aWidth*ratio,aHeight*ratio
		end
		
	end
	
	module PageHelper
	
		module_function # this makes these methods callable as BcmsTools::PageHelper.method

		def container_sized(aName,aWidth,aHeight)
			StringUtils.split3(container(aName),/<img.*?>/,-1) do |head,img,tail|
				src = XmlUtils.quick_att_from_tag(img,'src')
				if src.begins_with?('/images/cms/')					# a cms button
					img
				else
					thumberize_img(img,aWidth,aHeight)	# an image in the container
				end
			end
		end
		
		# with_images( container(:image_bar) ) do |img|
		#		thumberize_img(img,width,height)
		#	end	
		def with_images(aContainer)
			return nil if aContainer.nil?
			result = aContainer.clone
			offset = 0
			aContainer.scan_md(/<img.*?>/).each do |img_md|
				src = XmlUtils.quick_att_from_tag(img_md.to_s,'src')
				next if !src || src.begins_with?('/images/cms/')
				first,last = img_md.offset(0)
				output = yield(img_md.to_s)
				result[first+offset..last-1+offset] = output
				offset += output.length - (last-first)
			end
			result
		end
		
		def thumberize_img(img,aWidth,aHeight)
			begin
				urlImage = XmlUtils.quick_att_from_tag(img,'src')
			
				att = BcmsTools::Thumbnails::attachment_from_url(urlImage)
				pathImage = att && att.full_file_location
			
				throw RuntimeError.new("file doesn't exist #{pathImage}") unless File.exists? pathImage
				throw RuntimeError.new("could not get file geometry #{pathImage}") unless geomImage = Paperclip::Geometry.from_file(pathImage)
			
				aDestWidth,aDestHeight = BcmsTools::Thumbnails::scale_to_fit(geomImage.width,geomImage.height,aWidth,aHeight).map {|i| i.to_i}
			
				nameThumb = BcmsTools::Thumbnails::thumbnail_name_from_attachment(att,aWidth,aHeight)		
	
				pathThumb = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
			
				if !File.exists?(pathThumb)
					# generate thumbnail at size to fit container
					throw RuntimeError.new("Failed reading image #{pathImage}") unless objThumb = Paperclip::Thumbnail.new(File.new(pathImage), "#{aDestWidth}x#{aDestHeight}")
					throw RuntimeError.new("Failed making thumbnail #{pathImage}") unless foThumb = objThumb.make
					FileUtils.cp(foThumb.path,pathThumb,:preserve => true)
					FileUtils.chmod(0644,pathThumb)
					FileUtils.rm(foThumb.path)
					#POpen4::shell_out("sudo -u tca chgrp www-data	#{pathThumb}; sudo -u tca chmod 644 #{pathThumb}")
				end
			
				img = XmlUtils.quick_set_att(img,'src',File.join(APP_CONFIG[:thumbs_url],nameThumb))
				return HtmlUtils.fixed_frame_image(img,aWidth,aHeight,aDestWidth,aDestHeight)
			rescue Exception => e
				RAILS_DEFAULT_LOGGER.warn "thumberize_img error: #{e.inspect}"
				RAILS_DEFAULT_LOGGER.debug e.backtrace      
				return img
			end
		end
		
		def attachment_cropped_src(aAttachment,aWidth,aHeight)
			return '' if !aAttachment
			begin	
				pathImage = aAttachment.full_file_location
				throw RuntimeError.new("file doesn't exist #{pathImage}") unless File.exists? pathImage
				nameThumb = BcmsTools::Thumbnails::thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)		
				pathThumb = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
				if !File.exists?(pathThumb)
					# generate thumbnail at size to fit container
					throw RuntimeError.new("Failed reading image #{pathImage}") unless objThumb = Paperclip::Thumbnail.new(File.new(pathImage), "#{aWidth}x#{aHeight}#")
					throw RuntimeError.new("Failed making thumbnail #{pathImage}") unless foThumb = objThumb.make
					FileUtils.cp(foThumb.path,pathThumb)
					FileUtils.chmod(0644,pathThumb)
					FileUtils.rm(foThumb.path)
				end
				return File.join(APP_CONFIG[:thumbs_url],nameThumb)
			rescue Exception => e
				RAILS_DEFAULT_LOGGER.warn "thumberize_img error: #{e.inspect}"
				RAILS_DEFAULT_LOGGER.debug e.backtrace      
				return ''
			end
		end
		
		def image_max_src(aImagePath,aWidth,aHeight)
			return '' if !aImagePath
			begin	
				pathImage = aImagePath
				throw RuntimeError.new("file doesn't exist #{pathImage}") unless File.exists? pathImage
				throw RuntimeError.new("could not get file geometry #{pathImage}") unless geomImage = Paperclip::Geometry.from_file(pathImage)
				#nameThumb = BcmsTools::Thumbnails::thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)
				#def self.thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)
					extThumb = MiscUtils.file_extension(File.basename(aImagePath)).downcase
					size = "#{aWidth.to_s}x#{aHeight.to_s}"
					nameThumb = MiscUtils.file_no_extension(File.basename(aImagePath))+'-'
					nameThumb += if aWidth || aHeight
						size+'.'+extThumb
					else
						'*'
					end
					#result
				#end
				
				
				


				pathThumb = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
							
				aDestWidth,aDestHeight = BcmsTools::Thumbnails::scale_to_fit(geomImage.width,geomImage.height,aWidth,aHeight).map {|i| i.to_i}
				if !File.exists?(pathThumb)
					# generate thumbnail at size to fit container
					throw RuntimeError.new("Failed reading image #{pathImage}") unless objThumb = Paperclip::Thumbnail.new(File.new(pathImage), "#{aDestWidth}x#{aDestHeight}")
					throw RuntimeError.new("Failed making thumbnail #{pathImage}") unless foThumb = objThumb.make
					FileUtils.cp(foThumb.path,pathThumb)
					FileUtils.chmod(0644,pathThumb)
					FileUtils.rm(foThumb.path)
				end
				return File.join(APP_CONFIG[:thumbs_url],nameThumb)
			rescue Exception => e
				RAILS_DEFAULT_LOGGER.warn "thumberize_img error: #{e.inspect}"
				RAILS_DEFAULT_LOGGER.debug e.backtrace      
				return ''
			end
		end
		
		
		def attachment_max_src(aAttachment,aWidth,aHeight)
			return '' if !aAttachment
			begin	
				pathImage = aAttachment.full_file_location
				throw RuntimeError.new("file doesn't exist #{pathImage}") unless File.exists? pathImage
				throw RuntimeError.new("could not get file geometry #{pathImage}") unless geomImage = Paperclip::Geometry.from_file(pathImage)
				nameThumb = BcmsTools::Thumbnails::thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)		
				pathThumb = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
							
				aDestWidth,aDestHeight = BcmsTools::Thumbnails::scale_to_fit(geomImage.width,geomImage.height,aWidth,aHeight).map {|i| i.to_i}
				if !File.exists?(pathThumb)
					# generate thumbnail at size to fit container
					throw RuntimeError.new("Failed reading image #{pathImage}") unless objThumb = Paperclip::Thumbnail.new(File.new(pathImage), "#{aDestWidth}x#{aDestHeight}")
					throw RuntimeError.new("Failed making thumbnail #{pathImage}") unless foThumb = objThumb.make
					FileUtils.cp(foThumb.path,pathThumb)
					FileUtils.chmod(0644,pathThumb)
					FileUtils.rm(foThumb.path)
				end
				return File.join(APP_CONFIG[:thumbs_url],nameThumb)
			rescue Exception => e
				RAILS_DEFAULT_LOGGER.warn "thumberize_img error: #{e.inspect}"
				RAILS_DEFAULT_LOGGER.debug e.backtrace      
				return ''
			end
		end
		
		
		def framed_attachment_img(aAttachment,aWidth,aHeight)
			begin
				pathImage = aAttachment.full_file_location
			
				throw RuntimeError.new("file doesn't exist #{pathImage}") unless File.exists? pathImage
				throw RuntimeError.new("could not get file geometry #{pathImage}") unless geomImage = Paperclip::Geometry.from_file(pathImage)
			
				aDestWidth,aDestHeight = BcmsTools::Thumbnails::scale_to_fit(geomImage.width,geomImage.height,aWidth,aHeight).map {|i| i.to_i}
			
				nameThumb = BcmsTools::Thumbnails::thumbnail_name_from_attachment(aAttachment,aWidth,aHeight)		
	
				pathThumb = File.join(APP_CONFIG[:thumbs_cache],nameThumb)
			
				if !File.exists?(pathThumb)
					throw RuntimeError.new("Failed reading image #{pathImage}") unless objThumb = Paperclip::Thumbnail.new(File.new(pathImage), "#{aDestWidth}x#{aDestHeight}")
					throw RuntimeError.new("Failed making thumbnail #{pathImage}") unless foThumb = objThumb.make
					FileUtils.cp(foThumb.path,pathThumb)
					FileUtils.chmod(0644,pathThumb)
					FileUtils.rm(foThumb.path)
				end
				
				img = "<img src=\"#{File.join(APP_CONFIG[:thumbs_url],nameThumb)}\" width=\"#{aDestWidth}\" height=\"#{aDestHeight}\" />"
				return HtmlUtils.fixed_frame_image(img,aWidth,aHeight,aDestWidth,aDestHeight)
			rescue Exception => e
				RAILS_DEFAULT_LOGGER.warn "thumberize_img error: #{e.inspect}"
				RAILS_DEFAULT_LOGGER.debug e.backtrace      
				return ''
			end
		end

	end
end