]> git.saurik.com Git - apple/xnu.git/blobdiff - osfmk/kern/clock.c
xnu-344.21.73.tar.gz
[apple/xnu.git] / osfmk / kern / clock.c
index 1aab8196c4fa819191d095ad963e71fa15345725..8f74809795ef0fc6b906bb9d758bbe29236a9e49 100644 (file)
@@ -3,19 +3,22 @@
  *
  * @APPLE_LICENSE_HEADER_START@
  * 
- * The contents of this file constitute Original Code as defined in and
- * are subject to the Apple Public Source License Version 1.1 (the
- * "License").  You may not use this file except in compliance with the
- * License.  Please obtain a copy of the License at
- * http://www.apple.com/publicsource and read it before using this file.
+ * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
  * 
- * This Original Code and all software distributed under the License are
- * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * This file contains Original Code and/or Modifications of Original Code
+ * as defined in and that are subject to the Apple Public Source License
+ * Version 2.0 (the 'License'). You may not use this file except in
+ * compliance with the License. Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this
+ * file.
+ * 
+ * The Original Code and all software distributed under the License are
+ * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
- * License for the specific language governing rights and limitations
- * under the License.
+ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and
+ * limitations under the License.
  * 
  * @APPLE_LICENSE_HEADER_END@
  */
@@ -70,6 +73,13 @@ static struct        alarm           *alrmdone;              /* alarm done list pointer */
 static long                                    alrm_seqno;             /* uniquely identifies alarms */
 static thread_call_data_t      alarm_deliver;
 
+decl_simple_lock_data(static,calend_adjlock)
+static int64_t                         calend_adjtotal;
+static uint32_t                                calend_adjdelta;
+
+static timer_call_data_t       calend_adjcall;
+static uint64_t                                calend_adjinterval, calend_adjdeadline;
+
 /* backwards compatibility */
 int             hz = HZ;                /* GET RID OF THIS !!! */
 int             tick = (1000000 / HZ);  /* GET RID OF THIS !!! */
@@ -99,6 +109,11 @@ void        clock_alarm_deliver(
                        thread_call_param_t             p0,
                        thread_call_param_t             p1);
 
+static
+void   clock_calend_adjust(
+                       timer_call_param_t      p0,
+                       timer_call_param_t      p1);
+
 /*
  *     Macros to lock/unlock clock system.
  */
@@ -126,6 +141,7 @@ clock_config(void)
        /*
         * Configure clock devices.
         */
+       simple_lock_init(&calend_adjlock, ETAP_MISC_CLOCK);
        simple_lock_init(&ClockLock, ETAP_MISC_CLOCK);
        for (i = 0; i < clock_count; i++) {
                clock = &clock_list[i];
@@ -180,15 +196,14 @@ clock_service_create(void)
                }
        }
 
+       timer_call_setup(&calend_adjcall, clock_calend_adjust, NULL);
+
        /*
         * Initialize clock service alarms.
         */
        i = sizeof(struct alarm);
        alarm_zone = zinit(i, (4096/i)*i, 10*i, "alarms");
 
-       /*
-        * Initialize the clock alarm delivery mechanism.
-        */
        thread_call_setup(&alarm_deliver, clock_alarm_deliver, NULL);
 }
 
@@ -279,11 +294,16 @@ clock_set_time(
        mach_timespec_t *clock_time;
        kern_return_t   (*settime)(
                                                mach_timespec_t         *clock_time);
+       extern kern_return_t
+                                       calend_settime(
+                                               mach_timespec_t         *clock_time);
 
        if (clock == CLOCK_NULL)
                return (KERN_INVALID_ARGUMENT);
        if ((settime = clock->cl_ops->c_settime) == 0)
                return (KERN_FAILURE);
+       if (settime == calend_settime)
+               return (KERN_FAILURE);
        clock_time = &new_time;
        if (BAD_MACH_TIMESPEC(clock_time))
                return (KERN_INVALID_VALUE);
@@ -463,6 +483,8 @@ clock_sleep_internal(
                return (KERN_INVALID_VALUE);
        rvalue = KERN_SUCCESS;
        if (chkstat > 0) {
+               wait_result_t wait_result;
+
                /*
                 * Get alarm and add to clock alarm list.
                 */
@@ -478,34 +500,37 @@ clock_sleep_internal(
                else
                        alrmfree = alarm->al_next;
 
-               alarm->al_time = *sleep_time;
-               alarm->al_status = ALARM_SLEEP;
-               post_alarm(clock, alarm);
-
                /*
                 * Wait for alarm to occur.
                 */
-               assert_wait((event_t)alarm, THREAD_ABORTSAFE);
-               UNLOCK_CLOCK(s);
-               /* should we force spl(0) at this point? */
-               thread_block((void (*)(void)) 0);
-               /* we should return here at ipl0 */
+               wait_result = assert_wait((event_t)alarm, THREAD_ABORTSAFE);
+               if (wait_result == THREAD_WAITING) {
+                       alarm->al_time = *sleep_time;
+                       alarm->al_status = ALARM_SLEEP;
+                       post_alarm(clock, alarm);
+                       UNLOCK_CLOCK(s);
 
-               /*
-                * Note if alarm expired normally or whether it
-                * was aborted. If aborted, delete alarm from
-                * clock alarm list. Return alarm to free list.
-                */
-               LOCK_CLOCK(s);
-               if (alarm->al_status != ALARM_DONE) {
-                       /* This means we were interrupted and that
-                          thread->wait_result != THREAD_AWAKENED. */
-                       if ((alarm->al_prev)->al_next = alarm->al_next)
-                               (alarm->al_next)->al_prev = alarm->al_prev;
+                       wait_result = thread_block(THREAD_CONTINUE_NULL);
+
+                       /*
+                        * Note if alarm expired normally or whether it
+                        * was aborted. If aborted, delete alarm from
+                        * clock alarm list. Return alarm to free list.
+                        */
+                       LOCK_CLOCK(s);
+                       if (alarm->al_status != ALARM_DONE) {
+                               assert(wait_result != THREAD_AWAKENED);
+                               if ((alarm->al_prev)->al_next = alarm->al_next)
+                                       (alarm->al_next)->al_prev = alarm->al_prev;
+                               rvalue = KERN_ABORTED;
+                       }
+                       *sleep_time = alarm->al_time;
+                       alarm->al_status = ALARM_FREE;
+               } else {
+                       assert(wait_result == THREAD_INTERRUPTED);
+                       assert(alarm->al_status == ALARM_FREE);
                        rvalue = KERN_ABORTED;
                }
-               *sleep_time = alarm->al_time;
-               alarm->al_status = ALARM_FREE;
                alarm->al_next = alrmfree;
                alrmfree = alarm;
                UNLOCK_CLOCK(s);
@@ -852,11 +877,105 @@ mach_wait_until(
 {
        int                             wait_result;
 
-       assert_wait((event_t)&mach_wait_until, THREAD_ABORTSAFE);
-       thread_set_timer_deadline(deadline);
-       wait_result = thread_block((void (*)) 0);
-       if (wait_result != THREAD_TIMED_OUT)
-               thread_cancel_timer();
+       wait_result = assert_wait((event_t)&mach_wait_until, THREAD_ABORTSAFE);
+       if (wait_result == THREAD_WAITING) {
+               thread_set_timer_deadline(deadline);
+               wait_result = thread_block(THREAD_CONTINUE_NULL);
+               if (wait_result != THREAD_TIMED_OUT)
+                       thread_cancel_timer();
+       }
 
        return ((wait_result == THREAD_INTERRUPTED)? KERN_ABORTED: KERN_SUCCESS);
 }
+
+int64_t
+clock_set_calendar_adjtime(
+       int64_t                                 total,
+       uint32_t                                delta)
+{
+       int64_t                 ototal;
+       spl_t                   s;
+
+       s = splclock();
+       simple_lock(&calend_adjlock);
+
+       if (calend_adjinterval == 0)
+               clock_interval_to_absolutetime_interval(10000, NSEC_PER_USEC,
+                                                                                                               &calend_adjinterval);
+
+       ototal = calend_adjtotal;
+
+       if (total != 0) {
+               uint64_t                abstime;
+
+               if (total > 0) {
+                       if (delta > total)
+                               delta = total;
+               }
+               else {
+                       if (delta > -total)
+                               delta = -total;
+               }
+
+               calend_adjtotal = total;
+               calend_adjdelta = delta;
+
+               if (calend_adjdeadline >= calend_adjinterval)
+                       calend_adjdeadline -= calend_adjinterval;
+               clock_get_uptime(&abstime);
+               clock_deadline_for_periodic_event(calend_adjinterval, abstime,
+                                                                                                               &calend_adjdeadline);
+
+               timer_call_enter(&calend_adjcall, calend_adjdeadline);
+       }
+       else {
+               calend_adjtotal = 0;
+
+               timer_call_cancel(&calend_adjcall);
+       }
+
+       simple_unlock(&calend_adjlock);
+       splx(s);
+
+       return (ototal);
+}
+
+static void
+clock_calend_adjust(
+       timer_call_param_t              p0,
+       timer_call_param_t              p1)
+{
+       spl_t           s;
+
+       s = splclock();
+       simple_lock(&calend_adjlock);
+
+       if (calend_adjtotal > 0) {
+               clock_adjust_calendar((clock_res_t)calend_adjdelta);
+               calend_adjtotal -= calend_adjdelta;
+
+               if (calend_adjdelta > calend_adjtotal)
+                       calend_adjdelta = calend_adjtotal;
+       }
+       else
+       if (calend_adjtotal < 0) {
+               clock_adjust_calendar(-(clock_res_t)calend_adjdelta);
+               calend_adjtotal += calend_adjdelta;
+
+               if (calend_adjdelta > -calend_adjtotal)
+                       calend_adjdelta = -calend_adjtotal;
+       }
+
+       if (calend_adjtotal != 0) {
+               uint64_t        abstime;
+
+               clock_get_uptime(&abstime);
+               clock_deadline_for_periodic_event(calend_adjinterval, abstime,
+                                                                                                               &calend_adjdeadline);
+
+               timer_call_enter(&calend_adjcall, calend_adjdeadline);
+       }
+
+       simple_unlock(&calend_adjlock);
+       splx(s);
+}