/**
* Cornerz 0.8 - Bullet Proof Corners
* Jonah Fox (jonah@parkerfox.co.uk) 2008
* 
* Usage: $('.myclass').curve(options)
* options is a hash with the following parameters. Bracketed is the default
*   radius (10)
*   borderWidth (read from BorderTopWidth or 0)
*   background ("white"). Note that this is not calculated from the HTML as it is expensive
*   borderColor (read from BorderTopColor)
*   corners ("tl br tr bl"). Specify which borders
*   fixIE ("padding") - attmepts to fix IE by incrementing the property by 1 if the outer width/height is odd.

CHANGELIST from  v0.4

0.5 - Now attempts to fix the odd dimension problem in IE 
0.6 - Added semicolons for packing and fixed a problem with odd border width's in IE

*/
    
;(function($){

  if($.browser.msie && document.namespaces["v"] == null) {
    document.namespaces.add("v", "urn:schemas-microsoft-com:vml");
    var ss = document.createStyleSheet().owningElement;
    ss.styleSheet.cssText = "v\\:*{behavior:url(#default#VML);}"
  }

  $.fn.cornerz = function(options){
    
    function canvasCorner(t,l, r,bw,bc,bg,inline, o){
	    var sa,ea,cw,sx,sy,x,y, p = 1.57, css="position:absolute;";
	    
	    if(t) {
	      sa=-p; sy=r; y=o?r:0; css+="top:-"+(o ? r : bw)+"px;";  }
	    else 
		    {sa=p; sy=0; y=o?  0 : r; css+="bottom:-"+(o ? r : bw)+"px;"; }
	    if(l) 
		    {ea=p*2; sx=r+0; x=o? r : 0;	css+="left:-"+bw+"px;"}
	    else 
		    { ea=0; sx=0; x=o? 0 : r; 
	    
	      if(inline) {
	        css+="left:"+(inline-r-bw)+"px;";	  
	      } else {
	        css+="right:"+(-bw)+"px;";	  
	      }
	  	}
		
	    var canvas=$("<canvas width="+r+"px height="+ r +"px style='" + css+"' ></canvas>");
	    var ctx=canvas[0].getContext('2d');
	    ctx.beginPath();
	    ctx.lineWidth=bw*2;

      var nr = o?r-bw:r
      if(nr<0) {
        nr = r;
        bg = bc;
        ctx.lineWidth = 0
      }
	    ctx.arc(sx,sy,nr,sa,ea,!(t^l)); // fails for bw > r
	    ctx.strokeStyle=bc;
	    ctx.stroke();
	    ctx.lineWidth = 0;
	    ctx.lineTo(x,y);
	    ctx.fillStyle=bg;
	    ctx.fill();
	    return canvas;
    };

    function canvasCorners(corners, r, bw,bc,bg, inline, outer) {
	    var hh = $("<div style='display: inherit' />"); // trying out style='float:left' 
	    $.each(corners.split(" "), function() {
	      hh.append(canvasCorner(this[0]=="t",this[1]=="l", r,bw,bc,bg,inline, outer));
	    });
	    return hh;
    };

    function vmlCurve(r,b,c,m,ml,mt, rfix,fill_col) {
        var l = m-ml-rfix;
        var t = m-mt;
        
       var filled = fill_col ? "True" : "False"
        
        return "<v:arc filled='" + filled + "' fillcolor='" + fill_col+ "' strokeweight='"+b+"px' strokecolor='"+c+"' startangle='0' endangle='361' style=' top:" + t +"px;left: "+ l + ";width:" + r+ "px; height:" + r+ "px' />";
    }
    

    function vmlCorners(corners, r, bw, bc, w , bg, outer) {
      var h ="<div style='text-align:left; '>";
     
      $.each($.trim(corners).split(" "), function() {
        var css,ml=1,mt=1;
        var rfix = 0;
        
        if(this.charAt(0)=="t") {
          css="top:-"+(outer ? r: bw)+"px;";
        }
        else {
          css= "bottom:-"+(outer ? r: bw)+"px;";
          mt=r+1;
        }
        if(this.charAt(1)=="l")
          css+="left:-"+bw+"px;";
        else {
          css +="right:-"+(bw)+"px; "; // odd width gives wrong margin?
           ml=r;
           rfix = 1;
        }

        h+="<div style='"+css+"; position: absolute; overflow:hidden; width:"+ r +"px; height: " + r + "px;'>";
        h+= "<v:group  style='width:1000px;height:1000px;position:absolute;' coordsize='1000,1000' >";
        
        if(!outer)
          h+= vmlCurve(r*3,r+bw,bg, -r/2,ml,mt, rfix); 
        if(bw>0 || outer)
          h+= vmlCurve(r*2-bw,bw,bc, Math.floor(bw/2+0.5),ml,mt,rfix, outer ? bg : null );
        h+="</v:group>";
        h+= "</div>"; 
      });
      h += "</div>";
      
      return h;
    };

    var alterProperty = function(elem, prop, x) {
       var y = parseInt(elem.css(prop)) || 0 ;
       
       elem.css(prop, x+y);
    }

    function fixDimensions($$) {
      var ow = $$.innerWidth();
      var oh = $$.innerHeight();

      if(ow%2 == 1) {
        alterProperty($$, "padding-right", 1);
        alterProperty($$, "margin-right", 1);
      }

      if(oh%2 == 1) { 
        alterProperty($$, "padding-bottom", 1);
        alterProperty($$, "margin-bottom", 1);
      }
    }
      
    /***** OUTER CORNERZ CODE *****/
    
    function addTopBot($el, r, bw, bc, bg, cs) {

        var tl = cs.indexOf("tl") != -1 ;
        var tr = cs.indexOf("tr") != -1;
        var bl = cs.indexOf("bl") != -1;
        var br = cs.indexOf("br") != -1;
      
        var offsetTop = (tl || tr) ? r : 0 ;
        var offsetBot = (bl || br) ? r : 0 ;
        
        var borderTop = (tl || tr) ? parseInt($el.css("borderTopWidth")) : 0;
        
        var pt = parseInt($el.css("paddingTop"));
        var pb = parseInt($el.css("paddingTop"));
        var pl = parseInt($el.css("paddingLeft"))
        
        var h = $el.height() - r - r +borderTop+borderTop;
        
        if(h<0)
          h=0;
       
        $el.css("height", h)

        if(!bg)
            bg = $el.css("backgroundColor");
        if(!bw)
            bw = borderTop;
        if(!bc)
            bc = $el.css("borderTopColor"); 

        $el.css("position", "relative");

        //var cs = o.corners.split(" ");


        $el.wrapInner("<div class=_content style='position: absolute; left: " + pl + "px; top: -" + (offsetTop - borderTop) + "px'  />");

        if(tl || tr) {
            addElement($el, tl, tr, r, bw, bc, bg, "top");
            alterProperty($el, "margin-top", offsetTop);
        }
        
        if(bl || br) {
            addElement($el, bl, br, r, bw, bc, bg, "bottom");
            alterProperty($el, "margin-bottom", offsetBot );
        }
              
      
        //$el.after("<div style='line-height:0px; padding:0px; margin:0px'>&nbsp;</div>")
      }

    function addElement($el, tl, tr, r, bw, bc, bg, type) {
        var elemcss = {};
        elemcss["border-" + type + "-width"] = 0;

        var w = $el.outerWidth();
        var h = r - bw;


        var padding = parseInt($el.css("padding-"+type));

        var new_padding = 0;
        if(h - padding < 0) {
            new_padding = padding -h;
        }
        //elemcss["padding-" + type]  = new_padding;

        var css = { background: bg,
                    "position": "absolute" }
        var l = 0;

        css["margin-" + type] = -h-bw;
        css[type]=0;
        var border = bw + "px solid " + bc;
        css["border-"+type] = border;
        if(tl) {
           l += r - bw;
            w -= r+bw;
        } else {
            css["border-left"] = border;
            l -= bw;
        }
        if(tr) {
            l -= 0;
            w -= r + bw;
        } else {
          css["border-right"] = border;
        }

        if(tr&&tl) {
          w += bw+bw
        }

        css.left = l;
        css.width = w;
        css.height = h;
        var div = $("<div>").css(css);

        $el.prepend(div)
           .css(elemcss);
    }
    
    /*************/
    
    var settings = {
      corners : "tl tr bl br",
      radius : 10,
      background: "white",
      borderWidth: 0,
      fixIE: true,
      outer: false
    };              
    
    $.extend(settings, options || {});
    
    /********/
    
    return this.each(function() {
        var $$ = $(this);
        var r = settings.radius*1.0;
        var bw = (settings.borderWidth || parseInt($$.css("borderTopWidth")) || 0)*1.0;
        var bg = settings.background;
        var bc = settings.borderColor;
        bc = bc || ( bw > 0 ? $$.css("borderTopColor") : bg);
            
        var cs = settings.corners;
        
        
        this.style.zoom = 1;
        
        if($$.css("position") != "absolute")
          this.style.position = "relative";
        
      
        if(settings.outer)  {
          bg = $$.css("backgroundColor");
          addTopBot($$, r, bw, bc, bg, cs);
        } 
        
        if($.browser.msie) {
          this.innerHTML = vmlCorners(cs,r,bw,bc, $(this).width(), bg,  settings.outer ) + this.innerHTML;        
          
          if(settings.fixIE && !settings.outer)
            fixDimensions($$)
        }
        else
          $$.prepend(canvasCorners(cs,r,bw,bc,bg, $$.css("display") == "inline" ? $$.outerWidth() : null, settings.outer));
        
       
      }
      
    );
 
  }
})(jQuery);