habitica-self-host/src/app/index.coffee

derby = require('derby')
{get, view, ready} = derby.createApp module
derby.use require('derby-ui-boot')
derby.use(require('../../ui'))

## ROUTES ##

get '/', (page, model) ->
  # Render page if a userId is already stored in session data
  if userId = model.get '_session.userId'
    return getRoom page, model, userId

  # Otherwise, select a new userId and initialize user
  model.async.incr 'configs.1.nextUserId', (err, userId) ->
    model.set '_session.userId', userId
    model.set "users.#{userId}",
      name: 'User ' + userId
      money: 0
      exp: 0
      lvl: 1
      hp: 50
    getRoom page, model, userId

getRoom = (page, model, userId) ->
  
  model.subscribe "users.#{userId}", (err, user) -> 
    model.ref '_user', user
    model.refList "_habitList", "_user.tasks", "_user.habitIds"
    model.refList "_dailyList", "_user.tasks", "_user.dailyIds"
    model.refList "_todoList", "_user.tasks", "_user.todoIds"
    model.refList "_rewardList", "_user.tasks", "_user.rewardIds"
    unless model.get('_user.tasks')
      model.push '_habitList', task for task in [
        {type: 'habit', text: '1h Productive Work', notes: '<u>Habits: Constantly Track</u><br/>For some habits, it only makes sense to <b>gain</b> points (like this one).', value: 0, up: true, down: false}
        {type: 'habit', text: 'Eat Junk Food', notes: 'For others, it only makes sense to <b>lose</b> points', value: 0, up: false, down: true}
        {type: 'habit', text: 'Take The Stairs', notes: 'For the rest, both + and - make sense (stairs = gain, elevator = lose)', value: 0, up: true, down: true}
      ]
      model.push '_dailyList', task for task in [
        {type: 'daily', text: '1h Personal Project', notes: '<u>Dailies: Complete Once a Day</u><br/>At the end of each day, non-completed Dailies dock you points.', value: 0, completed: false }
        {type: 'daily', text: 'Exercise', notes: 'If you are doing well, they turn green and are less valuable (experience, gold) and less damaging (HP). This means you can ease up on them for a bit.', value: 3, completed: false }
        {type: 'daily', text: '45m Reading', notes: 'But if you are doing poorly, they turn red. The worse you do, the more valuable (exp, gold) and more damaging (HP) these goals become. This encourages you to focus on your shortcomings, the reds.', value: -10, completed: false }
      ]
      model.push '_todoList', task for task in [
        {type: 'todo', text: 'Call Mom', notes: "<u>Todos: Complete Eventually</u><br/>Non-completed Todos won't hurt you, but they will become more valuable over time. This will encourage you to wrap up stale Todos.", value: -3, completed: false }
      ]
      model.push '_rewardList', task for task in [
        {type: 'reward', text: '1 Episode of Game of Thrones', notes: '<u>Rewards: Treat Yourself!</u><br/>As you complete goals, you earn gold to buy rewards. Buy them liberally - rewards are integral in forming good habits.', value: 20 }
        {type: 'reward', text: 'Cake', notes: 'But only buy if you have enough gold - you lose HP otherwise.', value: 10 }
      ]
      
    # http://tibia.wikia.com/wiki/Formula
    model.fn '_tnl', '_user.lvl', (lvl) -> 50 * Math.pow(lvl, 2) - 150 * lvl + 200
    
    page.render()
    
## VIEW HELPERS ##
view.fn 'taskClasses', (type, completed, value, hideCompleted) ->
  #TODO figure out how to just pass in the task model, so i can access all these properties from one object
  classes = type
  classes += " completed" if completed
  if type == 'todo'
    classes += " hide" if (hideCompleted and completed) or (!hideCompleted and !completed)
    
  switch
    when value<-8 then classes += ' color-worst'
    when value>=-8 and value<-5 then classes += ' color-worse'
    when value>=-5 and value<-1 then classes += ' color-bad' 
    when value>=-1 and value<1 then classes += ' color-neutral'
    when value>=1 and value<5 then classes += ' color-good' 
    when value>=5 and value<10 then classes += ' color-better' 
    when value>=10 then classes += ' color-best'
  return classes
    
view.fn "percent", (x, y) ->
  x=1 if x==0
  Math.round(x/y*100)
    
view.fn "round", (num) ->
  Math.round num
  
view.fn "gold", (num) -> 
  num.toFixed(1).split('.')[0] if num

view.fn "silver", (num) -> 
  num.toFixed(1).split('.')[1] if num

## CONTROLLER FUNCTIONS ##

ready (model) ->

  # Note: Set 12am daily cron for this
  # At end of day, add value to all incomplete Daily & Todo tasks (further incentive)
  # For incomplete Dailys, deduct experience
  #TODO: remove from exports when cron implemented  
  exports.endOfDayTally = endOfDayTally = (e, el) ->
    # users = model.at('users') #TODO this isn't working, iterate over all users
    # for user in users
    user = model.at '_user'
    todoTally = 0
    for key of model.get '_user.tasks'
      task = model.at "_user.tasks.#{key}"
      [type, value, completed] = [task.get('type'), task.get('value'), task.get('completed')] 
      if type == 'todo' or type == 'daily'
        unless completed
          value += if (value < 0) then (( -0.1 * value + 1 ) * -1) else (( Math.pow(0.9,value) ) * -1)
          task.set('value', value)
          # Deduct experience for missed Daily tasks, 
          # but not for Todos (just increase todo's value)
          if (type == 'daily')
            user.set('hp', user.get('hp') + value)
            if user.get('hp') < 0
              #TODO this is implemented in exports.vote also, make it a user.on or something
              user.set('hp',50);user.set('lvl',1);user.set('exp',0)
        if type == 'daily'
          task.push "history", { date: new Date(), value: value }
        else
          absVal = if (completed) then Math.abs(value) else value
          todoTally += absVal
        task.set('completed', false) if type == 'daily'
    model.push '_user.history.todos', { date: new Date(), value: todoTally }
    
    # tally experience
    expTally = user.get 'exp'
    lvl = 0 #iterator
    _(user.get('lvl')-1).times ->
      lvl++
      expTally += 50 * Math.pow(lvl, 2) - 150 * lvl + 200
    model.push '_user.history.exp',  { date: new Date(), value: expTally }
    
     
  #TODO: remove when cron implemented 
  poormanscron = ->
    lastCron = model.get('_user.lastCron')
    lastCron = if lastCron then (new Date(lastCron)) else new Date() 
    DAY = 1000 * 60 * 60  * 24
    today = new Date()
    daysPassed = Math.round((today.getTime() - lastCron.getTime()) / DAY)
    if daysPassed > 0
      _(daysPassed).times ->
        endOfDayTally()
      lastCron = new Date()
    model.set('_user.lastCron', lastCron)
  poormanscron()
  exports.toggleDebug = ->
    model.set('_debug', !model.get('_debug'))


  $('.task-notes, [rel=popover]').popover()
  
  model.set('_hideCompleted', true)
  $('a[data-toggle="tab"]').on 'shown', (e) ->
    #see http://twitter.github.com/bootstrap/javascript.html#tabs 
    hideCompleted = if $(e.target).attr('href') == '#tab1' then true else false  
    model.set('_hideCompleted', hideCompleted)
      
  # Make the lists draggable using jQuery UI
  # Note, have to setup helper function here and call it for each type later
  # due to variable binding of "type"
  setupSortable = (type) ->
    $("ul.#{type}s").sortable
      dropOnEmpty: false
      cursor: "move"
      items: "li"
      opacity: 0.4
      scroll: true
      axis: 'y'
      update: (e, ui) ->
        item = ui.item[0]
        domId = item.id
        id = item.getAttribute 'data-id'
        to = $("ul.#{type}s").children().index(item)
        # Use the Derby ignore option to suppress the normal move event
        # binding, since jQuery UI will move the element in the DOM.
        # Also, note that refList index arguments can either be an index
        # or the item's id property
        model.at("_#{type}List").pass(ignore: domId).move {id}, to
  setupSortable(type) for type in ['habit', 'daily', 'todo', 'reward']
  
  tour = new Tour()
  tour.addStep
    element: "#avatar"
    title: "Welcome to HabitRPG"
    content: "Welcome to HabitRPG, a habit-tracker which treats your goals like a Role Playing Game."
  tour.addStep
    element: "#bars"
    title: "Acheive goals and level up"
    content: "As you accomplish goals, you level up. If you fail your goals, you lose hit points. Lose all your HP and you die."
  tour.addStep
    element: "ul.habits"
    title: "Habits"
    content: "Habits are goals that you constantly track."
    placement: "bottom"
  tour.addStep
    element: "ul.dailys"
    title: "Dailies"
    content: "Dailies are goals that you want to complete once a day."
    placement: "bottom"
  tour.addStep
    element: "ul.todos"
    title: "Todos"
    content: "Todos are one-off goals which need to be completed eventually."
    placement: "bottom"
  tour.addStep
    element: "ul.rewards"
    title: "Rewards"
    content: "As you complete goals, you earn gold to buy rewards. Buy them liberally - rewards are integral in forming good habits."
    placement: "bottom"
  tour.addStep
    element: "ul.habits li:first-child"
    title: "Hover over comments"
    content: "Different task-types have special properties. Hover over each task's comment for more information. When you're ready to get started, delete the existing tasks and add your own."
    placement: "right"
  tour.start()
        
  #TODO: implement this for completed tab
  # clearCompleted: ->
    # _.each @options.habits.doneTodos(), (todo) ->
      # todo.destroy()
    # @render()
    # return false
    
  exports.loadDebugDefaults = (e, el) ->
    
    model.remove '_habitList', 0, 100, ->  
      model.push '_habitList', task for task in [
        {type: 'habit', text: 'Stairs', notes: '', value: 0, up: true, down: true}
        {type: 'habit', text: 'Diet', notes: '', value: 0, up: true, down: true}
        {type: 'habit', text: 'Ticket (Workflowy, Pivotal)', notes: '', value: 0, up: true, down: false}
        {type: 'habit', text: 'Temptation Control', notes: '* meditate for 1 minute, visualize<br/>* positive, specific, present self-talk<br/>* do first task', value: 0, up: true, down: false}
        {type: 'habit', text: 'Propose, not ask', notes: '', value: 0, up: true, down: false}
        {type: 'habit', text: 'Focus', notes: '', value: 0, up: false, down: true}
        {type: 'habit', text: 'Facebook/RSS out of turn', notes: '', value: 0, up: false, down: true}
        {type: 'habit', text: 'Negative Talk', notes: '', value: 0, up: false, down: true}
        {type: 'habit', text: 'Exaggeration', notes: '', value: 0, up: false, down: true}
        {type: 'habit', text: 'Insult Self', notes: '', value: 0, up: false, down: true}
        {type: 'habit', text: 'Other', notes: '* Nail-biting<br/>* Posture<br/>* Visualize / Meditate to sleep<br/>* Smile/eye-gaze', value: 0, up: false, down: false}
      ]
    
    model.remove '_dailyList', 0, 100, ->
      model.push '_dailyList', task for task in [
        {type: 'daily', text: 'Review Pivotal, Asana, Workflowy', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'TMJ Exercise', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Anki (20m)', notes: '', value: 0, completed: false }
        {type: 'daily', text: '30m Code Reading', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Google News', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Mint', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Anki (new / review)', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Check Meetup', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Read it later', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'RSS (Drupal)', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'RSS (Other)', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Lunch TODO', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Exercise', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Read (45m)', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Night TODO', notes: '', value: 0, completed: false }
        {type: 'daily', text: 'Brain Game', notes: '', value: 0, completed: false }
        {type: 'daily', text: '1h Personal Project', notes: '', value: 0, completed: false }
      ]
      
    model.remove '_todoList', 0, 100, ->
      model.push '_todoList', task for task in [
        {type: 'todo', text: 'Print insurance request card', notes: '"travel" tag', value: 0, completed: false }
        {type: 'todo', text: 'VPM', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'mail', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'krav', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'rubber cement', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'bike', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'clean ~/.ievms', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'http://www.php-debug.com/www/', notes: '', value: 0, completed: false }
        {type: 'todo', text: 'make sure IRA is setup for auto distribution', notes: '', value: 0, completed: false }
      ]
    
    model.remove '_rewardList', 0, 100, ->  
      model.push '_rewardList', task for task in [
        {type: 'reward', text: 'TV Show', notes: '', value: 20 }
        {type: 'reward', text: '1h Novel', notes: '', value: 10 }
        {type: 'reward', text: 'Shop', notes: '', value: 10 }
        {type: 'reward', text: 'Junk Food', notes: '', value: 10 }
        {type: 'reward', text: '9gag', notes: '', value: 5 }
        {type: 'reward', text: 'Coffee', notes: '', value: 5 }
      ]
    
  exports.addTask = (e, el, next) ->
    type = $(el).attr('data-task-type')
    list = model.at "_#{type}List"
    newModel = model.at('_new' + type.charAt(0).toUpperCase() + type.slice(1))
    # Don't add a blank todo
    return unless text = view.escapeHtml newModel.get()
    newModel.set ''
    switch type

      when 'habit'
        list.push {type: type, text: text, notes: '', value: 0, up: true, down: true}

      when 'reward'
        list.push {type: type, text: text, notes: '', value: 20 }

      when 'daily', 'todo'
        list.push {type: type, text: text, notes: '', value: 0, completed: false }

        # list.on 'set', '*.completed', (i, completed, previous, isLocal) ->
          # # Move the item to the bottom if it was checked off
          # list.move i, -1  if completed && isLocal

  exports.del = (e, el) ->
    # Derby extends model.at to support creation from DOM nodes
    task = model.at(e.target)
    #TODO bug where I have to delete from _users.tasks AND _{type}List, 
    # fix when query subscriptions implemented properly
    console.log model.del('_user.tasks.'+task.get('id'))
    console.log task.remove()
    
  exports.toggleTaskEdit = (e, el) ->
    task = model.at $(el).parents('li')[0]
    $('#\\' + task.get('id') + '-chart').hide()
    $('#\\' + task.get('id') + '-edit').toggle()

  exports.toggleChart = (e, el) ->
    hideSelector = $(el).attr('data-hide-selector')
    chartSelector = $(el).attr('data-chart-selector')
    historyPath = $(el).attr('data-history-path')
    $(document.getElementById(hideSelector)).hide()
    $(document.getElementById(chartSelector)).toggle()
    
    matrix = [['Date', 'Score']]
    for obj in model.get(historyPath)
      date = new Date(obj.date)
      readableDate = "#{date.getMonth()}/#{date.getDate()}/#{date.getFullYear()}"
      matrix.push [ readableDate, obj.value ]
    data = google.visualization.arrayToDataTable matrix
    
    options = {
      title: 'History'
      #TODO use current background color: $(el).css('background-color), but convert to hex (see http://goo.gl/ql5pR)
      backgroundColor: 'whiteSmoke'
    }

    chart = new google.visualization.LineChart(document.getElementById( chartSelector ))
    chart.draw(data, options)
    
  exports.vote = (e, el, next) ->
    direction = $(el).attr('data-direction')
    direction = 'up' if direction == 'true/'
    direction = 'down' if direction == 'false/'
    
    #TODO this should be model.at(el), shouldn't have to find parent
    task = model.at $(el).parents('li')[0]
    user = model.at '_user'
    # For negative values, use a line: something like y=-.1x+1
    # For positibe values, taper off with inverse log: y=.9^x
    # Would love to use inverse log for the whole thing, but after 13 fails it hits infinity
    sign = if (direction == "up") then 1 else -1
    value = task.get('value')
    delta = 0
    if value < 0
      delta = (( -0.1 * value + 1 ) * sign)
    else
      delta = (( Math.pow(0.9, value) ) * sign)

    # Don't adjust values for rewards, or for habits that don't have both + and -
    adjustvalue = (task.get('type') != 'reward')
    if (task.get('type') == 'habit') and (task.get("up")==false or task.get("down")==false)
      adjustvalue = false
    value += delta if adjustvalue

    # up/down -voting as checkbox & assigning as completed, 2 birds one stone
    completed = task.get("completed")
    if task.get('type') != 'habit'
      completed = true if direction=="up"
      completed = false if direction=="down"
    else
      # Add habit value to habit-history (if different)
      task.push 'history', { date: new Date(), value: value } if task.get('value') != value
    task.set('value', value)
    task.set('completed', completed)

    # Update the user's status
    [money, hp, exp, lvl] = [user.get('money'), user.get('hp'), user.get('exp'), user.get('lvl')]

    if task.get('type') == 'reward'
      # purchase item
      money -= task.get('value')
      # if too expensive, reduce health & zero money
      if money < 0
        hp += money # hp - money difference
        money = 0

    # If positive delta, add points to exp & money
    # Only take away mony if it was a mistake (aka, a checkbox)
    if delta > 0 or (task.get('type') == 'daily'  or task.get('type') == 'todo')
      exp += delta
      money += delta
    # Deduct from health (rewards case handled above)
    else if task.get('type') != 'reward'
      hp += delta

    tnl = model.get '_tnl'
    # level up & carry-over exp
    if exp >= tnl
      exp -= tnl
      lvl += 1

    # game over
    if hp < 0
      [hp, lvl, exp] = [50, 1, 0]

    user.set('money', money)
    user.set('hp', hp)
    user.set('exp', exp)
    user.set('lvl', lvl)
    #[user.money, user.hp, user.exp, user.lvl] = [money, hp, exp, lvl]
    
  ## SHORTCUTS ##

  exports.shortcuts = (e) ->
    return unless e.metaKey || e.ctrlKey
    code = e.which
    return unless command = (switch code
      when 66 then 'bold'           # Bold: Ctrl/Cmd + B
      when 73 then 'italic'         # Italic: Ctrl/Cmd + I
      when 32 then 'removeFormat'   # Clear formatting: Ctrl/Cmd + Space
      when 220 then 'removeFormat'  # Clear formatting: Ctrl/Cmd + \
      else null
    )
    document.execCommand command, false, null
    e.preventDefault() if e.preventDefault
    return false

  # Tell Firefox to use elements for styles instead of CSS
  # See: https://developer.mozilla.org/en/Rich-Text_Editing_in_Mozilla
  document.execCommand 'useCSS', false, true
  document.execCommand 'styleWithCSS', false, false