fd3082b7902ce587403b2f0c2f276df2da15b64c
[citadel.git] / webcit / cookie_conversion.c
1 /*
2  * $Id$
3  */
4 /**
5  * \defgroup CookieConversion Grep Cookies
6  * Utility functions which convert the HTTP cookie format we use to and
7  * from user/password/room strings.
8  *
9  * \ingroup WebcitHttpServer 
10  */
11 /*@{*/
12 #include "webcit.h"
13
14
15 #define TRUE  1    /**< for sure? */
16 #define FALSE 0    /**< nope. */
17
18 typedef unsigned char byte;           /**< Byte type */
19
20 /**
21  * \brief find cookie
22  * Pack all session info into one easy-to-digest cookie. Healthy and delicious!
23  * \param cookie cookie string to create???
24  * \param session the session we want to convert into a cookie
25  * \param user the user to be associated with the cookie
26  * \param pass his passphrase
27  * \param room the room he wants to enter
28  */
29 void stuff_to_cookie(char *cookie, size_t clen, int session,
30                 char *user, char *pass, char *room)
31 {
32         char buf[SIZ];
33         int i;
34         int len;
35
36         len = snprintf(buf, SIZ, "%d|%s|%s|%s|", session, user, pass, room);
37         strcpy(cookie, "");
38         for (i=0; (i < len) && (i * 2 < clen); ++i) {
39                 snprintf(&cookie[i*2], clen - i * 2, "%02X", buf[i]);
40         }
41 }
42
43 /**
44  * \brief       Convert unpacked hex string to an integer
45  * \param       in      Input hex string
46  * \param       len     the length of the string
47  * \return      the corrosponding integer value
48  */
49 int xtoi(char *in, size_t len)
50 {
51         int val = 0;
52         char c = 0;
53         while (!IsEmptyStr(in) && isxdigit((byte) *in) && (len-- > 0))
54         {
55                 c = *in++;
56                 val <<= 4;
57                 if (!isdigit((unsigned char)c)) {
58                         c = tolower((unsigned char) c);
59                         if ((c < 'a') || (c > 'f'))
60                                 return 0;
61                         val += c  - 'a' + 10 ;
62                 }
63                 else
64                         val += c - '0';
65         }
66         return val;
67 }
68
69 /**
70  * \brief Extract all that fun stuff out of the cookie.
71  * \param cookie the cookie string
72  * \param session the corrosponding session to return
73  * \param user the user string
74  * \param user_len the user stringlength
75  * \param pass the passphrase
76  * \param pass_len length of the passphrase string 
77  * \param room the room he is in
78  * \param room_len the length of the room string
79  */
80 void cookie_to_stuff(char *cookie, int *session,
81                 char *user, size_t user_len,
82                 char *pass, size_t pass_len,
83                 char *room, size_t room_len)
84 {
85         char buf[SIZ];
86         int i, len;
87
88         strcpy(buf, "");
89         len = strlen(cookie) / 2;
90         for (i=0; i<len; ++i) {
91                 buf[i] = xtoi(&cookie[i*2], 2);
92                 buf[i+1] = 0;
93         }
94
95 /* debug
96         char t[256];
97         extract_token(t, buf, 0, '|', sizeof t);
98         lprintf(9, "SESS: %s\n", t);
99         extract_token(t, buf, 1, '|', sizeof t);
100         lprintf(9, "USER: %s\n", t);
101         extract_token(t, buf, 2, '|', sizeof t);
102         lprintf(9, "PASS: %s\n", t);
103         extract_token(t, buf, 3, '|', sizeof t);
104         lprintf(9, "ROOM: %s\n", t);
105  debug */
106
107         if (session != NULL)
108                 *session = extract_int(buf, 0);
109         if (user != NULL)
110                 extract_token(user, buf, 1, '|', user_len);
111         if (pass != NULL)
112                 extract_token(pass, buf, 2, '|', pass_len);
113         if (room != NULL)
114                 extract_token(room, buf, 3, '|', room_len);
115 }
116 /*@}*/