1 # Copyright 2015 Jason Woofenden
2 # This file implements an WYSIWYG editor in the browser (no contenteditable)
4 # This program is free software: you can redistribute it and/or modify it under
5 # the terms of the GNU Affero General Public License as published by the Free
6 # Software Foundation, either version 3 of the License, or (at your option) any
9 # This program is distributed in the hope that it will be useful, but WITHOUT
10 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
11 # FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
14 # You should have received a copy of the GNU Affero General Public License
15 # along with this program. If not, see <http://www.gnu.org/licenses/>.
17 TYPE_TAG = peach_parser.TYPE_TAG
18 TYPE_TEXT = peach_parser.TYPE_TEXT
19 TYPE_COMMENT = peach_parser.TYPE_COMMENT
20 TYPE_DOCTYPE = peach_parser.TYPE_DOCTYPE
22 # text nodes don't have getBoundingClientRect(), so use selection api to find
24 get_text_bounding_rect = (el) ->
25 get_el_bounds = (el) ->
26 if el.getBoundingClientRect?
27 rect = el.getBoundingClientRect()
29 # text nodes don't have getBoundingClientRect(), so use range api
30 range = document.createRange()
31 range.selectNodeContents el
32 rect = range.getBoundingClientRect()
33 doc = el.ownerDocument.documentElement
34 win = el.ownerDocument.defaultView
35 y_fix = win.pageYOffset - doc.clientTop
36 x_fix = win.pageXOffset - doc.clientLeft
40 w: rect.width ? (rect.right - rect.left)
41 h: rect.height ? (rect.top - rect.bottom)
44 # figure out the x/y coordinates of where the cursor should be if it's at
45 # position ``i`` within text node ``n``
47 # implementation: insert a span tag where we want the cursor, and ask the
48 # browser where it put that span
49 window.cursor_to_xyh = cursor_to_xyh = (n, i) ->
50 parent = n.el.parentNode
55 bounds = get_el_offset n.el
59 if i is 0 # cursor at start of text
61 txts.push n.text.substr 0, 1
62 txts.push n.text.substr 1
63 else if i is n.text.length # cursor at end of text
66 txts.push n.text.substr 0, n.text.length - 1
67 txts.push n.text.substr n.text.length - 1
70 txts.push n.text.substr 0, i
71 txts.push n.text.substr i, 1
72 txts.push n.text.substr i + 1
73 for txt, txt_i in txts
74 el = n.el.ownerDocument.createTextNode txt
76 span = n.el.ownerDocument.createElement 'span'
80 parent.insertBefore el, n.el
81 parent.removeChild n.el
82 bounds = get_el_bounds els[check_i]
83 parent.insertBefore n.el, els[0]
86 ret = x: bounds.x, y: bounds.y, h: bounds.h
89 # fudge case where bounds are BS because we're on non-significant whitespace
91 first = cursor_to_xyh n, 0
92 if ret.x <= first.x and ret.y is first.y
93 # no need for a loop here, because recursion
94 ret = cursor_to_xyh n, i - 1
97 # encode text so it can be safely placed inside an html attribute
98 enc_attr_regex = new RegExp '(&)|(")|(\u00A0)', 'g'
100 return txt.replace enc_attr_regex, (match, amp, quote) ->
101 return '&' if (amp)
102 return '"' if (quote)
122 dom_to_html = (dom) ->
134 if el.attrs[k].length > 0
135 ret += "=\"#{enc_attr el.attrs[k]}\""
137 unless void_elements[el.name]
138 if el.children.length
139 ret += dom_to_html el.children
140 ret += "</#{el.name}>"
144 ret += "<!--#{el.text}-->"
146 ret += "<!DOCTYPE #{el.name}"
147 if el.public_identifier? and el.public_identifier.length > 0
148 ret += " \"#{el.public_identifier}\""
149 if el.system_identifier? and el.system_identifier.length > 0
150 ret += " \"#{el.system_identifier}\""
157 return document.createTextNode attrs
158 el = document.createElement tag
168 css += 'div#peach_html5_editor_cursor {'
169 css += 'position: absolute;'
170 css += 'height: 1em;'
172 css += 'margin-left: -1px;'
173 css += 'margin-right: -1px;'
174 css += 'background: #444;'
175 css += '-webkit-animation: blink 1s steps(2, start) infinite;'
176 css += 'animation: blink 1s steps(2, start) infinite;'
178 css += '@-webkit-keyframes blink {'
179 css += 'to { visibility: hidden; }'
181 css += '@keyframes blink {'
182 css += 'to { visibility: hidden; }'
190 KEY_BACKSPACE = 8 # <--
191 KEY_DELETE = 46 # -->
201 instantiate_tree = (tree, parent) ->
205 c.el = parent.ownerDocument.createTextNode c.text
206 parent.appendChild c.el
208 # TODO create in correct namespace
209 c.el = parent.ownerDocument.createElement c.name
211 # FIXME if attr_whitelist[k]?
212 c.el.setAttribute k, v
213 parent.appendChild c.el
215 instantiate_tree c.children, c.el
217 traverse_tree = (tree, state, cb) ->
222 traverse_tree c.children, state, cb
225 # find the next element in tree (and decendants) that is after n and can contain text
226 # TODO make it so cursor can go places that don't have text but could
227 find_next_cursor_position = (tree, n, i) ->
228 if n? and n.type is TYPE_TEXT and n.text.length > i
229 orig_xyh = cursor_to_xyh n, i
230 for next_i in [i+1 .. n.text.length] # inclusive is valid (after last char)
231 next_xyh = cursor_to_xyh n, next_i
232 if next_xyh.x > orig_xyh.x or next_xyh.y > orig_xyh.y
234 found = traverse_tree tree, before: n?, (node, state) ->
235 if node.type is TYPE_TEXT and state.before is false
241 return [found.node, 0]
244 # TODO make it so cursor can go places that don't have text but could
245 find_prev_cursor_position = (tree, n, i) ->
246 if n? and n.type is TYPE_TEXT and i > 0
247 orig_xyh = cursor_to_xyh n, i
248 for prev_i in [i-1 .. 0]
249 prev_xyh = cursor_to_xyh n, prev_i
250 if prev_xyh.x < orig_xyh.x or prev_xyh.y < orig_xyh.y
253 found = traverse_tree tree, before: n?, (node, state) ->
254 if node.type is TYPE_TEXT
260 state.node = state.prev
265 return [found.node, found.node.text.length]
268 find_loc_cursor_position = (tree, loc) ->
270 if c.type is TYPE_TAG or c.type is TYPE_TEXT
271 bounds = get_el_bounds c.el
272 continue if loc.x < bounds.x
273 continue if loc.x > bounds.x + bounds.w
274 continue if loc.y < bounds.y
275 continue if loc.y > bounds.y + bounds.h
277 ret = find_loc_cursor_position c.children, loc
279 if c.type is TYPE_TEXT
280 # click is within bounding box that contains all text.
281 return [c, 0] if c.text.length is 0
283 before = cursor_to_xyh c, before_i
284 after_i = c.text.length
285 after = cursor_to_xyh c, after_i
286 if loc.y < before.y + before.h and loc.x < before.x
287 continue # before first char on first line
288 if loc.y > after.y and loc.x > after.x
289 continue # after last char on last line
291 console.log "Warning: click in bounding box but above first line"
292 continue # above first line (runaround?)
293 if loc.y > after.y + after.h
294 console.log "Warning: click in bounding box but below last line", loc.y, after.y, after.h
295 continue # below last line (shouldn't happen?)
296 while after_i - before_i > 1
297 cur_i = Math.round((before_i + after_i) / 2)
298 cur = cursor_to_xyh c, cur_i
299 if loc.y < cur.y or (loc.y <= cur.y + cur.h and loc.x < cur.x)
305 # which one is closest?
306 if Math.abs(before.x - loc.x) < Math.abs(after.x - loc.x)
312 class PeachHTML5Editor
313 constructor: (in_el, options = {}) ->
316 @iframe = domify iframe: class: 'peach_html5_editor'
319 @cursor_visible = false
320 opt_fragment = options.fragment ? true
323 @parser_opts.fragment = 'body'
326 @idoc = @iframe.contentDocument
330 '20': true # capslock
332 '144': true # numlock
334 '91': true # windows "start" key
335 control_key_codes = # we react to these, but they aren't typing
351 @idoc.body.onclick = (e) =>
352 # idoc.body.offset().left/top
353 new_cursor = find_loc_cursor_position @tree, x: e.pageX, y: e.pageY
355 @move_cursor new_cursor
356 @idoc.body.onkeyup = (e) =>
358 return false if ignore_key_codes[e.keyCode]?
359 #return false if control_key_codes[e.keyCode]?
360 @idoc.body.onkeydown = (e) =>
362 return false if ignore_key_codes[e.keyCode]?
363 #return false if control_key_codes[e.keyCode]?
367 new_cursor = find_prev_cursor_position @tree, @cursor...
369 @move_cursor new_cursor
372 new_cursor = find_next_cursor_position @tree, c, -1
374 @move_cursor new_cursor
381 new_cursor = find_next_cursor_position @tree, @cursor...
383 @move_cursor new_cursor
386 new_cursor = find_prev_cursor_position @tree, c, -1
388 @move_cursor new_cursor
396 return false unless @cursor?
397 return false unless @cursor[1] > 0
398 @cursor[0].text = @cursor[0].text.substr(0, @cursor[1] - 1) + @cursor[0].text.substr(@cursor[1])
399 @cursor[0].el.nodeValue = @cursor[0].text
400 @move_cursor [@cursor[0], @cursor[1] - 1]
403 return false unless @cursor?
404 return false unless @cursor[1] < @cursor[0].text.length
405 @cursor[0].text = @cursor[0].text.substr(0, @cursor[1]) + @cursor[0].text.substr(@cursor[1] + 1)
406 @cursor[0].el.nodeValue = @cursor[0].text
407 @move_cursor [@cursor[0], @cursor[1]]
423 @idoc.body.onkeypress = (e) =>
425 return false if ignore_key_codes[e.keyCode]?
426 return false if control_key_codes[e.keyCode]? # handled in keydown
427 char = e.charCode ? e.keyCode
429 char = String.fromCharCode char
431 @cursor[0].text = char + @cursor[0].text
432 else if @cursor[1] is @cursor[0].text.length - 1
433 @cursor[0].text += char
436 @cursor[0].text.substr(0, @cursor[1]) +
438 @cursor[0].text.substr(@cursor[1])
439 @cursor[0].el.nodeValue = @cursor[0].text
440 @move_cursor [@cursor[0], @cursor[1] + 1]
442 if options.stylesheet # TODO test this
443 istyle = @idoc.createElement 'style'
444 istyle.setAttribute 'src', options.stylesheet
445 @idoc.head.appendChild istyle
446 icss = @idoc.createElement 'style'
447 icss.appendChild @idoc.createTextNode css
448 @idoc.head.appendChild icss
449 @load_html @in_el.value
451 @in_el.parentNode.appendChild @iframe
453 # FIXME add parent node, so we don't empty body and delete cursor_el
454 while @idoc.body.childNodes.length
455 @idoc.body.removeChild @idoc.body.childNodes[0]
456 @cursor_visible = false
459 @tree = peach_parser.parse html, @parser_opts
460 #as_html = dom_to_html @tree
461 #@iframe.contentDocument.body.innerHTML = as_html
463 instantiate_tree @tree, @idoc.body
464 move_cursor: (cursor) ->
466 # replace cursor, to reset blink animation
468 @cursor_el.parentNode.removeChild @cursor_el
469 @cursor_el = domify div: id: 'peach_html5_editor_cursor'
470 @idoc.body.appendChild @cursor_el
471 @cursor_visible = true
472 # TODO figure out x,y coords for cursor
473 loc = cursor_to_xyh cursor[0], cursor[1]
474 @cursor_el.style.left = "#{loc.x}px"
475 @cursor_el.style.top = "#{loc.y}px"
477 window.peach_html5_editor = (args...) ->
478 return new PeachHTML5Editor args...
480 # test in browser: peach_html5_editor(document.getElementsByTagName('textarea')[0])