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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > Web服务器 > 查看源码
gopher_proxy.c
资源名称：phttpd-1.10.04.tar.gz　[点击查看]
上传用户：ladybrid91
上传日期：2007-01-04
资源大小：287k
文件大小：11k
源码类别：

Web服务器

开发平台：

Unix_Linux

gopher_proxy.c：源码内容
  1. /*
  2. ** gopher_proxy.c
  3. **
  4. ** Copyright (c) 1995 Peter Eriksson <pen@signum.se>
  5. **
  6. ** This program is free software; you can redistribute it and/or modify
  7. ** it under the terms of the GNU General Public License as published by
  8. ** the Free Software Foundation; either version 2 of the License, or
  9. ** (at your option) any later version.
  10. **
  11. ** This program is distributed in the hope that it will be useful,
  12. ** but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. ** GNU General Public License for more details.
  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. */
  20. #include <stdio.h>
  21. #include <stdlib.h>
  22. #include <string.h>
  23. #include <alloca.h>
  25. #include "phttpd.h"
  28. int pm_init(const char **argv)
  29. {
  30.     const char *name = argv[0];
  31.     
  32.     if (debug > 1)
  33. fprintf(stderr, "gopher_proxy: pm_init("%s")n", name);
  35.     return 0;
  36. }
  38. void pm_exit(void)
  39. {
  40.     if (debug > 1)
  41. fprintf(stderr, "gopher_proxy: pm_exit()n");
  42. }
  45. static int get_rq(char *in_url,
  46.   char **host,
  47.   char **port,
  48.   char **out_url)
  49. {
  50.     char *cp;
  52.     
  53.     if (strncmp(in_url, "gopher://", 9) != 0)
  54. return -1;
  56.     cp = in_url+9;
  57.     *host = cp;
  58.     while (*cp && !(*cp == '/' || *cp == ':'))
  59. ++cp;
  61.     if (*cp == 0)
  62. return 1;
  64.     if (*cp == ':')
  65.     {
  66. *cp++ = '';
  67. *port = cp;
  69. while (*cp && *cp != '/')
  70.     ++cp;
  72. if (*cp == 0)
  73.     return 2;
  74.     }
  75.     
  76.     *cp++ = '';
  77.     *out_url = cp;
  79.     return 3;
  80. }
  83. void send_href(int fd,
  84.       char *prot,
  85.       char *host,
  86.       char *port,
  87.       char seltype,
  88.       char *selector,
  89.       char *label,
  90.       char *append)
  91. {
  92.     char seltag[2];
  93.     char buf[1024];
  95.     
  96.     seltag[0] = seltype,
  97.     seltag[1] = '';
  98.     
  99.     if (port && strcmp(prot, "gopher") == 0 &&
  100. strcmp(port, "70") == 0)
  101. port = NULL;
  102.     
  103.     fd_printf(fd, "<LI> <A HREF="%s://%s%s%s/%s%s">%s%s</A>n",
  104.       prot,
  105.       host ? host : "",
  106.       port ? ":" : "",
  107.       port ? port : "",
  108.       seltag, url_quote(selector, buf, sizeof(buf), "?", 0),
  109.       label,
  110.       append ? append : "");
  111. }
  114. void send_telnet(int fd,
  115.       char *prot,
  116.       char *host,
  117.       char *port,
  118.       char *selector,
  119.       char *label,
  120.       char *append)
  121. {
  122.     char buf[1024];
  124.     if (port && strcmp(prot, "telnet") == 0 &&
  125. strcmp(port, "23") == 0)
  126. port = NULL;
  127.     
  128.     fd_printf(fd, "<LI> <A HREF="%s://%s%s%s%s%s/">%s%s</A>n",
  129.       prot,
  130.       selector ? url_quote(selector, buf, sizeof(buf), "?", 0) : "",
  131.       selector ? "@" : "",
  132.       host ? host : "",
  133.       port ? ":" : "",
  134.       port ? port : "",
  135.       label,
  136.       append ? append : "");
  137. }
  139. int pm_request(struct connectioninfo *cip)
  140. {
  141.     struct httpinfo *hip;
  142.     char *tmp, *host, *port, *url, buf[1024];
  143.     int sock_fd, result, fd, tmpsize;
  146.     fd = cip->fd;
  147.     host = port = url = NULL;
  148.     
  149.     hip = cip->hip;
  150.      
  151.     if (debug > 1)
  152.     {
  153. fprintf(stderr, "gopher_proxy: pm_request()n");
  154. fprintf(stderr, "thip->method = %sn", hip->method);
  155. fprintf(stderr, "thip->url = %sn", hip->url);
  156.     }
  159.     tmpsize = strlen(hip->url)+1;
  160.     tmp = (char *) alloca(tmpsize);
  161.     s_strcpy(tmp, tmpsize, hip->url);
  162.     
  163.     if (get_rq(tmp, &host, &port, &url) < 0)
  164. goto Fail;
  166.     if (debug > 2)
  167. fprintf(stderr, "get_rq(), host=%s, port=%s, url=%sn",
  168. host ? host : "<null>",
  169. port ? port : "<null>",
  170. url ? url : "<null>");
  172. /* XXX should probably check if this is ourself we are connecting to... */
  173.     
  174.     sock_fd = fd_sconnect(host, port ? port : "70");
  175.     if (sock_fd < 0)
  176.     {
  177. if (debug > 2)
  178.     fprintf(stderr, "fd_sconnect("%s") failedn", host);
  179. goto Fail;
  180.     }
  182.     if (debug > 4)
  183. fprintf(stderr, "Gopher query: %sn", url+1);
  185.     result = 200;
  186.     if (hip->mip)
  187. http_sendheaders(fd, cip, result, NULL);
  189.     switch (url[0])
  190.     {
  191.       case '7':
  192. {
  193.     char **argv, *request, *full_url;
  194.     int i, fusize;
  196.     fusize = i = strlen(hip->url);
  197.     full_url = alloca(fusize);
  198.     s_strncpy(full_url, fusize, hip->url, i-1);
  199.     full_url[i-1] = '';
  200.     
  201.     if (debug > 4)
  202. fprintf(stderr, "Gopher query.n");
  204.     if (hip->request)
  205.     {
  206.            int reqsize = strlen(hip->request)+1;
  207. request = (char *) alloca(reqsize);
  208. s_strcpy(request, reqsize, hip->request);
  209.     }
  210.     else
  211. request = NULL;
  212.     
  213.     if (request == NULL ||
  214. *request == '' ||
  215. (argv = strsplit(request, '&', 2)) == NULL)
  216.     {
  217. fd_puts("Content-Type: text/htmlnn", fd);
  218. fd_puts("<HTML><HEAD>n", fd);
  219. fd_printf(fd, "<TITLE>Gopher Search of %s</TITLE>n",
  220.   full_url);
  221. fd_puts("</HEAD><BODY>n", fd);
  222. fd_printf(fd, "<H2 ALIGN=CENTER>Gopher Search of %s</H2>n",
  223.   full_url);
  224. fd_printf(fd, "<ISINDEX>n");
  225. fd_puts("</BODY></HTML>n", fd);
  226. break;
  227.     }
  229.     fd_puts(url+1, sock_fd);
  231.     fd_putc('t', sock_fd);
  232.     
  233.     for (i = 0; argv[i]; i++)
  234.     {
  235. fd_puts(argv[i], sock_fd);
  236. if (argv[i+1])
  237.     fd_putc(' ', sock_fd);
  238.     }
  240.     fd_putc('n', sock_fd);
  241.     fd_flush(sock_fd);
  242. }
  243.       case '':
  244.       case '1':
  245. if (url[0] != '7')
  246. {
  247.     if (debug > 4)
  248. fprintf(stderr, "Gopher menu.n");
  249.     
  250.     if (url[0])
  251. fd_printf(sock_fd, "%sn", url+1);
  252.     else
  253. fd_puts("n", sock_fd);
  254.     fd_flush(sock_fd);
  255. }
  257. fd_puts("Content-Type: text/htmlnn", fd);
  258. html_sysheader(fd, "H2", "Gopher Menu:");
  260. fd_puts("<OL>n", fd);
  261. while (fd_gets(buf, sizeof(buf), sock_fd))
  262. {
  263.     char *label, *selector, *host, *port, *extra;
  264.     
  265.     
  266.     label = buf+1;
  267.     host = port = NULL;
  268.     
  269.     selector = strchr(label, 't');
  270.     if (selector)
  271.     {
  272. *selector++ = '';
  274. host = strchr(selector, 't');
  275. if (host)
  276. {
  277.     *host++ = '';
  278.     
  279.     port = strchr(host, 't');
  280.     if (port)
  281.     {
  282. *port++ = '';
  284. extra = strchr(port, 't');
  285. if (extra)
  286.     *extra++ = '';
  287.     }
  288. }
  289.     }
  291.     switch (buf[0])
  292.     {
  293.       case '.':
  294. break;
  296.       case 'i':
  297. fd_printf(fd, "<LI> %sn", label);
  298. break;
  300.       case '3':
  301. fd_printf(fd, "<B>%s</B>n", label);
  302. break;
  304.       case '0':
  305.       case '2':
  306.       case '4':
  307.       case '5':
  308.       case '6':
  309.       case '7':
  310.       case '9':
  311.       case 'g':
  312.       case 'I':
  313.       case 's':
  314.       case ';':
  315. send_href(fd, "gopher", host, port, buf[0], selector, label, NULL);
  316. break;
  318.       case '1':
  319. send_href(fd, "gopher", host, port, buf[0], selector, label, "/");
  320. break;
  322.       case '8':
  323. send_telnet(fd, "telnet", host, port, selector, label, NULL);
  324. break;
  326.       case 'T':
  327. send_telnet(fd, "tn3270", host, port, selector, label, NULL);
  328. break;
  330.       default:
  331. fd_printf(fd, "<LI> ? type='%c' (%d), label=%s",
  332.   buf[0], (int) buf[0], label);
  333. if (selector)
  334.     fd_printf(fd, ", selector=%s", selector);
  335. if (host)
  336.     fd_printf(fd, ", host=%s", host);
  337. if (port)
  338.     fd_printf(fd, ", port=%s", port);
  339. fd_putc('n', fd);
  340.     }
  341. }
  343. fd_puts("</OL>n", fd);
  344. html_sysfooter(fd);
  345. break;
  347.       case '0':
  348. if (url[0])
  349.     fd_printf(sock_fd, "%sn", url+1);
  350. else
  351.     fd_puts("n", sock_fd);
  352. fd_flush(sock_fd);
  354. if (debug > 4)
  355.     fprintf(stderr, "Gopher text.n");
  356. fd_puts("Content-Type: text/plainnn", fd);
  358. fd_relay(sock_fd, fd, 0);
  359. break;
  361.       case '2':
  362. {
  363.     char **argv, *request, *url;
  364.     int i;
  366.     url = alloca(i = strlen(hip->url));
  367.     s_strncpy(url, i, hip->url, i-1);
  368.     url[i-1] = '';
  369.     
  370.     if (hip->request)
  371.     {
  372.         int reqsize = strlen(hip->request)+1;
  373. request = (char *) alloca(reqsize);
  374. s_strcpy(request, reqsize, hip->request);
  375.     }
  376.     else
  377. request = NULL;
  378.     
  379.     if (request == NULL ||
  380. *request == '' ||
  381. (argv = strsplit(request, '&', 2)) == NULL)
  382.     {
  383. fd_puts("Content-Type: text/htmlnn", fd);
  384. fd_puts("<HTML><HEAD>n", fd);
  385. fd_printf(fd, "<TITLE>CSO Search of %s</TITLE>n",
  386.   url);
  387. fd_puts("</HEAD><BODY>n", fd);
  388. fd_printf(fd, "<H2 ALIGN=CENTER>CSO Search of %s</H2>n",
  389.   url);
  390. fd_printf(fd, "<ISINDEX>n");
  391. fd_puts("</BODY></HTML>n", fd);
  392. break;
  393.     }
  395.     fd_puts("query", sock_fd);
  396.     for (i = 0; argv[i]; i++)
  397. fd_printf(sock_fd, " %s", argv[i]);
  398.     
  399.     fd_putc('n', sock_fd);
  400.     fd_flush(sock_fd);
  401.     fd_puts("quitn", sock_fd);
  402.     fd_shutdown(sock_fd, 1);
  404.     fd_puts("Content-Type: text/plainnn", fd);
  405.     fd_relay(sock_fd, fd, 0);
  406. }
  407. break;
  409.       case '4':
  410. if (url[0])
  411.     fd_printf(sock_fd, "%sn", url+1);
  412. else
  413.     fd_puts("n", sock_fd);
  414. fd_flush(sock_fd);
  416. if (debug > 4)
  417.     fprintf(stderr, "Gopher macbinhex.n");
  418. fd_puts("Content-Type: application/binhexnn", fd);
  420. fd_relay(sock_fd, fd, 0);
  421. break;
  423.       case '5':
  424. if (debug > 4)
  425.     fprintf(stderr, "Gopher pcbinary.n");
  427. if (url[0])
  428.     fd_printf(sock_fd, "%sn", url+1);
  429. else
  430.     fd_puts("n", sock_fd);
  431. fd_flush(sock_fd);
  433. fd_puts("Content-Type: application/octet-streamnn", fd);
  435. fd_relay(sock_fd, fd, 0);
  436. break;
  439.       case '6':
  440. if (debug > 4)
  441.     fprintf(stderr, "Gopher uuencoded.n");
  443. if (url[0])
  444.     fd_printf(sock_fd, "%sn", url+1);
  445. else
  446.     fd_puts("n", sock_fd);
  447. fd_flush(sock_fd);
  449. fd_puts("Content-Type: application/uuencodednn", fd);
  451. fd_relay(sock_fd, fd, 0);
  452. break;
  454.       case '9':
  455. if (debug > 4)
  456.     fprintf(stderr, "Gopher binary.n");
  458. if (url[0])
  459.     fd_printf(sock_fd, "%sn", url+1);
  460. else
  461.     fd_puts("n", sock_fd);
  462. fd_flush(sock_fd);
  464. fd_puts("Content-Type: application/octet-streamnn", fd);
  466. fd_relay(sock_fd, fd, 0);
  467. break;
  469.       case 'g':
  470.       case 'I':
  471. if (debug > 4)
  472.     fprintf(stderr, "Gopher GIF.n");
  474. if (url[0])
  475.     fd_printf(sock_fd, "%sn", url+1);
  476. else
  477.     fd_puts("n", sock_fd);
  478. fd_flush(sock_fd);
  480. fd_puts("Content-Type: image/gifnn", fd);
  482. fd_relay(sock_fd, fd, 0);
  483. break;
  486.       case 's':
  487. if (debug > 4)
  488.     fprintf(stderr, "Gopher Sound.n");
  490. if (url[0])
  491.     fd_printf(sock_fd, "%sn", url+1);
  492. else
  493.     fd_puts("n", sock_fd);
  494. fd_flush(sock_fd);
  496. fd_puts("Content-Type: audio/unknownnn", fd);
  498. fd_relay(sock_fd, fd, 0);
  499. break;
  501.       case ';':
  502. if (debug > 4)
  503.     fprintf(stderr, "Gopher MPEG.n");
  505. if (url[0])
  506.     fd_printf(sock_fd, "%sn", url+1);
  507. else
  508.     fd_puts("n", sock_fd);
  509. fd_flush(sock_fd);
  511. fd_puts("Content-Type: vide/mpegnn", fd);
  513. fd_relay(sock_fd, fd, 0);
  514. break;
  516.       default:
  517. fd_puts("Content-Type: text/htmlnn", fd);
  518. html_sysheader(fd, "H2", "Gopher Menu:");
  520. fd_printf(fd, "Unknown gopher query type: '%c'n", url[1]);
  521. html_sysfooter(fd);
  522.     }
  523.     
  524.     
  525.     if (debug > 4)
  526. fprintf(stderr, "gopher_proxy: closing downn");
  527.     
  528.     fd_close(sock_fd);
  530.     return 200;
  531.     
  532.   Fail:
  533.     return -1;
  534. }