开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB邮件程序 > 查看源码
ldaplist.c
资源名称：sqwebmail-0.37a.38pre2.tar.gz　[点击查看]
上传用户：s81996212
上传日期：2007-01-04
资源大小：722k
文件大小：8k
源码类别：

WEB邮件程序

开发平台：

C/C++

ldaplist.c：源码内容
  1. /*
  2. ** Copyright 2000 Double Precision, Inc.  See COPYING for
  3. ** distribution information.
  4. */
  7. /*
  8. ** $Id: ldaplist.c,v 1.1 2000/06/03 05:40:27 mrsam Exp $
  9. */
  10. #include "sqwebmail.h"
  11. #include <stdio.h>
  12. #include <errno.h>
  13. #include <stdlib.h>
  14. #include <ctype.h>
  15. #if HAVE_UNISTD_H
  16. #include <unistd.h>
  17. #endif
  18. #include <string.h>
  19. #include "cgi/cgi.h"
  20. #include "ldapaddressbook/ldapaddressbook.h"
  21. #include "maildir/maildircreate.h"
  22. #include "numlib/numlib.h"
  23. #include "htmllibdir.h"
  24. #include "addressbook.h"
  25. #include "pref.h"
  27. #define LOCALABOOK "sqwebmail-ldapaddressbook"
  29. extern char form_args[];
  30. extern void output_scriptptrget();
  31. extern void output_attrencoded(const char *);
  32. extern void output_attrencoded_oknl(const char *p);
  33. extern void output_urlencoded(const char *);
  34. extern void output_attrencoded_fp(const char *, FILE *);
  35. extern void output_attrencoded_oknl_fp(const char *, FILE *);
  37. void ldaplist()
  38. {
  39. struct ldapabook *abooks[2];
  40. int i;
  41. struct ldapabook *p;
  42. char *delabook=strtok(form_args, "|");
  43. char *sysbook=strtok(0, "|");
  45. if (!delabook) delabook="";
  46. if (!sysbook) sysbook="";
  48. if (*cgi("addabook"))
  49. {
  50. struct ldapabook newbook;
  52. memset(&newbook, 0, sizeof(newbook));
  54. newbook.name=(char *)cgi("name");
  55. newbook.host=(char *)cgi("host");
  56. newbook.port=(char *)cgi("port");
  57. newbook.suffix=(char *)cgi("suffix");
  58. newbook.binddn=(char *)cgi("binddn");
  59. newbook.bindpw=(char *)cgi("bindpw");
  60. if (*newbook.name && *newbook.host &&
  61. ldapabook_add(LOCALABOOK, &newbook) < 0)
  62. {
  63. printf("<pre>n");
  64. perror("ldapabook_add");
  65. printf("</pre>n");
  66. }
  67. }
  69. if (*cgi("delabook"))
  70. {
  71. char *nptr, *tptr;
  73. if (maildir_try_create(".", "abook", 0, &nptr, &tptr) == 0)
  74. {
  75. ldapabook_del(LOCALABOOK, tptr, cgi("ABOOK"));
  76. free(nptr);
  77. free(tptr);
  78. }
  79. }
  81. abooks[0]=ldapabook_read(LDAPADDRESSBOOK);
  82. abooks[1]=ldapabook_read(LOCALABOOK);
  84. printf("<TABLE BORDER=0 CELLPADDING=8 WIDTH="100%%">n");
  85. for (i=0; i<2; i++)
  86. {
  87. for (p=abooks[i]; p; p=p->next)
  88. {
  89. printf("<TR VALIGN=TOP><TD ALIGN=RIGHT>");
  90. printf("<INPUT BORDER=0 TYPE=RADIO NAME=ABOOK");
  92. if (pref_ldap && strcmp(pref_ldap, p->name) == 0)
  93. printf(" CHECKED");
  95. printf(" VALUE="");
  96. output_attrencoded(p->name);
  97. printf(""></TD><TD><FONT SIZE="+1">%s</FONT><BR>"
  98. "&nbsp;&nbsp;&nbsp;<TT><FONT SIZE="-2">ldap://", p->name);
  99. if (*p->binddn || *p->bindpw)
  100. {
  101. printf("%s", p->binddn);
  102. if (*p->bindpw)
  103. printf(":%s", p->bindpw);
  104. printf("@");
  105. }
  106. printf("%s", p->host);
  107. if (atoi(p->port) != 389)
  108. printf(":%s", p->port);
  109. if (*p->suffix)
  110. {
  111. char *q;
  113. printf("/");
  114. q=cgiurlencode_noeq(p->suffix);
  115. if (q)
  116. {
  117. printf("%s", q);
  118. free(q);
  119. }
  120. }
  121. printf("</FONT></TT>%s</TD></TR>",
  122. i ? "":sysbook);
  123. }
  124. }
  126. if (abooks[1])
  127. {
  128. printf("<TR><TD></TD><TD>");
  129. printf("<input type=submit name=delabook value="%s">",
  130. delabook);
  131. printf("</TD></TR>n");
  132. }
  133. printf("</TABLE>n");
  134. ldapabook_free(abooks[0]);
  135. ldapabook_free(abooks[1]);
  136. }
  138. int ldapsearch()
  139. {
  140. if (*cgi("ABOOK") == 0 || *cgi("attr1") == 0 || *cgi("op1") == 0
  141. || *cgi("value1") == 0) return (-1);
  142. return (0);
  143. }
  145. static const char *getattrn(const char *s, unsigned n)
  146. {
  147. char buf1[NUMBUFSIZE+20], bufn[NUMBUFSIZE];
  149. return (cgi(strcat(strcpy(buf1, s), str_size_t(n, bufn))));
  150. }
  152. static char *getfiltern(unsigned n)
  153. {
  154. const char *attrname=getattrn("attr", n);
  155. const char *attrop=getattrn("op", n);
  156. const char *attrval=getattrn("value", n);
  158. char *buf;
  160. if (*attrname == 0 || *attrop == 0 || *attrval == 0) return (0);
  162. buf=malloc(strlen(attrname)+strlen(attrop)+strlen(attrval)+40);
  164. if (!buf) return (0);
  166. strcpy(buf, "(");
  167. strcat(buf, attrname);
  168. strcat(buf, strcmp(attrop, "=*") == 0 ? "=":attrop);
  169. strcat(buf, attrval);
  170. if (strcmp(attrop, "=*") == 0)
  171. strcat(buf, "*");
  172. strcat(buf, ")");
  173. return (buf);
  174. }
  176. static char *getfilter()
  177. {
  178. char *filter=0;
  179. char *s;
  180. unsigned n=atoi(cgi("maxattrs"));
  181. unsigned i;
  183. if (n < 3) n=3;
  184. if (n > 20) n=20; /* sanity check */
  186. for (i=0; i<n; i++)
  187. {
  188. char *p=getfiltern(i+1);
  190. if (!p)
  191. continue;
  193. if (!filter) filter=p;
  194. else
  195. {
  196. s=malloc(strlen(p) + strlen(filter));
  197. if (!s)
  198. {
  199. free(filter);
  200. free(p);
  201. return (0);
  202. }
  203. strcat(strcpy(s, filter), p);
  204. free(filter);
  205. free(p);
  206. filter=s;
  207. }
  208. }
  209. s=malloc(strlen(filter)+sizeof("(&)"));
  210. if (!s)
  211. {
  212. free(filter);
  213. return(0);
  214. }
  215. strcat(strcat(strcpy(s, "(&"), filter), ")");
  216. free(filter);
  217. return (s);
  218. }
  220. static void parsesearch(FILE *, FILE *);
  222. void doldapsearch()
  223. {
  224. char *f;
  225. struct ldapabook *abooks[2];
  226. const struct ldapabook *ptr;
  228. abooks[0]=ldapabook_read(LDAPADDRESSBOOK);
  229. abooks[1]=ldapabook_read(LOCALABOOK);
  231. ptr=ldapabook_find(abooks[0], cgi("ABOOK"));
  232. if (!ptr)
  233. ptr=ldapabook_find(abooks[1], cgi("ABOOK"));
  235. if (ptr && (f=getfilter()) != 0)
  236. {
  237. int fd;
  238. FILE *fpw=0;
  239. char *tmpname=0;
  241. pref_setldap(ptr->name);
  242. printf("<PRE>");
  243. fflush(stdout);
  245. fd=ldapabook_search(ptr, LDAPSEARCH, f, 1);
  246. free(f);
  248.                 if (fd >= 0)
  249. {
  250. FILE *fp=fdopen(fd, "r");
  252. if (fp)
  253. {
  254. char *nptr;
  256. if (maildir_try_create(".", "ldap", 0,
  257. &tmpname, &nptr) == 0)
  258. {
  259. free(nptr);
  260. fpw=fopen(tmpname, "w+");
  262. if (fpw)
  263. parsesearch(fp, fpw);
  264. else
  265. perror(tmpname);
  266. }
  267. fclose(fp);
  268. }
  269. else
  270. perror("fdopen");
  271. close(fd);
  272. }
  273. printf("</PRE>");
  275. if (fpw)
  276. {
  277. int c;
  279. fflush(fpw);
  280. rewind(fpw);
  281. while ((c=getc(fpw)) != EOF)
  282. putchar(c);
  283. fclose(fpw);
  284. }
  285. if (tmpname)
  286. {
  287. unlink(tmpname);
  288. free(tmpname);
  289. }
  290. }
  291. }
  293. static void parsesearch(FILE *r, FILE *w)
  294. {
  295. char buf[BUFSIZ];
  296. char sn[100];
  297. char cn[100];
  298. char o[100];
  299. char l[100];
  300. char ou[100];
  301. char st[100];
  302. char mail[512];
  303. char *p;
  304. char *add1=strtok(form_args, "|");
  305. char *add2=strtok(0, "|");
  306. char *submit=strtok(0, "|");
  307. char numbuf[NUMBUFSIZE];
  308. char numbuf2[NUMBUFSIZE+10];
  309. unsigned counter;
  311. if (!add1) add1="";
  312. if (!add2) add2="";
  313. if (!submit) submit="";
  315. fprintf(w, "<TABLE BORDER=0 CELLPADDING=4>n");
  317. counter=0;
  318. for (;;)
  319. {
  320. if (fgets(buf, sizeof(buf), r) == 0) break;
  321. /* skip dn */
  323. sn[0]=0;
  324. cn[0]=0;
  325. o[0]=0;
  326. l[0]=0;
  327. ou[0]=0;
  328. st[0]=0;
  329. mail[0]=0;
  331. for (;;)
  332. {
  333. if (fgets(buf, sizeof(buf), r) == 0) break;
  334. if ((p=strchr(buf, 'n')) != 0) *p=0;
  335. if (buf[0] == 0) break;
  336. for (p=buf; *p; p++)
  337. {
  338. if (*p == '=')
  339. {
  340. *p++=0;
  341. break;
  342. }
  343. *p=tolower((int)(unsigned char)*p);
  344. }
  346. #define SAFECAT(b,buf) strncat(b, buf, sizeof(b)-1-strlen(b))
  348. #define SAVE(n,b) if (strcmp(buf, n) == 0) 
  349. { if (b[0]) SAFECAT(b, "n"); SAFECAT(b, p); }
  351. SAVE("sn", sn)
  353. SAVE("cn", cn)
  354. SAVE("givenname", cn)
  355. SAVE("o", o)
  356. SAVE("ou", ou)
  357. SAVE("l", l)
  358. SAVE("st", st)
  359. SAVE("mail", mail)
  360. }
  361. if (mail[0] == 0) continue;
  363. for (p=mail; (p=strtok(p, "n")) != 0; p=0)
  364. {
  365. char *q;
  367. fprintf(w, "<TR VALIGN=TOP><TD><INPUT TYPE=CHECKBOX "
  368. "NAME="%s" VALUE="&lt;",
  369. strcat(strcpy(numbuf2, "ADDY"),
  370. str_size_t(counter++, numbuf)));
  372. output_attrencoded_fp(p, w);
  373. fprintf(w, "&gt;");
  375. q=cn;
  376. if (*q == 0) q=sn;
  378. if (*q)
  379. {
  380. fprintf(w, " &quot;");
  381. output_attrencoded_fp(q, w);
  382. fprintf(w, "&quot;");
  383. }
  385. fprintf(w, ""></TD><TD><FONT SIZE="+1">");
  387. if (*q)
  388. {
  389. fprintf(w, """);
  390. output_attrencoded_fp(q, w);
  391. fprintf(w, "" ");
  392. }
  393. fprintf(w, "&lt;");
  394. output_attrencoded_fp(p, w);
  395. fprintf(w, "&gt;</FONT>");
  396. if (ou[0])
  397. {
  398. fprintf(w, "<BR>");
  399. output_attrencoded_oknl_fp(ou, w);
  400. }
  401. if (o[0])
  402. {
  403. fprintf(w, "<BR>");
  404. output_attrencoded_oknl_fp(o, w);
  405. }
  406. if (l[0])
  407. {
  408. fprintf(w, "<BR>");
  409. output_attrencoded_oknl_fp(l, w);
  410. }
  411. if (st[0])
  412. {
  413. fprintf(w, "<BR>");
  414. output_attrencoded_oknl_fp(st, w);
  415. }
  416. fprintf(w, "</TD></TR>n");
  417. }
  418. }
  419. fprintf(w, "<TR><TD COLSPAN=2><HR WIDTH="90%%">"
  420. "<INPUT TYPE=HIDDEN NAME=ADDYCNT VALUE=%u>n"
  421. "</TD></TR>n", counter);
  422. fprintf(w, "<TR><TD COLSPAN=2><TABLE>");
  424. fprintf(w, "<TR><TD ALIGN=RIGHT>%s</TD><TD>"
  425. "<SELECT NAME=nick1><OPTION>n", add1);
  426. ab_listselect_fp(w);
  427. fprintf(w, "</SELECT></TD></TR>n");
  428. fprintf(w, "<TR><TD ALIGN=RIGHT>%s</TD><TD>"
  429. "<INPUT TYPE=TEXT NAME=nick2></TD></TR>n", add2);
  430. fprintf(w, "<TR><TD></TD><TD>"
  431. "<INPUT TYPE=SUBMIT NAME=import VALUE="%s"></TD></TR>",
  432. submit);
  433. fprintf(w, "</TABLE></TD></TR></TABLE>n");
  434. }