From 19727da39198dab81724dd40d293aefc7d795b91 Mon Sep 17 00:00:00 2001
From: Peter Slattery <slattery.peter.j@gmail.com>
Date: Sat, 28 Dec 2019 14:14:00 -0800
Subject: [PATCH] Made dragging the time slider an operation mode.

---
 .../foldhaus_panel_animation_timeline.h       | 53 ++++++++++++++++---
 todo.txt                                      |  5 --
 todo_done.txt                                 |  6 ++-
 3 files changed, 52 insertions(+), 12 deletions(-)

diff --git a/src/panels/foldhaus_panel_animation_timeline.h b/src/panels/foldhaus_panel_animation_timeline.h
index 9faa0de..074a96a 100644
--- a/src/panels/foldhaus_panel_animation_timeline.h
+++ b/src/panels/foldhaus_panel_animation_timeline.h
@@ -60,6 +60,48 @@ FOLDHAUS_INPUT_COMMAND_PROC(DeleteAnimationBlockCommand)
     }
 }
 
+//
+// Drag Time Marker
+//
+
+OPERATION_STATE_DEF(drag_time_marker_operation_state)
+{
+    rect TimelineBounds;
+    s32 StartFrame;
+    s32 EndFrame;
+};
+
+OPERATION_RENDER_PROC(UpdateDragTimeMarker)
+{
+    drag_time_marker_operation_state* OpState = (drag_time_marker_operation_state*)Operation.OpStateMemory;
+    r32 TimeAtMouseX = GetTimeFromPointInAnimationPanel(Mouse.Pos, OpState->TimelineBounds, OpState->StartFrame, OpState->EndFrame, State->AnimationSystem.SecondsPerFrame);
+    State->AnimationSystem.Time = TimeAtMouseX;
+}
+
+FOLDHAUS_INPUT_COMMAND_PROC(EndDragTimeMarker)
+{
+    DeactivateCurrentOperationMode(&State->Modes);
+}
+
+input_command DragTimeMarkerCommands [] = {
+    { KeyCode_MouseLeftButton, KeyCode_Invalid, Command_Ended, EndDragTimeMarker },
+};
+
+internal void
+StartDragTimeMarker(rect TimelineBounds, s32 PanelStartFrame, s32 PanelEndFrame, app_state* State)
+{
+    operation_mode* DragTimeMarkerMode = ActivateOperationModeWithCommands(&State->Modes, DragTimeMarkerCommands, UpdateDragTimeMarker);
+    
+    drag_time_marker_operation_state* OpState = CreateOperationState(DragTimeMarkerMode,
+                                                                     &State->Modes,
+                                                                     drag_time_marker_operation_state);
+    OpState->StartFrame = PanelStartFrame;
+    OpState->EndFrame = PanelEndFrame ;
+    OpState->TimelineBounds = TimelineBounds;
+}
+
+// --------------------
+
 //
 // Drag Animation Clip
 //
@@ -167,7 +209,7 @@ PANEL_CLEANUP_PROC(AnimationTimeline_Cleanup)
 }
 
 internal r32
-DrawFrameBar (animation_system* AnimationSystem, render_command_buffer* RenderBuffer, s32 StartFrame, s32 EndFrame, rect PanelBounds, interface_config Interface, mouse_state Mouse)
+DrawFrameBar (animation_system* AnimationSystem, render_command_buffer* RenderBuffer, s32 StartFrame, s32 EndFrame, rect PanelBounds, mouse_state Mouse, app_state* State)
 {
     MakeStringBuffer(TempString, 256);
     
@@ -180,11 +222,10 @@ DrawFrameBar (animation_system* AnimationSystem, render_command_buffer* RenderBu
     PushRenderQuad2D(RenderBuffer, FrameBarMin, FrameBarMax, v4{.16f, .16f, .16f, 1.f});
     
     // Mouse clicked inside frame nubmer bar -> change current frame on timeline
-    if (MouseButtonHeldDown(Mouse.LeftButtonState)
+    if (MouseButtonTransitionedDown(Mouse.LeftButtonState)
         && PointIsInRange(Mouse.DownPos, FrameBarMin, FrameBarMax))
     {
-        r32 TimeAtMouseX = GetTimeFromPointInAnimationPanel(Mouse.DownPos, PanelBounds, StartFrame, EndFrame, AnimationSystem->SecondsPerFrame);
-        AnimationSystem->Time = TimeAtMouseX;
+        StartDragTimeMarker(rect{FrameBarMin, FrameBarMax}, StartFrame, EndFrame, State);
     }
     
     // Frame Ticks
@@ -196,7 +237,7 @@ DrawFrameBar (animation_system* AnimationSystem, render_command_buffer* RenderBu
         r32 FramePercent = (r32)f / (r32)FrameCount;
         r32 FrameX = GSLerp(PanelBounds.Min.x, PanelBounds.Max.x, FramePercent);
         v2 FrameTextPos = v2{FrameX, FrameBarMin.y + 2};
-        DrawString(RenderBuffer, TempString, Interface.Font, FrameTextPos, WhiteV4);
+        DrawString(RenderBuffer, TempString, State->Interface.Font, FrameTextPos, WhiteV4);
         
         // Frame Vertical Slices
         v2 LineTop = v2{FrameX, FrameBarMin.y};
@@ -256,7 +297,7 @@ DrawAnimationTimeline (animation_system* AnimationSystem, s32 StartFrame, s32 En
         PushRenderQuad2D(RenderBuffer, PlayableMin, PlayableMax, v4{.22f, .22f, .22f, 1.f});
     }
     
-    r32 FrameBarBottom = DrawFrameBar(AnimationSystem, RenderBuffer, StartFrame, EndFrame, PanelBounds, State->Interface, Mouse);
+    r32 FrameBarBottom = DrawFrameBar(AnimationSystem, RenderBuffer, StartFrame, EndFrame, PanelBounds, Mouse, State);
     
     // Animation Blocks
     v2 TimelineMin = PanelBounds.Min;
diff --git a/todo.txt b/todo.txt
index 82444d3..6146e25 100644
--- a/todo.txt
+++ b/todo.txt
@@ -1,10 +1,5 @@
 TODO FOLDHAUS
 
-Animation Timeline
-- click to drag time marker
-- drag ends of animation clips to change start and end times
-- 
-
 Reimplement Node View
 - probably want to take a fresh pass at nodes all together
 
diff --git a/todo_done.txt b/todo_done.txt
index 3b23e55..b957c7c 100644
--- a/todo_done.txt
+++ b/todo_done.txt
@@ -43,4 +43,8 @@ x go back to calling SpecificationIndex Type
 -     x connections shouldn't store their own values, they should just point into permanent storage
 
 Hardening
-x input context changes
\ No newline at end of file
+x input context changes
+
+Animation Timeline
+x drag ends of animation clips to change start and end times
+x click to drag time marker
\ No newline at end of file