/**
 * SQL整形マクロ
 *
 * 作成者:ATL
 * http://atl.blog.shinobi.jp/
 *
 * var b014 2012/08/14
 * between 直後のandでは改行しないよう対応
 * 
 * var b013
 * MERGE文対応のときに、CASE文が整形されなくなったので修正.
 *
 * var b012
 * MERGE文対応.
 * MINUS、INTERSECT、NATURALに対応
 *
 * var b011 2010/05/20
 * 1つの単語を変換すると、実行エラーになる不具合を修正.
 * サクラエディタ以外に、WScriptでも実行できるよう機能追加.
 * FULL OUTER JOINに対応.
 *
 * ver b010 2010/05/1
 * LEFT OUTER JOIN, RIGHT OUTER JOIN, INNER JOINのの整形に耐えられるように、
 * 以下のMAP定義を追加.
 *  atl.sql.BLOCK_INDENT_NEXT_MINUS_ALL_PLUS_TOKEN_MAP
 *  atl.sql.BASE_INDENT_SEARCH_MAP
 *  atl.sql.BASE_BLOCK_LEVEL_INDENT_MAP
 *
 * ver b009 2010/01/31
 * ---とマイナスが連続していると１行コメントとして認識されない不具合を修正
 * カンマやAND/ORを前、後ろで表示できるようにプログラム構造を変更.
 *
 * ver b008 2009/12/27
 * 「<=」や「(+)」が連結されなくなるバグを修正.
 *
 * ver b007 2009/4/4
 * CASE文関連のキーワード追加.
 * コメント周りのバグ修正.
 *
 * ver b006 2009/3/28
 * orでもインデントがそろうように修正.
 * b005でバッファリング処理を見直し高速化.
 * トークン同士の特別な記号に対応.
 * (unionで改行せずに、union allとするとか)
 *
 * ver b005 2009/3/25
 * 高速化対応.
 * 細かいバグを修正.
 *
 * ver b004 2006/08/15 
 * コメント暫定対応.
 * insert文、暫定対応.
 * update文、暫定対応.
 * 文字連結の不具合を修正.
 * 改行コードが連続する不具合を修正.
 * フォーマット処理の不具合を修正.
 * 整形キーワードを追加(havingなど)
 *
 * ver b003 2006/08/02
 * 括弧内には特定のキーワードトークンがない限り、改行処理を入れないよう修正.
 * ネストした括弧にも対応.
 * フォーマット定義をATL色に多少変更.
 *
 * ver b002 2006/08/01
 * 括弧内の整形処理を変更する.ただしネストした括弧内のトークンには非対応.
 * ソースがちゃぶ台をひっくり返すほど汚くなってきたので、b002は封印してb003へ全てを委ねる.
 *
 * ver b001 2006/07/08
 * とりあえず作成.
 * 
 */
eval(function(p,a,c,k,e,r){e=function(c){return(c<a?'':e(parseInt(c/a)))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36))};if(!''.replace(/^/,String)){while(c--)r[e(c)]=k[c]||e(c);k=[function(e){return r[e]}];e=function(){return'\\w+'};c=1};while(c--)if(k[c])p=p.replace(new RegExp('\\b'+e(c)+'\\b','g'),k[c]);return p}('9 5=5||{};5.7=5.7||{};5.k=5.k||{};5.7.O="\\t";5.7.1x={".":3,"(":3,",":p};5.7.1y={".":3,",":3,";":3,")":3,"(*)":3,"(+)":3};5.7.1z={"1e":p,"P":3,"Q":3,"2f":3,"R":3,"Y":3,"Z":3,"1A":3,"10":3,"H":p,"D":3,",":3,"(":3,";":3,"I":3,"E":p,"J":p,"2g":3,"1f":3,"1g":3,"11":3,"D I":3,"q s w":3,"q C s w":3};5.7.1B={"12":3,"Q":3,"R":3,"Y":3,"Z":3,"E":3,"J":3,"1C":3,"1D":3,"1E":3,"10":3,"D":3,")":3,";":3,"q":3,"2h":3,"1F":3,"P":3,",":p,"H":3,"1e":p,"1G":3,"1H":3,"1I":3,"1J":3,"1K":3,"1f":3,"1g":3,"11":3,"D I":3,"q s w":3,"q C s w":3};5.7.1h={"2i":"E"};5.7.1L={"1e":p,"P":3,"Q":3,"12":3,"R":3,"Y":3,"Z":3,"E":3,"J":3,"1A":3,"10":3,"(":3,"2j":3,"H":3,"11":3,"s":3,"2k":3,"q s w":3,"q C s w":3};5.7.1M={"Y":3,"E":3,"J":3,"10":3,"D":3,"1F":3,"H":3,"1f":3,"1g":3,"11":3,"D I":3,"q s w":3,"q C s w":3};5.7.1N={"P":3,"12":3,"Q":3,"R":3,"E":3,"J":3,"H":3};5.7.1i={"1G":3,"1H":3,"1I":3,"1J":3,"1K":3};5.7.1O={"P":3};5.7.1P={"R":3,"Z":3,"1D":3,"1C":3,"1E":3,"12":3,"Q":3};5.7.1Q={"(":")","q s w":"q C s w"};5.7.1R={"D":"I","D I":3,"q":{"s":3,"C":3},"q s":"w","q s w":3,"q C":"s","q C s":"w","q C s w":3};5.7.1j={"E":5.7.O,"J":5.7.O,"H":5.7.O};5.13=8(a){4.F=v K();4.14=0;4.S=m;6(a){4.x(a)}};5.13.u={x:8(a){4.F.15(a);4.14+=a.o;4.S=m},L:8(){6(!4.S){4.S=4.F.1S("")}j 4.S},o:8(){j 4.14},T:8(i){j 4.L().2l(i)},2m:8(){4.14=0;4.F.o=0}};5.k.M=8(){};5.k.M.u={1T:0,1U:1,2n:2,U:8(a){6(!4.16){4.16=v K()}4.16.15(a)},1V:8(){j 4.16},1k:8(){j m},1W:8(a){4.1X=a},1Y:8(){j 4.1X}};5.k.A=8(a){4.1Z=a;4.1l=v K();4.17=5.k.A.u.17++};5.k.A.u=v 5.k.M();5.k.A.u.17=0;5.k.A.u.1k=8(){j 5.k.M.1U};5.k.A.u.1m=8(a){j 4.1l[a]};5.k.A.u.1n=8(a,b){4.1l[a]=b};5.k.A.u.20=8(){j 4.1Z};5.k.A.u.21=8(){j 4.17};5.k.N=8(){};5.k.N.u=v 5.k.M();5.k.N.u.1k=8(){j 5.k.M.1T};5.k.N.u.18=8(a){j v 5.k.A(a)};5.k.N.u.2o=8(a){j v 5.k.2p(a)};5.7.22=8(a){6(a!=m){4.1o=v 5.7.19(a);4.7=a}4.1a=v K();4.1b=v K();4.V=m;4.23="";4.z=0;4.2q={};4.1c={};4.1p={}};5.7.22.u={2r:8(a){6(a!=m){4.1o=v 5.7.19(a);4.7=a}6(4.7==m||4.7.o==0){j""}9 b=v 5.k.N();9 c=b.18("2s");c.1n("1d",3);4.1q(b,c);9 d=v 5.13();4.1r(d,c);4.24(d);j d.L()},24:8(a){6(a.o<=0){j}9 b=a.F.25();6(b){a.x(b.26(/([ \\t]+$)/g,\'\'))}},2t:8(a){9 b=a.F[a.F.o-1];6(b==m||b.T(b.o-1)=="\\n"){j 3}j p},27:8(a,b,c,d,e){9 f=c.1s();9 g=p;9 h="";9 i=5.7.1Q[f];6(i){4.1a.15(4.z);4.1b[e+":"+i]=3}l 6(4.1b[e+":"+f]){4.z=4.1a.25();2u 4.1b[f]}l 6(f==";"){4.z=0;4.1a.o=0}6(5.7.1y[f]){b=b.26(/([ \\t]+$)/g,\'\')}6(5.7.1M[f]){6(4.z>0){4.z--}}6(5.7.1i[f]){6(4.1p[e]==m){4.1p[e]=3}l{4.z--}}6(5.7.1O[f]){4.1c[e]=4.z}6(5.7.1P[f]&&4.1c[e]!=m){4.z=4.1c[e]}6(5.7.1h[f]){4.V=5.7.1h[f]}6(5.7.1B[f]){6(d&&4.V!=f){b="\\r\\n"}}6(4.V==f){h=" ";4.V=m}l 6((5.7.1z[f]&&d)||f.28(/^\\-\\-/)||f.28(/\\*\\/$/)){h="\\r\\n"}l 6(5.7.1j[f]){h=5.7.1j[f]}l 6(5.7.1x[f]){h=""}l{h=" "}6(b!=m&&b.T(b.o-1)==\'\\n\'){6(a.o()>0){a.x(b+4.1t(4.z)+c)}l{a.x(4.1t(4.z)+c)}}l{a.x((b==m?"":b)+c)}6(5.7.1L[f]||5.7.1i[f]){4.z++}4.23=f;j h},1r:8(a,b){9 c=b.1V();6(c==m){j}1u(9 i=0;i<c.o;i++){6(c[i].20()=="29"){4.1r(a,c[i]);G}9 d=b.1m("1d");9 e=b.21();4.2a=4.27(a,4.2a,c[i].1Y(),d,e)}j},1q:8(a,b){9 c;9 d=b.1m("1d")||p;2b((c=4.1o.2c(5.7.1R))!=m){9 e=a.18("2v");e.1W(c);6(!d&&5.7.1N[c.1s()]){d=3;b.1n("1d",3)}6(c=="("){9 f=a.18("29");f.U(e);b.U(f);4.1q(a,f);G}l 6(c==")"){b.U(e);j}b.U(e)}},1t:8(a){9 b="";1u(9 i=0;i<a;i++){b+=5.7.O}j b}};5.7.19=8(a){4.W={",":3,"(":3,")":3,"=":3,"<":3,">":3,"+":3,"-":3,"*":3,"/":3,".":3,";":3,"|":3};4.X={" ":3,"\\t":3,"\\r":3,"\\n":3};4.1v={"<":{"=":3,">":3},"(":{"*":3,"+":3},">":"=","!":"=","(+":")","(*":")","/":"*","*":"/","-":"-","|":"|","<=":3,">=":3,"!=":3,"<>":3,"(+)":3,"(*)":3,"/*":3,"*/":3,"--":3,"||":3};4.2w=m;4.7=a;4.1w=0};5.7.19.u={2c:8(a){9 b;9 c;6(4.B&&4.B.o>0){j 4.B.2d()}6(!4.B){4.B=v K()}2b((b=4.2e())!=m){4.B.15(b);c=4.B.1S(" ");9 d=a[c.1s()];6(d==m){j 4.B.2d()}l 6(d==3){y}l{G}y}6(4.B.o>0){4.B.o=0;j c}l{j m}},2e:8(){9 a;9 b;9 c=v 5.13();9 d=p;9 e=p;9 f=p;9 g=p;6(4.7==m){j m}1u(9 i=4.1w;i<4.7.o;i++){a=4.7.T(i);6(i+1<4.7.o){b=4.7.T(i+1)}l{b=""}6(!e&&!f&&!g&&a=="\\\'"){d=!d;6(!d){c.x(a);y}}l 6(!d&&!f&&!g&&a=="\\""){e=!e;6(!e){c.x(a);y}}l 6(!d&&!e&&!g&&a=="-"&&b=="-"){6(!f&&c.o()>0){i--;y}f=3}l 6(f&&(a=="\\r"||a=="\\n")){f=p;y}l 6(!d&&!e&&!f&&a=="/"&&b=="*"){6(c.o()>0){i--;y}g=3}l 6(g&&a=="*"&&b=="/"){g=p;c.x(a+b);i++;y}6(!d&&!e&&!f&&!g){6(4.W[a]){6(c.o()==0){c.x(a);6(!4.W[b]&&!4.X[b]){y}G}9 h=4.1v[c.L()];6(h){6(h==a||h[a]){c.x(a);6(4.1v[c.L()]==3){y}G}}i--;y}l 6(4.X[a]){6(4.W[b]||4.X[b]){G}6(c.o()>0){y}l{G}}l{6(4.W[b]||4.X[b]){c.x(a);y}}}c.x(a)}4.1w=i+1;6(c.o()>0){j c.L()}l{j m}}};',62,157,'|||true|this|atl|if|sql|function|var||||||||||return|dom|else|null||length|false|WHEN||MATCHED||prototype|new|THEN|append|break|indentCnt|Element|joinArray|NOT|UNION|AND|array|continue|ON|ALL|OR|Array|toString|Node|Document|INDENT_STRING|SELECT|UPDATE|FROM|stringCache|charAt|appendChild|notBreakToken|TOKEN_END_KIGOH_MAP|TOKEN_END_MAP|SET|WHERE|VALUES|USING|INSERT|StringBuffer|len|push|childArray|elementId|createElement|SqlTokenizer|machingIndentArray|machingEndKeyMap|baseIndentMap|BREAK|WITH|MINUS|INTERSECT|NOT_BREAK_TOKEN_MAP|BLOCK_INDENT_NEXT_MINUS_ALL_PLUS_TOKEN_MAP|SPECIAL_LAST_JOIN_TOKEN_MAP|getNodeType|attributeHash|getAttribute|setAttribute|tokenizer|baseIndentPlusMinusFirstFlgMap|createSqlNode|makeSqlBuffer|toUpperCase|getIndent|for|TOKEN_RENKETSU_KIGOH_MAP|tokenIdx|ATO_NO_SPACE_TOHKEN_KIGOH_MAP|MAE_NO_SPACE_TOHKEN_KIGOH_MAP|ATO_BREAK_TOKEN_MAP|BY|MAE_BREAK_TOKEN_MAP|GROUP|HAVING|ORDER|END|LEFT|RIGHT|INNER|FULL|NATURAL|INDENT_PLUS_TOKEN_MAP|INDENT_MINUS_TOKEN_MAP|KAKKO_BREAK_TOKEN_MAP|BASE_INDENT_SEARCH_MAP|BASE_BLOCK_LEVEL_INDENT_MAP|MACHING_INDENT_MAP|SPECIAL_JOIN_TOKEN_MAP|join|DOCUMENT_NODE|ELEMENT_NODE|getChildNodes|setNodeValue|value|getNodeValue|tagName|getTagName|getElementId|SqlFormatter|oldUpperToken|rTrimBuffer|pop|replace|formatToken|match|block|staticSpliter|while|nextTokenJoin|shift|nextToken|INTO|JOIN|ELSE|BETWEEN|CASE|MERGE|substring|clear|TEXT_NODE|createTextNode|Text|machingIndentMap|format|root|isLastBreakBuffer|delete|token|specialJoinMap'.split('|'),0,{}))

/*********************************************************************************************************/
/* メイン処理 */
/*********************************************************************************************************/
//}

var document = new ActiveXObject("htmlfile");
var window = document.parentWindow;
var sqlFormater = new atl.sql.SqlFormatter();
var isSakura = typeof Editor != "undefined" && typeof Editor.GetSelectedString != "undefined";
var isEmEditor = typeof Editor != "undefined" && typeof Editor.FullName != "undefined" && Editor.FullName.match(/emeditor/);
var isWScript = typeof WScript !=" undefined";

if (isSakura) {
	// 選択範囲のテキストを取得.
	var sql = Editor.GetSelectedString();

	// 整形したSQL文をエディタ出力.
	Editor.InsText(sqlFormater.format(sql) + "\r\n");
} else if (isEmEditor) {
	// 選択範囲のテキストを取得.
	var sql = Editor.ActiveDocument.selection.Text;
	
	// 整形したSQL文をエディタ出力.
	Editor.ActiveDocument.selection.Text = sqlFormater.format(sql);
} else if (isWScript) {
	if (WScript.fullName.match(/WScript/)) {
		var wshShell = new ActiveXObject("WScript.Shell");
		
		// cmd.exeの使用で、<>&|^をエスケープ.
		var cmd = "cmd /c cscript.exe //Nologo " + 
					"\"" + WScript.scriptFullName + "\"" +
					"| cmd /c " + 
					"\"" + wshShell.CurrentDirectory.replace(/([<>&\|\^])/g, "^$1") + "\\atlClip.exe\"";
		
		// cscriptで強制実行して、クリップボードに格納.
		wshShell.run(cmd, 0);
		
		wshShell = null;
		WScript.quit();
	} else if (WScript.fullName.match(/cscript/)) {
		// クリップボードのSQL取得.
		var sql = window.clipboardData.getData("text")
		
		// 整形したSQL分を標準出力.
		WScript.echo(sqlFormater.format(sql));
	}
	
	// 嫌々IEを使って、コピー。
//	var sql = window.clipboardData.getData("text")
//	var objIE = new ActiveXObject("InternetExplorer.Application");
//	objIE.Navigate("about:blank");
//	while(objIE.Busy) {
//		WScript.sleep(10);
//	}
//	
//	objIE.document.parentWindow.clipboardData.setData("text", sqlFormater.format(sql));
//	
//	objIE.Quit();
//	objIE = null;
	
	// htaは文字列長に制限があるので、断念.
//	var sql = window.clipboardData.getData("text").replace(/\r?\n/g, " ");
//	var fsql = sqlFormater.format(sql).replace(/\r?\n/g, "\\r\\n").replace(/\t/g, "\\t").replace(/\"/g, "\\\"").replace(/'/g, "\\\")
//	var wshShell = new ActiveXObject("WScript.Shell");
//	
//	var cmd = "cmd /c mshta.exe \"javascript:clipboardData.setData('text', '" + fsql + "');close();\"";
//	
//	wshShell.run(cmd);
//	
//	wshShell = null;
} else {
	window.alert("対応していないエディタで申し訳ない...");
}

document = null;
	
/****
//デバッグ用.
var token;
var buffer = new atl.StringBuffer();


var tokenizer = new atl.sql.SqlTokenizer(selectedText);

while((token = tokenizer.nextToken()) != null) {
	buffer.append(token + "\r\n");
}
	
var formatter = new atl.sql.SqlFormatter(selectedText);
//formatter.format();

	
Editor.InsText(buffer.toString());

//*/