1 | /* |
2 | * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") |
3 | * Copyright (c) 1996,1999 by Internet Software Consortium. |
4 | * |
5 | * Permission to use, copy, modify, and distribute this software for any |
6 | * purpose with or without fee is hereby granted, provided that the above |
7 | * copyright notice and this permission notice appear in all copies. |
8 | * |
9 | * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS |
10 | * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES |
11 | * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE |
12 | * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL |
13 | * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR |
14 | * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS |
15 | * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS |
16 | * SOFTWARE. |
17 | */ |
18 | |
19 | #if !defined(_LIBC) && !defined(lint) |
20 | static const char rcsid[] = "$BINDId: ns_ttl.c,v 8.8 1999/10/13 16:39:36 vixie Exp $" ; |
21 | #endif |
22 | |
23 | /* Import. */ |
24 | |
25 | #include <arpa/nameser.h> |
26 | |
27 | #include <ctype.h> |
28 | #include <errno.h> |
29 | #include <stdio.h> |
30 | #include <string.h> |
31 | |
32 | #ifdef SPRINTF_CHAR |
33 | # define SPRINTF(x) strlen(sprintf/**/x) |
34 | #else |
35 | # define SPRINTF(x) ((size_t)sprintf x) |
36 | #endif |
37 | |
38 | /* Forward. */ |
39 | |
40 | static int fmt1(int t, char s, char **buf, size_t *buflen); |
41 | |
42 | /* Macros. */ |
43 | |
44 | #define T(x) if ((x) < 0) return (-1); else (void)NULL |
45 | |
46 | /* Public. */ |
47 | |
48 | int |
49 | ns_format_ttl(u_long src, char *dst, size_t dstlen) { |
50 | char *odst = dst; |
51 | int secs, mins, hours, days, weeks, x; |
52 | char *p; |
53 | |
54 | secs = src % 60; src /= 60; |
55 | mins = src % 60; src /= 60; |
56 | hours = src % 24; src /= 24; |
57 | days = src % 7; src /= 7; |
58 | weeks = src; src = 0; |
59 | |
60 | x = 0; |
61 | if (weeks) { |
62 | T(fmt1(weeks, 'W', &dst, &dstlen)); |
63 | x++; |
64 | } |
65 | if (days) { |
66 | T(fmt1(days, 'D', &dst, &dstlen)); |
67 | x++; |
68 | } |
69 | if (hours) { |
70 | T(fmt1(hours, 'H', &dst, &dstlen)); |
71 | x++; |
72 | } |
73 | if (mins) { |
74 | T(fmt1(mins, 'M', &dst, &dstlen)); |
75 | x++; |
76 | } |
77 | if (secs || !(weeks || days || hours || mins)) { |
78 | T(fmt1(secs, 'S', &dst, &dstlen)); |
79 | x++; |
80 | } |
81 | |
82 | if (x > 1) { |
83 | int ch; |
84 | |
85 | for (p = odst; (ch = *p) != '\0'; p++) |
86 | if (isascii(ch) && isupper(ch)) |
87 | *p = tolower(ch); |
88 | } |
89 | |
90 | return (dst - odst); |
91 | } |
92 | libresolv_hidden_def (ns_format_ttl) |
93 | |
94 | // Seems not to be needed. It's not exported from the DSO. Some libresolv.a |
95 | // might depend on it so we let it in. |
96 | int |
97 | ns_parse_ttl(const char *src, u_long *dst) { |
98 | u_long ttl, tmp; |
99 | int ch, digits, dirty; |
100 | |
101 | ttl = 0; |
102 | tmp = 0; |
103 | digits = 0; |
104 | dirty = 0; |
105 | while ((ch = *src++) != '\0') { |
106 | if (!isascii(ch) || !isprint(ch)) |
107 | goto einval; |
108 | if (isdigit(ch)) { |
109 | tmp *= 10; |
110 | tmp += (ch - '0'); |
111 | digits++; |
112 | continue; |
113 | } |
114 | if (digits == 0) |
115 | goto einval; |
116 | if (islower(ch)) |
117 | ch = toupper(ch); |
118 | switch (ch) { |
119 | case 'W': tmp *= 7; |
120 | case 'D': tmp *= 24; |
121 | case 'H': tmp *= 60; |
122 | case 'M': tmp *= 60; |
123 | case 'S': break; |
124 | default: goto einval; |
125 | } |
126 | ttl += tmp; |
127 | tmp = 0; |
128 | digits = 0; |
129 | dirty = 1; |
130 | } |
131 | if (digits > 0) { |
132 | if (dirty) |
133 | goto einval; |
134 | else |
135 | ttl += tmp; |
136 | } else if (!dirty) |
137 | goto einval; |
138 | *dst = ttl; |
139 | return (0); |
140 | |
141 | einval: |
142 | __set_errno (EINVAL); |
143 | return (-1); |
144 | } |
145 | |
146 | /* Private. */ |
147 | |
148 | static int |
149 | fmt1(int t, char s, char **buf, size_t *buflen) { |
150 | char tmp[50]; |
151 | size_t len; |
152 | |
153 | len = SPRINTF((tmp, "%d%c" , t, s)); |
154 | if (len + 1 > *buflen) |
155 | return (-1); |
156 | strcpy(*buf, tmp); |
157 | *buf += len; |
158 | *buflen -= len; |
159 | return (0); |
160 | } |
161 | |
162 | /*! \file */ |
163 | |