1178825Sdfr/*
2233294Sstas * Copyright (c) 2003 Kungliga Tekniska H��gskolan
3233294Sstas * (Royal Institute of Technology, Stockholm, Sweden).
4233294Sstas * All rights reserved.
5178825Sdfr *
6233294Sstas * Redistribution and use in source and binary forms, with or without
7233294Sstas * modification, are permitted provided that the following conditions
8233294Sstas * are met:
9178825Sdfr *
10233294Sstas * 1. Redistributions of source code must retain the above copyright
11233294Sstas *    notice, this list of conditions and the following disclaimer.
12178825Sdfr *
13233294Sstas * 2. Redistributions in binary form must reproduce the above copyright
14233294Sstas *    notice, this list of conditions and the following disclaimer in the
15233294Sstas *    documentation and/or other materials provided with the distribution.
16178825Sdfr *
17178825Sdfr * 3. Neither the name of KTH nor the names of its contributors may be
18178825Sdfr *    used to endorse or promote products derived from this software without
19178825Sdfr *    specific prior written permission.
20178825Sdfr *
21178825Sdfr * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
22178825Sdfr * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23178825Sdfr * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24178825Sdfr * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
25178825Sdfr * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26178825Sdfr * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27178825Sdfr * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28178825Sdfr * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29178825Sdfr * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30178825Sdfr * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31178825Sdfr * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32178825Sdfr */
33178825Sdfr
34178825Sdfr#include "krb5_locl.h"
35178825Sdfr#include <err.h>
36178825Sdfr
37178825Sdfrstatic void
38178825Sdfrcheck_set_time(krb5_context context)
39178825Sdfr{
40178825Sdfr    krb5_error_code ret;
41178825Sdfr    krb5_timestamp sec;
42178825Sdfr    int32_t usec;
43178825Sdfr    struct timeval tv;
44178825Sdfr    int diff = 10;
45178825Sdfr    int diff2;
46178825Sdfr
47178825Sdfr    gettimeofday(&tv, NULL);
48178825Sdfr
49178825Sdfr    ret = krb5_set_real_time(context, tv.tv_sec + diff, tv.tv_usec);
50178825Sdfr    if (ret)
51178825Sdfr	krb5_err(context, 1, ret, "krb5_us_timeofday");
52233294Sstas
53178825Sdfr    ret = krb5_us_timeofday(context, &sec, &usec);
54178825Sdfr    if (ret)
55178825Sdfr	krb5_err(context, 1, ret, "krb5_us_timeofday");
56178825Sdfr
57178825Sdfr    diff2 = abs(sec - tv.tv_sec);
58178825Sdfr
59178825Sdfr    if (diff2 < 9 || diff > 11)
60178825Sdfr	krb5_errx(context, 1, "set time error: diff: %d",
61178825Sdfr		  abs(sec - tv.tv_sec));
62178825Sdfr}
63178825Sdfr
64178825Sdfr
65178825Sdfr
66178825Sdfrint
67178825Sdfrmain(int argc, char **argv)
68178825Sdfr{
69178825Sdfr    krb5_context context;
70178825Sdfr    krb5_error_code ret;
71178825Sdfr
72178825Sdfr    ret = krb5_init_context(&context);
73178825Sdfr    if (ret)
74178825Sdfr	errx(1, "krb5_init_context %d", ret);
75178825Sdfr
76178825Sdfr    check_set_time(context);
77178825Sdfr    check_set_time(context);
78178825Sdfr    check_set_time(context);
79178825Sdfr    check_set_time(context);
80178825Sdfr    check_set_time(context);
81178825Sdfr
82178825Sdfr    krb5_free_context(context);
83178825Sdfr
84178825Sdfr    return 0;
85178825Sdfr}
86