static gboolean
imageheader_visible_func( GtkTreeModel *model, GtkTreeIter *iter,
gpointer data )
{
Imageheader *imageheader = IMAGEHEADER( data );
const char *text = gtk_entry_get_text(
GTK_ENTRY( imageheader->entry ) );
char *name;
char *value;
gboolean found;
found = FALSE;
gtk_tree_model_get( model, iter, NAME_COLUMN, &name, -1 );
if( name ) {
found = my_strcasestr( name, text ) != NULL;
g_free( name );
}
if( found )
return( TRUE );
gtk_tree_model_get( model, iter, VALUE_COLUMN, &value, -1 );
if( value ) {
found = my_strcasestr( value, text ) != NULL;
g_free( value );
}
return( found );
}
static int anyneedles(int start, int end) {
int l,i;
for ( l=start; l<end; ++l ) {
char *lpt = linebuffers[l], *pt;
if ( l==start && (pt=strchr(lpt,'|'))!=NULL )
lpt = pt+1;
for ( i=0; words[i].us!=NULL; ++i ) {
if ( my_strcasestr(lpt,words[i].us)!=NULL ) {
if ( strcmp(words[i].us,words[i].gb)==0 ) /* The word delimiter is the same, but miter isn't. So we include delimiter first to make sure miter isn't found */
return( false );
else
return( true );
}
}
}
return( false );
}
static void replace(char *line, char *find, char *rpl) {
char *pt=line, *mpt;
int flen = strlen(find), rlen = strlen(rpl);
int len = rlen - flen;
while ( (pt = my_strcasestr(pt,find))!=NULL ) {
if ( len>0 ) {
for ( mpt = line+strlen(line); mpt>=pt+flen; --mpt )
mpt[len] = *mpt;
caserpl(pt,flen,rpl);
} else if ( len<0 ) {
caserpl(pt,flen,rpl);
for ( mpt=pt+flen; *mpt; ++mpt )
mpt[len] = *mpt;
mpt[len] = 0;
} else
caserpl(pt,flen,rpl);
pt += rlen;
}
}
int http_proxy_response(int accept_socket, HTTP_RECV_INFO *http_recv_info_p)
{
const char *HTTP_RECV_CONTENT_TYPE = "Content-type: text/html";
const char *HTTP_RECV_CONTENT_LENGTH = "Content-Length: ";
const char *HTTP_RECV_LOCATION = "Location: ";
char *p_target_host_name;
char *p_uri_string;
char send_http_header_buf[2048];
char line_buf[MAX_LINE][LINE_BUF_SIZE + 5];
char proxy_pre_string[2048];
char base_url[2048];
char *p_url;
char *p;
char *p_auth = NULL;
int port = 80;
int sock;
off_t content_length = 0;
int len = 0;
int line = 0;
int i;
int content_is_html = 0;
p_uri_string = http_recv_info_p->request_uri;
if (!strncmp(p_uri_string, "/-.-playlist.pls?", 17)) {
char buff[FILENAME_MAX];
if (p_uri_string[17] == '/') {
snprintf(buff, sizeof(buff), "http://%s%s"
, http_recv_info_p->recv_host, p_uri_string+17);
} else {
strncpy(buff, p_uri_string+17, sizeof(buff));
}
replace_character((char*)buff, ".pls", "");
return 0;//http_uri_to_scplaylist_create(accept_socket, (char*)buff);
}
if (strncmp(p_uri_string, "/-.-http://", 11)) {
return -1;
}
if (!global_param.flag_allow_proxy) {
return -1;
}
strncpy(base_url, p_uri_string, 2048);
p = strrchr(base_url, '/');
p[1] = '\0';
p_target_host_name = p_uri_string + 11;
p_url = strchr(p_target_host_name, '/');
if (p_url == NULL) return -1;
*p_url++ = '\0';
strncpy(proxy_pre_string, p_uri_string, 2048);
p = strchr(p_target_host_name, '@');
if (p != NULL) {
// there is a user name.
p_auth = p_target_host_name;
p_target_host_name = p + 1;
*p = '\0';
}
p = strchr(p_target_host_name, ':');
if (p != NULL) {
port = atoi(p+1);
*p = '\0';
}
debug_log_output("proxy:target_host_name: %s", p_target_host_name);
debug_log_output("proxy:authenticate: %s", p_auth ? p_auth : "NULL");
debug_log_output("proxy:url: %s", p_url);
debug_log_output("proxy:prestring: %s", proxy_pre_string);
debug_log_output("proxy:base_url: %s", base_url);
debug_log_output("proxy:port: %d", port);
p = send_http_header_buf;
if( http_recv_info_p->isGet == 1 ){
p += sprintf((char*)p, "GET /%s HTTP/1.0\r\n", p_url);
}else if ( http_recv_info_p->isGet == 2 ){
p += sprintf((char*)p, "HEAD /%s HTTP/1.0\r\n", p_url);
}
p += sprintf((char*)p, "Host: %s:%u\r\n", p_target_host_name, port);
if (global_param.user_agent_proxy_override[0]) {
p += sprintf((char*)p, "User-agent: %s\r\n", global_param.user_agent_proxy_override);
} else {
if (http_recv_info_p->user_agent[0]) {
p += sprintf((char*)p, "User-agent: %s\r\n", http_recv_info_p->user_agent);
} else {
p += sprintf((char*)p, "User-agent: %s\r\n", SERVER_NAME);
}
}
p += sprintf(p, "Accept: */*\r\n");
p += sprintf(p, "Connection: close\r\n");
if (http_recv_info_p->range_start_pos) {
p += sprintf((char*)p, "Range: bytes=");
p += sprintf((char*)p, "%zu-", http_recv_info_p->range_start_pos);
if (http_recv_info_p->range_end_pos) {
p += sprintf((char*)p, "%zu", http_recv_info_p->range_end_pos);
}
p += sprintf(p, "\r\n");
}
if (p_auth != NULL) {
p += sprintf((char*)p, "Authorization: Basic %s\r\n", base64((unsigned char*)p_auth));
}
p += sprintf(p, "\r\n");
sock = sock_connect((char*)p_target_host_name, port);
if (sock < 0) {
debug_log_output("error: %s", strerror(errno));
debug_log_output("sock: %d", sock);
return -1;
}
set_nonblocking_mode(sock, 0); /* blocking mode */
set_nonblocking_mode(accept_socket, 0); /* blocking mode */
write(sock, send_http_header_buf, strlen(send_http_header_buf));
debug_log_output("================= send to proxy\n");
debug_log_output("%s", send_http_header_buf);
debug_log_output("=================\n");
//TODO ここが４０４や４００の可能性あり
for (line = 0; line < MAX_LINE; line ++) {
char work_buf[LINE_BUF_SIZE + 10];
memset(line_buf[line], 0, LINE_BUF_SIZE + 5);
len = line_receive(sock, line_buf[line], LINE_BUF_SIZE + 1);
if (len < 0) break;
debug_log_output("recv html: '%s' len = %d", ((len)?(char*)line_buf[line]:""), len);
line_buf[line][len++] = '\r';
line_buf[line][len++] = '\n';
line_buf[line][len] = '\0';
if (!strncasecmp(line_buf[line], HTTP_RECV_CONTENT_TYPE, strlen(HTTP_RECV_CONTENT_TYPE))) {
int n;
content_is_html = 1;
n = strlen(HTTP_RECV_CONTENT_TYPE);
line_buf[line][n++] = '\r';
line_buf[line][n++] = '\n';
line_buf[line][n] = '\0';
}else if (!strncasecmp(line_buf[line], HTTP_RECV_CONTENT_LENGTH, strlen(HTTP_RECV_CONTENT_LENGTH))) {
content_length = strtoull((char*)(line_buf[line] + strlen(HTTP_RECV_CONTENT_LENGTH)), NULL, 0);
}else if (!strncasecmp(line_buf[line], HTTP_RECV_LOCATION, strlen(HTTP_RECV_LOCATION))) {
strcpy(work_buf, line_buf[line]);
sprintf((char*)line_buf[line], "Location: /-.-%s", work_buf + strlen(HTTP_RECV_LOCATION));
}else if ( strstr( line_buf[line],"charset") ){
if ( strstr( line_buf[line], "EUC-JP" )){
replace_character( (char*)line_buf[line], "EUC-JP", "UTF-8");
}else if ( strstr ( line_buf[line], "Shift_JIS" )) {
replace_character( (char*)line_buf[line], "Shift_JIS", "UTF-8");
}
}
if (len <= 2) {
line++;
break;
}
}
if (len < 0 ) {
debug_log_output("CLOSED-C");
close(sock);
return -1;
}
if (content_is_html) {
char *p, *q;
char *new_p, *r;
char work_buf[LINE_BUF_SIZE + 10];
char work_buf2[LINE_BUF_SIZE * 2];
char *link_pattern = (char*)"<A HREF=";
int flag_conv_html_code = 1;
for (i=0; i<line; i++) {
//長さは不定なので送らない
if (!strncasecmp(line_buf[i], HTTP_RECV_CONTENT_LENGTH, strlen(HTTP_RECV_CONTENT_LENGTH))) continue;
//*q = '\0';
p = work_buf;
q = work_buf2;
if (flag_conv_html_code) {
convert_language_code(line_buf[i], work_buf, LINE_BUF_SIZE, CODE_AUTO, global_param.client_language_code);
}
//strcpy( work_buf, line_buf[i]);
// write(accept_socket, line_buf[i], strlen(line_buf[i]));
// debug_log_output("sent html: '%s' len = %d", line_buf[i], strlen(line_buf[i]));
write(accept_socket, work_buf, strlen(line_buf[i]));
debug_log_output("sent html: '%s' len = %d", work_buf, strlen(work_buf));
}
debug_log_output("sent header");
//write(accept_socket, "debug:--\n", strlen("debug:--\n"));
while (1) {
char rep_str[1024];
memset(work_buf, 0, LINE_BUF_SIZE);
len = line_receive(sock, work_buf, LINE_BUF_SIZE);
if (len < 0) break;
debug_log_output("recv html: '%s' len = %d", work_buf, len);
work_buf[len++] = '\r';
work_buf[len++] = '\n';
work_buf[len] = '\0';
if (my_strcasestr(work_buf, "Content-Type") != NULL) {
// Content-Type があったら
// 漢字コードの変換をやめる
// flag_conv_html_code = 0;
if ( strstr( work_buf, "EUC-JP" )){
replace_character( (char*)work_buf, "EUC-JP", "UTF-8");
}else if ( strstr ( work_buf, "Shift_JIS" )) {
replace_character( (char*)work_buf, "Shift_JIS", "UTF-8");
}
}
p = work_buf;
q = work_buf2;
memset(q, 0, sizeof(work_buf2));
/*
* HTML中に <A HREF="..."> があったら、プロクシを経由するように
* たとえば <A HREF="/-.-http://www.yahoo.co.jp/"> のように変換する
* もし、ファイルがストリーム可能そうであれば、VOD="0" も追加する。
*
* 問題点:
* タグの途中に改行があると失敗するだろう.
* 面倒なのでたいした置換はしていない
* 惰性で書いたので汚い。だれか修正して。
*/
link_pattern = (char*)"<A HREF=";
while ((new_p = my_strcasestr(p, link_pattern)) != NULL) {
int l = new_p - p + strlen(link_pattern);
char *tmp;
MIME_LIST_T *mlt = NULL;
strncpy(q, p, l);
q += l;
p += l; /* i.e., p = new_p + strlen(link_pattern); */
r = strchr(p, '>');
if (r == NULL) continue;
*r = '\0';
if (*p == '"') *q++ = *p++;
if ((tmp = strchr(p, '"')) != NULL || (tmp = strchr(p, ' ')) != NULL) {
mlt = mime_list;
while (mlt->mime_name != NULL) {
if (*(tmp - strlen(mlt->file_extension) - 1) == '.'
&& !strncasecmp(tmp - strlen(mlt->file_extension), mlt->file_extension, strlen(mlt->file_extension))) {
break;
}
mlt++;
}
}
//if (flag_pc && mlt != NULL && mlt->stream_type == TYPE_STREAM) {
// q += sprintf((char*)q, "/-.-playlist.pls?http://%s", http_recv_info_p->recv_host);
//}
if (*p == '/') {
q += sprintf(q, "%s%s", proxy_pre_string, p);
} else if (!strncmp(p, "http://", 7)) {
q += sprintf(q, "/-.-%s", p);
} else {
q += sprintf((char*)q, "%s%s", base_url, p);
//q += sprintf((char*)q, "%s", p);
}
if (mlt != NULL && mlt->stream_type == TYPE_STREAM) {
q += sprintf(q, " vod=\"0\"");
}
*q++ = '>';
p = r + 1;
}
while (*p) *q++ = *p++;
*q = '\0';
/*
* HTML中に SRC="..." があったら、プロクシを経由するように変換する
*
* 問題点:
* タグの途中に改行があると失敗するだろう.
* 変数使いまわしたので、融通が効かない。
* だれか修正して。
*/
p = work_buf2;
q = work_buf;
memset(q, 0, sizeof(work_buf));
link_pattern = (char*)"SRC=";
while ((new_p = my_strcasestr(p, link_pattern)) != NULL) {
int l = new_p - p + strlen(link_pattern);
strncpy(q, p, l);
q += l;
p += l; /* i.e., p = new_p + strlen(link_pattern); */
if (*p == '"') *q++ = *p++;
if (*p == '/') {
q += sprintf(q, "%s", proxy_pre_string);
} else if (!strncmp(p, "http://", 7)) {
q += sprintf(q, "/-.-");
} else {
q += sprintf(q, "%s", base_url);
//q += sprintf(q, "%s", p);
}
}
while (*p) *q++ = *p++;
*q = '\0';
p = work_buf;
q = work_buf2;
if (flag_conv_html_code) {
convert_language_code(p, q, LINE_BUF_SIZE, CODE_AUTO, global_param.client_language_code);
//strcpy( q,p);
p = q;
}
snprintf(rep_str, sizeof(rep_str), "|http://%s/-.-http://"
, http_recv_info_p->recv_host);
replace_character((char*)p, "|http://", rep_str);
write(accept_socket, p, strlen(p));
debug_log_output("sent html: %s", p);
}
} else {
for (i=0; i<line; i++) {
write(accept_socket, line_buf[i], strlen(line_buf[i]));
}
if( http_recv_info_p->isGet == 1 ){
return ( copy_descriptors(sock, accept_socket, (size_t)content_length) );
//NULL ,
//(char*)http_recv_info_p->recv_uri,
// http_recv_info_p->range_start_pos));
}
}
sClose(sock);
return 0;
}
int handle_login(struct clientinfo* clntinfo) {
struct cmdhandlerstruct *cmdhandler;
char *buffer = 0;
int ss, cs;
int i, expected;
int protoviolations = 0;
conn_info.lcs = &lcs;
conn_info.clntinfo = clntinfo;
ss = clntinfo->serversocket;
cs = clntinfo->clientsocket;
if (clntinfo->transparent == TRANSPARENT_YES
/* we are connected */
&&
config_compare_option("logintime", "connect")) {
if (config_get_ioption("loginstyle", 0) != 0) {
jlog(5, "A login at the connection time only works with loginstyle == 0, setting loginstyle = 0");
config_option_list_delete("loginstyle");
config_option_list_add("loginstyle", "0");
}
}
cmdhandler = &login_auth_funcs
[ config_get_ioption("loginstyle", 0) ][0];
expected = QUITFUNC + 1; /* skip reset and quit function */
while (1) {
if (timeout) {
jlog(2, "Timeout in %s line %d\n", __FILE__ ,__LINE__);
return -1;
}
if (buffer) {
free(buffer);
buffer = 0;
}
buffer = readline(cs);
lcs.cmd = (char*) 0;
if (buffer) {
lcs.cmd = buffer;
free(lcs.method);
i = 0;
lcs.method = quotstrtok(lcs.cmd, WHITESPACES, &i);
if (buffer[0] == '\0') {
/* empty line. Prevent logging of the
* command */
free(buffer);
buffer = 0;
continue;
}
/* log the command */
log_cmd(&lcs);
free(lcs.method); lcs.method = (char*) 0;
lcs.respcode = 0;
lcs.transferred = 0;
}
if (!buffer) {
if (timeout) {
jlog(2, "Timeout in %s line %d\n", __FILE__
,__LINE__);
err_time_readline(cs);
} else {
err_readline(cs);
}
return -1;
}
jlog(8, "Expecting %s", cmdhandler[expected].cmd);
if (my_strcasestr(buffer, "PASS") == (char*) 0) {
jlog(8, "Got: %s", buffer);
} else {
jlog(8, "Got the password");
}
/* check for QUIT */
if (checkbegin(buffer, "QUIT")) {
int ret = (cmdhandler[QUITFUNC].func)
(buffer, &conn_info);
ret = (cmdhandler[RESETFUNC].func)
(buffer, &conn_info);
free(buffer);
/* return 1 to prevent the proxy from entering
* handle_cmds */
return 1;
}
if (cmdhandler[expected].cmd
&& checkbegin(buffer, cmdhandler[expected].cmd)) {
int ret = (cmdhandler[expected].func)
(buffer, &conn_info);
memset(buffer, 0, strlen(buffer));
protoviolations = 0;
switch (ret) {
case CMD_DONE:
/* we're done - logged in */
/* CMD_DONE is returned if the USER
* command got a 230 response back
* */
break;
case CMD_HANDLED:
/* expecting the next */
expected++;
break;
case CMD_ERROR:
/* reset counter, skip reset and
* quit function */
ret = (cmdhandler[RESETFUNC].func)
(buffer, &conn_info);
expected = QUITFUNC + 1;
/* errors are handled by the
* command handler functions
* */
break;
case CMD_ABORT:
return -1;
break;
}
/* found and called proper function */
} else {
protoviolations++;
if (protoviolations >=
config_get_ioption("loginprotocolviolations", 10)){
/* like ABORT */
sayf(clntinfo->clientsocket,
"500 Too many consequent protocol "
"violations - Closing connection\r\n");
return -1;
}
sayf(clntinfo->clientsocket,
"530 Login incorrect. Expected %scommand\r\n",
cmdhandler[expected].cmd);
/* reset counter, skip reset and quit function */
(cmdhandler[RESETFUNC].func)
(buffer, &conn_info);
expected = QUITFUNC + 1;
}
if (clntinfo->login.stage == LOGIN_ST_FULL) {
/* we are done */
free(buffer); buffer = (char*) 0;
return 0;
}
}
/* lcs.host and lcs.user are freed at the termination of the
* programm */
}
