The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/kern/kern_timeout.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * Copyright (c) 1982, 1986, 1991, 1993
    3  *      The Regents of the University of California.  All rights reserved.
    4  * (c) UNIX System Laboratories, Inc.
    5  * All or some portions of this file are derived from material licensed
    6  * to the University of California by American Telephone and Telegraph
    7  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
    8  * the permission of UNIX System Laboratories, Inc.
    9  *
   10  * Redistribution and use in source and binary forms, with or without
   11  * modification, are permitted provided that the following conditions
   12  * are met:
   13  * 1. Redistributions of source code must retain the above copyright
   14  *    notice, this list of conditions and the following disclaimer.
   15  * 2. Redistributions in binary form must reproduce the above copyright
   16  *    notice, this list of conditions and the following disclaimer in the
   17  *    documentation and/or other materials provided with the distribution.
   18  * 3. All advertising materials mentioning features or use of this software
   19  *    must display the following acknowledgement:
   20  *      This product includes software developed by the University of
   21  *      California, Berkeley and its contributors.
   22  * 4. Neither the name of the University nor the names of its contributors
   23  *    may be used to endorse or promote products derived from this software
   24  *    without specific prior written permission.
   25  *
   26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   36  * SUCH DAMAGE.
   37  *
   38  *      From: @(#)kern_clock.c  8.5 (Berkeley) 1/21/94
   39  * $FreeBSD$
   40  */
   41 
   42 #include <sys/param.h>
   43 #include <sys/systm.h>
   44 #include <sys/callout.h>
   45 #include <sys/kernel.h>
   46 
   47 /*
   48  * TODO:
   49  *      allocate more timeout table slots when table overflows.
   50  */
   51 
   52 /* Exported to machdep.c and/or kern_clock.c.  */
   53 struct callout *callout;
   54 struct callout_list callfree;
   55 int callwheelsize, callwheelbits, callwheelmask;
   56 struct callout_tailq *callwheel;
   57 int softticks;                  /* Like ticks, but for softclock(). */
   58 
   59 static struct callout *nextsoftcheck;   /* Next callout to be checked. */
   60 
   61 /*
   62  * The callout mechanism is based on the work of Adam M. Costello and 
   63  * George Varghese, published in a technical report entitled "Redesigning
   64  * the BSD Callout and Timer Facilities" and modified slightly for inclusion
   65  * in FreeBSD by Justin T. Gibbs.  The original work on the data structures
   66  * used in this implementation was published by G.Varghese and A. Lauck in
   67  * the paper "Hashed and Hierarchical Timing Wheels: Data Structures for
   68  * the Efficient Implementation of a Timer Facility" in the Proceedings of
   69  * the 11th ACM Annual Symposium on Operating Systems Principles,
   70  * Austin, Texas Nov 1987.
   71  */
   72 
   73 /*
   74  * Software (low priority) clock interrupt.
   75  * Run periodic events from timeout queue.
   76  */
   77 void
   78 softclock()
   79 {
   80         register struct callout *c;
   81         register struct callout_tailq *bucket;
   82         register int s;
   83         register int curticks;
   84         register int steps;     /* #steps since we last allowed interrupts */
   85 
   86 #ifndef MAX_SOFTCLOCK_STEPS
   87 #define MAX_SOFTCLOCK_STEPS 100 /* Maximum allowed value of steps. */
   88 #endif /* MAX_SOFTCLOCK_STEPS */
   89 
   90         steps = 0;
   91         s = splhigh();
   92         while (softticks != ticks) {
   93                 softticks++;
   94                 /*
   95                  * softticks may be modified by hard clock, so cache
   96                  * it while we work on a given bucket.
   97                  */
   98                 curticks = softticks;
   99                 bucket = &callwheel[curticks & callwheelmask];
  100                 c = TAILQ_FIRST(bucket);
  101                 while (c) {
  102                         if (c->c_time != curticks) {
  103                                 c = TAILQ_NEXT(c, c_links.tqe);
  104                                 ++steps;
  105                                 if (steps >= MAX_SOFTCLOCK_STEPS) {
  106                                         nextsoftcheck = c;
  107                                         /* Give interrupts a chance. */
  108                                         splx(s);
  109                                         s = splhigh();
  110                                         c = nextsoftcheck;
  111                                         steps = 0;
  112                                 }
  113                         } else {
  114                                 void (*c_func)(void *);
  115                                 void *c_arg;
  116 
  117                                 nextsoftcheck = TAILQ_NEXT(c, c_links.tqe);
  118                                 TAILQ_REMOVE(bucket, c, c_links.tqe);
  119                                 c_func = c->c_func;
  120                                 c_arg = c->c_arg;
  121                                 c->c_func = NULL;
  122                                 if (c->c_flags & CALLOUT_LOCAL_ALLOC) {
  123                                         c->c_flags = CALLOUT_LOCAL_ALLOC;
  124                                         SLIST_INSERT_HEAD(&callfree, c,
  125                                                           c_links.sle);
  126                                 } else {
  127                                         c->c_flags =
  128                                                 (c->c_flags & ~CALLOUT_PENDING)
  129                                                 | CALLOUT_FIRED;
  130                                 }
  131                                 splx(s);
  132                                 c_func(c_arg);
  133                                 s = splhigh();
  134                                 steps = 0;
  135                                 c = nextsoftcheck;
  136                         }
  137                 }
  138         }
  139         nextsoftcheck = NULL;
  140         splx(s);
  141 }
  142 
  143 /*
  144  * timeout --
  145  *      Execute a function after a specified length of time.
  146  *
  147  * untimeout --
  148  *      Cancel previous timeout function call.
  149  *
  150  * callout_handle_init --
  151  *      Initialize a handle so that using it with untimeout is benign.
  152  *
  153  *      See AT&T BCI Driver Reference Manual for specification.  This
  154  *      implementation differs from that one in that although an 
  155  *      identification value is returned from timeout, the original
  156  *      arguments to timeout as well as the identifier are used to
  157  *      identify entries for untimeout.
  158  */
  159 struct callout_handle
  160 timeout(ftn, arg, to_ticks)
  161         timeout_t *ftn;
  162         void *arg;
  163         register int to_ticks;
  164 {
  165         int s;
  166         struct callout *new;
  167         struct callout_handle handle;
  168 
  169         s = splhigh();
  170 
  171         /* Fill in the next free callout structure. */
  172         new = SLIST_FIRST(&callfree);
  173         if (new == NULL)
  174                 /* XXX Attempt to malloc first */
  175                 panic("timeout table full");
  176         SLIST_REMOVE_HEAD(&callfree, c_links.sle);
  177         
  178         callout_reset(new, to_ticks, ftn, arg);
  179 
  180         handle.callout = new;
  181         splx(s);
  182         return (handle);
  183 }
  184 
  185 void
  186 untimeout(ftn, arg, handle)
  187         timeout_t *ftn;
  188         void *arg;
  189         struct callout_handle handle;
  190 {
  191         register int s;
  192 
  193         /*
  194          * Check for a handle that was initialized
  195          * by callout_handle_init, but never used
  196          * for a real timeout.
  197          */
  198         if (handle.callout == NULL)
  199                 return;
  200 
  201         s = splhigh();
  202         if (handle.callout->c_func == ftn && handle.callout->c_arg == arg)
  203                 callout_stop(handle.callout);
  204         splx(s);
  205 }
  206 
  207 void
  208 callout_handle_init(struct callout_handle *handle)
  209 {
  210         handle->callout = NULL;
  211 }
  212 
  213 /*
  214  * New interface; clients allocate their own callout structures.
  215  *
  216  * callout_reset() - establish or change a timeout
  217  * callout_stop() - disestablish a timeout
  218  * callout_init() - initialize a callout structure so that it can
  219  *      safely be passed to callout_reset() and callout_stop()
  220  *
  221  * <sys/callout.h> defines two convenience macros:
  222  *
  223  * callout_pending() - returns number of ticks until callout fires, or 0
  224  *      if not scheduled
  225  * callout_fired() - returns truth if callout has already been fired
  226  */
  227 void
  228 callout_reset(c, to_ticks, ftn, arg)
  229         struct  callout *c;
  230         int     to_ticks;
  231         void    (*ftn) __P((void *));
  232         void    *arg;
  233 {
  234         int     s;
  235 
  236         s = splhigh();
  237         if (c->c_flags & CALLOUT_PENDING)
  238                 callout_stop(c);
  239 
  240         /*
  241          * We could spl down here and back up at the TAILQ_INSERT_TAIL,
  242          * but there's no point since doing this setup doesn't take much
  243          ^ time.
  244          */
  245         if (to_ticks <= 0)
  246                 to_ticks = 1;
  247 
  248         c->c_arg = arg;
  249         c->c_flags = (c->c_flags & ~CALLOUT_FIRED) | CALLOUT_PENDING;
  250         c->c_func = ftn;
  251         c->c_time = ticks + to_ticks;
  252         TAILQ_INSERT_TAIL(&callwheel[c->c_time & callwheelmask], 
  253                           c, c_links.tqe);
  254         splx(s);
  255         
  256 }
  257 
  258 void
  259 callout_stop(c)
  260         struct  callout *c;
  261 {
  262         int     s;
  263 
  264         s = splhigh();
  265         /*
  266          * Don't attempt to delete a callout that's not on the queue.
  267          */
  268         if (!(c->c_flags & CALLOUT_PENDING)) {
  269                 splx(s);
  270                 return;
  271         }
  272         c->c_flags &= ~CALLOUT_PENDING;
  273 
  274         if (nextsoftcheck == c) {
  275                 nextsoftcheck = TAILQ_NEXT(c, c_links.tqe);
  276         }
  277         TAILQ_REMOVE(&callwheel[c->c_time & callwheelmask], c, c_links.tqe);
  278         c->c_func = NULL;
  279 
  280         if (c->c_flags & CALLOUT_LOCAL_ALLOC) {
  281                 SLIST_INSERT_HEAD(&callfree, c, c_links.sle);
  282         }
  283         splx(s);
  284 }
  285 
  286 void
  287 callout_init(c)
  288         struct  callout *c;
  289 {
  290         bzero(c, sizeof c);
  291 }
  292 
  293 #ifdef APM_FIXUP_CALLTODO
  294 /* 
  295  * Adjust the kernel calltodo timeout list.  This routine is used after 
  296  * an APM resume to recalculate the calltodo timer list values with the 
  297  * number of hz's we have been sleeping.  The next hardclock() will detect 
  298  * that there are fired timers and run softclock() to execute them.
  299  *
  300  * Please note, I have not done an exhaustive analysis of what code this
  301  * might break.  I am motivated to have my select()'s and alarm()'s that
  302  * have expired during suspend firing upon resume so that the applications
  303  * which set the timer can do the maintanence the timer was for as close
  304  * as possible to the originally intended time.  Testing this code for a 
  305  * week showed that resuming from a suspend resulted in 22 to 25 timers 
  306  * firing, which seemed independant on whether the suspend was 2 hours or
  307  * 2 days.  Your milage may vary.   - Ken Key <key@cs.utk.edu>
  308  */
  309 void
  310 adjust_timeout_calltodo(time_change)
  311     struct timeval *time_change;
  312 {
  313         register struct callout *p;
  314         unsigned long delta_ticks;
  315         int s;
  316 
  317         /* 
  318          * How many ticks were we asleep?
  319          * (stolen from tvtohz()).
  320          */
  321 
  322         /* Don't do anything */
  323         if (time_change->tv_sec < 0)
  324                 return;
  325         else if (time_change->tv_sec <= LONG_MAX / 1000000)
  326                 delta_ticks = (time_change->tv_sec * 1000000 +
  327                                time_change->tv_usec + (tick - 1)) / tick + 1;
  328         else if (time_change->tv_sec <= LONG_MAX / hz)
  329                 delta_ticks = time_change->tv_sec * hz +
  330                               (time_change->tv_usec + (tick - 1)) / tick + 1;
  331         else
  332                 delta_ticks = LONG_MAX;
  333 
  334         if (delta_ticks > INT_MAX)
  335                 delta_ticks = INT_MAX;
  336 
  337         /* 
  338          * Now rip through the timer calltodo list looking for timers
  339          * to expire.
  340          */
  341 
  342         /* don't collide with softclock() */
  343         s = splhigh(); 
  344         for (p = calltodo.c_next; p != NULL; p = p->c_next) {
  345                 p->c_time -= delta_ticks;
  346 
  347                 /* Break if the timer had more time on it than delta_ticks */
  348                 if (p->c_time > 0)
  349                         break;
  350 
  351                 /* take back the ticks the timer didn't use (p->c_time <= 0) */
  352                 delta_ticks = -p->c_time;
  353         }
  354         splx(s);
  355 
  356         return;
  357 }
  358 #endif /* APM_FIXUP_CALLTODO */

Cache object: d64396ca884d9f93384e480c8ede2a32


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.