Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
A
Actor Framework
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Metrics
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
cpp-libs
Actor Framework
Commits
38e4f790
Commit
38e4f790
authored
Nov 03, 2019
by
Dominik Charousset
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Add utility function for profiled sends
parent
d155a7c8
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
115 additions
and
48 deletions
+115
-48
libcaf_core/caf/detail/profiled_send.hpp
libcaf_core/caf/detail/profiled_send.hpp
+63
-0
libcaf_core/caf/mixin/sender.hpp
libcaf_core/caf/mixin/sender.hpp
+52
-48
No files found.
libcaf_core/caf/detail/profiled_send.hpp
0 → 100644
View file @
38e4f790
/******************************************************************************
* ____ _ _____ *
* / ___| / \ | ___| C++ *
* | | / _ \ | |_ Actor *
* | |___ / ___ \| _| Framework *
* \____/_/ \_|_| *
* *
* Copyright 2011-2019 Dominik Charousset *
* *
* Distributed under the terms and conditions of the BSD 3-Clause License or *
* (at your option) under the terms and conditions of the Boost Software *
* License 1.0. See accompanying files LICENSE and LICENSE_ALTERNATIVE. *
* *
* If you did not receive a copy of the license files, see *
* http://opensource.org/licenses/BSD-3-Clause and *
* http://www.boost.org/LICENSE_1_0.txt. *
******************************************************************************/
#pragma once
#include <vector>
#include "caf/abstract_actor.hpp"
#include "caf/actor_clock.hpp"
#include "caf/actor_control_block.hpp"
#include "caf/actor_profiler.hpp"
#include "caf/fwd.hpp"
#include "caf/mailbox_element.hpp"
#include "caf/message_id.hpp"
#include "caf/no_stages.hpp"
namespace
caf
{
namespace
detail
{
template
<
class
Self
,
class
Handle
,
class
...
Ts
>
void
profiled_send
(
Self
*
self
,
actor_control_block
*
sender
,
const
Handle
&
receiver
,
message_id
msg_id
,
std
::
vector
<
strong_actor_ptr
>
stages
,
execution_unit
*
context
,
Ts
&&
...
xs
)
{
if
(
receiver
)
{
auto
element
=
make_mailbox_element
(
sender
,
msg_id
,
std
::
move
(
stages
),
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING
(
self
,
*
element
);
receiver
->
enqueue
(
std
::
move
(
element
),
context
);
}
}
template
<
class
Self
,
class
Handle
,
class
...
Ts
>
void
profiled_send
(
Self
*
self
,
actor_control_block
*
sender
,
const
Handle
&
receiver
,
actor_clock
&
clock
,
actor_clock
::
time_point
timeout
,
message_id
msg_id
,
Ts
&&
...
xs
)
{
if
(
receiver
)
{
auto
element
=
make_mailbox_element
(
sender
,
msg_id
,
no_stages
,
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING_SCHEDULED
(
self
,
timeout
,
*
element
);
clock
.
schedule_message
(
timeout
,
actor_cast
<
strong_actor_ptr
>
(
receiver
),
std
::
move
(
element
));
}
}
}
// namespace detail
}
// namespace caf
libcaf_core/caf/mixin/sender.hpp
View file @
38e4f790
...
...
@@ -26,6 +26,7 @@
#include "caf/actor_clock.hpp"
#include "caf/actor_control_block.hpp"
#include "caf/check_typed_input.hpp"
#include "caf/detail/profiled_send.hpp"
#include "caf/duration.hpp"
#include "caf/fwd.hpp"
#include "caf/message.hpp"
...
...
@@ -66,10 +67,12 @@ public:
"statically typed actors; use anon_send() when "
"communicating to groups"
);
// TODO: consider whether it's feasible to track messages to groups
if
(
dest
)
dest
->
eq_impl
(
make_message_id
(
P
),
dptr
()
->
ctrl
(),
dptr
()
->
context
(),
if
(
dest
)
{
auto
self
=
dptr
();
dest
->
eq_impl
(
make_message_id
(
P
),
self
->
ctrl
(),
self
->
context
(),
std
::
forward
<
Ts
>
(
xs
)...);
}
}
/// Sends `{xs...}` as an asynchronous message to `dest` with priority `mp`.
template
<
message_priority
P
=
message_priority
::
normal
,
class
...
Ts
>
...
...
@@ -80,12 +83,9 @@ public:
"statically typed actors can only send() to other "
"statically typed actors; use anon_send() or request() when "
"communicating with dynamically typed actors"
);
if
(
dest
)
{
auto
element
=
make_mailbox_element
(
dptr
()
->
ctrl
(),
make_message_id
(
P
),
{},
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING
(
dptr
(),
*
element
);
dest
->
enqueue
(
std
::
move
(
element
),
dptr
()
->
context
());
}
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
dest
,
self
->
ctrl
(),
make_message_id
(
P
),
{},
std
::
forward
<
Ts
>
(
xs
)...);
}
/// Sends `{xs...}` as an asynchronous message to `dest` with priority `mp`.
...
...
@@ -95,12 +95,9 @@ public:
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
if
(
dest
)
{
auto
element
=
make_mailbox_element
(
dptr
()
->
ctrl
(),
make_message_id
(
P
),
{},
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING
(
dptr
(),
*
element
);
dest
->
enqueue
(
std
::
move
(
element
),
dptr
()
->
context
());
}
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
make_message_id
(
P
),
{},
self
->
context
(),
std
::
forward
<
Ts
>
(
xs
)...);
}
template
<
message_priority
P
=
message_priority
::
normal
,
class
Dest
=
actor
,
...
...
@@ -110,12 +107,9 @@ public:
using
token
=
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
;
static_assert
(
response_type_unbox
<
signatures_of_t
<
Dest
>
,
token
>::
valid
,
"receiver does not accept given message"
);
if
(
dest
)
{
auto
element
=
make_mailbox_element
(
nullptr
,
make_message_id
(
P
),
{},
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING
(
dptr
(),
*
element
);
dest
->
enqueue
(
std
::
move
(
element
),
dptr
()
->
context
());
}
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
make_message_id
(
P
),
{},
self
->
context
(),
std
::
forward
<
Ts
>
(
xs
)...);
}
/// Sends a message at given time point (or immediately if `timeout` has
...
...
@@ -125,8 +119,12 @@ public:
detail
::
enable_if_t
<!
std
::
is_same
<
Dest
,
group
>::
value
>
scheduled_send
(
const
Dest
&
dest
,
actor_clock
::
time_point
timeout
,
Ts
&&
...
xs
)
{
scheduled_send_impl
(
make_message_id
(
P
),
dest
,
dptr
()
->
system
().
clock
(),
timeout
,
std
::
forward
<
Ts
>
(
xs
)...);
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
self
->
system
().
clock
(),
timeout
,
make_message_id
(
P
),
std
::
forward
<
Ts
>
(
xs
)...);
}
/// Sends a message at given time point (or immediately if `timeout` has
...
...
@@ -139,8 +137,9 @@ public:
"statically typed actors are not allowed to send to groups"
);
// TODO: consider whether it's feasible to track messages to groups
if
(
dest
)
{
auto
&
clock
=
dptr
()
->
system
().
clock
();
clock
.
schedule_message
(
timeout
,
dest
,
dptr
()
->
ctrl
(),
auto
self
=
dptr
();
auto
&
clock
=
self
->
system
().
clock
();
clock
.
schedule_message
(
timeout
,
dest
,
self
->
ctrl
(),
make_message
(
std
::
forward
<
Ts
>
(
xs
)...));
}
}
...
...
@@ -151,10 +150,14 @@ public:
detail
::
enable_if_t
<!
std
::
is_same
<
Dest
,
group
>::
value
>
delayed_send
(
const
Dest
&
dest
,
std
::
chrono
::
duration
<
Rep
,
Period
>
rel_timeout
,
Ts
&&
...
xs
)
{
auto
&
clock
=
dptr
()
->
system
().
clock
();
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
auto
self
=
dptr
();
auto
&
clock
=
self
->
system
().
clock
();
auto
timeout
=
clock
.
now
()
+
rel_timeout
;
scheduled_send_impl
(
make_message_id
(
P
),
dest
,
dptr
()
->
system
().
clock
()
,
timeout
,
std
::
forward
<
Ts
>
(
xs
)...);
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
clock
,
timeout
,
make_message_id
(
P
)
,
std
::
forward
<
Ts
>
(
xs
)...);
}
/// Sends a message after a relative timeout.
...
...
@@ -167,9 +170,10 @@ public:
"statically typed actors are not allowed to send to groups"
);
// TODO: consider whether it's feasible to track messages to groups
if
(
dest
)
{
auto
&
clock
=
dptr
()
->
system
().
clock
();
auto
self
=
dptr
();
auto
&
clock
=
self
->
system
().
clock
();
auto
timeout
=
clock
.
now
()
+
rtime
;
clock
.
schedule_message
(
timeout
,
dest
,
dptr
()
->
ctrl
(),
clock
.
schedule_message
(
timeout
,
dest
,
self
->
ctrl
(),
make_message
(
std
::
forward
<
Ts
>
(
xs
)...));
}
}
...
...
@@ -178,8 +182,12 @@ public:
class
...
Ts
>
void
scheduled_anon_send
(
const
Dest
&
dest
,
actor_clock
::
time_point
timeout
,
Ts
&&
...
xs
)
{
scheduled_anon_send_impl
(
make_message_id
(
P
),
dest
,
dptr
()
->
system
().
clock
(),
timeout
,
std
::
forward
<
Ts
>
(
xs
)...);
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
self
->
system
().
clock
(),
timeout
,
make_message_id
(
P
),
std
::
forward
<
Ts
>
(
xs
)...);
}
template
<
message_priority
P
=
message_priority
::
normal
,
class
Dest
=
actor
,
...
...
@@ -187,10 +195,14 @@ public:
void
delayed_anon_send
(
const
Dest
&
dest
,
std
::
chrono
::
duration
<
Rep
,
Period
>
rel_timeout
,
Ts
&&
...
xs
)
{
auto
&
clock
=
dptr
()
->
system
().
clock
();
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
auto
self
=
dptr
();
auto
&
clock
=
self
->
system
().
clock
();
auto
timeout
=
clock
.
now
()
+
rel_timeout
;
scheduled_anon_send
(
make_message_id
(
P
),
dest
,
clock
,
timeout
,
std
::
forward
<
Ts
>
(
xs
)...);
detail
::
profiled_send
(
self
,
self
->
ctrl
(
),
dest
,
clock
,
timeout
,
make_message_id
(
P
),
std
::
forward
<
Ts
>
(
xs
)...);
}
template
<
class
Rep
=
int
,
class
Period
=
std
::
ratio
<
1
>,
class
...
Ts
>
...
...
@@ -206,13 +218,9 @@ private:
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
if
(
dest
)
{
auto
element
=
make_mailbox_element
(
dptr
()
->
ctrl
(),
mid
,
no_stages
,
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
self
->
ctrl
(),
dest
,
clock
,
timeout
,
mid
,
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING_SCHEDULED
(
dptr
(),
timeout
,
*
element
);
clock
.
schedule_message
(
timeout
,
actor_cast
<
strong_actor_ptr
>
(
dest
),
std
::
move
(
element
));
}
}
template
<
class
Dest
,
class
...
Ts
>
...
...
@@ -222,13 +230,9 @@ private:
static_assert
(
sizeof
...(
Ts
)
>
0
,
"no message to send"
);
detail
::
type_list
<
detail
::
strip_and_convert_t
<
Ts
>
...
>
args_token
;
type_check
(
dest
,
args_token
);
if
(
dest
)
{
auto
element
=
make_mailbox_element
(
nullptr
,
mid
,
no_stages
,
auto
self
=
dptr
();
detail
::
profiled_send
(
self
,
nullptr
,
dest
,
clock
,
timeout
,
mid
,
std
::
forward
<
Ts
>
(
xs
)...);
CAF_BEFORE_SENDING_SCHEDULED
(
dptr
(),
timeout
,
*
element
);
clock
.
schedule_message
(
timeout
,
actor_cast
<
strong_actor_ptr
>
(
dest
),
std
::
move
(
element
));
}
}
template
<
class
Dest
,
class
ArgTypes
>
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment