chiark / gitweb /
Expunge CVS cruft.
[tripe] / servutil.c
1 /* -*-c-*-
2  *
3  * $Id: servutil.c,v 1.5 2004/04/08 01:36:17 mdw Exp $
4  *
5  * Various handy server-only utilities
6  *
7  * (c) 2001 Straylight/Edgeware
8  */
9
10 /*----- Licensing notice --------------------------------------------------* 
11  *
12  * This file is part of Trivial IP Encryption (TrIPE).
13  *
14  * TrIPE is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  * 
19  * TrIPE is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  * 
24  * You should have received a copy of the GNU General Public License
25  * along with TrIPE; if not, write to the Free Software Foundation,
26  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
27  */
28
29 /*----- Header files ------------------------------------------------------*/
30
31 #include "tripe.h"
32
33 /*----- Global variables --------------------------------------------------*/
34
35 octet buf_i[PKBUFSZ], buf_o[PKBUFSZ], buf_t[PKBUFSZ];
36
37 /*----- Main code ---------------------------------------------------------*/
38
39 /* --- @mpstr@ --- *
40  *
41  * Arguments:   @mp *m@ = a multiprecision integer
42  *
43  * Returns:     A pointer to the integer's textual representation.
44  *
45  * Use:         Converts a multiprecision integer to a string.  Corrupts
46  *              @buf_t@.
47  */
48
49 const char *mpstr(mp *m)
50 {
51   if (mp_writestring(m, (char *)buf_t, sizeof(buf_t), 10))
52     return ("<failed>");
53   return ((const char *)buf_t);
54 }
55
56 /* --- @gestr@ --- *
57  *
58  * Arguments:   @group *g@ = a group
59  *              @ge *x@ = a group element
60  *
61  * Returns:     A pointer to the element's textual representation.
62  *
63  * Use:         Converts a group element to a string.  Corrupts
64  *              @buf_t@.
65  */
66
67 const char *gestr(group *g, ge *x)
68 {
69   if (group_writestring(g, x, (char *)buf_t, sizeof(buf_t)))
70     return ("<failed>");
71   return ((const char *)buf_t);
72 }
73
74 /* --- @timestr@ --- *
75  *
76  * Arguments:   @time_t t@ = a time to convert
77  *
78  * Returns:     A pointer to a textual representation of the time.
79  *
80  * Use:         Converts a time to a textual representation.  Corrupts
81  *              @buf_t@.
82  */
83
84 const char *timestr(time_t t)
85 {
86   struct tm *tm;
87   if (!t)
88     return ("NEVER");
89   tm = localtime(&t);
90   strftime((char *)buf_t, sizeof(buf_t), "%Y-%m-%dT%H:%M:%S", tm);
91   return ((const char *)buf_t);
92 }
93
94 /*----- That's all, folks -------------------------------------------------*/