/**
 * tinymce/js/tinymce/plugins/perlmonks/plugin.js
 * 2014-12-14-16:41:12
 * based on
 * tinymce/js/tinymce/plugins/bbcode/plugin.js
 * tinymce/js/tinymce/plugins/example/plugin.js
 *
 * Copyright, Anonymous Monk
 * Released under the same terms as perl itself
 */

/*global tinymce:true */

(function() {
	tinymce.create('tinymce.plugins.PerlMonksPlugin', {
		init : function(ed) {
			var self = this;
			ed.on('beforeSetContent', function(e) {
				e.content = self['_pm2html'](e.content);
			});

			ed.on('postProcess', function(e) {
				if (e.set) {
					e.content = self['_pm2html'](e.content);
				} else if (e.get) {
					e.content = self['_html2pm'](e.content);
				}
			});
            
            ed.addMenuItem('perlmonks_pre_code', {
                text: "\u003Ccode\u003E\n\n\u003C/code\u003E",
                tooltip: "multiline, toggle add/remove code tags around selectuion or at cursor",
                icon: false,
                context: 'format', /* file menu, views, tools ... */
                onclick: function() {
                    ed.execCommand('mceToggleFormat', false, 'perlmonks_pre_code' );
                }
            });
            ed.addButton('perlmonks_pre_code', {
                text: "\u003Ccode\u003E\n\n\u003C/code\u003E",
                tooltip: "multiline, toggle add/remove code tags around selectuion or at cursor",
                icon: false,
                onclick: function() {
                    ed.execCommand('mceToggleFormat', false, 'perlmonks_pre_code' );
                }
            });
            ed.addMenuItem('perlmonks_c_code', {
                text: "\u003Cc\u003E\u003C/c\u003E",
                tooltip: "oneline, toggle add/remove code tags around selectuion or at cursor",
                icon: false,
                context: 'format', /* file menu, views, tools ... */
                onclick: function() {
                    ed.execCommand('mceToggleFormat', false, 'perlmonks_c_code' );
                }
            });
            ed.addButton('perlmonks_c_code', {
                text: "\u003Cc\u003E\u003C/c\u003E",
                tooltip: "oneline, toggle add/remove code tags around selectuion or at cursor",
                icon: false,
                onclick: function() {
                    ed.execCommand('mceToggleFormat', false, 'perlmonks_c_code' );
                }
            });          
		}, /* end of init */

		getInfo: function() {
			return {
				longname: 'PerlMonks Plugin',
				author: 'Anonymous Monk',
				authorurl: 'http://www.perlmonks.org/?node_id=961',
				infourl: 'http://www.perlmonks.org/?node=PerlMonks+FAQ'
			};
		},

		_html2pm : function(s) {
            var codeReplacer = function(match,precode,code, c){
/* function(match, p1, p2, p3, offset, string)  */
                var repsFun = function(chr){
                    return {
                        "&lt;"   : "<",
                        "&gt;"   : ">",
                        "&amp;"  : "&",
                        "&nbsp;" : " ",
                        "<br>"   : "\n",
                        "&#91;"  : "[",
                        "&#93;"  : "]"
                    }[chr];
                }; /* repsFun */
                
                if( precode ){
                    s = precode;
                } else if( code ){
                    s = code;
                } 
                
                s = '<c>' + s.replace( /(\&\#91;|\&\#93;|\&nbsp;|\&lt;|\&gt;|\&amp;|<br>)/gi, repsFun ) + '</c>';
                return s;
            }; /* end of codeReplacer */
            s = s.replace(/<pre(?: class="codepre")?>([\w\W]*?)<\/pre>|<tt(?: class="codetext")?>([\w\W]*?)<\/tt>/gi, codeReplacer );
            
			return s;
		}, /* end of _html2pm */
        
		_pm2html : function(s) {
/* function(match, p1, p2, p3, offset, string)  */
            var codeReplacer = function(match, precode, ttcode, code, c ){
                var repsFun = function(chr){
                    return {
                        "<"  : "&lt;",
                        ">"  : "&gt;",
                        "&"  : "&amp;",
                        " "  : "&nbsp;",
                        "\n" : "<br>",
                        "["  : "&#91;",
                        "]"  : "&#93;"
                    }[ chr ];
                }; /* repsFun */
                
                
                if( precode ){
                    s = precode;
                } else if( ttcode ){
                    s = ttcode;
                } else if( code ){
                    s = code;
                } else {
                    s = c;
                }
                if( s.match(/\n/) ){
                    s = '<pre class="codepre">' + s.replace( /([\n <>&])/gi, repsFun ); + '</pre>';
                } else {
                    s = '<tt class="codetext">' + s.replace( /([\n <>&])/gi, repsFun ); + '</tt>';
                }
                return s;
            }; /* end of codeReplacer */
            
            s = s.replace(/(<junkish>)(<spacerish>)\u003Ccode\u003E([\w\W]*?)\u003C\/code\u003E|\u003Cc\u003E([\w\W]*?)\u003C\/c\u003E/gi, codeReplacer );
            
			return s;
		} /* end of _pm2html */
	});
    
//~ 	tinymce.PluginManager.add('perlmonks', tinymce.plugins.PerlMonksPlugin, 'legacyoutput');
	tinymce.PluginManager.add('perlmonks', tinymce.plugins.PerlMonksPlugin );
})();

##</code><code>##

<html lang="en-US" charset="UTF-8">
<head>
<title> tinymce perlmonks local editor </title>
<meta charset="utf-8">
</head>
<body>
<a href="#" onclick="tinymce.execCommand('mceToggleEditor',false,'content');">[Toggle WYSIWYG]</a>
<hr>
<form method="post" onsubmit='return false'>
    <textarea id="content" name="content" style="width:100%; height:82%">
<p>I said <b>bold</b> code</p>
<c>a
s
d
f</c>
<p>But then you said <c> dsfd </c></p>
    </textarea>
</form>
<script type="text/javascript" src="tinymce/js/tinymce/tinymce.dev.js"></script>
<script type="text/javascript">
tinymce.init({
    selector: 'textarea#content',
    remove_linebreaks: false,
    forced_root_block : 'p',
    convert_newlines_to_brs : true,
    force_p_newlines : false,
    remove_redundant_brs: false,
    preformatted : true,

    plugins: [
        'legacyoutput',
        'perlmonks',
    ],
    statusbar : true,
    cleanup: false, /* fake html */
    element_format : "html",
    formats : {
        'perlmonks_pre_code' : { block: "pre", classes: "codepre"  }, 
        'perlmonks_c_code'   : { inline: "tt",  classes: "codetext" },
    },
//~     valid_children: '-pre[tt],+ol[ul|ol],+ul[ul|ol]',
    valid_children: '+a,+abbr,+b,+blockquote[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+caption[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+code,+colgroup[col],+dd[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+del[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+div[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+dl[dt|dd],+dt[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+em,+h5,+h6,+i,+ins[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+li[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+ol[li],+p,-pre[tt|b|u|i|span],+small,+span,+strong,+sub,+sup,+table[caption|colgroup|thead|tfoot|tbody|tr],+tbody[tr],+td[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+tfoot[tr],+th[blockquote|div|dl|h5|h6|hr|ol|p|pre|table|ul|a|abbr|b|br|code|del|em|i|ins|small|span|strong|sub|sup|u],+thead[tr],+tr[td|th],+tt[pre|b|u|i|span],+u,+ul[li]',
    valid_elements : "a[href|name|target|class|title|rel],abbr[title],b,big,blockquote[class|cite|lang|dir],br,c,caption[class],center,code,col[align|col|span|width|class],colgroup[align|col|span|width|class],dd,del[class|datetime|cite],div[class],dl,dt,em,font[size|color|class],h[class|align],h3[class|align],h4[class|align],h5[class|align],h6[class|align],hr,i,ins[class|datetime|cite],li[value],ol[type|start],p[align|class],pre[class],readmore3[title],small,span[class|title],spoiler4,strike,strong,sub,sup,table[width|cellpadding|cellspacing|border|bgcolor|class],tbody[width|align|valign|colspan|rowspan|bgcolor|height|class],td[width|align|valign|colspan|rowspan|bgcolor|height|class],tfoot[width|align|valign|colspan|rowspan|bgcolor|height|class],th[width|align|valign|colspan|rowspan|bgcolor|height|class],thead[width|align|valign|colspan|rowspan|bgcolor|height|class],tr[width|align|valign|colspan|bgcolor|height|class],tt[class],u,ul[type],wbr",
    toolbar : "perlmonks_pre_code | perlmonks_c_code | undo redo | table | bold italic | alignleft aligncenter alignright alignjustify | bullist numlist outdent indent | link | print preview | forecolor backcolor emoticons charmap code | hr paste searchreplace spellchecker template visualblocks insertdatetime', // insertfile styleselect save media image fullpage pagebreak"
});
</script>
</body>
</html>