/[mod_czs]/mod_czs.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /mod_czs.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.7 - (hide annotations)
Wed Aug 9 20:34:29 2000 UTC (23 years, 7 months ago) by dpavlin
Branch: MAIN
Changes since 1.6: +2 -0 lines
File MIME type: text/plain
send debug headers only if -DDEBUG

1 dpavlin 1.1 /*
2     * mod_czs -- nuke iso8859-2 characters
3     * Dobrica Pavlinusic <dpavlin@rot13.org>
4     *
5     * based on mod_format by Stephen F. Booth and
6     * mod_mocrify by Peter Triller, Ernst Bachmann
7     *
8     * Usage: httpd.conf
9     * AddHandler czs .html
10     *
11     * This program is free software; you can redistribute it and/or modify
12     * it under the terms of the GNU General Public License as published by
13     * the Free Software Foundation; either version 2 of the License, or
14     * (at your option) any later version.
15     *
16     * This program is distributed in the hope that it will be useful,
17     * but WITHOUT ANY WARRANTY; without even the implied warranty of
18     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19     * GNU General Public License for more details.
20     *
21     * You should have received a copy of the GNU General Public License
22     * along with this program; if not, write to the Free Software
23     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24     */
25    
26     #include "httpd.h"
27     #include "http_main.h"
28     #include "http_config.h"
29     #include "http_log.h"
30     #include "http_protocol.h"
31    
32     module MODULE_VAR_EXPORT mod_czs;
33    
34     FILE *in;
35     int do_czs;
36    
37     static int czs_handler(request_rec *r) {
38    
39     char buffer[MAX_STRING_LEN] = "undefined buffer content";
40     int i;
41    
42     if(r->method_number != M_GET)
43     return DECLINED;
44     if(r->finfo.st_mode == 0)
45     return NOT_FOUND;
46    
47     in = ap_pfopen(r->pool, r->filename, "r");
48    
49     if(in == NULL) {
50     ap_log_reason("file permissions deny server access", r->filename, r);
51     return FORBIDDEN;
52     }
53 dpavlin 1.7 #ifdef DEBUG
54 dpavlin 1.1 if(r->args != 0 || do_czs) {
55     ap_table_setn(r->headers_out, "X-czs_filename", r->filename);
56 dpavlin 1.2 if (r->args != 0) {
57     ap_table_setn(r->headers_out, "X-czs_args", r->args);
58     }
59 dpavlin 1.1 }
60 dpavlin 1.7 #endif
61 dpavlin 1.1
62     ap_soft_timeout("send", r);
63     ap_send_http_header(r);
64    
65     if(r->header_only) {
66     ap_kill_timeout(r);
67     ap_pfclose(r->pool, in);
68     return OK;
69     }
70    
71     #ifdef TEST_QUERYSTRING
72     if(r->args == 0 && !do_czs) {
73 dpavlin 1.5 #else
74     if(!do_czs) {
75     #endif
76 dpavlin 1.1 ap_send_fd(in, r);
77     } else {
78 dpavlin 1.5
79     while(fgets(buffer,MAX_STRING_LEN,in)) {
80     for(i=0; i<MAX_STRING_LEN && buffer[i]; i++) {
81     switch ( buffer[i] ) {
82     case '¹': buffer[i]='s'; break;
83     case 'ð': buffer[i]='d'; break;
84     case 'è': buffer[i]='c'; break;
85     case 'æ': buffer[i]='c'; break;
86     case '¾': buffer[i]='z'; break;
87     case '©': buffer[i]='S'; break;
88     case 'Ð': buffer[i]='D'; break;
89     case 'È': buffer[i]='C'; break;
90     case 'Æ': buffer[i]='C'; break;
91     case '®': buffer[i]='Z'; break;
92     }
93 dpavlin 1.1 }
94 dpavlin 1.5 ap_rprintf(r,"%s",buffer);
95 dpavlin 1.1 }
96     }
97    
98     ap_kill_timeout(r);
99     ap_pfclose(r->pool, in);
100     return OK;
101     }
102    
103     int translate_path(request_rec *r) {
104     char *uri = r->uri;
105     request_rec *subr;
106 dpavlin 1.3 do_czs=0;
107 dpavlin 1.1
108 dpavlin 1.6 if (uri[0]=='/' && uri[1]=='c' && uri[2]=='z' && uri[3]=='s') {
109 dpavlin 1.1 #if 0
110     ap_table_setn(r->headers_out, "Location", ap_pstrcat(r->pool, uri+2, "?czs", NULL));
111     return REDIRECT;
112     #endif
113 dpavlin 1.6 subr = (request_rec *) ap_sub_req_lookup_uri(r->uri+4, r);
114 dpavlin 1.1 r->filename=ap_pstrdup(r->pool, subr->filename);
115     ap_destroy_sub_req(subr);
116     do_czs=1;
117     return OK;
118     }
119    
120     return DECLINED;
121     }
122    
123     /* Dispatch list of content handlers */
124     static const handler_rec czs_handlers[] = {
125     { "czs", czs_handler },
126     { NULL, NULL }
127     };
128    
129     /* Dispatch list for API hooks */
130     module MODULE_VAR_EXPORT czs_module = {
131     STANDARD_MODULE_STUFF,
132     NULL, /* module initializer */
133     NULL, /* create per-dir config structures */
134     NULL, /* merge per-dir config structures */
135     NULL, /* create per-server config structures */
136     NULL, /* merge per-server config structures */
137     NULL, /* table of config file commands */
138     czs_handlers, /* [#8] MIME-typed-dispatched handlers */
139     translate_path, /* [#1] URI to filename translation */
140     NULL, /* [#4] validate user id from request */
141     NULL, /* [#5] check if the user is ok _here_ */
142     NULL, /* [#2] check access by host address */
143     NULL, /* [#6] determine MIME type */
144     NULL, /* [#7] pre-run fixups */
145     NULL, /* [#9] log a transaction */
146     NULL, /* [#3] header parser */
147     NULL, /* child_init */
148     NULL, /* child_exit */
149     NULL /* [#0] post read-request */
150     };
151    

  ViewVC Help
Powered by ViewVC 1.1.26