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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > Telnet服务器 > 查看源码
bbslib.c
资源名称：3.0-20000220-SNAP.tar.gz　[点击查看]
上传用户：minyiyu
上传日期：2018-12-24
资源大小：864k
文件大小：21k
源码类别：

Telnet服务器

开发平台：

Unix_Linux

bbslib.c：源码内容
  1. #if defined( LINUX )
  2. #include "innbbsconf.h"
  3. #include "bbslib.h"
  4. #include <varargs.h>
  5. #else
  6. #include <varargs.h>
  7. #include "innbbsconf.h"
  8. #include "bbslib.h"
  9. #endif
  11. #include <netdb.h>
  13. char    INNBBSCONF[MAXPATHLEN];
  14. char    INNDHOME[MAXPATHLEN];
  15. char    HISTORY[MAXPATHLEN];
  16. char    LOGFILE[MAXPATHLEN];
  17. char    MYBBSID[MAXPATHLEN];
  18. char    ECHOMAIL[MAXPATHLEN];
  19. char    BBSFEEDS[MAXPATHLEN];
  20. char    LOCALDAEMON[MAXPATHLEN];
  21. char    FILTERCTL[MAXPATHLEN];
  23. int     His_Maint_Min = HIS_MAINT_MIN;
  24. int     His_Maint_Hour = HIS_MAINT_HOUR;
  25. int     Expiredays = EXPIREDAYS;
  27. nodelist_t *NODELIST = NULL, **NODELIST_BYNODE = NULL;
  28. newsfeeds_t *NEWSFEEDS = NULL, **NEWSFEEDS_BYBOARD = NULL;
  29. #if  defined(FILTER) && defined(WITH_ECHOMAIL)
  30. filter_t *FILTERLIST = NULL;
  31. static char *FILTER_BUF;
  32. int     FILTERCOUNT;
  33. #endif
  35. static char *NODELIST_BUF, *NEWSFEEDS_BUF;
  36. int     NFCOUNT, NLCOUNT;
  37. int     LOCALNODELIST = 0, NONENEWSFEEDS = 0;
  38. #ifndef _PATH_BBSHOME
  39. #define _PATH_BBSHOME "/u/staff/bbsroot/csie_util/bntpd/home"
  40. #endif
  42. char    BBSHOME[] = _PATH_BBSHOME;
  43. static FILE *bbslogfp;
  45. static int
  46.         verboseFlag = 0;
  48. static char *
  49.         verboseFilename = NULL;
  50. static char verbosename[MAXPATHLEN];
  51. verboseon(filename)
  52. char   *filename;
  53. {
  54. verboseFlag = 1;
  55. if (filename != NULL) {
  56. if (strchr(filename, '/') == NULL) {
  57. sprintf(verbosename, "%s/innd/%s", BBSHOME, filename);
  58. filename = verbosename;
  59. }
  60. }
  61. verboseFilename = filename;
  62. }
  63. verboseoff()
  64. {
  65. verboseFlag = 0;
  66. }
  67. setverboseon()
  68. {
  69. verboseFlag = 1;
  70. }
  71. isverboselog()
  72. {
  73. return verboseFlag;
  74. }
  75. setverboseoff()
  76. {
  77. verboseoff();
  78. if (bbslogfp != NULL) {
  79. fclose(bbslogfp);
  80. bbslogfp = NULL;
  81. }
  82. }
  83. verboselog(va_alist)
  84. va_dcl
  85. {
  86. va_list ap;
  87. register char *fmt;
  88. char    datebuf[40];
  89. time_t  now;
  90. if (verboseFlag == 0)
  91. return;
  93. va_start(ap);
  95. time(&now);
  96. strftime(datebuf, sizeof(datebuf), "%b %d %X ", localtime(&now));
  98. if (bbslogfp == NULL) {
  99. if (verboseFilename != NULL)
  100. bbslogfp = fopen(verboseFilename, "a");
  101. else
  102. bbslogfp = fdopen(1, "a");
  103. }
  104. if (bbslogfp == NULL) {
  105. va_end(ap);
  106. return;
  107. }
  108. fmt = va_arg(ap, char *);
  109. fprintf(bbslogfp, "%s[%d] ", datebuf, getpid());
  110. vfprintf(bbslogfp, fmt, ap);
  111. fflush(bbslogfp);
  112. va_end(ap);
  113. }
  114. #ifdef PalmBBS
  115. xbbslog(va_alist)
  116. #else
  117. bbslog(va_alist)
  118. #endif
  119. va_dcl
  120. {
  121. va_list ap;
  122. register char *fmt;
  123. char    datebuf[40];
  124. time_t  now;
  125. va_start(ap);
  127. time(&now);
  128. strftime(datebuf, sizeof(datebuf), "%b %d %X ", localtime(&now));
  130. if (bbslogfp == NULL) {
  131. bbslogfp = fopen(LOGFILE, "a");
  132. }
  133. if (bbslogfp == NULL) {
  134. va_end(ap);
  135. return;
  136. }
  137. fmt = va_arg(ap, char *);
  138. fprintf(bbslogfp, "%s[%d] ", datebuf, getpid());
  139. vfprintf(bbslogfp, fmt, ap);
  140. fflush(bbslogfp);
  141. va_end(ap);
  142. }
  143. initial_bbs(outgoing)
  144. char   *outgoing;
  145. {
  146. FILE   *FN;
  147. struct stat st;
  148. int     fd, i;
  149. char   *bbsnameptr = NULL;
  150. /* reopen bbslog */
  151. if (bbslogfp != NULL) {
  152. fclose(bbslogfp);
  153. bbslogfp = NULL;
  154. }
  155. #ifdef WITH_ECHOMAIL
  156. init_echomailfp();
  157. init_bbsfeedsfp();
  158. #endif
  160. LOCALNODELIST = 0, NONENEWSFEEDS = 0;
  161. sprintf(INNDHOME, "%s/innd", BBSHOME);
  162. sprintf(HISTORY, "%s/history", INNDHOME);
  163. sprintf(LOGFILE, "%s/bbslog", INNDHOME);
  164. sprintf(ECHOMAIL, "%s/echomail.log", BBSHOME);
  165. sprintf(LOCALDAEMON, "%s/.innbbsd", INNDHOME);
  166. sprintf(INNBBSCONF, "%s/innbbs.conf", INNDHOME);
  167. sprintf(BBSFEEDS, "%s/bbsfeeds.log", INNDHOME);
  169. #if  defined(FILTER) && defined(WITH_ECHOMAIL)
  170. sprintf(FILTERCTL, "%s/filter.ctl", INNDHOME);
  171. #endif
  173. if (isfile(INNBBSCONF)) {
  174. FILE   *conf;
  175. char    buffer[MAXPATHLEN];
  176. conf = fopen(INNBBSCONF, "r");
  177. if (conf != NULL) {
  178. while (fgets(buffer, sizeof buffer, conf) != NULL) {
  179. char   *ptr, *front = NULL, *value = NULL,
  180.        *value2 = NULL, *value3 = NULL;
  181. if (buffer[0] == '#' || buffer[0] == 'n')
  182. continue;
  183. for (front = buffer; *front && isspace(*front); front++);
  184. for (ptr = front; *ptr && !isspace(*ptr); ptr++);
  185. if (*ptr == '')
  186. continue;
  187. *ptr++ = '';
  188. for (; *ptr && isspace(*ptr); ptr++);
  189. if (*ptr == '')
  190. continue;
  191. value = ptr++;
  192. for (; *ptr && !isspace(*ptr); ptr++);
  193. if (*ptr) {
  194. *ptr++ = '';
  195. for (; *ptr && isspace(*ptr); ptr++);
  196. value2 = ptr++;
  197. for (; *ptr && !isspace(*ptr); ptr++);
  198. if (*ptr) {
  199. *ptr++ = '';
  200. for (; *ptr && isspace(*ptr); ptr++);
  201. value3 = ptr++;
  202. for (; *ptr && !isspace(*ptr); ptr++);
  203. if (*ptr) {
  204. *ptr++ = '';
  205. }
  206. }
  207. }
  208. if (strcasecmp(front, "expiredays") == 0) {
  209. Expiredays = atoi(value);
  210. if (Expiredays < 0) {
  211. Expiredays = EXPIREDAYS;
  212. }
  213. } else if (strcasecmp(front, "expiretime") == 0) {
  214. ptr = strchr(value, ':');
  215. if (ptr == NULL) {
  216. fprintf(stderr, "Syntax error in innbbs.confn");
  217. } else {
  218. *ptr++ = '';
  219. His_Maint_Hour = atoi(value);
  220. His_Maint_Min = atoi(ptr);
  221. if (His_Maint_Hour < 0)
  222. His_Maint_Hour = HIS_MAINT_HOUR;
  223. if (His_Maint_Min < 0)
  224. His_Maint_Min = HIS_MAINT_MIN;
  225. }
  226. } else if (strcasecmp(front, "newsfeeds") == 0) {
  227. if (strcmp(value, "none") == 0)
  228. NONENEWSFEEDS = 1;
  229. } else if (strcasecmp(front, "nodelist") == 0) {
  230. if (strcmp(value, "local") == 0)
  231. LOCALNODELIST = 1;
  232. } /* else if (
  233.  * strcasecmp(front,"newsfeeds") ==
  234.  * 0) { printf("newsfeeds %sn",
  235.  * value); } else if (
  236.  * strcasecmp(front,"nodelist") == 0)
  237.  * { printf("nodelist %sn", value);
  238.  * } else if (
  239.  * strcasecmp(front,"bbsname") == 0)
  240.  * { printf("bbsname %sn", value); } */
  241. }
  242. fclose(conf);
  243. }
  244. }
  245. #ifdef WITH_ECHOMAIL
  246. bbsnameptr = (char *) fileglue("%s/bbsname.bbs", INNDHOME);
  247. if ((FN = fopen(bbsnameptr, "r")) == NULL) {
  248. fprintf(stderr, "can't open file %sn", bbsnameptr);
  249. return 0;
  250. }
  251. while (fscanf(FN, "%s", MYBBSID) != EOF);
  252. fclose(FN);
  253. if (!isdir(fileglue("%s/out.going", BBSHOME))) {
  254. mkdir((char *) fileglue("%s/out.going", BBSHOME), 0750);
  255. }
  256. if (NONENEWSFEEDS == 0) {
  257. #if  defined(FILTER) && defined(WITH_ECHOMAIL)
  258. readfilterfile(INNDHOME);
  259. #endif
  260. readnffile(INNDHOME);
  261. }
  262. #ifdef USE_NCM_PATCH
  263. readNCMfile(INNDHOME);
  264. #endif
  265. if (LOCALNODELIST == 0) {
  266. if (readnlfile(INNDHOME, outgoing) != 0)
  267. return 0;
  268. }
  269. #endif
  270. return 1;
  271. }
  273. static int
  274. nf_byboardcmp(a, b)
  275. newsfeeds_t **a, **b;
  276. {
  277. /*
  278.    if (!a || !*a || !(*a)->board) return -1;
  279.    if (!b || !*b || !(*b)->board) return 1;
  280. */
  281. return strcasecmp((*a)->board, (*b)->board);
  282. }
  284. static int
  285. nfcmp(a, b)
  286. newsfeeds_t *a, *b;
  287. {
  288. /*
  289.    if (!a || !a->newsgroups) return -1;
  290.    if (!b || !b->newsgroups) return 1;
  291. */
  292. return strcasecmp(a->newsgroups, b->newsgroups);
  293. }
  295. static int
  296. nlcmp(a, b)
  297. nodelist_t *a, *b;
  298. {
  299. /*
  300.    if (!a || !a->host) return -1;
  301.    if (!b || !b->host) return 1;
  302. */
  303. return strcasecmp(a->host, b->host);
  304. }
  306. static int
  307. nl_bynodecmp(a, b)
  308. nodelist_t **a, **b;
  309. {
  310. /*
  311.    if (!a || !*a || !(*a)->node) return -1;
  312.    if (!b || !*b || !(*b)->node) return 1;
  313. */
  314. return strcasecmp((*a)->node, (*b)->node);
  315. }
  316. /* read in newsfeeds.bbs and nodelist.bbs */
  317. readnlfile(inndhome, outgoing)
  318. char   *inndhome;
  319. char   *outgoing;
  320. {
  321. FILE   *fp;
  322. char    buff[1024];
  323. struct stat st;
  324. int     i, count, j;
  325. char   *ptr, *nodelistptr;
  326. static  lastcount = 0;
  327. sprintf(buff, "%s/nodelist.bbs", inndhome);
  328. fp = fopen(buff, "r");
  329. if (fp == NULL) {
  330. fprintf(stderr, "open fail %s", buff);
  331. return -1;
  332. }
  333. if (fstat(fileno(fp), &st) != 0) {
  334. fprintf(stderr, "stat fail %s", buff);
  335. return -1;
  336. }
  337. if (NODELIST_BUF == NULL) {
  338. NODELIST_BUF = (char *) mymalloc(st.st_size + 1);
  339. } else {
  340. NODELIST_BUF = (char *) myrealloc(NODELIST_BUF, st.st_size + 1);
  341. }
  342. i = 0, count = 0;
  343. *NODELIST_BUF = '';
  344. while (fgets(buff, sizeof buff, fp) != NULL) {
  345. if (buff[0] == '#')
  346. continue;
  347. if (buff[0] == 'n')
  348. continue;
  349. strcpy(NODELIST_BUF + i, buff);
  350. i += strlen(buff);
  351. count++;
  352. }
  353. fclose(fp);
  354. if (NODELIST == NULL) {
  355. NODELIST = (nodelist_t *) mymalloc(sizeof(nodelist_t) * (count + 1));
  356. NODELIST_BYNODE = (nodelist_t **) mymalloc(sizeof(nodelist_t *) * (count + 1));
  357. } else {
  358. NODELIST = (nodelist_t *) myrealloc(NODELIST, sizeof(nodelist_t) * (count + 1));
  359. NODELIST_BYNODE = (nodelist_t **) myrealloc(NODELIST_BYNODE, sizeof(nodelist_t *) * (count + 1));
  360. }
  361. for (i = lastcount; i < count; i++) {
  362. NODELIST[i].feedfp = NULL;
  363. }
  364. lastcount = count;
  365. NLCOUNT = 0;
  366. for (ptr = NODELIST_BUF; (nodelistptr = (char *) strchr(ptr, 'n')) != NULL; ptr = nodelistptr + 1, NLCOUNT++) {
  367. char   *nptr, *bptr, *pptr, *tptr;
  368. *nodelistptr = '';
  369. NODELIST[NLCOUNT].host = "";
  370. NODELIST[NLCOUNT].exclusion = "";
  371. NODELIST[NLCOUNT].node = "";
  372. NODELIST[NLCOUNT].protocol = "IHAVE(119)";
  373. NODELIST[NLCOUNT].comments = "";
  374. NODELIST_BYNODE[NLCOUNT] = NODELIST + NLCOUNT;
  375. for (nptr = ptr; *nptr && isspace(*nptr);)
  376. nptr++;
  377. if (*nptr == '') {
  378. bbslog("nodelist.bbs %d entry read errorn", NLCOUNT);
  379. return -1;
  380. }
  381. /* NODELIST[NLCOUNT].id = nptr; */
  382. NODELIST[NLCOUNT].node = nptr;
  383. for (nptr++; *nptr && !isspace(*nptr);)
  384. nptr++;
  385. if (*nptr == '') {
  386. bbslog("nodelist.bbs node %d entry read errorn", NLCOUNT);
  387. return -1;
  388. }
  389. *nptr = '';
  390. if ((tptr = strchr(NODELIST[NLCOUNT].node, '/'))) {
  391. *tptr = '';
  392. NODELIST[NLCOUNT].exclusion = tptr + 1;
  393. } else {
  394. NODELIST[NLCOUNT].exclusion = "";
  395. }
  396. for (nptr++; *nptr && isspace(*nptr);)
  397. nptr++;
  398. if (*nptr == '')
  399. continue;
  400. if (*nptr == '+' || *nptr == '-') {
  401. NODELIST[NLCOUNT].feedtype = *nptr;
  402. if (NODELIST[NLCOUNT].feedfp != NULL) {
  403. fclose(NODELIST[NLCOUNT].feedfp);
  404. }
  405. if (NODELIST[NLCOUNT].feedtype == '+')
  406. if (outgoing != NULL) {
  407. NODELIST[NLCOUNT].feedfp = fopen((char *) fileglue("%s/out.going/%s.%s", BBSHOME, NODELIST[NLCOUNT].node, outgoing), "a");
  408. }
  409. nptr++;
  410. } else {
  411. NODELIST[NLCOUNT].feedtype = ' ';
  412. }
  413. NODELIST[NLCOUNT].host = nptr;
  414. for (nptr++; *nptr && !isspace(*nptr);)
  415. nptr++;
  416. if (*nptr == '') {
  417. continue;
  418. }
  419. *nptr = '';
  420. for (nptr++; *nptr && isspace(*nptr);)
  421. nptr++;
  422. if (*nptr == '')
  423. continue;
  424. NODELIST[NLCOUNT].protocol = nptr;
  425. for (nptr++; *nptr && !isspace(*nptr);)
  426. nptr++;
  427. if (*nptr == '')
  428. continue;
  429. *nptr = '';
  430. for (nptr++; *nptr && strchr(" trn", *nptr);)
  431. nptr++;
  432. if (*nptr == '')
  433. continue;
  434. NODELIST[NLCOUNT].comments = nptr;
  435. }
  436. qsort(NODELIST, NLCOUNT, sizeof(nodelist_t), nlcmp);
  437. qsort(NODELIST_BYNODE, NLCOUNT, sizeof(nodelist_t *), nl_bynodecmp);
  438. return 0;
  439. }
  440. #if  defined(FILTER) && defined(WITH_ECHOMAIL)
  441. readfilterfile(inndhome)
  442. char   *inndhome;
  443. {
  445. FILE   *fp;
  446. char    buff[1024];
  447. struct stat st;
  448. int     i, count;
  449. char   *ptr, *filterptr;
  450. sprintf(buff, "%s/filter.ctl", inndhome);
  451. fp = fopen(buff, "r");
  452. if (fp == NULL) {
  453. fprintf(stderr, "open fail %s", buff);
  454. return -1;
  455. }
  456. if (fstat(fileno(fp), &st) != 0) {
  457. fprintf(stderr, "stat fail %s", buff);
  458. return -1;
  459. }
  460. if (FILTER_BUF == NULL) {
  461. FILTER_BUF = (char *) mymalloc(st.st_size + 1);
  462. } else {
  463. FILTER_BUF = (char *) myrealloc(FILTER_BUF, st.st_size + 1);
  464. }
  465. *FILTER_BUF = '';
  466. i = 0, count = 0;
  467. while (fgets(buff, sizeof buff, fp) != NULL) {
  468. if (buff[0] == '#')
  469. continue;
  470. if (buff[0] == 'n')
  471. continue;
  472. strcpy(FILTER_BUF + i, buff);
  473. i += strlen(buff);
  474. count++;
  475. }
  476. fclose(fp);
  477. if (FILTERLIST == NULL) {
  478. FILTERLIST = (filter_t *) mymalloc(sizeof(filter_t) * (count + 1));
  479. } else {
  480. FILTERLIST = (filter_t *) myrealloc(FILTERLIST, sizeof(filter_t) * (count + 1));
  481. }
  482. FILTERCOUNT = 0;
  483. for (ptr = FILTER_BUF; (filterptr = (char *) strchr(ptr, 'n')) != NULL; ptr = filterptr + 1, FILTERCOUNT++) {
  484. char   *nptr, *bptr, *pptr;
  485. *filterptr = '';
  486. FILTERLIST[FILTERCOUNT].group = "";
  487. FILTERLIST[FILTERCOUNT].rcmdfilter = "";
  488. FILTERLIST[FILTERCOUNT].scmdfilter = "";
  489. for (nptr = ptr; *nptr && isspace(*nptr);)
  490. nptr++;
  491. if (*nptr == '')
  492. continue;
  493. FILTERLIST[FILTERCOUNT].group = nptr;
  494. nptr = strchr(nptr + 1, ':');
  495. if (*nptr == '')
  496. continue;
  497. *nptr = '';
  498. for (nptr = nptr + 1; *nptr && isspace(*nptr);)
  499. nptr++;
  500. FILTERLIST[FILTERCOUNT].rcmdfilter = nptr;
  501. nptr = strchr(nptr, ':');
  502. if (*nptr == '')
  503. continue;
  504. *nptr = '';
  505. for (nptr = nptr + 1; *nptr && isspace(*nptr);)
  506. nptr++;
  507. FILTERLIST[FILTERCOUNT].scmdfilter = nptr;
  508. }
  509. }
  511. filter_t *
  512. search_filter(group)
  513. char   *group;
  514. {
  515. int     i;
  516. for (i = 0; i < FILTERCOUNT; ++i) {
  517. if (filtermatch(0, group, FILTERLIST[i].group))
  518. return FILTERLIST + i;
  519. }
  520. return NULL;
  521. }
  522. #endif
  524. readnffile(inndhome)
  525. char   *inndhome;
  526. {
  527. FILE   *fp;
  528. char    buff[1024];
  529. struct stat st;
  530. int     i, count;
  531. char   *ptr, *newsfeedsptr;
  532. sprintf(buff, "%s/newsfeeds.bbs", inndhome);
  533. fp = fopen(buff, "r");
  534. if (fp == NULL) {
  535. fprintf(stderr, "open fail %s", buff);
  536. return -1;
  537. }
  538. if (fstat(fileno(fp), &st) != 0) {
  539. fprintf(stderr, "stat fail %s", buff);
  540. return -1;
  541. }
  542. if (NEWSFEEDS_BUF == NULL) {
  543. NEWSFEEDS_BUF = (char *) mymalloc(st.st_size + 1);
  544. } else {
  545. NEWSFEEDS_BUF = (char *) myrealloc(NEWSFEEDS_BUF, st.st_size + 1);
  546. }
  547. *NEWSFEEDS_BUF = '';
  548. i = 0, count = 0;
  549. while (fgets(buff, sizeof buff, fp) != NULL) {
  550. if (buff[0] == '#')
  551. continue;
  552. if (buff[0] == 'n')
  553. continue;
  554. strcpy(NEWSFEEDS_BUF + i, buff);
  555. i += strlen(buff);
  556. count++;
  557. }
  558. fclose(fp);
  559. if (NEWSFEEDS == NULL) {
  560. NEWSFEEDS = (newsfeeds_t *) mymalloc(sizeof(newsfeeds_t) * (count + 1));
  561. NEWSFEEDS_BYBOARD = (newsfeeds_t **) mymalloc(sizeof(newsfeeds_t *) * (count + 1));
  562. } else {
  563. NEWSFEEDS = (newsfeeds_t *) myrealloc(NEWSFEEDS, sizeof(newsfeeds_t) * (count + 1));
  564. NEWSFEEDS_BYBOARD = (newsfeeds_t **) myrealloc(NEWSFEEDS_BYBOARD, sizeof(newsfeeds_t *) * (count + 1));
  565. }
  566. NFCOUNT = 0;
  567. for (ptr = NEWSFEEDS_BUF; (newsfeedsptr = (char *) strchr(ptr, 'n')) != NULL; ptr = newsfeedsptr + 1, NFCOUNT++) {
  568. char   *nptr, *bptr, *pptr;
  569. *newsfeedsptr = '';
  570. NEWSFEEDS[NFCOUNT].newsgroups = "";
  571. NEWSFEEDS[NFCOUNT].board = "";
  572. NEWSFEEDS[NFCOUNT].path = NULL;
  573. NEWSFEEDS_BYBOARD[NFCOUNT] = NEWSFEEDS + NFCOUNT;
  574. for (nptr = ptr; *nptr && isspace(*nptr);)
  575. nptr++;
  576. if (*nptr == '')
  577. continue;
  578. NEWSFEEDS[NFCOUNT].newsgroups = nptr;
  579. for (nptr++; *nptr && !isspace(*nptr);)
  580. nptr++;
  581. if (*nptr == '')
  582. continue;
  583. *nptr = '';
  584. for (nptr++; *nptr && isspace(*nptr);)
  585. nptr++;
  586. if (*nptr == '')
  587. continue;
  588. NEWSFEEDS[NFCOUNT].board = nptr;
  589. for (nptr++; *nptr && !isspace(*nptr);)
  590. nptr++;
  591. if (*nptr == '')
  592. continue;
  593. *nptr = '';
  594. for (nptr++; *nptr && isspace(*nptr);)
  595. nptr++;
  596. if (*nptr == '')
  597. continue;
  598. NEWSFEEDS[NFCOUNT].path = nptr;
  599. for (nptr++; *nptr && !strchr("rn", *nptr);)
  600. nptr++;
  601. /* if (*nptr == '') continue; */
  602. *nptr = '';
  603. }
  606. #if  defined(FILTER) && defined(WITH_ECHOMAIL)
  607. for (i = 0; i < NFCOUNT; i++) {
  608. newsfeeds_t *nfptr;
  609. filter_t *fptr;
  610. char   *ngptr, *ptr;
  611. int     found;
  612. nfptr = NEWSFEEDS + i;
  613. for (found = 0, ngptr = nfptr->newsgroups, ptr = strchr(ngptr, ',');
  614. ngptr && *ngptr && !found; ptr = strchr(ngptr, ',')) {
  615. if (ptr)
  616. *ptr = '';
  617. fptr = (filter_t *) search_filter(ngptr);
  618. if (fptr) {
  619. nfptr->rcmdfilter = fptr->rcmdfilter;
  620. nfptr->scmdfilter = fptr->scmdfilter;
  621. nfptr->rfilter = (FuncPtr) search_filtercmd(fptr->rcmdfilter);
  622. nfptr->sfilter = (FuncPtr) search_filtercmd(fptr->scmdfilter);
  623. found = 1;
  624. } else {
  625. nfptr->rcmdfilter = nfptr->scmdfilter = NULL;
  626. nfptr->rfilter = nfptr->sfilter = NULL;
  627. }
  628. if (ptr) {
  629. *ptr = ',';
  630. ngptr = ptr + 1;
  631. } else {
  632. break;
  633. }
  634. }
  635. }
  636. #endif
  637. qsort(NEWSFEEDS, NFCOUNT, sizeof(newsfeeds_t), nfcmp);
  638. qsort(NEWSFEEDS_BYBOARD, NFCOUNT, sizeof(newsfeeds_t *), nf_byboardcmp);
  639. }
  641. newsfeeds_t *
  642. search_board(board)
  643. char   *board;
  644. {
  645. newsfeeds_t nft, *nftptr, **find;
  646. if (NONENEWSFEEDS)
  647. return NULL;
  648. nft.board = board;
  649. nftptr = &nft;
  650. find = (newsfeeds_t **) bsearch((char *) &nftptr, NEWSFEEDS_BYBOARD, NFCOUNT, sizeof(newsfeeds_t *), nf_byboardcmp);
  651. if (find != NULL)
  652. return *find;
  653. return NULL;
  654. }
  656. nodelist_t *
  657. search_nodelist_bynode(node)
  658. char   *node;
  659. {
  660. nodelist_t nlt, *nltptr, **find;
  661. if (LOCALNODELIST)
  662. return NULL;
  663. nlt.node = node;
  664. nltptr = &nlt;
  665. find = (nodelist_t **) bsearch((char *) &nltptr, NODELIST_BYNODE, NLCOUNT, sizeof(nodelist_t *), nl_bynodecmp);
  666. if (find != NULL)
  667. return *find;
  668. return NULL;
  669. }
  670. /* edwardc.990506 rewrite search_nodelist */
  671. nodelist_t *
  672. search_nodelist(site, identuser)
  673. char   *site;
  674. char   *identuser;
  675. {
  676. nodelist_t *find;
  677. struct hostent *hpn, *hpc;
  678. unsigned addr;
  679. char    client[512], server[512];
  680. int     i;
  681. #ifndef SYSV
  682. if (inet_aton(site, (struct in_addr *) & addr))
  683. strcpy(client, site);
  684. else {
  685. hpc = gethostbyname(site);
  686. strcpy(client, hpc->h_name);
  687. }
  688. #else
  689. hpc = (struct hostent *) gethostbyname(site);
  690. strcpy(client, hpc->h_name);
  691. #endif
  693. for (i = 0; i < NLCOUNT; i++) {
  694. find = &NODELIST[i];
  695. #ifndef SYSV
  696. if (inet_aton(NODELIST[i].host, (struct in_addr *) & addr)) {
  697. hpn = gethostbyaddr((char *) &addr, 4, 2);
  698. strcpy(server, hpn ? hpn->h_name : NODELIST[i].host);
  699. } else {
  700. hpn = gethostbyname(NODELIST[i].host);
  701. strcpy(server, hpn->h_name);
  702. }
  703. #else
  704. hpn = (struct hostent *) gethostbyname(NODELIST[i].host);
  705. strcpy(server, hpn->h_name);
  706. #endif
  707. if (!strcmp(client, server))
  708. return find;
  709. }
  710. return NULL;
  711. }
  713. newsfeeds_t *
  714. search_group(newsgroup)
  715. char   *newsgroup;
  716. {
  717. newsfeeds_t nft, *find;
  718. if (NONENEWSFEEDS)
  719. return NULL;
  720. nft.newsgroups = newsgroup;
  721. find = (newsfeeds_t *) bsearch((char *) &nft, NEWSFEEDS, NFCOUNT, sizeof(newsfeeds_t), nfcmp);
  722. return find;
  723. }
  725. char   *
  726. ascii_date(now)
  727. time_t  now;
  728. {
  729. static char datebuf[40];
  730. /*
  731.  * time_t now; time(&now);
  732.  */
  733. strftime(datebuf, sizeof(datebuf), "%d %b %Y %X GMT", gmtime(&now));
  734. return datebuf;
  735. }
  737. char   *
  738. restrdup(ptr, string)
  739. char   *ptr;
  740. char   *string;
  741. {
  742. int     len;
  743. if (string == NULL) {
  744. if (ptr != NULL)
  745. *ptr = '';
  746. return ptr;
  747. }
  748. len = strlen(string) + 1;
  749. if (ptr != NULL) {
  750. ptr = (char *) myrealloc(ptr, len);
  751. } else
  752. ptr = (char *) mymalloc(len);
  753. strcpy(ptr, string);
  754. return ptr;
  755. }
  759. void   *
  760. mymalloc(size)
  761. int     size;
  762. {
  763. char   *ptr = (char *) malloc(size);
  764. if (ptr == NULL) {
  765. fprintf(stderr, "cant allocate memoryn");
  766. syslog(LOG_ERR, "cant allocate memory %m");
  767. exit(1);
  768. }
  769. return ptr;
  770. }
  772. void   *
  773. myrealloc(optr, size)
  774. void   *optr;
  775. int     size;
  776. {
  777. char   *ptr = (char *) realloc(optr, size);
  778. if (ptr == NULL) {
  779. fprintf(stderr, "cant allocate memoryn");
  780. syslog(LOG_ERR, "cant allocate memory %m");
  781. exit(1);
  782. }
  783. return ptr;
  784. }
  785. testandmkdir(dir)
  786. char   *dir;
  787. {
  788. if (!isdir(dir)) {
  789. char    path[MAXPATHLEN + 12];
  790. sprintf(path, "mkdir -p %s", dir);
  791. system(path);
  792. }
  793. }
  795. static char splitbuf[2048];
  796. static char joinbuf[1024];
  797. #define MAXTOK 50
  798. static char *Splitptr[MAXTOK];
  799. char  **
  800. split(line, pat)
  801. char   *line, *pat;
  802. {
  803. char   *p;
  804. int     i;
  805. for (i = 0; i < MAXTOK; ++i)
  806. Splitptr[i] = NULL;
  807. strncpy(splitbuf, line, sizeof splitbuf - 1);
  808. /* printf("%d %dn",strlen(line),strlen(splitbuf)); */
  809. splitbuf[sizeof splitbuf - 1] = '';
  810. for (i = 0, p = splitbuf; *p && i < MAXTOK - 1;) {
  811. for (Splitptr[i++] = p; *p && !strchr(pat, *p); p++);
  812. if (*p == '')
  813. break;
  814. for (*p++ = ''; *p && strchr(pat, *p); p++);
  815. }
  816. return Splitptr;
  817. }
  819. char  **
  820. BNGsplit(line)
  821. char   *line;
  822. {
  823. char  **ptr = split(line, ",");
  824. newsfeeds_t *nf1, *nf2;
  825. char   *n11, *n12, *n21, *n22;
  826. int     i, j;
  827. for (i = 0; ptr[i] != NULL; i++) {
  828. nf1 = (newsfeeds_t *) search_group(ptr[i]);
  829. for (j = i + 1; ptr[j] != NULL; j++) {
  830. if (strcmp(ptr[i], ptr[j]) == 0) {
  831. *ptr[j] = '';
  832. continue;
  833. }
  834. nf2 = (newsfeeds_t *) search_group(ptr[j]);
  835. if (nf1 && nf2) {
  836. if (strcmp(nf1->board, nf2->board) == 0) {
  837. *ptr[j] = '';
  838. continue;
  839. }
  840. for (n11 = nf1->board, n12 = (char *) strchr(n11, ',');
  841. n11 && *n11; n12 = (char *) strchr(n11, ',')) {
  842. if (n12)
  843. *n12 = '';
  844. for (n21 = nf2->board, n22 = (char *) strchr(n21, ',');
  845. n21 && *n21; n22 = (char *) strchr(n21, ',')) {
  846. if (n22)
  847. *n22 = '';
  848. if (strcmp(n11, n21) == 0) {
  849. *n21 = 't';
  850. }
  851. if (n22) {
  852. *n22 = ',';
  853. n21 = n22 + 1;
  854. } else
  855. break;
  856. }
  857. if (n12) {
  858. *n12 = ',';
  859. n11 = n12 + 1;
  860. } else
  861. break;
  862. }
  863. }
  864. }
  865. }
  866. return ptr;
  867. }
  869. char  **
  870. ssplit(line, pat)
  871. char   *line, *pat;
  872. {
  873. char   *p;
  874. int     i;
  875. for (i = 0; i < MAXTOK; ++i)
  876. Splitptr[i] = NULL;
  877. strncpy(splitbuf, line, 1024);
  878. for (i = 0, p = splitbuf; *p && i < MAXTOK;) {
  879. for (Splitptr[i++] = p; *p && !strchr(pat, *p); p++);
  880. if (*p == '')
  881. break;
  882. *p = 0;
  883. p++;
  884. /*         for (*p=''; strchr(pat,*p);p++);*/
  885. }
  886. return Splitptr;
  887. }
  889. char   *
  890. join(lineptr, pat, num)
  891. char  **lineptr, *pat;
  892. int     num;
  893. {
  894. int     i;
  895. joinbuf[0] = '';
  896. if (lineptr[0] != NULL)
  897. strncpy(joinbuf, lineptr[0], 1024);
  898. else {
  899. joinbuf[0] = '';
  900. return joinbuf;
  901. }
  902. for (i = 1; i < num; i++) {
  903. strcat(joinbuf, pat);
  904. if (lineptr[i] != NULL)
  905. strcat(joinbuf, lineptr[i]);
  906. else
  907. break;
  908. }
  909. return joinbuf;
  910. }
  912. char   *
  913. parselocaltime(date_buf)
  914. char   *date_buf;
  915. {
  916. static char buffer[40];
  917. char    week[30], mon[30], day[30], time[30], year[30];
  918. /* add null to prevent from long string */
  919. if (strlen(date_buf) > 30)
  920. date_buf[30] = '';
  921. sscanf(date_buf, "%s %s %s %s %s", week, mon, day, time, year);
  922. sprintf(buffer, "%.4s %.4s %.4s %.10s", day, mon, year, time);
  923. return buffer;
  924. }
  927. #ifdef BBSLIB
  928. main()
  929. {
  930. initial_bbs("feed");
  931. printf("%sn", ascii_date());
  932. }
  933. #endif