Incremental work on excorcising the transfer iface.
[doldaconnect.git] / daemon / transfer.c
CommitLineData
d3372da9 1/*
2 * Dolda Connect - Modular multiuser Direct Connect-style client
302a2600 3 * Copyright (C) 2004 Fredrik Tolf <fredrik@dolda2000.com>
d3372da9 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18*/
19#include <stdlib.h>
20#include <string.h>
21#include <time.h>
22#include <unistd.h>
23#include <fcntl.h>
24#include <signal.h>
25#include <pwd.h>
26#include <grp.h>
27#include <errno.h>
28#include <sys/wait.h>
f9455250 29#include <stdint.h>
d3372da9 30
31#ifdef HAVE_CONFIG_H
32#include <config.h>
33#endif
34#include "log.h"
35#include "utils.h"
36#include "sysevents.h"
37#include "auth.h"
38#include "transfer.h"
39#include "module.h"
429d35e5 40#include "client.h"
d3372da9 41
42static void killfilter(struct transfer *transfer);
43
7a5e9d41 44unsigned long long bytesupload = 0;
45unsigned long long bytesdownload = 0;
d3372da9 46struct transfer *transfers = NULL;
47int numtransfers = 0;
48GCBCHAIN(newtransfercb, struct transfer *);
49
50void freetransfer(struct transfer *transfer)
51{
d3372da9 52 if(transfer == transfers)
53 transfers = transfer->next;
54 if(transfer->next != NULL)
55 transfer->next->prev = transfer->prev;
56 if(transfer->prev != NULL)
57 transfer->prev->next = transfer->next;
58 CBCHAINDOCB(transfer, trans_destroy, transfer);
59 CBCHAINFREE(transfer, trans_ac);
60 CBCHAINFREE(transfer, trans_act);
61 CBCHAINFREE(transfer, trans_p);
62 CBCHAINFREE(transfer, trans_destroy);
63 CBCHAINFREE(transfer, trans_filterout);
9ec790e8 64 while(transfer->args != NULL)
65 freewcspair(transfer->args, &transfer->args);
d3372da9 66 if(transfer->filter != -1)
67 killfilter(transfer);
68 if(transfer->etimer != NULL)
69 canceltimer(transfer->etimer);
70 if(transfer->auth != NULL)
71 authputhandle(transfer->auth);
72 if(transfer->peerid != NULL)
73 free(transfer->peerid);
74 if(transfer->peernick != NULL)
75 free(transfer->peernick);
76 if(transfer->path != NULL)
77 free(transfer->path);
78 if(transfer->actdesc != NULL)
79 free(transfer->actdesc);
80 if(transfer->filterbuf != NULL)
81 free(transfer->filterbuf);
429d35e5 82 if(transfer->hash != NULL)
83 freehash(transfer->hash);
0309b83d 84 if(transfer->exitstatus != NULL)
85 free(transfer->exitstatus);
d3372da9 86 if(transfer->localend != NULL)
87 {
cab0b442 88 transfer->localend->readcb = NULL;
89 transfer->localend->writecb = NULL;
90 transfer->localend->errcb = NULL;
d3372da9 91 putsock(transfer->localend);
92 }
93 if(transfer->filterout != NULL)
94 {
cab0b442 95 transfer->filterout->readcb = NULL;
96 transfer->filterout->writecb = NULL;
97 transfer->filterout->errcb = NULL;
d3372da9 98 putsock(transfer->filterout);
99 }
100 if(transfer->fn != NULL)
101 putfnetnode(transfer->fn);
102 free(transfer);
103 numtransfers--;
104}
105
106struct transfer *newtransfer(void)
107{
108 struct transfer *new;
109 static int curid = 0;
110
111 new = smalloc(sizeof(*new));
112 memset(new, 0, sizeof(*new));
113 new->id = curid++;
114 new->size = -1;
115 new->endpos = -1;
116 new->filter = -1;
117 CBCHAININIT(new, trans_ac);
118 CBCHAININIT(new, trans_act);
119 CBCHAININIT(new, trans_p);
120 CBCHAININIT(new, trans_destroy);
121 CBCHAININIT(new, trans_filterout);
122 new->next = NULL;
123 new->prev = NULL;
124 time(&new->activity);
125 numtransfers++;
126 return(new);
127}
128
1ce5968e
FT
129static void localread(struct socket *sk, struct transfer *transfer)
130{
131 void *buf;
132 size_t blen;
133
134 if((transfer->datapipe != NULL) && (sockqueueleft(transfer->datapipe) > 0)) {
135 buf = sockgetinbuf(sk, &blen);
136 sockqueue(transfer->datapipe, buf, blen);
137 }
138}
139
140static void dataread(struct socket *sk, struct transfer *transfer)
141{
142 void *buf;
143 size_t blen;
144
145 if((transfer->localend != NULL) && (sockqueueleft(transfer->localend) > 0)) {
146 buf = sockgetinbuf(sk, &blen);
147 sockqueue(transfer->localend, buf, blen);
148 }
149}
150
151static void localwrite(struct socket *sk, struct transfer *transfer)
152{
153 if(transfer->datapipe != NULL)
154 dataread(transfer->datapipe, transfer);
155}
156
157static void datawrite(struct socket *sk, struct transfer *transfer)
158{
159 if(transfer->localend != NULL)
160 localread(transfer->localend, transfer);
161}
162
163static void localerr(struct socket *sk, int errno, struct transfer *transfer)
164{
165 if(transfer->datapipe != NULL)
166 closesock(transfer->datapipe);
167}
168
169static void dataerr(struct socket *sk, int errno, struct transfer *transfer)
170{
171 if(transfer->localend != NULL)
172 closesock(transfer->localend);
173}
174
705b7486 175void transferattach(struct transfer *transfer, struct socket *dpipe)
d3372da9 176{
705b7486
FT
177 transferdetach(transfer);
178 getsock(transfer->datapipe = dpipe);
1ce5968e
FT
179 dpipe->readcb = (void (*)(struct socket *, void *))dataread;
180 dpipe->writecb = (void (*)(struct socket *, void *))datawrite;
181 dpipe->errcb = (void (*)(struct socket *, int, void *))dataerr;
182 dpipe->data = transfer;
d3372da9 183}
184
185void transferdetach(struct transfer *transfer)
186{
705b7486 187 if(transfer->datapipe != NULL) {
1ce5968e
FT
188 transfer->datapipe->readcb = NULL;
189 transfer->datapipe->writecb = NULL;
190 transfer->datapipe->errcb = NULL;
705b7486
FT
191 closesock(transfer->datapipe);
192 putsock(transfer->datapipe);
d3372da9 193 }
705b7486 194 transfer->datapipe = NULL;
d3372da9 195}
196
2c086721 197struct transfer *finddownload(wchar_t *peerid)
198{
199 struct transfer *transfer;
200
201 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
202 {
705b7486 203 if((transfer->dir == TRNSD_DOWN) && (transfer->datapipe == NULL) && !wcscmp(peerid, transfer->peerid))
2c086721 204 break;
205 }
206 return(transfer);
207}
208
6c6bc9ce 209struct transfer *hasupload(struct fnet *fnet, wchar_t *peerid)
210{
211 struct transfer *transfer;
212
213 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
214 {
c458597e 215 if((transfer->dir == TRNSD_UP) && (transfer->fnet == fnet) && !wcscmp(transfer->peerid, peerid))
6c6bc9ce 216 break;
217 }
218 return(transfer);
219}
220
705b7486 221struct transfer *newupload(struct fnetnode *fn, struct fnet *fnet, wchar_t *nickid, struct socket *dpipe)
d3372da9 222{
223 struct transfer *transfer;
224
225 transfer = newtransfer();
226 if(fnet != NULL)
227 transfer->fnet = fnet;
228 else
229 transfer->fnet = fn->fnet;
230 transfer->peerid = swcsdup(nickid);
231 transfer->state = TRNS_HS;
232 transfer->dir = TRNSD_UP;
233 if(fn != NULL)
234 getfnetnode(transfer->fn = fn);
705b7486 235 transferattach(transfer, dpipe);
d3372da9 236 linktransfer(transfer);
237 bumptransfer(transfer);
238 return(transfer);
239}
240
241void linktransfer(struct transfer *transfer)
242{
243 transfer->next = transfers;
244 transfer->prev = NULL;
245 if(transfers != NULL)
246 transfers->prev = transfer;
247 transfers = transfer;
248 GCBCHAINDOCB(newtransfercb, transfer);
249}
250
251void resettransfer(struct transfer *transfer)
252{
253 if(transfer->dir == TRNSD_DOWN)
254 {
705b7486 255 transferdetach(transfer);
d3372da9 256 killfilter(transfer);
257 transfersetstate(transfer, TRNS_WAITING);
258 transfersetactivity(transfer, L"reset");
259 return;
260 }
261}
262
263struct transfer *findtransfer(int id)
264{
265 struct transfer *transfer;
266
267 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
268 {
269 if(transfer->id == id)
270 break;
271 }
272 return(transfer);
273}
274
275static void transexpire(int cancelled, struct transfer *transfer)
276{
277 transfer->etimer = NULL;
278 if(!cancelled)
279 bumptransfer(transfer);
280 else
281 transfer->timeout = 0;
282}
283
1ce5968e 284static void transferputdata(struct transfer *transfer, void *buf, size_t size)
d3372da9 285{
286 time(&transfer->activity);
287 sockqueue(transfer->localend, buf, size);
288 transfer->curpos += size;
7a5e9d41 289 bytesdownload += size;
d3372da9 290 CBCHAINDOCB(transfer, trans_p, transfer);
291}
292
1ce5968e 293static void transferendofdata(struct transfer *transfer)
d3372da9 294{
295 if(transfer->curpos >= transfer->size)
296 {
297 transfersetstate(transfer, TRNS_DONE);
cab0b442 298 transfer->localend->readcb = NULL;
299 transfer->localend->writecb = NULL;
300 transfer->localend->errcb = NULL;
d3372da9 301 putsock(transfer->localend);
302 transfer->localend = NULL;
303 } else {
304 resettransfer(transfer);
305 }
306}
307
1ce5968e 308static ssize_t transferdatasize(struct transfer *transfer)
d3372da9 309{
81286a22 310 return(sockqueueleft(transfer->localend));
d3372da9 311}
312
1ce5968e 313static void *transfergetdata(struct transfer *transfer, size_t *size)
d3372da9 314{
315 void *buf;
316
317 if(transfer->localend == NULL)
318 return(NULL);
d3372da9 319 time(&transfer->activity);
320 if((buf = sockgetinbuf(transfer->localend, size)) == NULL)
321 return(NULL);
322 if((transfer->endpos >= 0) && (transfer->curpos + *size >= transfer->endpos))
323 {
e3f10dc2
FT
324 if((*size = transfer->endpos - transfer->curpos) == 0) {
325 free(buf);
326 buf = NULL;
327 } else {
328 buf = srealloc(buf, *size);
329 }
d3372da9 330 }
331 transfer->curpos += *size;
7a5e9d41 332 bytesupload += *size;
d3372da9 333 CBCHAINDOCB(transfer, trans_p, transfer);
334 return(buf);
335}
336
dcf7a1a2 337void transferprepul(struct transfer *transfer, off_t size, off_t start, off_t end, struct socket *lesk)
d3372da9 338{
339 transfersetsize(transfer, size);
340 transfer->curpos = start;
341 transfer->endpos = end;
d3372da9 342 transfersetlocalend(transfer, lesk);
343}
344
2c086721 345void transferstartdl(struct transfer *transfer, struct socket *sk)
346{
347 transfersetstate(transfer, TRNS_MAIN);
348 socksettos(sk, confgetint("transfer", "dltos"));
349}
350
d3372da9 351void transferstartul(struct transfer *transfer, struct socket *sk)
352{
353 transfersetstate(transfer, TRNS_MAIN);
354 socksettos(sk, confgetint("transfer", "ultos"));
355 if(transfer->localend != NULL)
1ce5968e 356 localread(transfer->localend, transfer);
d3372da9 357}
358
359void transfersetlocalend(struct transfer *transfer, struct socket *sk)
360{
361 if(transfer->localend != NULL)
362 putsock(transfer->localend);
363 getsock(transfer->localend = sk);
cab0b442 364 sk->data = transfer;
705b7486
FT
365 sk->readcb = (void (*)(struct socket *, void *))localread;
366 sk->writecb = (void (*)(struct socket *, void *))localwrite;
367 sk->errcb = (void (*)(struct socket *, int, void *))localerr;
d3372da9 368}
369
18f56d13 370static int tryreq(struct transfer *transfer)
d3372da9 371{
372 struct fnetnode *fn;
373 struct fnetpeer *peer;
18f56d13 374
375 if((fn = transfer->fn) != NULL)
376 {
377 if(fn->state != FNN_EST)
378 {
379 transfer->close = 1;
380 return(1);
381 }
382 peer = fnetfindpeer(fn, transfer->peerid);
383 } else {
384 peer = NULL;
385 for(fn = fnetnodes; fn != NULL; fn = fn->next)
386 {
387 if((fn->state == FNN_EST) && (fn->fnet == transfer->fnet) && ((peer = fnetfindpeer(fn, transfer->peerid)) != NULL))
388 break;
389 }
390 }
391 if(peer != NULL)
6329b4ba 392 {
393 time(&transfer->lastreq);
18f56d13 394 return(fn->fnet->reqconn(peer));
6329b4ba 395 }
18f56d13 396 return(1);
397}
398
399void trytransferbypeer(struct fnet *fnet, wchar_t *peerid)
400{
401 struct transfer *transfer;
402
403 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
404 {
405 if((transfer->dir == TRNSD_DOWN) && (transfer->state == TRNS_WAITING))
406 {
407 if((transfer->fnet == fnet) && !wcscmp(transfer->peerid, peerid))
408 {
409 if(!tryreq(transfer))
410 return;
411 }
412 }
413 }
414}
415
416void bumptransfer(struct transfer *transfer)
417{
d3372da9 418 time_t now;
419
420 if((now = time(NULL)) < transfer->timeout)
421 {
18f56d13 422
d3372da9 423 if(transfer->etimer == NULL)
424 transfer->etimer = timercallback(transfer->timeout, (void (*)(int, void *))transexpire, transfer);
425 return;
426 }
427 if(transfer->etimer != NULL)
428 canceltimer(transfer->etimer);
429 switch(transfer->state)
430 {
431 case TRNS_WAITING:
d3372da9 432 transfer->etimer = timercallback(transfer->timeout = (time(NULL) + 30), (void (*)(int, void *))transexpire, transfer);
433 if(now - transfer->lastreq > 30)
18f56d13 434 tryreq(transfer);
d3372da9 435 break;
436 case TRNS_HS:
437 if(transfer->dir == TRNSD_UP)
438 {
439 if(now - transfer->activity < 60)
440 transfer->etimer = timercallback(transfer->timeout = (time(NULL) + 60), (void (*)(int, void *))transexpire, transfer);
441 else
442 transfer->close = 1;
443 } else if(transfer->dir == TRNSD_DOWN) {
444 if(now - transfer->activity < 60)
445 transfer->etimer = timercallback(transfer->timeout = (time(NULL) + 60), (void (*)(int, void *))transexpire, transfer);
446 else
447 resettransfer(transfer);
448 }
449 break;
450 case TRNS_MAIN:
451 if(transfer->dir == TRNSD_UP)
452 {
453 if(now - transfer->activity < 300)
454 transfer->etimer = timercallback(transfer->timeout = (time(NULL) + 300), (void (*)(int, void *))transexpire, transfer);
455 else
456 transfer->close = 1;
457 }
458 break;
459 }
460}
461
462void transfersetactivity(struct transfer *transfer, wchar_t *desc)
463{
464 time(&transfer->activity);
465 if(desc != NULL)
466 {
467 if(transfer->actdesc != NULL)
468 free(transfer->actdesc);
469 transfer->actdesc = swcsdup(desc);
470 }
471 bumptransfer(transfer);
472 CBCHAINDOCB(transfer, trans_act, transfer);
473}
474
475void transfersetstate(struct transfer *transfer, int newstate)
476{
477 transfer->state = newstate;
478 if(transfer->etimer != NULL)
479 canceltimer(transfer->etimer);
480 transfersetactivity(transfer, NULL);
481 CBCHAINDOCB(transfer, trans_ac, transfer, L"state");
482}
483
484void transfersetnick(struct transfer *transfer, wchar_t *newnick)
485{
486 if(transfer->peernick != NULL)
487 free(transfer->peernick);
488 transfer->peernick = swcsdup(newnick);
489 CBCHAINDOCB(transfer, trans_ac, transfer, L"nick");
490}
491
dcf7a1a2 492void transfersetsize(struct transfer *transfer, off_t newsize)
d3372da9 493{
494 transfer->size = newsize;
495 CBCHAINDOCB(transfer, trans_ac, transfer, L"size");
496}
497
498void transferseterror(struct transfer *transfer, int error)
499{
500 transfer->error = error;
501 CBCHAINDOCB(transfer, trans_ac, transfer, L"error");
502}
503
504void transfersetpath(struct transfer *transfer, wchar_t *path)
505{
506 if(transfer->path != NULL)
507 free(transfer->path);
508 transfer->path = swcsdup(path);
509 CBCHAINDOCB(transfer, trans_ac, transfer, L"path");
510}
511
2c086721 512void transfersethash(struct transfer *transfer, struct hash *hash)
513{
514 if(transfer->hash != NULL)
515 freehash(transfer->hash);
516 transfer->hash = hash;
517 CBCHAINDOCB(transfer, trans_ac, transfer, L"hash");
518}
519
d3372da9 520int slotsleft(void)
521{
522 struct transfer *transfer;
523 int slots;
524
525 slots = confgetint("transfer", "slots");
526 for(transfer = transfers; (transfer != NULL) && (slots > 0); transfer = transfer->next)
527 {
528 if((transfer->dir == TRNSD_UP) && (transfer->state == TRNS_MAIN) && !transfer->flags.b.minislot)
529 slots--;
530 }
531 return(slots);
532}
533
534static void killfilter(struct transfer *transfer)
535{
536 if(transfer->filter != -1)
537 {
538 kill(-transfer->filter, SIGHUP);
539 transfer->filter = -1;
540 }
541 if(transfer->localend)
542 {
cab0b442 543 transfer->localend->readcb = NULL;
544 transfer->localend->writecb = NULL;
545 transfer->localend->errcb = NULL;
d3372da9 546 putsock(transfer->localend);
547 transfer->localend = NULL;
548 }
549 if(transfer->filterout)
550 {
cab0b442 551 transfer->filterout->readcb = NULL;
d3372da9 552 putsock(transfer->filterout);
553 transfer->filterout = NULL;
554 }
555 if(transfer->filterbuf)
556 {
557 free(transfer->filterbuf);
558 transfer->filterbuf = NULL;
559 }
560 transfer->filterbufsize = transfer->filterbufdata = 0;
561}
562
0309b83d 563static void handletranscmd(struct transfer *transfer, wchar_t *cmd, wchar_t *arg)
564{
565 if(!wcscmp(cmd, L"status")) {
566 if(arg == NULL)
567 arg = L"";
568 if(transfer->exitstatus != NULL)
569 free(transfer->exitstatus);
570 transfer->exitstatus = swcsdup(arg);
571 }
572}
573
cab0b442 574static void filterread(struct socket *sk, struct transfer *transfer)
d3372da9 575{
576 char *buf, *p, *p2;
577 size_t bufsize;
578 wchar_t *cmd, *arg;
579
580 if((buf = sockgetinbuf(sk, &bufsize)) == NULL)
cab0b442 581 return;
d3372da9 582 bufcat(transfer->filterbuf, buf, bufsize);
583 free(buf);
5b193db0 584 while((p = memchr(transfer->filterbuf, '\n', transfer->filterbufdata)) != NULL)
d3372da9 585 {
586 *(p++) = 0;
587 if((p2 = strchr(transfer->filterbuf, ' ')) != NULL)
588 *(p2++) = 0;
589 if((cmd = icmbstowcs(transfer->filterbuf, NULL)) != NULL)
590 {
591 arg = NULL;
592 if(p2 != NULL)
593 {
594 if((arg = icmbstowcs(p2, NULL)) == NULL)
13b303d4 595 flog(LOG_WARNING, "filter sent a string which could not be converted into the local charset: %s: %s", p2, strerror(errno));
d3372da9 596 }
0309b83d 597 handletranscmd(transfer, cmd, arg);
d3372da9 598 CBCHAINDOCB(transfer, trans_filterout, transfer, cmd, arg);
599 if(arg != NULL)
600 free(arg);
601 free(cmd);
602 } else {
603 flog(LOG_WARNING, "filter sent a string which could not be converted into the local charset: %s: %s", transfer->filterbuf, strerror(errno));
604 }
605 memmove(transfer->filterbuf, p, transfer->filterbufdata -= (p - transfer->filterbuf));
606 }
607}
608
609static void filterexit(pid_t pid, int status, void *data)
610{
611 struct transfer *transfer;
734dc54e 612 struct fnet *fnet;
613 wchar_t *peerid;
d3372da9 614
615 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
616 {
617 if(transfer->filter == pid)
618 {
619 transfer->filter = -1;
620 killfilter(transfer);
734dc54e 621 fnet = transfer->fnet;
622 peerid = swcsdup(transfer->peerid);
d3372da9 623 if(WEXITSTATUS(status))
d3372da9 624 resettransfer(transfer);
734dc54e 625 else
d3372da9 626 freetransfer(transfer);
734dc54e 627 trytransferbypeer(fnet, peerid);
628 free(peerid);
d3372da9 629 break;
630 }
631 }
632}
633
634int forkfilter(struct transfer *transfer)
635{
1d647d25 636 char *filtername, *filename, *peerid, *buf, *p;
d3372da9 637 wchar_t *wfilename;
638 struct passwd *pwent;
639 pid_t pid;
640 int inpipe, outpipe;
641 char **argv;
642 size_t argvsize, argvdata;
643 struct socket *insock, *outsock;
9ec790e8 644 struct wcspair *ta;
d3372da9 645 char *rec, *val;
646
9c161e77 647 wfilename = fnfilebasename(transfer->path);
d3372da9 648 if(transfer->auth == NULL)
649 {
650 flog(LOG_WARNING, "tried to fork filter for transfer with NULL authhandle (tranfer %i)", transfer->id);
651 errno = EACCES;
652 return(-1);
653 }
654 if((pwent = getpwuid(transfer->owner)) == NULL)
655 {
656 flog(LOG_WARNING, "no passwd entry for uid %i (found in transfer %i)", transfer->owner, transfer->id);
657 errno = EACCES;
658 return(-1);
659 }
645a4af7 660 filtername = findfile("dc-filter", pwent->pw_dir, 0);
81386042 661 if(filtername == NULL)
645a4af7 662 filtername = findfile(icswcstombs(confgetstr("transfer", "filter"), NULL, NULL), NULL, 0);
81386042 663 if(filtername == NULL)
d3372da9 664 {
665 flog(LOG_WARNING, "could not find filter for user %s", pwent->pw_name);
666 errno = ENOENT;
667 return(-1);
668 }
669 if((filename = icwcstombs(wfilename, NULL)) == NULL)
670 {
671 if((buf = icwcstombs(wfilename, "UTF-8")) == NULL)
672 {
673 flog(LOG_WARNING, "could convert transfer filename to neither local charset nor UTF-8: %s", strerror(errno));
674 return(-1);
675 }
676 filename = sprintf2("utf8-%s", buf);
677 free(buf);
678 }
679 if((peerid = icwcstombs(transfer->peerid, NULL)) == NULL)
680 {
681 if((buf = icwcstombs(transfer->peerid, "UTF-8")) == NULL)
682 {
683 flog(LOG_WARNING, "could convert transfer peerid to neither local charset nor UTF-8: %s", strerror(errno));
684 free(filename);
685 return(-1);
686 }
687 peerid = sprintf2("utf8-%s", buf);
688 free(buf);
689 }
1d647d25
FT
690 for(p = filename; *p; p++) {
691 if(*p == '/')
692 *p = '_';
693 else if((p == filename) && (*p == '.'))
694 *p = '_';
695 }
d3372da9 696 if((pid = forksess(transfer->owner, transfer->auth, filterexit, NULL, FD_PIPE, 0, O_WRONLY, &inpipe, FD_PIPE, 1, O_RDONLY, &outpipe, FD_FILE, 2, O_RDWR, "/dev/null", FD_END)) < 0)
697 {
698 flog(LOG_WARNING, "could not fork session for filter for transfer %i: %s", transfer->id, strerror(errno));
699 return(-1);
700 }
701 if(pid == 0)
702 {
703 argv = NULL;
704 argvsize = argvdata = 0;
dcf7a1a2 705 buf = sprintf2("%ji", (intmax_t)transfer->size);
d3372da9 706 addtobuf(argv, filtername);
707 addtobuf(argv, filename);
708 addtobuf(argv, buf);
709 addtobuf(argv, peerid);
082b0419 710 if(transfer->hash)
711 {
712 if((buf = icwcstombs(unparsehash(transfer->hash), NULL)) != NULL)
713 {
714 /* XXX: I am very doubtful of this, but it can just as
715 * well be argued that all data should be presented as
716 * key-value pairs. */
717 addtobuf(argv, "hash");
718 addtobuf(argv, buf);
719 } else {
720 flog(LOG_WARNING, "could not convert hash to local charset");
721 }
722 }
d3372da9 723 for(ta = transfer->args; ta != NULL; ta = ta->next)
724 {
9ec790e8 725 if((rec = icwcstombs(ta->key, NULL)) == NULL)
d3372da9 726 continue;
727 if((val = icwcstombs(ta->val, NULL)) == NULL)
728 continue;
729 addtobuf(argv, rec);
730 addtobuf(argv, val);
731 }
732 addtobuf(argv, NULL);
733 execv(filtername, argv);
734 flog(LOG_WARNING, "could not exec filter %s: %s", filtername, strerror(errno));
735 exit(127);
736 }
737 insock = wrapsock(inpipe);
738 outsock = wrapsock(outpipe);
739 /* Really, really strange thing here - sometimes the kernel would
740 * return POLLIN on insock, even though it's a write-side
741 * pipe. The corresponding read on the pipe naturally returns
742 * EBADF, causing doldacond to think there's something wrong with
743 * the fd, and thus it closes it. Until I can find out whyever the
744 * kernel gives a POLLIN on the fd (if I can at all...), I'll just
745 * set ignread on insock for now. */
81286a22 746/* sockblock(insock, 1); */
d3372da9 747 transfer->filter = pid;
748 transfersetlocalend(transfer, insock);
749 getsock(transfer->filterout = outsock);
cab0b442 750 outsock->data = transfer;
751 outsock->readcb = (void (*)(struct socket *, void *))filterread;
d3372da9 752 putsock(insock);
753 putsock(outsock);
754 free(filtername);
755 free(filename);
756 free(peerid);
757 return(0);
758}
759
760static int run(void)
761{
762 struct transfer *transfer, *next;
763
1ce5968e 764 /*
d3372da9 765 for(transfer = transfers; transfer != NULL; transfer = transfer->next)
766 {
767 if((transfer->endpos >= 0) && (transfer->state == TRNS_MAIN) && (transfer->localend != NULL) && (transfer->localend->state == SOCK_EST) && (transfer->curpos >= transfer->endpos))
768 {
769 if((transfer->iface != NULL) && (transfer->iface->endofdata != NULL))
770 transfer->iface->endofdata(transfer, transfer->ifacedata);
771 closesock(transfer->localend);
772 }
773 }
1ce5968e 774 */
d3372da9 775 for(transfer = transfers; transfer != NULL; transfer = next)
776 {
777 next = transfer->next;
778 if(transfer->close)
779 {
780 transferdetach(transfer);
781 freetransfer(transfer);
782 continue;
783 }
784 }
785 return(0);
786}
787
788static struct configvar myvars[] =
789{
d9f89ef5 790 /** The maximum number of simultaneously permitted uploads. A
791 * common hub rule is that you will need at least as many slots as
792 * the number of hubs to which you are connected. */
d3372da9 793 {CONF_VAR_INT, "slots", {.num = 3}},
d9f89ef5 794 /** The TOS value to use for upload connections (see the TOS
795 * VALUES section). */
d3372da9 796 {CONF_VAR_INT, "ultos", {.num = SOCK_TOS_MAXTP}},
d9f89ef5 797 /** The TOS value to use for download connections (see the TOS
798 * VALUES section). */
d3372da9 799 {CONF_VAR_INT, "dltos", {.num = SOCK_TOS_MAXTP}},
d9f89ef5 800 /** The name of the filter script (see the FILES section for
801 * lookup information). */
d3372da9 802 {CONF_VAR_STRING, "filter", {.str = L"dc-filter"}},
d9f89ef5 803 /** If true, only one upload is allowed per remote peer. This
804 * option is still experimental, so it is recommended to leave it
805 * off. */
01663fd9 806 {CONF_VAR_BOOL, "ulquota", {.num = 0}},
d3372da9 807 {CONF_VAR_END}
808};
809
810static struct module me =
811{
812 .conf =
813 {
814 .vars = myvars
815 },
816 .name = "transfer",
817 .run = run
818};
819
820MODULE(me);