Blame view

RIOT/sys/pipe/pipe.c 2.95 KB
fb11e647   vrobic   reseau statique a...
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
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
  /*
   * Copyright (C) 2014  René Kijewski  <rene.kijewski@fu-berlin.de>
   *
   * This library is free software; you can redistribute it and/or
   * modify it under the terms of the GNU Lesser General Public
   * License as published by the Free Software Foundation; either
   * version 2.1 of the License, or (at your option) any later version.
   *
   * This library is distributed in the hope that it will be useful,
   * but WITHOUT ANY WARRANTY; without even the implied warranty of
   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   * Lesser General Public License for more details.
   *
   * You should have received a copy of the GNU Lesser General Public
   * License along with this library; if not, write to the Free Software
   * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
   */
  
  /**
   * @ingroup     sys_pipe
   * @{
   * @file
   * @brief       Implementation for statically allocated pipes.
   * @author      René Kijewski <rene.kijewski@fu-berlin.de>
   * @}
   */
  
  #include "irq.h"
  #include "pipe.h"
  #include "sched.h"
  
  typedef unsigned (*ringbuffer_op_t)(ringbuffer_t *restrict rb, char *buf, unsigned n);
  
  static ssize_t pipe_rw(ringbuffer_t *rb,
                         void *buf,
                         size_t n,
                         thread_t **other_op_blocked,
                         thread_t **this_op_blocked,
                         ringbuffer_op_t ringbuffer_op)
  {
      if (n == 0) {
          return 0;
      }
  
      while (1) {
          unsigned old_state = irq_disable();
  
          unsigned count = ringbuffer_op(rb, buf, n);
  
          if (count > 0) {
              thread_t *other_thread = *other_op_blocked;
              int other_prio = -1;
              if (other_thread) {
                  *other_op_blocked = NULL;
                  other_prio = other_thread->priority;
                  sched_set_status(other_thread, STATUS_PENDING);
              }
  
              irq_restore(old_state);
  
              if (other_prio >= 0) {
                  sched_switch(other_prio);
              }
  
              return count;
          }
          else if (*this_op_blocked || irq_is_in()) {
              irq_restore(old_state);
              return 0;
          }
          else {
              *this_op_blocked = (thread_t *) sched_active_thread;
  
              sched_set_status((thread_t *) sched_active_thread, STATUS_SLEEPING);
              irq_restore(old_state);
              thread_yield_higher();
          }
      }
  }
  
  ssize_t pipe_read(pipe_t *pipe, void *buf, size_t n)
  {
      return pipe_rw(pipe->rb, (char *) buf, n,
                     &pipe->write_blocked, &pipe->read_blocked, ringbuffer_get);
  }
  
  ssize_t pipe_write(pipe_t *pipe, const void *buf, size_t n)
  {
      return pipe_rw(pipe->rb, (char *) buf, n,
                     &pipe->read_blocked, &pipe->write_blocked, (ringbuffer_op_t) ringbuffer_add);
  }
  
  void pipe_init(pipe_t *pipe, ringbuffer_t *rb, void (*free)(void *))
  {
      *pipe = (pipe_t) {
          .rb = rb,
          .read_blocked = NULL,
          .write_blocked = NULL,
          .free = free,
      };
  }