Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | RSS feed

  1. //
  2. // Copyright 2013 Francisco Jerez
  3. //
  4. // Permission is hereby granted, free of charge, to any person obtaining a
  5. // copy of this software and associated documentation files (the "Software"),
  6. // to deal in the Software without restriction, including without limitation
  7. // the rights to use, copy, modify, merge, publish, distribute, sublicense,
  8. // and/or sell copies of the Software, and to permit persons to whom the
  9. // Software is furnished to do so, subject to the following conditions:
  10. //
  11. // The above copyright notice and this permission notice shall be included in
  12. // all copies or substantial portions of the Software.
  13. //
  14. // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15. // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16. // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  17. // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
  18. // OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  19. // ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
  20. // OTHER DEALINGS IN THE SOFTWARE.
  21. //
  22.  
  23. #include "core/timestamp.hpp"
  24. #include "core/queue.hpp"
  25. #include "pipe/p_screen.h"
  26. #include "pipe/p_context.h"
  27.  
  28. using namespace clover;
  29.  
  30. timestamp::query::query(command_queue &q) :
  31.    q(q),
  32.    _query(q.pipe->create_query(q.pipe, PIPE_QUERY_TIMESTAMP, 0)) {
  33.    q.pipe->end_query(q.pipe, _query);
  34. }
  35.  
  36. timestamp::query::query(query &&other) :
  37.    q(other.q),
  38.    _query(other._query) {
  39.    other._query = NULL;
  40. }
  41.  
  42. timestamp::query::~query() {
  43.    if (_query)
  44.       q().pipe->destroy_query(q().pipe, _query);
  45. }
  46.  
  47. cl_ulong
  48. timestamp::query::operator()() const {
  49.    pipe_query_result result;
  50.  
  51.    if (!q().pipe->get_query_result(q().pipe, _query, false, &result))
  52.       throw error(CL_PROFILING_INFO_NOT_AVAILABLE);
  53.  
  54.    return result.u64;
  55. }
  56.  
  57. timestamp::current::current(command_queue &q) :
  58.    result(q.pipe->screen->get_timestamp(q.pipe->screen)) {
  59. }
  60.  
  61. cl_ulong
  62. timestamp::current::operator()() const {
  63.    return result;
  64. }
  65.