xref: /dragonfly/lib/libutil/login_times.c (revision 2cd2d2b5)
1 /*-
2  * Copyright (c) 1996 by
3  * David Nugent <davidn@blaze.net.au>
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, is permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice immediately at the beginning of the file, without modification,
11  *    this list of conditions, and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. This work was done expressly for inclusion into FreeBSD.  Other use
16  *    is permitted provided this notation is included.
17  * 4. Absolutely no warranty of function or purpose is made by the authors.
18  * 5. Modifications may be freely made to this file providing the above
19  *    conditions are met.
20  *
21  * Login period parsing and comparison functions.
22  *
23  * $FreeBSD: src/lib/libutil/login_times.c,v 1.7 1999/08/28 00:05:48 peter Exp $
24  * $DragonFly: src/lib/libutil/login_times.c,v 1.2 2003/06/17 04:26:52 dillon Exp $
25  */
26 
27 #include <stdlib.h>
28 #include <string.h>
29 #include <time.h>
30 #include <ctype.h>
31 
32 #include <sys/types.h>
33 #include <login_cap.h>
34 
35 static struct
36 {
37     const char	*dw;
38     u_char      cn;
39     u_char      fl;
40 } dws[] =
41 {
42     { "su", 2, LTM_SUN }, { "mo", 2, LTM_MON }, { "tu", 2, LTM_TUE },
43     { "we", 2, LTM_WED }, { "th", 2, LTM_THU }, { "fr", 2, LTM_FRI },
44     { "sa", 2, LTM_SAT }, { "any",3, LTM_ANY }, { "all",3, LTM_ANY },
45     { "wk", 2, LTM_WK  }, { "wd", 2, LTM_WD  }, { NULL, 0, 0       }
46 };
47 
48 static char *
49 parse_time(char * ptr, u_short * t)
50 {
51     u_short	val;
52 
53     for (val = 0; *ptr && isdigit(*ptr); ptr++)
54 	val = (u_short)(val * 10 + (*ptr - '0'));
55 
56     *t = (u_short)((val / 100) * 60 + (val % 100));
57 
58     return ptr;
59 }
60 
61 
62 login_time_t
63 parse_lt(const char * str)
64 {
65     login_time_t    t;
66 
67     memset(&t, 0, sizeof t);
68     t.lt_dow = LTM_NONE;
69     if (str && *str && strcmp(str, "Never") != 0 && strcmp(str, "None") != 0) {
70 	int		i;
71 	login_time_t	m = t;
72 	char		*p;
73 	char		buf[64];
74 
75 	/* Make local copy and force lowercase to simplify parsing */
76 	p = strncpy(buf, str, sizeof buf);
77 	buf[sizeof buf - 1] = '\0';
78 	for (i = 0; buf[i]; i++)
79 	    buf[i] = (char)tolower(buf[i]);
80 
81 	while (isalpha(*p)) {
82 
83 	    i = 0;
84 	    while (dws[i].dw && strncmp(p, dws[i].dw, dws[i].cn) != 0)
85 		i++;
86 	    if (dws[i].dw == NULL)
87 		break;
88 	    m.lt_dow |= dws[i].fl;
89 	    p += dws[i].cn;
90 	}
91 
92 	if (m.lt_dow == LTM_NONE) /* No (valid) prefix, assume any */
93 	    m.lt_dow |= LTM_ANY;
94 
95 	if (isdigit(*p))
96 	    p = parse_time(p, &m.lt_start);
97 	else
98 	    m.lt_start = 0;
99 	if (*p == '-')
100 	    p = parse_time(++p, &m.lt_end);
101 	else
102 	    m.lt_end = 1440;
103 
104 	t = m;
105     }
106     return t;
107 }
108 
109 
110 int
111 in_ltm(const login_time_t * ltm, struct tm * tt, time_t * ends)
112 {
113     int	    rc = 0;
114 
115     if (tt != NULL) {
116 	/* First, examine the day of the week */
117 	if ((u_char)(0x01 << tt->tm_wday) & ltm->lt_dow) {
118 	    /* Convert `current' time to minute of the day */
119 	    u_short	now = (u_short)((tt->tm_hour * 60) + tt->tm_min);
120 
121 	    if (tt->tm_sec > 30)
122 		++now;
123 	    if (now >= ltm->lt_start && now < ltm->lt_end) {
124 		rc = 2;
125 		if (ends != NULL) {
126 		    /* If requested, return ending time for this period */
127 		    tt->tm_hour = (int)(ltm->lt_end / 60);
128 		    tt->tm_min  = (int)(ltm->lt_end % 60);
129 		    *ends = mktime(tt);
130 		}
131 	    }
132 	}
133     }
134     return rc;
135 }
136 
137 
138 int
139 in_lt(const login_time_t * ltm, time_t * t)
140 {
141     return in_ltm(ltm, localtime(t), t);
142 }
143 
144 int
145 in_ltms(const login_time_t * ltm, struct tm * tm, time_t * t)
146 {
147     int	    i = 0;
148 
149     while (i < LC_MAXTIMES && ltm[i].lt_dow != LTM_NONE) {
150 	if (in_ltm(ltm + i, tm, t))
151 	    return i;
152 	i++;
153     }
154     return -1;
155 }
156 
157 int
158 in_lts(const login_time_t * ltm, time_t * t)
159 {
160     return in_ltms(ltm, localtime(t), t);
161 }
162 
163