char *getHeaderParmValue(const char *parmName, const char *header)
{
char *retValue = NULL;
const char *tempValue = NULL;
size_t tempSize = 0;
XPTDEBUG((" getHeaderParmValue(%s, %s)\n", parmName, header));
if ((parmName == NULL) || (header == NULL))
return retValue;
tempValue = getTokenValue(header, ',', '=', parmName, &tempSize);
if ((tempValue != NULL) && (tempSize >= 0)) {
retValue = (char *) xppMalloc(tempSize + 1);
if (retValue != NULL) {
xppMemset(retValue, 0, tempSize + 1);
xppStrncpy(retValue, tempValue, tempSize);
}
}
return retValue;
}
/**
* getHeaderTag
* - Parses an HTTP header tag value out of a HTTP header.
*
* IN tagName The name of the tag whose value is required.
* rspHeader The buffer containing the http header that is
* to be searched for the tag.
*
* RETURN
* A string containing the value of the requested header tag, or
* NULL if the tag was not found.
*
**/
char *getHeaderTag(const char *tagName, const char *rspHeader)
{
char *retValue = NULL;
const char *tempValue = NULL;
size_t tempSize = 0;
XPTDEBUG((" getHeaderTag(%s, %s)\n", tagName, rspHeader));
if ((tagName == NULL) || (rspHeader == NULL))
return retValue;
tempValue = getTokenValue(rspHeader, '\n', ':', tagName, &tempSize);
if ((tempValue != NULL) && (tempSize >= 0)) {
retValue = (char *) xppMalloc(tempSize + 1);
if (retValue != NULL) {
xppMemset(retValue, 0, tempSize + 1);
xppStrncpy(retValue, tempValue, tempSize);
}
}
return retValue;
} /* End of getHeaderTag() */
int MailMessage::parseHeaders(StringBuffer &rfcHeaders) {
ArrayList lines;
const StringBuffer *line;
StringBuffer strReceived;
bool receivedExtracted = false;
LOG.debug("parseHeaders START");
// Join header parts using \t or 8 blank
StringBuffer joinlinetab("\t");
rfcHeaders.replaceAll(joinlinetab, " ");
StringBuffer joinlinespaces(newline);
joinlinespaces+=" "; // 8 blanks
rfcHeaders.replaceAll(joinlinespaces, " ");
rfcHeaders.split(lines, newline);
// importance is set to "0" by default. Then there isn't anything modification
// in the header, at the end of the loop the importance will be set to "3", default normal
importance = "0";
for ( line=(StringBuffer *)lines.front();
line;
line=(StringBuffer *)lines.next() ) {
if( *line == "\r" )
break;
// The first empty line marks the end of the header section
if( line->empty() ){
break;
}
// Process the headers
if( line->ifind(TO) == 0 ){
to = MailMessage::decodeHeader(line->substr(TO_LEN));
}
else if( line->ifind(FROM) == 0 ) {
from = MailMessage::decodeHeader(line->substr(FROM_LEN));
}
else if( line->ifind(CC) == 0 ) {
cc = MailMessage::decodeHeader(line->substr(CC_LEN));
}
else if( line->ifind(BCC) == 0 ) {
bcc = MailMessage::decodeHeader(line->substr(BCC_LEN));
}
else if ( line->ifind(DATE) == 0 ) {
//subjectParsing = false;
if( date.parseRfc822(line->substr(DATE_LEN)) ) {
LOG.error("Error parsing date");
return 500;
}
}
else if( line->ifind(SUBJECT) == 0 ) {
subject = MailMessage::decodeHeader(line->substr(SUBJECT_LEN));
LOG.debug("SUBJECT: %s", subject.c_str());
}
else if( line->ifind(ENCODING) == 0 ) { // it is here for single part only
body.setEncoding(line->substr(ENCODING_LEN));
}
else if(line->ifind(MIMEVERS) == 0 ) {
mimeVersion = line->substr(MIMEVERS_LEN);
}
else if(line->ifind(MESSAGEID) == 0 ) {
messageId = line->substr(MESSAGEID_LEN);
}
else if(line->ifind(IMPORTANCE) == 0 ) {
StringBuffer data = line->substr(IMPORTANCE_LEN);
data.lowerCase();
importance = convertImportance(data);
}
else if(line->ifind(X_PRIORITY) == 0 ) {
if (importance == "0") {
StringBuffer data = line->substr(X_PRIORITY_LEN);
data.lowerCase();
importance = convertXPriority(data);
}
}
else if( line->ifind(MIMETYPE) == 0 ) {
StringBuffer sb = getTokenValue(line, MIMETYPE);
if (sb.length() > 0)
contentType = sb;
sb.reset();
sb = getTokenValue(line, "boundary=", false);
if (sb.length() > 0) {
boundary = sb;
} else {
body.setCharset(getTokenValue(line, CT_CHARSET));
}
/*
size_t len = line->find(";") - MIMETYPE_LEN ;
contentType = line->substr(MIMETYPE_LEN, len);
// Save boundary for multipart
size_t begin = line->ifind("boundary=");
size_t end = StringBuffer::npos;
if( begin != StringBuffer::npos ) {
begin += strlen("boundary=\"");
end = line->find("\"", begin) ;
boundary = line->substr( begin, end-begin );
}
else {
begin=line->ifind(CT_CHARSET);
if( begin != StringBuffer::npos ) {
begin += strlen(CT_CHARSET);
size_t end = begin;
size_t quote = line->find("\"", begin);
if (quote != StringBuffer::npos){
begin = quote + 1;
end = line->find("\"", begin) ;
}
else {
end = line->find(";", begin) ;
if (end == StringBuffer::npos) {
end = line->find(" ", begin);
}
}
body.setCharset( line->substr( begin, end-begin ) );
}
}
*/
}
else if(line->ifind(RECEIVED) == 0) {
if (!receivedExtracted) {
strReceived = line->substr(line->rfind(";") );
if (!strReceived.empty()) {
received.parseRfc822(strReceived.substr(2));
receivedExtracted = true;
}
/*
while (!strReceived.empty()) {
if (received.parseRfc822(strReceived.substr(2)) == 0) {
receivedExtracted = true;
break;
} else {
StringBuffer s(line->substr(line->rfind(strReceived.c_str())));
strReceived = line->substr(s.rfind(";"));
}
}
*/
}
}
else {
headers.add(*(StringBuffer *)line);
}
}
// If received was not found, copy send date
if( received == BasicTime() ){
received = date;
}
// if the importance is never set we put the importance to 3, normal
if (importance == "0") {
importance = "3";
}
LOG.debug("parseHeaders END");
// FIXME: should check for mandatory headers before return 0
return 0;
}
/**
* Get the next bodypart from the message body string.
*
* @param rfcBody (in) - message content
* @param boundary (in) - mime boundary string
* @param ret (out) - parsed BodyPart
* @param next (i/o) - offset of the new boundary
* @param isAttach (in) - says if the current body part is an attachment or not
*/
static bool getBodyPart(StringBuffer &rfcBody, StringBuffer &boundary,
BodyPart &ret, size_t &next, bool isAttach)
{
LOG.debug("getBodyPart START");
StringBuffer newline;
// The part starts on the next line
size_t begin = findNewLine(rfcBody, next);
if (begin == StringBuffer::npos)
return false;
// find the end of the part
next = rfcBody.find(boundary, begin);
if (next == StringBuffer::npos)
return false;
// get the part
StringBuffer part = rfcBody.substr(begin, next-begin);
// If it is a multipart alternative part, get the text part only.
// check only until the first new line not on all the message (it could be
// a message inside another message)
size_t headers_len = getHeadersLen(part, newline);
StringBuffer headers_part = part.substr(0, headers_len);
if (headers_part.ifind("Content-Type: multipart/alternative") != StringBuffer::npos) {
if(part.ifind("Content-Type: multipart/alternative") != StringBuffer::npos) {
size_t b_pos = part.ifind("boundary=");
if( b_pos != StringBuffer::npos ) {
size_t begin = part.find("=\"", b_pos) + 2 ;
size_t end = part.find("\"", begin) ;
StringBuffer inner_boundary("\n--");
inner_boundary += part.substr( begin, end-begin );
begin = part.find(inner_boundary, end);
begin += inner_boundary.length();
end = part.find(inner_boundary, begin);
if (begin != StringBuffer::npos && end != StringBuffer::npos) {
part = part.substr(begin, end-begin);
LOG.debug("Bodypart is multipart/alternative: "
"getting first alternative only: \n%s\n", part.c_str() );
}
}
}
}
// Split headers and body
size_t hdrlen = getHeadersLen(part, newline);
// Get headers
StringBuffer headers = part.substr(0, hdrlen);
// Join header parts using \t or 8 blank
StringBuffer joinlinetab("\t");
headers.replaceAll(joinlinetab, " ");
StringBuffer joinlinespaces(newline);
joinlinespaces+=" "; // 8 blanks
headers.replaceAll(joinlinespaces, " ");
ArrayList lines;
const StringBuffer *line;
// parse the bodypart headers
headers.split(lines, newline);
for ( line=(StringBuffer *)lines.front();
line;
line=(StringBuffer *)lines.next() ) {
if( *line == "\r" )
continue;
// The first empty line marks the end of the header section
//if( line->empty() ){
// break;
//}
// Process the headers
if( line->ifind(MIMETYPE) == 0 ) { // it must at the beginning
ret.setMimeType(getTokenValue(line, MIMETYPE));
if (line->ifind(CT_NAME) != StringBuffer::npos) {
ret.setName(MailMessage::decodeHeader(getTokenValue(line, CT_NAME,false)));
}
if (line->ifind(CT_CHARSET) != StringBuffer::npos ) {
ret.setCharset(getTokenValue(line, CT_CHARSET));
}
}
else if( line->ifind(DISPOSITION) == 0 ) {
ret.setDisposition( getTokenValue(line, DISPOSITION));
if (line->ifind(CD_FILENAME) != StringBuffer::npos ) {
ret.setFilename( MailMessage::decodeHeader( getTokenValue(line, CD_FILENAME, false) ) );
}
}
else if( line->ifind(ENCODING) == 0 ) {
ret.setEncoding( getTokenValue(line, ENCODING));
}
}
// move to the beginning of the content
hdrlen += strlen(newline) + strlen(newline); // added 2 new line that separate the bodyparts
// get bodypart content
if( isAttach == false) { // || !ret.getFilename() ) {
// this is not an attachment
if(ret.getEncoding() && strcmp(ret.getEncoding(), "quoted-printable") == 0 ) {
char *decoded = qp_decode( part.substr(hdrlen) );
ret.setContent ( decoded );
delete [] decoded;
}
else if (ret.getEncoding() && strcmp(ret.getEncoding(), "base64") == 0 ) {
char *decoded = "";
size_t len = 0;
if( uudecode( part.substr(hdrlen), &decoded, &len ) ) {
LOG.error("Error decoding content");
}
ret.setContent ( decoded );
delete [] decoded;
}
else {
bool found = true;
if (part.substr(hdrlen).length() < 6) {
StringBuffer s(part.substr(hdrlen));
for (unsigned int i = 0; i < s.length(); i++) {
if (s.c_str()[i] != '\r' && s.c_str()[i] != '\n') {
found = true;
break;
} else {
found = false;
}
}
}
if (found) {
ret.setContent ( part.substr(hdrlen) );
}
}
}
else {
LOG.debug("Attachment");
ret.setContent( mkTempFileName( ret.getFilename() ) );
LOG.debug("%s", ret.getContent());
StringBuffer p = part.substr(hdrlen);
if (p.length()) {
LOG.debug("Saving...");
if( convertAndSave(ret.getContent(), p.c_str(), ret.getEncoding()) ) {
LOG.error("Error in convertAndSave");
}
else {
LOG.debug("convertAndSave success");
}
}
}
LOG.debug("getBodyPart END");
// return true if there are more parts
return (next != StringBuffer::npos);
}
