277 lines
7.5 KiB
C
277 lines
7.5 KiB
C
|
/***************************************************************************
|
||
|
* _ _ ____ _
|
||
|
* Project ___| | | | _ \| |
|
||
|
* / __| | | | |_) | |
|
||
|
* | (__| |_| | _ <| |___
|
||
|
* \___|\___/|_| \_\_____|
|
||
|
*
|
||
|
* Copyright (C) 1998 - 2019, Daniel Stenberg, <daniel@haxx.se>, et al.
|
||
|
*
|
||
|
* This software is licensed as described in the file COPYING, which
|
||
|
* you should have received as part of this distribution. The terms
|
||
|
* are also available at https://curl.haxx.se/docs/copyright.html.
|
||
|
*
|
||
|
* You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
||
|
* copies of the Software, and permit persons to whom the Software is
|
||
|
* furnished to do so, under the terms of the COPYING file.
|
||
|
*
|
||
|
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
||
|
* KIND, either express or implied.
|
||
|
*
|
||
|
***************************************************************************/
|
||
|
|
||
|
#include "curl_setup.h"
|
||
|
|
||
|
#ifndef CURL_DISABLE_DICT
|
||
|
|
||
|
#ifdef HAVE_NETINET_IN_H
|
||
|
#include <netinet/in.h>
|
||
|
#endif
|
||
|
#ifdef HAVE_NETDB_H
|
||
|
#include <netdb.h>
|
||
|
#endif
|
||
|
#ifdef HAVE_ARPA_INET_H
|
||
|
#include <arpa/inet.h>
|
||
|
#endif
|
||
|
#ifdef HAVE_NET_IF_H
|
||
|
#include <net/if.h>
|
||
|
#endif
|
||
|
#ifdef HAVE_SYS_IOCTL_H
|
||
|
#include <sys/ioctl.h>
|
||
|
#endif
|
||
|
|
||
|
#ifdef HAVE_SYS_PARAM_H
|
||
|
#include <sys/param.h>
|
||
|
#endif
|
||
|
|
||
|
#ifdef HAVE_SYS_SELECT_H
|
||
|
#include <sys/select.h>
|
||
|
#endif
|
||
|
|
||
|
#include "urldata.h"
|
||
|
#include <curl/curl.h>
|
||
|
#include "transfer.h"
|
||
|
#include "sendf.h"
|
||
|
#include "escape.h"
|
||
|
#include "progress.h"
|
||
|
#include "dict.h"
|
||
|
#include "strcase.h"
|
||
|
#include "curl_memory.h"
|
||
|
/* The last #include file should be: */
|
||
|
#include "memdebug.h"
|
||
|
|
||
|
/*
|
||
|
* Forward declarations.
|
||
|
*/
|
||
|
|
||
|
static CURLcode dict_do(struct connectdata *conn, bool *done);
|
||
|
|
||
|
/*
|
||
|
* DICT protocol handler.
|
||
|
*/
|
||
|
|
||
|
const struct Curl_handler Curl_handler_dict = {
|
||
|
"DICT", /* scheme */
|
||
|
ZERO_NULL, /* setup_connection */
|
||
|
dict_do, /* do_it */
|
||
|
ZERO_NULL, /* done */
|
||
|
ZERO_NULL, /* do_more */
|
||
|
ZERO_NULL, /* connect_it */
|
||
|
ZERO_NULL, /* connecting */
|
||
|
ZERO_NULL, /* doing */
|
||
|
ZERO_NULL, /* proto_getsock */
|
||
|
ZERO_NULL, /* doing_getsock */
|
||
|
ZERO_NULL, /* domore_getsock */
|
||
|
ZERO_NULL, /* perform_getsock */
|
||
|
ZERO_NULL, /* disconnect */
|
||
|
ZERO_NULL, /* readwrite */
|
||
|
ZERO_NULL, /* connection_check */
|
||
|
PORT_DICT, /* defport */
|
||
|
CURLPROTO_DICT, /* protocol */
|
||
|
PROTOPT_NONE | PROTOPT_NOURLQUERY /* flags */
|
||
|
};
|
||
|
|
||
|
static char *unescape_word(struct Curl_easy *data, const char *inputbuff)
|
||
|
{
|
||
|
char *newp = NULL;
|
||
|
char *dictp;
|
||
|
size_t len;
|
||
|
|
||
|
CURLcode result = Curl_urldecode(data, inputbuff, 0, &newp, &len, FALSE);
|
||
|
if(!newp || result)
|
||
|
return NULL;
|
||
|
|
||
|
dictp = malloc(len*2 + 1); /* add one for terminating zero */
|
||
|
if(dictp) {
|
||
|
char *ptr;
|
||
|
char ch;
|
||
|
int olen = 0;
|
||
|
/* According to RFC2229 section 2.2, these letters need to be escaped with
|
||
|
\[letter] */
|
||
|
for(ptr = newp;
|
||
|
(ch = *ptr) != 0;
|
||
|
ptr++) {
|
||
|
if((ch <= 32) || (ch == 127) ||
|
||
|
(ch == '\'') || (ch == '\"') || (ch == '\\')) {
|
||
|
dictp[olen++] = '\\';
|
||
|
}
|
||
|
dictp[olen++] = ch;
|
||
|
}
|
||
|
dictp[olen] = 0;
|
||
|
}
|
||
|
free(newp);
|
||
|
return dictp;
|
||
|
}
|
||
|
|
||
|
static CURLcode dict_do(struct connectdata *conn, bool *done)
|
||
|
{
|
||
|
char *word;
|
||
|
char *eword;
|
||
|
char *ppath;
|
||
|
char *database = NULL;
|
||
|
char *strategy = NULL;
|
||
|
char *nthdef = NULL; /* This is not part of the protocol, but required
|
||
|
by RFC 2229 */
|
||
|
CURLcode result = CURLE_OK;
|
||
|
struct Curl_easy *data = conn->data;
|
||
|
curl_socket_t sockfd = conn->sock[FIRSTSOCKET];
|
||
|
|
||
|
char *path = data->state.up.path;
|
||
|
|
||
|
*done = TRUE; /* unconditionally */
|
||
|
|
||
|
if(conn->bits.user_passwd) {
|
||
|
/* AUTH is missing */
|
||
|
}
|
||
|
|
||
|
if(strncasecompare(path, DICT_MATCH, sizeof(DICT_MATCH)-1) ||
|
||
|
strncasecompare(path, DICT_MATCH2, sizeof(DICT_MATCH2)-1) ||
|
||
|
strncasecompare(path, DICT_MATCH3, sizeof(DICT_MATCH3)-1)) {
|
||
|
|
||
|
word = strchr(path, ':');
|
||
|
if(word) {
|
||
|
word++;
|
||
|
database = strchr(word, ':');
|
||
|
if(database) {
|
||
|
*database++ = (char)0;
|
||
|
strategy = strchr(database, ':');
|
||
|
if(strategy) {
|
||
|
*strategy++ = (char)0;
|
||
|
nthdef = strchr(strategy, ':');
|
||
|
if(nthdef) {
|
||
|
*nthdef = (char)0;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if((word == NULL) || (*word == (char)0)) {
|
||
|
infof(data, "lookup word is missing\n");
|
||
|
word = (char *)"default";
|
||
|
}
|
||
|
if((database == NULL) || (*database == (char)0)) {
|
||
|
database = (char *)"!";
|
||
|
}
|
||
|
if((strategy == NULL) || (*strategy == (char)0)) {
|
||
|
strategy = (char *)".";
|
||
|
}
|
||
|
|
||
|
eword = unescape_word(data, word);
|
||
|
if(!eword)
|
||
|
return CURLE_OUT_OF_MEMORY;
|
||
|
|
||
|
result = Curl_sendf(sockfd, conn,
|
||
|
"CLIENT " LIBCURL_NAME " " LIBCURL_VERSION "\r\n"
|
||
|
"MATCH "
|
||
|
"%s " /* database */
|
||
|
"%s " /* strategy */
|
||
|
"%s\r\n" /* word */
|
||
|
"QUIT\r\n",
|
||
|
|
||
|
database,
|
||
|
strategy,
|
||
|
eword
|
||
|
);
|
||
|
|
||
|
free(eword);
|
||
|
|
||
|
if(result) {
|
||
|
failf(data, "Failed sending DICT request");
|
||
|
return result;
|
||
|
}
|
||
|
Curl_setup_transfer(data, FIRSTSOCKET, -1, FALSE, -1); /* no upload */
|
||
|
}
|
||
|
else if(strncasecompare(path, DICT_DEFINE, sizeof(DICT_DEFINE)-1) ||
|
||
|
strncasecompare(path, DICT_DEFINE2, sizeof(DICT_DEFINE2)-1) ||
|
||
|
strncasecompare(path, DICT_DEFINE3, sizeof(DICT_DEFINE3)-1)) {
|
||
|
|
||
|
word = strchr(path, ':');
|
||
|
if(word) {
|
||
|
word++;
|
||
|
database = strchr(word, ':');
|
||
|
if(database) {
|
||
|
*database++ = (char)0;
|
||
|
nthdef = strchr(database, ':');
|
||
|
if(nthdef) {
|
||
|
*nthdef = (char)0;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if((word == NULL) || (*word == (char)0)) {
|
||
|
infof(data, "lookup word is missing\n");
|
||
|
word = (char *)"default";
|
||
|
}
|
||
|
if((database == NULL) || (*database == (char)0)) {
|
||
|
database = (char *)"!";
|
||
|
}
|
||
|
|
||
|
eword = unescape_word(data, word);
|
||
|
if(!eword)
|
||
|
return CURLE_OUT_OF_MEMORY;
|
||
|
|
||
|
result = Curl_sendf(sockfd, conn,
|
||
|
"CLIENT " LIBCURL_NAME " " LIBCURL_VERSION "\r\n"
|
||
|
"DEFINE "
|
||
|
"%s " /* database */
|
||
|
"%s\r\n" /* word */
|
||
|
"QUIT\r\n",
|
||
|
database,
|
||
|
eword);
|
||
|
|
||
|
free(eword);
|
||
|
|
||
|
if(result) {
|
||
|
failf(data, "Failed sending DICT request");
|
||
|
return result;
|
||
|
}
|
||
|
Curl_setup_transfer(data, FIRSTSOCKET, -1, FALSE, -1);
|
||
|
}
|
||
|
else {
|
||
|
|
||
|
ppath = strchr(path, '/');
|
||
|
if(ppath) {
|
||
|
int i;
|
||
|
|
||
|
ppath++;
|
||
|
for(i = 0; ppath[i]; i++) {
|
||
|
if(ppath[i] == ':')
|
||
|
ppath[i] = ' ';
|
||
|
}
|
||
|
result = Curl_sendf(sockfd, conn,
|
||
|
"CLIENT " LIBCURL_NAME " " LIBCURL_VERSION "\r\n"
|
||
|
"%s\r\n"
|
||
|
"QUIT\r\n", ppath);
|
||
|
if(result) {
|
||
|
failf(data, "Failed sending DICT request");
|
||
|
return result;
|
||
|
}
|
||
|
|
||
|
Curl_setup_transfer(data, FIRSTSOCKET, -1, FALSE, -1);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return CURLE_OK;
|
||
|
}
|
||
|
#endif /*CURL_DISABLE_DICT*/
|