← Back to branch summary

~ctrlproxy/ctrlproxy/trunk

« back to all changes in this revision

Viewing changes to line.c

  • Committer: jelmer
  • Date: 2003-10-18 22:02:02 UTC
  • Revision ID: jelmer@samba.org-20031018220202-6801a76318fb4d13
Update

Show diffs side-by-side

added added

removed removed

Lines of Context:
line.c
 
1
/* 
 
2
        ctrlproxy: A modular IRC proxy
 
3
        (c) 2002-2003 Jelmer Vernooij <jelmer@nl.linux.org>
 
4
 
 
5
        This program is free software; you can redistribute it and/or modify
 
6
        it under the terms of the GNU General Public License as published by
 
7
        the Free Software Foundation; either version 2 of the License, or
 
8
        (at your option) any later version.
 
9
 
 
10
        This program is distributed in the hope that it will be useful,
 
11
        but WITHOUT ANY WARRANTY; without even the implied warranty of
 
12
        MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
13
        GNU General Public License for more details.
 
14
 
 
15
        You should have received a copy of the GNU General Public License
 
16
        along with this program; if not, write to the Free Software
 
17
        Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 
18
*/
 
19
 
 
20
#define MAX_LINE_ARGS 64
 
21
 
 
22
#include "internals.h"
 
23
 
 
24
extern FILE *debugfd;
 
25
 
 
26
struct line *irc_parse_line_args( char *origin, ... ) {
 
27
        va_list ap;
 
28
        struct line *l;
 
29
        va_start(ap, origin);
 
30
        l = virc_parse_line(origin, ap);
 
31
        va_end(ap);
 
32
        return l;
 
33
}
 
34
 
 
35
struct line *irc_parse_linef( char *fmt, ... ) {
 
36
        va_list ap;
 
37
        char *ret;
 
38
        struct line *l;
 
39
        va_start(ap, fmt);
 
40
        vasprintf(&ret, fmt, ap);
 
41
        l = irc_parse_line(ret);
 
42
        free(ret);
 
43
        va_end(ap);
 
44
        return l;
 
45
}
 
46
 
 
47
struct line *virc_parse_line( char *origin, va_list ap)
 
48
{
 
49
        char *arg;
 
50
        struct line *l;
 
51
        l = calloc(1, sizeof(struct line));
 
52
        l->argc = 0;
 
53
        if(origin)l->origin = strdup(origin);
 
54
        else l->origin = NULL;
 
55
        
 
56
        l->args = malloc(sizeof(char *) * (MAX_LINE_ARGS+2));
 
57
        
 
58
        while((arg = va_arg(ap, char *))) {
 
59
                if(l->argc > MAX_LINE_ARGS) {
 
60
                        free(l); 
 
61
                        free(l->args); 
 
62
                        return NULL; 
 
63
                }
 
64
                l->args[l->argc] = strdup(arg);
 
65
                l->args = realloc(l->args, (((++l->argc)+2)* sizeof(char *)));
 
66
        }
 
67
        l->args[l->argc] = NULL;
 
68
 
 
69
        return l;
 
70
}
 
71
 
 
72
struct line * irc_parse_line(char *d)
 
73
{
 
74
        char *p;
 
75
        char dosplit = 1;
 
76
        size_t estimate = 0;
 
77
        char *data = strdup(d);
 
78
        int i;
 
79
        struct line *l;
 
80
 
 
81
        l = calloc(1, sizeof(struct line));
 
82
        p = data;
 
83
 
 
84
        if(p[0] == ':') {
 
85
                p = strchr(data, ' ');
 
86
                if(!p){ free(l); return NULL; }
 
87
                *p = '\0';
 
88
                l->origin = strdup(data+1);
 
89
                for(; *(p+1) == ' '; p++);
 
90
                p++;
 
91
        }
 
92
 
 
93
        for(i = 0; p[i]; i++) if(p[i] == ' ')estimate++;
 
94
 
 
95
        l->args = malloc(sizeof(char *) * (estimate+2));
 
96
 
 
97
        l->args[0] = p;
 
98
 
 
99
        for(; *p; p++) {
 
100
                if(*p == ' ' && dosplit) {
 
101
                        *p = '\0';
 
102
                        l->argc++;
 
103
                        l->args[l->argc] = p+1;
 
104
                        if(*(p+1) == ':'){ dosplit = 0; l->args[l->argc]++; }
 
105
                }
 
106
 
 
107
                if(*p == '\r') {
 
108
                        *p = '\0';
 
109
                        break;
 
110
                }
 
111
        }
 
112
        
 
113
        l->argc++;
 
114
        l->args[l->argc] = NULL;
 
115
        for(i = 0; l->args[i]; i++) l->args[i] = strdup(l->args[i]);
 
116
        free(data);
 
117
 
 
118
        return l;
 
119
}
 
120
 
 
121
char *irc_line_string_nl(struct line *l) 
 
122
{
 
123
        char *raw = irc_line_string(l);
 
124
        raw = realloc(raw, strlen(raw)+10);
 
125
        strcat(raw, "\r\n");
 
126
        return raw;
 
127
}
 
128
 
 
129
char *irc_line_string(struct line *l) {
 
130
        size_t len = 0; int i;
 
131
        char *ret;
 
132
        g_assert(l);
 
133
 
 
134
        /* Silently ignore empty messages */
 
135
        if(l->argc == 0) return strdup("");
 
136
 
 
137
        if(l->origin)len+=strlen(l->origin);
 
138
        for(i = 0; l->args[i]; i++) len+=strlen(l->args[i])+2;
 
139
        ret = malloc(len+20);
 
140
        strcpy(ret, "");
 
141
        
 
142
        if(l->origin) sprintf(ret, ":%s ", l->origin);
 
143
 
 
144
        for(i = 0; i < l->argc; i++) {
 
145
                /* FIXME: xchat _ALWAYS_expects a : before the last argument... */
 
146
                if(strchr(l->args[i],' ') || l->args[i][0] == ':' /*|| (i > 0 && i == l->argc-1)*/)strcat(ret, ":");
 
147
                strcat(ret, l->args[i]);
 
148
                if(i != l->argc-1)strcat(ret, " ");
 
149
        }
 
150
 
 
151
        return ret;
 
152
}
 
153
 
 
154
void free_line(struct line *l) {
 
155
        int i;
 
156
        if(l->origin)free(l->origin);
 
157
        if(l->args) {
 
158
                for(i = 0; l->args[i]; i++)free(l->args[i]);
 
159
                free(l->args);
 
160
        }
 
161
        l->args = NULL;
 
162
        l->origin = NULL;
 
163
        free(l);
 
164
}
 
165
 
 
166
char *line_get_nick(struct line *l)
 
167
{
 
168
        static char *nick = NULL;
 
169
        char *t;
 
170
        if(!l || !l->origin)return NULL;
 
171
        if(nick)free(nick);
 
172
        nick = strdup(l->origin);
 
173
        t = strchr(nick, '!');
 
174
        if(!t)return nick;
 
175
        *t = '\0';
 
176
        return nick;
 
177
}
 
178
 
 
179
gboolean irc_send_line(struct transport_context *c, struct line *l) {
 
180
        char *raw;
 
181
        int ret;
 
182
 
 
183
        if(!c) return FALSE;
 
184
 
 
185
        raw = irc_line_string_nl(l);
 
186
        ret = transport_write(c, raw);
 
187
        free(raw);
 
188
 
 
189
        return (ret != -1);
 
190
}
 
191
 
 
192
gboolean irc_sendf(struct transport_context *c, char *fmt, ...) 
 
193
{
 
194
        va_list ap;
 
195
        char *r = NULL;
 
196
        struct line *l;
 
197
        gboolean ret;
 
198
 
 
199
        if(!c) return FALSE;
 
200
 
 
201
        va_start(ap, fmt);
 
202
        vasprintf(&r, fmt, ap);
 
203
        l = irc_parse_line(r);
 
204
        free(r);
 
205
        ret = irc_send_line(c, l);
 
206
 
 
207
        free_line(l); 
 
208
 
 
209
        return ret;
 
210
}
 
211
 
 
212
gboolean irc_send_args(struct transport_context *c, ...) 
 
213
{
 
214
        struct line *l;
 
215
        gboolean ret;
 
216
        va_list ap;
 
217
 
 
218
        if(!c) return FALSE;
 
219
        
 
220
        va_start(ap, c);
 
221
        l = virc_parse_line(NULL, ap);
 
222
        va_end(ap);
 
223
 
 
224
        ret = irc_send_line(c, l);
 
225
 
 
226
        free_line(l); l = NULL;
 
227
 
 
228
        return ret;
 
229
}
 
230
 
 
231
struct line *linedup(struct line *l) {
 
232
        int i;
 
233
        struct line *ret = calloc(1, sizeof(struct line));
 
234
        memcpy(ret, l, sizeof(struct line));
 
235
        if(l->origin)ret->origin = strdup(l->origin);
 
236
        ret->options = l->options;
 
237
        ret->args = malloc(sizeof(char *) * (ret->argc+MAX_LINE_ARGS));
 
238
        for(i = 0; l->args[i]; i++) {
 
239
                ret->args[i] = strdup(l->args[i]);
 
240
        }
 
241
        ret->args[i] = NULL;
 
242
        return ret;
 
243
}