var gid = new Array();
var gname = new Array();
var gprice = new Array();
var gnum = new Array();

function WMShopInit() {
	WMSetupGoods();
	WMUpdateCartInd();
}

function WMFormatCurrency( sn ) {
	var i,ln,rslt="";
	sn += "";
	ln = sn.length;
	for ( i=0; i<ln; i++ ) {
		if ( i%3==0 && i!=0 )
			rslt = "," + rslt;
		rslt = sn.charAt(ln-1-i) + rslt;
	}
	return "\\" + rslt + ".-";
}

function WMGetGoodsNum() {
	var i,rslt=0;
	for ( i=0; i<gid.length; i++ ) {
		if ( gnum[i] > 0 )
			rslt += 1;
	}
	return rslt;
}

function WMGetSubtotal() {
	var i,rslt=WMGetTotal();
	rslt -= WMGetTax();
	return rslt;
}

function WMGetTax() {
	var tax,rslt=0;
	tax = (WMGetTotal()*wm_consumptionTaxRate)/(1.0+wm_consumptionTaxRate);
	if ( tax >= 1 )
		rslt = parseInt( tax );
	return rslt;
}

function WMGetTotal() {
	var i,rslt=0;
	for ( i=0; i<gid.length; i++ ) {
		rslt += gprice[i]*gnum[i];
	}
	return rslt;
}

function WMClearCart( msg ) {
	if ( WMIsStayCartGoods() == false ) {
		alert("カゴは空です。");
		return;
	}
	if ( msg == 1 ) {
		var ans = confirm("カゴを空にしますか?");
		if ( ans == false )
			return;
	}
	WMClearCartContents();
	WMUpdateCartInd();
	WMSyncGoodsData();
}

function WMAddCartDataSub( idx ) {
	if ( idx == -1 ) {
		alert( "SYSERR: 商品が見つかりませんでした。" );
		return;
	}
	if ( (parseInt( gnum[idx] ) <= 0) && (WMGetGoodsNum() >= 20) ) {
		alert( "一度にご購入できるのは、20品目までです。" );
		return;
	}
	var ans = confirm( "商品をカゴに入れてもいいですか?" );
	if ( ans == false )
		return;
	gnum[idx] = parseInt( gnum[idx]+1 );
	document.cookie = idx + "=" + gnum[idx];
	WMUpdateCartInd();
}

function WMAddCartData( g ) {
	var idx;
	WMSyncGoodsData();
	idx = WMFindGoods( g.name );
	WMAddCartDataSub( idx );
}

function WMAddCartDataID( id ) {
	var idx;
	WMSyncGoodsData();
	idx = WMFindGoods( id );
	WMAddCartDataSub( idx );
}

function WMRemoveCartData( g ) {
	var ans = confirm( "この商品を削除しますか?" );
	if ( ans == false )
		return;
	var idx;
	WMSyncGoodsData();
	idx = WMFindGoods( g.name );
	if ( idx == -1 ) {
		alert("SYSERR: 商品が見つかりませんでした。");
		return;
	}
	expiredttm = new Date();
	expiredttm.setYear( expiredttm.getFullYear()-1 );
	document.cookie = idx+"=0;expires="+expiredttm.toGMTString()+";";
	document.location.reload();
	WMUpdateCartInd();
}

function WMAddCartDatasSub( idx, qname ) {
	var q=1,i,j;
	if ( idx == -1 ) {
		alert( "SYSERR: 商品が見つかりませんでした。" );
		return;
	}
	if ( (parseInt( gnum[idx] ) <= 0) && (WMGetGoodsNum() >= 20) ) {
		alert( "一度にご購入できるのは、20品目までです。" );
		return;
	}
	for ( i=0; i<document.forms.length; i++ ) {
		slist = document.forms[i];
		for ( j=0; j<slist.elements.length; j++ ) {
			if ( slist.elements[j].name == qname ) {
				q = slist.elements[j].value;
				while ( q.indexOf("0") == 0 ) {
					q = q.substring( 1, q.length );
				}
				goodsnum = q.match(/[^0-9]/g);
				if ( !q || goodsnum || (parseInt(q)<1) ) {
					alert( "有効な数量を半角の数字で入力してください。" );
					slist.elements[j].focus();
					return;
				}
			}
		}
	}
	var ans = confirm( "商品をカゴに入れてもいいですか?" );
	if ( ans == false )
		return;
	gnum[idx] = parseInt( parseInt(gnum[idx])+parseInt(q) );
	document.cookie = idx + "=" + gnum[idx];
	WMUpdateCartInd();
}

function WMAddCartDatas( g, qname ) {
	var idx;
	WMSyncGoodsData();
	idx = WMFindGoods( g.name );
	WMAddCartDatasSub( idx, qname );
}

function WMAddCartDatasID( id, qname ) {
	var idx,q=1;
	WMSyncGoodsData();
	idx = WMFindGoods( id );
	WMAddCartDatasSub( idx, qname );
}

function WMSearchControl( obj, n ) {
	var i;
	for ( i=0; i<obj.elements.length; i++ ) {
		if ( obj.elements[i].name == n )
			return true;
	}
	return false;
}

function WMUpdateCartInd() {
	var i, j, k, ind, fname="WMCartInd";
	WMSyncGoodsData();
	for ( i=0; i<document.forms.length; i++ ) {
		if ( document.forms[i].name == fname ) {
			ind = document.forms[i];
			if ( WMSearchControl( ind, "subtotal" ) ) ind.subtotal.value = WMFormatCurrency(WMGetSubtotal());
			if ( WMSearchControl( ind, "tax"      ) ) ind.tax.value      = WMFormatCurrency(WMGetTax());
			if ( WMSearchControl( ind, "total"    ) ) ind.total.value    = WMFormatCurrency(WMGetTotal());
		}
	}
	if ( parent ) {
		for ( i=0; i<parent.frames.length; i++ ) {
			for ( j=0; j<parent.frames[i].document.forms.length; j++ ) {
				if ( parent.frames[i].document.forms[j].name == fname ) {
					ind = parent.frames[i].document.forms[j];
					if ( WMSearchControl( ind, "subtotal" ) ) ind.subtotal.value = WMFormatCurrency(WMGetSubtotal());
					if ( WMSearchControl( ind, "tax"      ) ) ind.tax.value      = WMFormatCurrency(WMGetTax());
					if ( WMSearchControl( ind, "total"    ) ) ind.total.value    = WMFormatCurrency(WMGetTotal());
				}
			}
		}
	}
	if ( parent && parent.parent ) {
		for ( i=0; i<parent.parent.frames.length; i++ ) {
			for ( j=0; j<parent.parent.frames[i].document.forms.length; j++ ) {
				if ( parent.parent.frames[i].document.forms[j].name == fname ) {
					ind = parent.parent.frames[i].document.forms[j];
					if ( WMSearchControl( ind, "subtotal" ) ) ind.subtotal.value = WMFormatCurrency(WMGetSubtotal());
					if ( WMSearchControl( ind, "tax"      ) ) ind.tax.value      = WMFormatCurrency(WMGetTax());
					if ( WMSearchControl( ind, "total"    ) ) ind.total.value    = WMFormatCurrency(WMGetTotal());
				}
			}
		}
	}
	if ( parent ) {
		for ( i=0; i<parent.frames.length; i++ ) {
			for ( j=0; j<parent.frames[i].window.frames.length; j++ ) {
				for ( k=0; k<parent.frames[i].window.frames[j].document.forms.length; k++ ) {
					if ( parent.frames[i].window.frames[j].document.forms[k].name == fname ) {
						ind = parent.frames[i].window.frames[j].document.forms[k];
						if ( WMSearchControl( ind, "subtotal" ) ) ind.subtotal.value = WMFormatCurrency(WMGetSubtotal());
						if ( WMSearchControl( ind, "tax"      ) ) ind.tax.value      = WMFormatCurrency(WMGetTax());
						if ( WMSearchControl( ind, "total"    ) ) ind.total.value    = WMFormatCurrency(WMGetTotal());
					}
				}
			}
		}
	}
}

function WMSyncGoodsData() {
	var i, sn;
	for ( i=0; i<gid.length; i++ ) {
		sn = WMGetCartContents(i);
		if ( sn == "" )
			sn = 0;
		gnum[i] = parseInt(sn);
	}
}

function WMClearCartContents() {
	var i;
	if ( gid.length == 0 )
		WMSetupGoods();
	expiredttm = new Date();
	expiredttm.setYear( expiredttm.getFullYear()-1 );
	for ( i=0; i<gid.length; i++ ) {
		gnum[i] = 0;
		document.cookie = i+"=0;expires="+expiredttm.toGMTString()+";";
	}
}

function WMGetCartGoodsCount() {
	var i, count = 0;
	if ( gid.length == 0 )
		WMSetupGoods();
	WMSyncGoodsData();
	for ( i=0; i<gid.length; i++ ) {
		count += gnum[i];
	}
	return count;
}

function WMIsStayCartGoods() {
	var i, bStay = false;
	if ( gid.length == 0 )
		WMSetupGoods();
	WMSyncGoodsData();
	for ( i=0; i<gid.length; i++ ) {
		if ( gnum[i] != 0 ) {
			bStay = true;
			break;
		}
	}
	return bStay;
}

function WMGetCartContents( id ) {
	var i, p, s, rslt="";
	p = document.cookie.split(";");
	for ( i=0; i<p.length; i++ ) {
		if ( p[i].charAt(0) == " " ) {
			p[i] = p[i].substring( 1, p[i].length );
		}
	}
	for ( i=0; i<p.length; i++ ) {
		if ( p[i].indexOf(id+"=") != -1 ) {
			s = p[i].indexOf("=");
			if ( p[i].substring(0, s) == id ) {
				rslt = p[i].slice(s+1);
				return rslt;
			}
		}
	}
	return rslt;
}

function WMValidationForm( f ) {
	var i, n, v, tmp;
	for ( i=0; i<f.elements.length; i++ ) {
		if ( f.elements[i].type			&& ((f.elements[i].type == "text")
				|| (f.elements[i].type == "select-one")) ) {
			n = f.elements[i].name;
			v = f.elements[i].value;
			if ( n.length ) {
				if ( n.charAt(0) == "@" ) {
					if ( (f.elements[i].type == "select-one") ) {
						if ( f.elements[i].selectedIndex == 0 ) {
							tmp = "\'";
							tmp += n.substring( 1, n.length );
							tmp += "\' は必須項目です。";
							alert( tmp );
							f.elements[i].focus();
							return false;
						}
					} else {
						if ( v.length == 0 ) {
							tmp = "\'";
							tmp += n.substring( 1, n.length );
							tmp += "\' は必須項目です。";
							alert( tmp );
							f.elements[i].focus();
							return false;
						}
					}
				}
			}
		}
	}
	return true;
}

function WMFindGoods( id ) {
	var i;
	if ( id.length > 0 ) {
		for ( i=0; i<gid.length; i++ ) {
			if ( gid[i] == id )
				return i;
		}
	}
	return -1;
}



function IsMacintoshIE()
{
	if (( navigator.vendor=='Netscape6' || navigator.appName.search('Microsoft Internet Explorer')!=-1 ) && navigator.appVersion.search('Macintosh') > 0)
	{
		return true;
	}
	else
	{
		return false;
	}
}

function WMSetOrderData()
{
	if(IsMacintoshIE()==false)
		return;
	if ( WMIsStayCartGoods()==false )
		return; 
	str = new String();
	if(navigator.appName.search('Microsoft Internet Explorer')!=-1)
	{
		for(i=0;i<document.forms['WMOrderInputForm'].length;i++)
		{
			if(document.forms['WMOrderInputForm'].elements[i].type!="button" &&
				document.forms['WMOrderInputForm'].elements[i].type!="submit" &&
				document.forms['WMOrderInputForm'].elements[i].type!="reset")
			{
				strTmp = "";
				if(document.forms['WMOrderInputForm'].elements[i].type=="select-multiple") {
					for(j=0;j<document.forms['WMOrderInputForm'].elements[i].length;j++)
					{
						if(document.forms['WMOrderInputForm'].elements[i].options[j].selected)
						{
							if(strTmp.length == 0)
								strTmp = document.forms['WMOrderInputForm'].elements[i].options[j].value;
							else
								strTmp = strTmp + ',' + document.forms['WMOrderInputForm'].elements[i].options[j].value;
						}
					}
				} else
					strTmp = document.forms['WMOrderInputForm'].elements[i].value;
				document.cookie=escape(document.forms['WMOrderInputForm'].elements[i].name)+"="+
								escape(strTmp);
			}
		}
	}
	else
	{
		for(i=document.forms['WMOrderInputForm'].length-1;i>-1;i--)
		{
			if(document.forms['WMOrderInputForm'].elements[i].type!="button" &&
				document.forms['WMOrderInputForm'].elements[i].type!="submit" &&
				document.forms['WMOrderInputForm'].elements[i].type!="reset")
			{
				document.cookie=escape(document.forms['WMOrderInputForm'].elements[i].name)+"="+
								escape(document.forms['WMOrderInputForm'].elements[i].value);
			}
		}
	}
}

function WMCanSubmitOrder()
{
	var i,orderForm,fname="WMOrderInputForm";
	for ( i=0; i<document.forms.length; i++ ) {
		if ( document.forms[i].name == fname ) {
			orderForm = document.forms[i];
			break;
		}
	}
	if ( orderForm ) {
		if(WMValidationForm( orderForm )==false)
			return false;
		if ( WMIsStayCartGoods() ) {
			return true;
		} else {
			alert("カゴは空です。");
			return false;
		}
	}
	return false;
}

function WMGetGoodsString()
{
	var i, rslt = "";
	idx = 1;
	for ( i=0; i<gid.length; i++ ) {
		if ( gnum[i] != 0 ) {
			tmp = "商品ID（" + gid[i] + "）　商品名（" + gname[i] + "）　数量（" + gnum[i] + "）　単価（" + 		
					WMFormatCurrency(gprice[i]) + "）　金額（" + WMFormatCurrency(gprice[i] * gnum[i]) + "）";
			rslt+=tmp+ "\n";
			idx++;
		}
	}
	rslt += "\n";
	if ( wm_consumptionTaxFlag == true ) {
		rslt += "小計 : "+ WMFormatCurrency(WMGetSubtotal());
		rslt += "\n";
		rslt += "消費税 : " + WMFormatCurrency(WMGetTax());
		rslt += "\n";
		rslt += "合計 : " + WMFormatCurrency(WMGetTotal());
	} else {
		rslt += "合計 : " + WMFormatCurrency(WMGetTotal());
	}
	rslt += "\n\n";
	
	return rslt;
}

function SplitCookie(str)
{
	str=unescape(str);
	strRet=new String();
	strRet=WMGetGoodsString();
	strTmp=str.split("; ");
	
	i=0;
	reNum = new RegExp("[0-9]=","i");
	while(i<strTmp.length)
	{
		if(strTmp[i].match(reNum)==null)
		{
			idx = strTmp[i].search('@');
			if ( idx == 0 )
				strTmp[i] = strTmp[i].substring( idx+1, strTmp[i].length );
			strRet+=strTmp[i]+"\n";
		}
		i++;
	}
	return strRet;
}

function WMInitOrderSheet()
{
	if(WMIsStayCartGoods()==false)
	{
		document.WMOrderForm.elements['ORDER'].value="";
		return;
	}
	str2=new String();
	strName=new String();
	strMailAdrs=new String();
	if(IsMacintoshIE()==false)
	{
		str2=WMGetGoodsString();
		str=new String(location.search);
		arg = GetArg2();
		for(i in arg) {
			strName = i;
			len = strName.length;
			if ( len >= 2 ) {
				strName = strName.substring( len-2 );
			}
			if ( (strName != ".x") && (strName != ".y") )
				str2+=unescape2(i+" : " )+unescape2(arg[i])+"\n";
			if ( i == "メールアドレス" )
				strMailAdrs = unescape2(arg[i]);
		}
		document.WMOrderForm.elements['ORDER'].value=str2;
		document.WMOrderForm.elements['MAIL_ADDRESS'].value=strMailAdrs;
	}
	else
	{
		str2=SplitCookie(document.cookie);
		str2=str2.replace(/=/g," : ");
		document.WMOrderForm.elements['ORDER'].value=str2;
		
		str=document.cookie;
		str=unescape(str);
		strTmp=str.split("; ");
		i=0;
		while(i<strTmp.length)
		{
			idx = strTmp[i].search('=');
			if ( idx > 0 ) {
				strName = strTmp[i].substring( 0, idx );
				strName = strName.replace(/@/g,"");
				if ( strName == "メールアドレス" )
					strMailAdrs = strTmp[i].substring( idx+1, strTmp[i].length );
			}
			i++;
		}
		document.WMOrderForm.elements['MAIL_ADDRESS'].value=strMailAdrs;
	}
}

function unescape2(str)
{
	sub = str;
	ret = '';
	while ( (n = sub.search(/(%u([\dA-F]{4})|%([\dA-F]{2}))/i)) >= 0 )
	{
		ret += sub.substring(0, n) +
		String.fromCharCode(parseInt('0x' + RegExp.$2 + RegExp.$3));
		sub = sub.substring(n + RegExp.$1.length, sub.length);
	}
	ret += sub;
	return ret;
}

function GetArg() {
	var        p, pstr;
	if(location.search=="")
		return;
	str = new String(window.document.applets[0].url2uni(location.search));

	p = str.indexOf("?", 0);
	if(p == -1) {
		pstr = "";
	}
	else {
		pstr = str.substring(p + 1, str.length);
	}
	return(pstr.split("&"));
}

function GetArg2() {
	arg = new Array();
	arg_ = GetArg();
	for(i in arg_) {
		str = new String(arg_[i]);
		p = str.split("=");
		if ( p[0].charAt(0) == "@" ) {
			p[0] = p[0].substring( 1, p[0].length );
		}
		arg[p[0]] = "";
	}
	for(i in arg_) {
		str = new String(arg_[i]);
		p = str.split("=");
		if ( p[0].charAt(0) == "@" ) {
			p[0] = p[0].substring( 1, p[0].length );
		}
		if ( arg[p[0]].length == 0 )
			arg[p[0]] = p[1];
		else
			arg[p[0]] = arg[p[0]] + ',' + p[1];
	}
	return(arg);
}

function WMResetOrder()
{
	if(WMIsStayCartGoods()==true)
	{
		WMClearCart(0);
		return true;
	}
	else
	{
		alert("カゴが空です。");
		document.WMOrderForm.elements['ORDER'].value="";
		return false;
	}
}

function IsMacintosh()
{
	if (navigator.appVersion.search('Macintosh') > 0)
	{
		return true;
	}
	else
	{
		return false;
	}
}