toffset.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* lib/krb5/os/toffset.c
*
* Copyright 1995 by the Massachusetts Institute of Technology.
* All Rights Reserved.
*
* Export of this software from the United States of America may
* require a specific license from the United States Government.
* It is the responsibility of any person or organization contemplating
* export to obtain such a license before exporting.
*
* WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
* distribute this software and its documentation for any purpose and
* without fee is hereby granted, provided that the above copyright
* notice appear in all copies and that both that copyright notice and
* this permission notice appear in supporting documentation, and that
* the name of M.I.T. not be used in advertising or publicity pertaining
* to distribution of the software without specific, written prior
* permission. M.I.T. makes no representations about the suitability of
* this software for any purpose. It is provided "as is" without express
* or implied warranty.
*
* These routines manipulates the time offset fields in the os context.
*/
#include "k5-int.h"
/*
* This routine takes the "real time" as input, and sets the time
* offset field in the context structure so that the krb5 time
* routines will return the correct time as corrected by difference
* between the system time and the "real time" as passed to this
* routine
*/
krb5_error_code
krb5_set_real_time(context, seconds, microseconds)
krb5_context context;
krb5_int32 seconds, microseconds;
{
krb5_os_context os_ctx = context->os_context;
krb5_int32 sec, usec;
krb5_error_code retval;
retval = krb5_crypto_us_timeofday(&sec, &usec);
if (retval)
return retval;
os_ctx->time_offset = seconds - sec;
os_ctx->usec_offset = microseconds - usec;
os_ctx->os_flags = ((os_ctx->os_flags & ~KRB5_OS_TOFFSET_TIME) |
KRB5_OS_TOFFSET_VALID);
return 0;
}
/*
* This routine sets the krb5 time routines so that they will return
* the seconds and microseconds value as input to this function. This
* is useful for running the krb5 routines through test suites
*/
krb5_error_code
krb5_set_debugging_time(context, seconds, microseconds)
krb5_context context;
krb5_int32 seconds, microseconds;
{
krb5_os_context os_ctx = context->os_context;
os_ctx->time_offset = seconds;
os_ctx->usec_offset = microseconds;
os_ctx->os_flags = ((os_ctx->os_flags & ~KRB5_OS_TOFFSET_VALID) |
KRB5_OS_TOFFSET_TIME);
return 0;
}
/*
* This routine turns off the time correction fields, so that the krb5
* routines return the "natural" time.
*/
krb5_error_code
krb5_use_natural_time(context)
krb5_context context;
{
krb5_os_context os_ctx = context->os_context;
os_ctx->os_flags &= ~(KRB5_OS_TOFFSET_VALID|KRB5_OS_TOFFSET_TIME);
return 0;
}
/*
* This routine returns the current time offsets in use.
*/
krb5_error_code
krb5_get_time_offsets(context, seconds, microseconds)
krb5_context context;
krb5_int32 *seconds, *microseconds;
{
krb5_os_context os_ctx = context->os_context;
if (seconds)
*seconds = os_ctx->time_offset;
if (microseconds)
*microseconds = os_ctx->usec_offset;
return 0;
}
/*
* This routine sets the time offsets directly.
*/
krb5_error_code
krb5_set_time_offsets(context, seconds, microseconds)
krb5_context context;
krb5_int32 seconds, microseconds;
{
krb5_os_context os_ctx = context->os_context;
os_ctx->time_offset = seconds;
os_ctx->usec_offset = microseconds;
os_ctx->os_flags = ((os_ctx->os_flags & ~KRB5_OS_TOFFSET_TIME) |
KRB5_OS_TOFFSET_VALID);
return 0;
}