arch/i386/kernel/semaphore.c

   1 /*
   2  * i386 semaphore implementation.
   3  *
   4  * (C) Copyright 1999 Linus Torvalds
   5  *
   6  * Portions Copyright 1999 Red Hat, Inc.
   7  *
   8  *      This program is free software; you can redistribute it and/or
   9  *      modify it under the terms of the GNU General Public License
  10  *      as published by the Free Software Foundation; either version
  11  *      2 of the License, or (at your option) any later version.
  12  *
  13  * rw semaphores implemented November 1999 by Benjamin LaHaise <bcrl@redhat.com>
  14  */
  15 #include <linux/config.h>
  16 #include <linux/sched.h>
  17 #include <linux/err.h>
  18 #include <linux/init.h>
  19 #include <asm/semaphore.h>
  20
  21 /*
  22  * Semaphores are implemented using a two-way counter:
  23  * The "count" variable is decremented for each process
  24  * that tries to acquire the semaphore, while the "sleeping"
  25  * variable is a count of such acquires.
  26  *
  27  * Notably, the inline "up()" and "down()" functions can
  28  * efficiently test if they need to do any extra work (up
  29  * needs to do something only if count was negative before
  30  * the increment operation.
  31  *
  32  * "sleeping" and the contention routine ordering is protected
  33  * by the spinlock in the semaphore's waitqueue head.
  34  *
  35  * Note that these functions are only called when there is
  36  * contention on the lock, and as such all this is the
  37  * "non-critical" part of the whole semaphore business. The
  38  * critical part is the inline stuff in <asm/semaphore.h>
  39  * where we want to avoid any extra jumps and calls.
  40  */
  41
  42 /*
  43  * Logic:
  44  *  - only on a boundary condition do we need to care. When we go
  45  *    from a negative count to a non-negative, we wake people up.
  46  *  - when we go from a non-negative count to a negative do we
  47  *    (a) synchronize with the "sleeper" count and (b) make sure
  48  *    that we're on the wakeup list before we synchronize so that
  49  *    we cannot lose wakeup events.
  50  */
  51
  52 asmlinkage void __up(struct semaphore *sem)
  53 {
  54         wake_up(&sem->wait);
  55 }
  56
  57 asmlinkage void __sched __down(struct semaphore * sem)
  58 {
  59         struct task_struct *tsk = current;
  60         DECLARE_WAITQUEUE(wait, tsk);
  61         unsigned long flags;
  62
  63         tsk->state = TASK_UNINTERRUPTIBLE;
  64         spin_lock_irqsave(&sem->wait.lock, flags);
  65         add_wait_queue_exclusive_locked(&sem->wait, &wait);
  66
  67         sem->sleepers++;
  68         for (;;) {
  69                 int sleepers = sem->sleepers;
  70
  71                 /*
  72                  * Add "everybody else" into it. They aren't
  73                  * playing, because we own the spinlock in
  74                  * the wait_queue_head.
  75                  */
  76                 if (!atomic_add_negative(sleepers - 1, &sem->count)) {
  77                         sem->sleepers = 0;
  78                         break;
  79                 }
  80                 sem->sleepers = 1;      /* us - see -1 above */
  81                 spin_unlock_irqrestore(&sem->wait.lock, flags);
  82
  83                 schedule();
  84
  85                 spin_lock_irqsave(&sem->wait.lock, flags);
  86                 tsk->state = TASK_UNINTERRUPTIBLE;
  87         }
  88         remove_wait_queue_locked(&sem->wait, &wait);
  89         wake_up_locked(&sem->wait);
  90         spin_unlock_irqrestore(&sem->wait.lock, flags);
  91         tsk->state = TASK_RUNNING;
  92 }
  93
  94 asmlinkage int __sched __down_interruptible(struct semaphore * sem)
  95 {
  96         int retval = 0;
  97         struct task_struct *tsk = current;
  98         DECLARE_WAITQUEUE(wait, tsk);
  99         unsigned long flags;
 100
 101         tsk->state = TASK_INTERRUPTIBLE;
 102         spin_lock_irqsave(&sem->wait.lock, flags);
 103         add_wait_queue_exclusive_locked(&sem->wait, &wait);
 104
 105         sem->sleepers++;
 106         for (;;) {
 107                 int sleepers = sem->sleepers;
 108
 109                 /*
 110                  * With signals pending, this turns into
 111                  * the trylock failure case - we won't be
 112                  * sleeping, and we* can't get the lock as
 113                  * it has contention. Just correct the count
 114                  * and exit.
 115                  */
 116                 if (signal_pending(current)) {
 117                         retval = -EINTR;
 118                         sem->sleepers = 0;
 119                         atomic_add(sleepers, &sem->count);
 120                         break;
 121                 }
 122
 123                 /*
 124                  * Add "everybody else" into it. They aren't
 125                  * playing, because we own the spinlock in
 126                  * wait_queue_head. The "-1" is because we're
 127                  * still hoping to get the semaphore.
 128                  */
 129                 if (!atomic_add_negative(sleepers - 1, &sem->count)) {
 130                         sem->sleepers = 0;
 131                         break;
 132                 }
 133                 sem->sleepers = 1;      /* us - see -1 above */
 134                 spin_unlock_irqrestore(&sem->wait.lock, flags);
 135
 136                 schedule();
 137
 138                 spin_lock_irqsave(&sem->wait.lock, flags);
 139                 tsk->state = TASK_INTERRUPTIBLE;
 140         }
 141         remove_wait_queue_locked(&sem->wait, &wait);
 142         wake_up_locked(&sem->wait);
 143         spin_unlock_irqrestore(&sem->wait.lock, flags);
 144
 145         tsk->state = TASK_RUNNING;
 146         return retval;
 147 }
 148
 149 /*
 150  * Trylock failed - make sure we correct for
 151  * having decremented the count.
 152  *
 153  * We could have done the trylock with a
 154  * single "cmpxchg" without failure cases,
 155  * but then it wouldn't work on a 386.
 156  */
 157 asmlinkage int __down_trylock(struct semaphore * sem)
 158 {
 159         int sleepers;
 160         unsigned long flags;
 161
 162         spin_lock_irqsave(&sem->wait.lock, flags);
 163         sleepers = sem->sleepers + 1;
 164         sem->sleepers = 0;
 165
 166         /*
 167          * Add "everybody else" and us into it. They aren't
 168          * playing, because we own the spinlock in the
 169          * wait_queue_head.
 170          */
 171         if (!atomic_add_negative(sleepers, &sem->count)) {
 172                 wake_up_locked(&sem->wait);
 173         }
 174
 175         spin_unlock_irqrestore(&sem->wait.lock, flags);
 176         return 1;
 177 }
 178
 179
 180 /*
 181  * The semaphore operations have a special calling sequence that
 182  * allow us to do a simpler in-line version of them. These routines
 183  * need to convert that sequence back into the C sequence when
 184  * there is contention on the semaphore.
 185  *
 186  * %ecx contains the semaphore pointer on entry. Save the C-clobbered
 187  * registers (%eax, %edx and %ecx) except %eax when used as a return
 188  * value..
 189  */
 190 asm(
 191 ".section .sched.text\n"
 192 ".align 4\n"
 193 ".globl __down_failed\n"
 194 "__down_failed:\n\t"
 195 #if defined(CONFIG_FRAME_POINTER)
 196         "pushl %ebp\n\t"
 197         "movl  %esp,%ebp\n\t"
 198 #endif
 199         "pushl %eax\n\t"
 200         "pushl %edx\n\t"
 201         "pushl %ecx\n\t"
 202         "call __down\n\t"
 203         "popl %ecx\n\t"
 204         "popl %edx\n\t"
 205         "popl %eax\n\t"
 206 #if defined(CONFIG_FRAME_POINTER)
 207         "movl %ebp,%esp\n\t"
 208         "popl %ebp\n\t"
 209 #endif
 210         "ret"
 211 );
 212
 213 asm(
 214 ".section .sched.text\n"
 215 ".align 4\n"
 216 ".globl __down_failed_interruptible\n"
 217 "__down_failed_interruptible:\n\t"
 218 #if defined(CONFIG_FRAME_POINTER)
 219         "pushl %ebp\n\t"
 220         "movl  %esp,%ebp\n\t"
 221 #endif
 222         "pushl %edx\n\t"
 223         "pushl %ecx\n\t"
 224         "call __down_interruptible\n\t"
 225         "popl %ecx\n\t"
 226         "popl %edx\n\t"
 227 #if defined(CONFIG_FRAME_POINTER)
 228         "movl %ebp,%esp\n\t"
 229         "popl %ebp\n\t"
 230 #endif
 231         "ret"
 232 );
 233
 234 asm(
 235 ".section .sched.text\n"
 236 ".align 4\n"
 237 ".globl __down_failed_trylock\n"
 238 "__down_failed_trylock:\n\t"
 239 #if defined(CONFIG_FRAME_POINTER)
 240         "pushl %ebp\n\t"
 241         "movl  %esp,%ebp\n\t"
 242 #endif
 243         "pushl %edx\n\t"
 244         "pushl %ecx\n\t"
 245         "call __down_trylock\n\t"
 246         "popl %ecx\n\t"
 247         "popl %edx\n\t"
 248 #if defined(CONFIG_FRAME_POINTER)
 249         "movl %ebp,%esp\n\t"
 250         "popl %ebp\n\t"
 251 #endif
 252         "ret"
 253 );
 254
 255 asm(
 256 ".section .sched.text\n"
 257 ".align 4\n"
 258 ".globl __up_wakeup\n"
 259 "__up_wakeup:\n\t"
 260         "pushl %eax\n\t"
 261         "pushl %edx\n\t"
 262         "pushl %ecx\n\t"
 263         "call __up\n\t"
 264         "popl %ecx\n\t"
 265         "popl %edx\n\t"
 266         "popl %eax\n\t"
 267         "ret"
 268 );
 269
 270 /*
 271  * rw spinlock fallbacks
 272  */
 273 #if defined(CONFIG_SMP)
 274 asm(
 275 ".section .sched.text\n"
 276 ".align 4\n"
 277 ".globl __write_lock_failed\n"
 278 "__write_lock_failed:\n\t"
 279         LOCK "addl      $" RW_LOCK_BIAS_STR ",(%eax)\n"
 280 "1:     rep; nop\n\t"
 281         "cmpl   $" RW_LOCK_BIAS_STR ",(%eax)\n\t"
 282         "jne    1b\n\t"
 283         LOCK "subl      $" RW_LOCK_BIAS_STR ",(%eax)\n\t"
 284         "jnz    __write_lock_failed\n\t"
 285         "ret"
 286 );
 287
 288 asm(
 289 ".section .sched.text\n"
 290 ".align 4\n"
 291 ".globl __read_lock_failed\n"
 292 "__read_lock_failed:\n\t"
 293         LOCK "incl      (%eax)\n"
 294 "1:     rep; nop\n\t"
 295         "cmpl   $1,(%eax)\n\t"
 296         "js     1b\n\t"
 297         LOCK "decl      (%eax)\n\t"
 298         "js     __read_lock_failed\n\t"
 299         "ret"
 300 );
 301 #endif