1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
|
char * sc_https2http (char * i) {
if (i && strlen(i) >= 4 && i[4] == 's')
memmove(i+4, i+5, strlen(i)-3);
return i;
}
char * sc_queryhtml (const struct sc_query * q, const char * add_form, size_t l) { /* remember to free returned string in the caller */ /* caller takes care of freeing */
size_t resultshtml_written = 0;
size_t resultshtml_sizeof = SC_ALLOC_CHUNK;
char * resultshtml = malloc(resultshtml_sizeof);
resultshtml[0] = '\0';
for (size_t i = 0; i < q->results_length && (!l || i < l); i++) {
#define SC_HRC(string, wanted) \
if (string##_written+wanted >= string##_sizeof) { \
string##_sizeof = (string##_written+wanted+1)*SC_REALLOC_K; \
string = realloc(string, string##_sizeof); \
}
#define SC_HRF "<div class=result id=result%zu><h4><a href=\"%s\" accesskey=%zu>%s</a> " \
"<span class=breadcrumb>%s</span></h4><p>%s</p></div>"
#define SC_HIF "<a class=result id=result%zu href=\"%s\" accesskey=%zu><img data-title=\"%s\"" \
"data-breadcrumb=\"%s\" src=\"%s\" /></a>"
#define SC_HRA i, safeurl ? strstr(add_form, "name=h") ? sc_https2http(safeurl) : safeurl : SC_I18N_NO_HREFLINK, i, safetitle ? safetitle : SC_I18N_NO_TITLE, \
safebreadcrumbs ? safebreadcrumbs : safeurl ? safeurl : SC_I18N_NO_HREFLINK, safebody ? safebody : SC_I18N_NO_DESCRIPTION
char * safetitle = htmlspecialchars(q->results[i]->title); /* htmlspecialchars returns NULL if input is null */
char * safebody = htmlspecialchars(q->results[i]->desc);
char * safeurl = htmlspecialchars(q->results[i]->url);
char * safebreadcrumbs = htmlspecialchars(q->results[i]->breadcrumbs);
size_t ws;
if (q->opt & SC_OPT_IMAGE) {
ws = snprintf(NULL, 0, SC_HIF, SC_HRA);
SC_HRC(resultshtml, ws);
resultshtml_written += sprintf(resultshtml+resultshtml_written, SC_HIF, SC_HRA);
} else {
ws = snprintf(NULL, 0, SC_HRF, SC_HRA);
SC_HRC(resultshtml, ws);
resultshtml_written += sprintf(resultshtml+resultshtml_written, SC_HRF, SC_HRA);
}
free(safebreadcrumbs);
free(safetitle);
free(safebody);
free(safeurl);
}
#define SC_HRS SC_I18N_NUMBER_OF_RESULTS ": %zu | " SC_I18N_QUERY_TIME ": %s"
char formatted_time[128];
struct tm tm;
localtime_r(&q->lookup_time, &tm);
strftime(formatted_time, 128, SC_I18N_DATETIME_FORMAT, &tm);
char queryinfo[256];
snprintf(queryinfo, 256, SC_HRS, q->results_length, formatted_time);
char * safequery = htmlspecialchars(q->string);
char * response = malloc(strlen((char *) sc_hp)+2*strlen(safequery)+strlen(queryinfo)+strlen(resultshtml)+strlen(add_form));
sprintf(response, (char *) sc_hp, safequery, safequery, add_form, queryinfo, resultshtml);
free(safequery);
free(resultshtml);
return response;
}
#ifdef SC_LOGMEM
char * sc_logshtml (struct sc_cache * c) { /* remember to free on caller, remember not to report errors here whilst locked */
char * html = malloc(SC_ALLOC_CHUNK);
html[0] = '\0';
size_t html_written = 0;
size_t html_sizeof = 0;
pthread_rwlock_rdlock(c->logentries_lock);
if (!c->logentries) {
free(html);
return NULL;
}
for (size_t i = 0; i < c->logentries_length; i++) {
#define SC_HLF "<div class=result id=log%zu>[<span class=%s>%s</span>] %s " \
"<a href=\"" SC_I18N_GIT_URL "/src/branch/master/%s#L%zu\">%s()@%s:%zu</a>: %s</div>"
#define SC_HLA i, \
sc_log_str(c->logentries[i]->type), \
sc_log_str(c->logentries[i]->type), \
formatted_time, \
c->logentries[i]->file, \
c->logentries[i]->line, \
c->logentries[i]->function, /* compile-time burned in values are safe from xss :) */ \
c->logentries[i]->file, \
c->logentries[i]->line, \
safemessage /* ... whereas this might contain < */
struct tm tm;
char formatted_time[128];
localtime_r(&c->logentries[i]->time, &tm);
strftime(formatted_time, 128, SC_I18N_DATETIME_FORMAT, &tm);
char * safemessage = htmlspecialchars(c->logentries[i]->message);
size_t ws = snprintf(NULL, 0, SC_HLF, SC_HLA);
SC_HRC(html, ws);
html_written += sprintf(html+html_written, SC_HLF, SC_HLA);
free(safemessage);
}
pthread_rwlock_unlock(c->logentries_lock);
return html;
}
#endif
enum MHD_Result sc_httpd (void * cls,
struct MHD_Connection * connection,
const char * url,
const char * method,
const char * version,
const char * upload_data,
size_t * upload_data_size,
void ** ptr) {
struct sc_cache * c = (struct sc_cache *) cls;
static int dummy;
struct MHD_Response * httpd_response;
int ret;
if (0 != strcmp(method, "GET"))
return MHD_NO; /* unexpected method */
if (&dummy != *ptr) {
/* the first time only the headers are valid, do not respond in the first round ... */
*ptr = &dummy;
return MHD_YES;
}
if (0 != *upload_data_size)
return MHD_NO; /* upload data in a GET?! */
*ptr = NULL; /* clear context pointer */
char * response = NULL;
enum MHD_ResponseMemoryMode mhdrmm = MHD_RESPMEM_MUST_FREE;
const char * query = MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "q");
const char * host = MHD_lookup_connection_value(connection, MHD_HEADER_KIND, "Host");
char * location = "//git.sijanec.eu/sijanec/sear.c";
char * content_type = "text/html";
int status_code = MHD_HTTP_OK;
SC_OPT_TYPE opt = SC_OPT_INIT;
if (MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "i"))
opt |= SC_OPT_IMAGE;
if (!host)
host = "";
const struct sc_query * q = NULL;
char add_form[128];
const char * l = MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "l");
const char * h = MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "h");
snprintf(add_form, 128, "%s%s%d%s", h ? "<input type=hidden name=h value=h />" : "",
l ? "<input type=hidden name=l value=" : "<!-- Odgovor na dokončno vprašanje o Življenju, Vesolju in sploh Vsem je ",
l ? atoi(l) : 42,
l ? " />" : " -->");
if (!query) {
if (url[0] == '/')
switch (url[1]) {
case 's': /* security.txt */
case '.': /* .well-known/security.txt */
mhdrmm = MHD_RESPMEM_PERSISTENT;
response = sc_securitytxt;
content_type = "text/plain";
break;
case 'r': /* robots.txt */
mhdrmm = MHD_RESPMEM_PERSISTENT;
response = sc_robotstxt;
content_type = "text/plain";
break;
case 'o': /* osdd.xml - opensearch description document */
response = malloc(strlen(sc_osdd)+strlen(host));
sprintf(response, sc_osdd, host);
content_type = "application/opensearchdescription+xml";
break;
case 'l': /* logs.html */
{
#ifdef SC_LOGMEM
char * logshtml = sc_logshtml(c);
response = malloc(strlen((char *) sc_hp)+strlen(SC_I18N_LOGS)+strlen(logshtml ? logshtml : SC_I18N_LOGS_ERROR)+strlen(add_form));
sprintf(response, (char *) sc_hp, "", "", add_form, SC_I18N_LOGS, logshtml ? logshtml : SC_I18N_LOGS_ERROR);
free(logshtml);
#else
response = malloc(strlen((char *) sc_hp)+strlen(SC_I18N_LOGS_NOT_ENABLED)+strlen(SC_I18N_HP_ERROR_HEADING)+strlen(SC_I18N_LOGS)+strlen(add_form));
sprintf(response, (char *) sc_hp, SC_I18N_HP_ERROR_HEADING, "", add_form, SC_I18N_LOGS, SC_I18N_LOGS_NOT_ENABLED);
#endif
}
break;
}
if (!response) {
response = malloc(strlen((char *) sc_hp)+strlen(SC_I18N_HP_HEADING)+strlen(SC_I18N_HP_BODY)+strlen(add_form));
sprintf(response, (char *) sc_hp, "", "", add_form, SC_I18N_HP_HEADING, SC_I18N_HP_BODY);
}
} else {
int already_retried = 0;
const struct sc_query query_to_find = {
.string = (char *) query,
.opt = opt
};
retry:
SC_CRLE(c, c->queries_lock);
#ifdef SC_OLD_STORAGE
for (size_t i = 0; i < c->queries_length; i++)
if (!sc_query_compar(c->queries[i], &query_to_find))
q = c->queries[i];
#else /* tfind(3) also requires a pointer to the variable that holds rootp! */
const struct sc_query ** i_am_retarded = tfind(&query_to_find, &c->qrp, SC_COMPAR_CAST sc_query_compar);
q = i_am_retarded ? *i_am_retarded : NULL;
#endif
if (q) {
const char * l = MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "l");
if (MHD_lookup_connection_value(connection, MHD_GET_ARGUMENT_KIND, "f") && q->results_length > 0) {
mhdrmm = MHD_RESPMEM_PERSISTENT; /* no need to generate HTML if */
content_type = "text/plain"; /* we have a feeling of luck! */
response = SC_I18N_HORSESHOE_RESPONSE;
status_code = 307;
location = q->results[0]->url ? q->results[0]->url : SC_I18N_NO_HREFLINK;
} else
response = sc_queryhtml(q, add_form, atoi(l ? l : "0")); /* MHD_create_response_from_buffer will free response (; */
SC_CUE(c, c->queries_lock);
} else {
SC_CUE(c, c->queries_lock);
sc_query_google(query, c, NULL, opt);
if (already_retried++) {
char * safequery = htmlspecialchars(query);
response = malloc(strlen((char*) sc_hp)+strlen(safequery)*2+strlen(SC_I18N_HP_ERROR_HEADING)+strlen(SC_I18N_HP_ERROR_BODY)+strlen(add_form));
sprintf(response, (char *) sc_hp, safequery, safequery, add_form, SC_I18N_HP_ERROR_HEADING, SC_I18N_HP_ERROR_BODY);
free(safequery);
} else goto retry;
}
}
httpd_response = MHD_create_response_from_buffer (strlen(response), (void *) response, mhdrmm);
MHD_add_response_header(httpd_response, "Content-Type", content_type);
if (status_code >= 300 && status_code <= 399)
MHD_add_response_header(httpd_response, "Location", location);
ret = MHD_queue_response(connection, status_code, httpd_response);
MHD_destroy_response(httpd_response);
return ret;
}
|
