orka_b455160b/orka/src/orka/interface/orka-simulation_jobs.ads

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
--  SPDX-License-Identifier: Apache-2.0
--
--  Copyright (c) 2018 onox <denkpadje@gmail.com>
--
--  Licensed under the Apache License, Version 2.0 (the "License");
--  you may not use this file except in compliance with the License.
--  You may obtain a copy of the License at
--
--      http://www.apache.org/licenses/LICENSE-2.0
--
--  Unless required by applicable law or agreed to in writing, software
--  distributed under the License is distributed on an "AS IS" BASIS,
--  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
--  See the License for the specific language governing permissions and
--  limitations under the License.

with Ada.Real_Time;

with Orka.Behaviors;
with Orka.Cameras;
with Orka.Jobs;
with Orka.Rendering.Fences;
with Orka.Simulation;
with Orka.Transforms.Singles.Vectors;

private package Orka.Simulation_Jobs is

   use Ada.Real_Time;

   package Transforms renames Orka.Transforms.Singles.Vectors;

   package Fences renames Orka.Rendering.Fences;

   -----------------------------------------------------------------------------

   function Clone_Fixed_Update_Job
     (Job    : Jobs.Parallel_Job_Ptr;
      Length : Positive) return Jobs.Dependency_Array;

   function Create_Fixed_Update_Job
     (Scene     : not null Behaviors.Behavior_Array_Access;
      Time_Step : Time_Span;
      Count     : Natural) return Jobs.Parallel_Job_Ptr;

   function Create_Finished_Job
     (Scene     : not null Behaviors.Behavior_Array_Access;
      Time_Step : Time_Span;
      Position  : Behaviors.Vector4;
      Batch_Length : Positive) return Jobs.Job_Ptr;

   -----------------------------------------------------------------------------

   function Create_Start_Render_Job
     (Fence  : not null access Fences.Buffer_Fence) return Jobs.Job_Ptr;

   function Create_Scene_Render_Job
     (Render : Simulation.Render_Ptr;
      Scene  : not null Behaviors.Behavior_Array_Access;
      Camera : Cameras.Camera_Ptr) return Jobs.Job_Ptr;

   function Create_Finish_Render_Job
     (Fence  : not null access Fences.Buffer_Fence) return Jobs.Job_Ptr;

end Orka.Simulation_Jobs;