dispatch-1.0/testing/dispatch_readsync.c

   1 /*
   2  * Copyright (c) 2008-2009 Apple Inc. All rights reserved.
   3  *
   4  * @APPLE_APACHE_LICENSE_HEADER_START@
   5  *
   6  * Licensed under the Apache License, Version 2.0 (the "License");
   7  * you may not use this file except in compliance with the License.
   8  * You may obtain a copy of the License at
   9  *
  10  *     http://www.apache.org/licenses/LICENSE-2.0
  11  *
  12  * Unless required by applicable law or agreed to in writing, software
  13  * distributed under the License is distributed on an "AS IS" BASIS,
  14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  15  * See the License for the specific language governing permissions and
  16  * limitations under the License.
  17  *
  18  * @APPLE_APACHE_LICENSE_HEADER_END@
  19  */
  20
  21 #include "config/config.h"
  22
  23 #include <dispatch/dispatch.h>
  24 #define __DISPATCH_INDIRECT__
  25 #include "src/queue_private.h"
  26 #include <pthread.h>
  27 #include <stdio.h>
  28 #include <stdint.h>
  29 #include <limits.h>
  30 #include <assert.h>
  31
  32 #include "dispatch_test.h"
  33
  34 #define LAPS 10000
  35 #define INTERVAL 100
  36
  37 static size_t r_count = LAPS;
  38 static size_t w_count = LAPS / INTERVAL;
  39
  40 static void
  41 writer(void *ctxt __attribute__((unused)))
  42 {
  43         if (--w_count == 0) {
  44                 if (r_count == 0) {
  45                         test_stop();
  46                 }
  47         }
  48 }
  49
  50 static void
  51 reader(void *ctxt __attribute__((unused)))
  52 {
  53         if (__sync_sub_and_fetch(&r_count, 1) == 0) {
  54                 if (r_count == 0) {
  55                         test_stop();
  56                 }
  57         }
  58 }
  59
  60 int
  61 main(void)
  62 {
  63         dispatch_queue_t dq;
  64
  65         test_start("Dispatch Reader/Writer Queues");
  66
  67         dq = dispatch_queue_create("com.apple.libdispatch.test_readsync", NULL);
  68         assert(dq);
  69
  70         dispatch_queue_set_width(dq, LONG_MAX);
  71
  72         dispatch_apply(LAPS, dispatch_get_global_queue(0, 0), ^(size_t idx) {
  73                 dispatch_sync_f(dq, NULL, reader);
  74
  75                 if (idx % INTERVAL) {
  76                         dispatch_barrier_async_f(dq, NULL, writer);
  77                 }
  78         });
  79
  80         dispatch_release(dq);
  81
  82         dispatch_main();
  83 }