From 4ffadbf7eee278293d560f4e4f58d3926c15cf9b Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohAitch@gmail.com>
Date: Wed, 22 Apr 2015 15:35:12 -0700
Subject: [PATCH] factored out websole coffee

---
 main/pub/sole/fab/hymn.hook   | 230 +---------------------------------
 main/pub/sole/src/main.coffee | 220 ++++++++++++++++++++++++++++++++
 2 files changed, 223 insertions(+), 227 deletions(-)
 create mode 100644 main/pub/sole/src/main.coffee

diff --git a/main/pub/sole/fab/hymn.hook b/main/pub/sole/fab/hymn.hook
index d3e59604f..9bc875957 100644
--- a/main/pub/sole/fab/hymn.hook
+++ b/main/pub/sole/fab/hymn.hook
@@ -33,231 +33,7 @@
     ;div#err;
     ;div#term:""
     ;script@"src/share.coffee"(type "text/coffeescript");
-    ;script(type "text/coffeescript")  ;-  %-  trip
-      '''
-      [DOM,recl,rend] = [React.DOM, React.createClass, React.renderComponent]
-      [div, pre, span] = [DOM.div, DOM.pre, DOM.span]
-      str = JSON.stringify
-      
-      Prompt = recl render: ->
-        [pro,cur,buf] = [@props.prompt, @props.cursor, @props.input + " "]
-        pre {}, pro,
-          span {style: background: 'lightgray'}, buf.slice(0,cur), "\u0332", buf.slice(cur)
-        
-      Matr = recl render: ->
-        lines = @props.rows.map (lin)-> pre {}, lin, " "
-        lines.push Prompt {prompt:@props.prompt, input:@props.input, cursor:@props.cursor}
-        div {}, lines
-      
-      $ ->
-
-        met = $('<pre>').text('m').css(display: 'none').appendTo(term).width()
-        subs = ""
-        # $(window).resize -> 
-        #   window.termWif = ($(term).width() / met).toFixed()
-        #   path =  "/new/#{termWif}"
-        #   if path is subs
-        #     return
-        #   if subs
-        #     urb.unsubscribe path: subs
-        #   subs = path
-        #   urb.subscribe {path}, (err,dat)->
-        #       if err or dat.data.ok
-        #         return;
-        #       syncRev = dat.data.rev
-        #       unless termRev > syncRev
-        #         termRev = syncRev
-        #         matr.setProps rows: dat.data.stak
-        #         document.title = "Matrix"  # XX  debug
-        # $(window).resize()
-
-        flash = ($el, background)->
-          $el.css {background}
-          if background
-            setTimeout (-> flash $el,''), 50
-            
-        matr = rend (Matr
-          rows:[]
-          prompt:""
-          input:""
-          cursor:0
-          history:[]
-          offset:0  ), term
-        window.matr = matr
-        update = (a) -> matr.setProps a
-        buffer = new Share ""
-        window.buffer = buffer
-        sync = (ted)-> 
-          update input: buffer.buf, cursor: buffer.transpose ted, matr.props.cursor
-        
-        peer = (ruh) ->
-          if ruh.map then return ruh.map peer
-          mapr = matr.props
-          switch Object.keys(ruh)[0]
-            when 'txt' then update rows: [mapr.rows..., ruh.txt]
-            when 'tan' then ruh.tan.split("\n").reverse().map (txt)-> peer {txt}
-            when 'hop' then update cursor: buffer.transpose ruh.hop #; peer act:'bel'
-            when 'pro' then update prompt: ruh.pro.cad
-            when 'blk' then console.log "Stub #{str ruh}"
-            when 'det' then buffer.receive ruh.det; sync ruh.det.ted
-            when 'act' then switch ruh.act
-              when 'clr' then update rows:[]
-              when 'bel' then flash ($ 'body'), 'black'
-              when 'nex' then update
-                input: ""
-                cursor: 0
-                history: 
-                  if !mapr.input then mapr.history
-                  else [mapr.input, mapr.history...]
-                offset: 0
-            #   else throw "Unknown "+(JSON.stringify ruh)
-            else v = Object.keys(ruh); console.log v, ruh[v[0]]
-        
-        urb.bind "/sole", {wire:"/"}, (err,d)->
-          if err then console.log err
-          else if d.data then peer d.data
-          
-        
-        pressed = []
-        deltim = null
-        #later = (data)->
-        #  if data
-        #    pressed.push data
-        #  clearTimeout deltim
-        #  setTimeout (->
-        #    if urb.reqq.length > 0 
-        #      return deltim = later()
-        #    urb.send data: pressed
-        #    pressed = []
-        #  ), 500
-
-        sendAction = (data)->
-          urb.send {mark: 'sole-action', data}, (e,res)->
-            if res.status isnt 200 then $('#err')[0].innerText = res.data.mess
-        
-        doEdit = (ted)->
-          det = buffer.transmit ted
-          sync ted
-          sendAction {det}
-        
-        
-        Mousetrap.handleKey = (char, mod, e)->
-          norm = {
-            capslock:  'caps'
-            pageup:    'pgup'
-            pagedown:  'pgdn'
-            backspace: 'baxp'
-            enter:     'entr'
-          }
-          
-          key = switch
-            when char.length is 1
-              if e.type is 'keypress'
-                chac = char.charCodeAt(0)
-                if chac < 32          # normalize ctrl keys
-                  char = String.fromCharCode chac | 96
-                str: char
-            when e.type is 'keydown'
-              if char isnt 'space'
-                act: norm[char] ? char
-            when e.type is 'keyup' and norm[key] is 'caps'
-              act: 'uncap'
-          if !key then return
-          if key.act and key.act in mod
-            return
-          e.preventDefault()
-          mapr = matr.props
-          #[fore, aft] = (
-          #  [sli,cur] = [mapr.input.slice, mapr.cursor]
-          #  [sli(0, cur), sli(cur)]
-          #)
-
-          switch mod.sort().join '-'
-            when '', 'shift'
-              if key.str
-                doEdit ins: cha: key.str, at: mapr.cursor
-                update cursor: mapr.cursor+1
-              switch key.act
-                when 'entr' then sendAction 'ret'
-                when 'up'
-                  history = mapr.history.slice(); offset = mapr.offset
-                  if history[offset] == undefined
-                    return
-                  [input, history[offset]] = [history[offset], mapr.input]
-                  offset++
-                  doEdit set: input
-                  update {offset, history, cursor: input.length}
-                when 'down'
-                  history = mapr.history.slice(); offset = mapr.offset
-                  offset--
-                  if history[offset] == undefined
-                    return
-                  [input, history[offset]] = [history[offset], mapr.input]
-                  doEdit set: input
-                  update {offset, history, cursor: input.length}
-                when 'left' then if mapr.cursor > 0 
-                  update cursor: mapr.cursor-1
-                when 'right' then if mapr.cursor < mapr.input.length
-                  update cursor: mapr.cursor+1
-                when 'baxp' then if mapr.cursor > 0
-                  doEdit del: mapr.cursor-1
-                #else (if key.act then console.log key.act)
-            when 'ctrl' then switch key.str || key.act
-              when 'a','left'  then update cursor: 0
-              when 'e','right' then update cursor: mapr.input.length
-              when 'entr' then peer act: 'bel'
-              else console.log mod, str key
-            when 'alt' then switch key.str || key.act
-              when 'f','right'
-                rest = mapr.input.slice(mapr.cursor)
-                rest = rest.match(/[^a-z0-9]*[a-z0-9]*/)[0]
-                update cursor: mapr.cursor + rest.length
-              when 'b','left'
-                prev = mapr.input.slice(0,mapr.cursor)
-                prev = prev.split('').reverse().join('')  # XX
-                prev = prev.match(/[^a-z0-9]*[a-z0-9]*/)[0]
-                update cursor: mapr.cursor - prev.length
-            else console.log mod, str key
-
-          
-          #amod = (arr)->
-          #  for i in arr
-          #    unless mod.indexOf(i) < 0
-          #      return yes
-          #  no
-          # if key.str or key.act is 'baxp' or key.act is 'entr'
-          #   termRev++
-          #   [bot, rest...] = old = matr.props.rows
-          #   matr.setProps rows:(
-          #     switch  key.act 
-          #       when 'baxp'
-          #         if amod ['ctrl', 'meta']
-          #           ['', rest...]
-          #         else if amod ['alt']
-          #           [(bot.replace /\ *[^ ]*$/, ''), rest...]
-          #         else if bot and bot.length 
-          #           [bot.slice(0, -1), rest...]
-          #         else if rest[0] and rest[0].length
-          #           res = rest.slice()
-          #           res[0] = res[0].slice(0, -1)
-          #           res
-          #         else rest
-          #       when 'entr'
-          #         ['', old...]
-          #       when undefined
-          #         if mod.length > 1 or (mod.length and !amod ['shift'])
-          #           old
-          #         else unless old and bot isnt null
-          #           [key.str]
-          #         #else if bot.length is termWif
-          #         #  [key.str, old...]
-          #         else [bot + key.str, rest...]
-          #   )
-          #   document.title = "Matri"  # XX  debug
-          # later {mod, key}
-
-
-      '''
-    ==
+    ;script@"src/main.coffee"(type "text/coffeescript");
     ;+  (cdnj "coffee-script/1.7.1/coffee-script.min.js")
-==  ==
+  ==  
+==
diff --git a/main/pub/sole/src/main.coffee b/main/pub/sole/src/main.coffee
new file mode 100644
index 000000000..9a4ed5f1c
--- /dev/null
+++ b/main/pub/sole/src/main.coffee
@@ -0,0 +1,220 @@
+[DOM,recl,rend] = [React.DOM, React.createClass, React.renderComponent]
+[div, pre, span] = [DOM.div, DOM.pre, DOM.span]
+str = JSON.stringify
+
+Prompt = recl render: ->
+  [pro,cur,buf] = [@props.prompt, @props.cursor, @props.input + " "]
+  pre {}, pro,
+    span {style: background: 'lightgray'}, buf.slice(0,cur), "\u0332", buf.slice(cur)
+
+Matr = recl render: ->
+  lines = @props.rows.map (lin)-> pre {}, lin, " "
+  lines.push Prompt {prompt:@props.prompt, input:@props.input, cursor:@props.cursor}
+  div {}, lines
+
+$ ->
+
+  met = $('<pre>').text('m').css(display: 'none').appendTo(term).width()
+  subs = ""
+  # $(window).resize -> 
+  #   window.termWif = ($(term).width() / met).toFixed()
+  #   path =  "/new/#{termWif}"
+  #   if path is subs
+  #     return
+  #   if subs
+  #     urb.unsubscribe path: subs
+  #   subs = path
+  #   urb.subscribe {path}, (err,dat)->
+  #       if err or dat.data.ok
+  #         return;
+  #       syncRev = dat.data.rev
+  #       unless termRev > syncRev
+  #         termRev = syncRev
+  #         matr.setProps rows: dat.data.stak
+  #         document.title = "Matrix"  # XX  debug
+  # $(window).resize()
+
+  flash = ($el, background)->
+    $el.css {background}
+    if background
+      setTimeout (-> flash $el,''), 50
+
+  matr = rend (Matr
+    rows:[]
+    prompt:""
+    input:""
+    cursor:0
+    history:[]
+    offset:0  ), term
+  window.matr = matr
+  update = (a) -> matr.setProps a
+  buffer = new Share ""
+  window.buffer = buffer
+  sync = (ted)-> 
+    update input: buffer.buf, cursor: buffer.transpose ted, matr.props.cursor
+
+  peer = (ruh) ->
+    if ruh.map then return ruh.map peer
+    mapr = matr.props
+    switch Object.keys(ruh)[0]
+      when 'txt' then update rows: [mapr.rows..., ruh.txt]
+      when 'tan' then ruh.tan.split("\n").reverse().map (txt)-> peer {txt}
+      when 'hop' then update cursor: buffer.transpose ruh.hop #; peer act:'bel'
+      when 'pro' then update prompt: ruh.pro.cad
+      when 'blk' then console.log "Stub #{str ruh}"
+      when 'det' then buffer.receive ruh.det; sync ruh.det.ted
+      when 'act' then switch ruh.act
+        when 'clr' then update rows:[]
+        when 'bel' then flash ($ 'body'), 'black'
+        when 'nex' then update
+          input: ""
+          cursor: 0
+          history: 
+            if !mapr.input then mapr.history
+            else [mapr.input, mapr.history...]
+          offset: 0
+      #   else throw "Unknown "+(JSON.stringify ruh)
+      else v = Object.keys(ruh); console.log v, ruh[v[0]]
+
+  urb.bind "/sole", {wire:"/"}, (err,d)->
+    if err then console.log err
+    else if d.data then peer d.data
+
+
+  pressed = []
+  deltim = null
+  #later = (data)->
+  #  if data
+  #    pressed.push data
+  #  clearTimeout deltim
+  #  setTimeout (->
+  #    if urb.reqq.length > 0 
+  #      return deltim = later()
+  #    urb.send data: pressed
+  #    pressed = []
+  #  ), 500
+
+  sendAction = (data)->
+    urb.send {mark: 'sole-action', data}, (e,res)->
+      if res.status isnt 200 then $('#err')[0].innerText = res.data.mess
+
+  doEdit = (ted)->
+    det = buffer.transmit ted
+    sync ted
+    sendAction {det}
+
+
+  Mousetrap.handleKey = (char, mod, e)->
+    norm = {
+      capslock:  'caps'
+      pageup:    'pgup'
+      pagedown:  'pgdn'
+      backspace: 'baxp'
+      enter:     'entr'
+    }
+
+    key = switch
+      when char.length is 1
+        if e.type is 'keypress'
+          chac = char.charCodeAt(0)
+          if chac < 32          # normalize ctrl keys
+            char = String.fromCharCode chac | 96
+          str: char
+      when e.type is 'keydown'
+        if char isnt 'space'
+          act: norm[char] ? char
+      when e.type is 'keyup' and norm[key] is 'caps'
+        act: 'uncap'
+    if !key then return
+    if key.act and key.act in mod
+      return
+    e.preventDefault()
+    mapr = matr.props
+    #[fore, aft] = (
+    #  [sli,cur] = [mapr.input.slice, mapr.cursor]
+    #  [sli(0, cur), sli(cur)]
+    #)
+
+    switch mod.sort().join '-'
+      when '', 'shift'
+        if key.str
+          doEdit ins: cha: key.str, at: mapr.cursor
+          update cursor: mapr.cursor+1
+        switch key.act
+          when 'entr' then sendAction 'ret'
+          when 'up'
+            history = mapr.history.slice(); offset = mapr.offset
+            if history[offset] == undefined
+              return
+            [input, history[offset]] = [history[offset], mapr.input]
+            offset++
+            doEdit set: input
+            update {offset, history, cursor: input.length}
+          when 'down'
+            history = mapr.history.slice(); offset = mapr.offset
+            offset--
+            if history[offset] == undefined
+              return
+            [input, history[offset]] = [history[offset], mapr.input]
+            doEdit set: input
+            update {offset, history, cursor: input.length}
+          when 'left' then if mapr.cursor > 0 
+            update cursor: mapr.cursor-1
+          when 'right' then if mapr.cursor < mapr.input.length
+            update cursor: mapr.cursor+1
+          when 'baxp' then if mapr.cursor > 0
+            doEdit del: mapr.cursor-1
+          #else (if key.act then console.log key.act)
+      when 'ctrl' then switch key.str || key.act
+        when 'a','left'  then update cursor: 0
+        when 'e','right' then update cursor: mapr.input.length
+        when 'entr' then peer act: 'bel'
+        else console.log mod, str key
+      when 'alt' then switch key.str || key.act
+        when 'f','right'
+          rest = mapr.input.slice(mapr.cursor)
+          rest = rest.match(/[^a-z0-9]*[a-z0-9]*/)[0]
+          update cursor: mapr.cursor + rest.length
+        when 'b','left'
+          prev = mapr.input.slice(0,mapr.cursor)
+          prev = prev.split('').reverse().join('')  # XX
+          prev = prev.match(/[^a-z0-9]*[a-z0-9]*/)[0]
+          update cursor: mapr.cursor - prev.length
+      else console.log mod, str key
+
+
+    #amod = (arr)->
+    #  for i in arr
+    #    unless mod.indexOf(i) < 0
+    #      return yes
+    #  no
+    # if key.str or key.act is 'baxp' or key.act is 'entr'
+    #   termRev++
+    #   [bot, rest...] = old = matr.props.rows
+    #   matr.setProps rows:(
+    #     switch  key.act 
+    #       when 'baxp'
+    #         if amod ['ctrl', 'meta']
+    #           ['', rest...]
+    #         else if amod ['alt']
+    #           [(bot.replace /\ *[^ ]*$/, ''), rest...]
+    #         else if bot and bot.length 
+    #           [bot.slice(0, -1), rest...]
+    #         else if rest[0] and rest[0].length
+    #           res = rest.slice()
+    #           res[0] = res[0].slice(0, -1)
+    #           res
+    #         else rest
+    #       when 'entr'
+    #         ['', old...]
+    #       when undefined
+    #         if mod.length > 1 or (mod.length and !amod ['shift'])
+    #           old
+    #         else unless old and bot isnt null
+    #           [key.str]
+    #         #else if bot.length is termWif
+    #         #  [key.str, old...]
+    #         else [bot + key.str, rest...]
+    #   )
+    #   document.title = "Matri"  # XX  debug
+    # later {mod, key}