/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */ /* ***** BEGIN LICENSE BLOCK ***** * Version: MPL 1.1/GPL 2.0/LGPL 2.1 * * The contents of this file are subject to the Mozilla Public License Version * 1.1 (the "License"); you may not use this file except in compliance with * the License. You may obtain a copy of the License at * http://www.mozilla.org/MPL/ * * Software distributed under the License is distributed on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License * for the specific language governing rights and limitations under the * License. * * The Original Code is mozilla.org code. * * The Initial Developer of the Original Code is * Netscape Communications Corporation. * Portions created by the Initial Developer are Copyright (C) 1998 * the Initial Developer. All Rights Reserved. * * Contributor(s): * * Alternatively, the contents of this file may be used under the terms of * either of the GNU General Public License Version 2 or later (the "GPL"), * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), * in which case the provisions of the GPL or the LGPL are applicable instead * of those above. If you wish to allow use of your version of this file only * under the terms of either the GPL or the LGPL, and not to allow others to * use your version of this file under the terms of the MPL, indicate your * decision by deleting the provisions above and replace them with the notice * and other provisions required by the GPL or the LGPL. If you do not delete * the provisions above, a recipient may use your version of this file under * the terms of any one of the MPL, the GPL or the LGPL. * * ***** END LICENSE BLOCK ***** */ #include "nsCOMPtr.h" #include "nsIIOService.h" #include "nsNetCID.h" #include "nsIServiceManager.h" #include "nsICharsetConverterManager.h" #include "msgCore.h" #include "prlog.h" #include "prtypes.h" #include "prmem.h" #include "plstr.h" #include "nsIMsgVCardService.h" #include "mimecth.h" #include "mimexpcom.h" #include "mimevcrd.h" #include "nsEscape.h" #include "nsIURI.h" #include "nsMsgI18N.h" #include "nsMsgUtils.h" #include "nsReadableUtils.h" #include "nsIStringBundle.h" #include "nsVCardStringResources.h" #include "nsPrintfCString.h" #include "nsCRT.h" #include "prprf.h" // String bundles... #ifndef XP_MAC static nsCOMPtr stringBundle = nsnull; #endif static int MimeInlineTextVCard_parse_line (char *, PRInt32, MimeObject *); static int MimeInlineTextVCard_parse_eof (MimeObject *, PRBool); static int MimeInlineTextVCard_parse_begin (MimeObject *obj); static int s_unique = 0; static int BeginVCard (MimeObject *obj); static int EndVCard (MimeObject *obj); static int WriteOutVCard (MimeObject *obj, VObject* v); #ifdef MOZ_THUNDERBIRD static int GenerateVCardData(MimeObject * aMimeObj, VObject* aVcard); static int OutputVcardAttribute(MimeObject *aMimeObj, VObject *aVcard, const char* id, nsACString& vCardOutput); static int OutputBasicVcard(MimeObject *aMimeObj, VObject *aVcard, nsACString& vCardOutput); #else static int WriteOutEachVCardProperty (MimeObject *obj, VObject* v, int* numEmail); static int WriteOutVCardProperties (MimeObject *obj, VObject* v, int* numEmail); static int WriteLineToStream (MimeObject *obj, const char *line, PRBool aDoCharConversion); static void GetEmailProperties (VObject* o, char ** attribName); static void GetTelephoneProperties (VObject* o, char ** attribName); static void GetAddressProperties (VObject* o, char ** attribName); static int WriteValue (MimeObject *obj, const char *); static int WriteAttribute (MimeObject *obj, const char *); static int WriteOutVCardPhoneProperties (MimeObject *obj, VObject* v); static int WriteOutEachVCardPhoneProperty (MimeObject *obj, VObject* o); #endif typedef struct { const char *attributeName; int resourceId; } AttributeName; #define kNumAttributes 12 #define VCARD_URL "chrome://messenger/locale/vcard.properties" #define MSGVCARDSERVICE_CONTRACT_ID "@mozilla.org/addressbook/msgvcardservice;1" /* This is the object definition. Note: we will set the superclass to NULL and manually set this on the class creation */ MimeDefClass(MimeInlineTextVCard, MimeInlineTextVCardClass, mimeInlineTextVCardClass, NULL); extern "C" MimeObjectClass * MIME_VCardCreateContentTypeHandlerClass(const char *content_type, contentTypeHandlerInitStruct *initStruct) { MimeObjectClass *clazz = (MimeObjectClass *)&mimeInlineTextVCardClass; /* * Must set the superclass by hand. */ if (!COM_GetmimeInlineTextClass()) return NULL; clazz->superclass = (MimeObjectClass *)COM_GetmimeInlineTextClass(); initStruct->force_inline_display = PR_TRUE; return clazz; } /* * Implementation of VCard clazz */ static int MimeInlineTextVCardClassInitialize(MimeInlineTextVCardClass *clazz) { MimeObjectClass *oclass = (MimeObjectClass *) clazz; NS_ASSERTION(!oclass->class_initialized, "1.1 19 Mar 1999 12:11"); oclass->parse_begin = MimeInlineTextVCard_parse_begin; oclass->parse_line = MimeInlineTextVCard_parse_line; oclass->parse_eof = MimeInlineTextVCard_parse_eof; return 0; } static int MimeInlineTextVCard_parse_begin (MimeObject *obj) { int status = ((MimeObjectClass*)COM_GetmimeLeafClass())->parse_begin(obj); MimeInlineTextVCardClass *clazz; if (status < 0) return status; if (!obj->output_p) return 0; if (!obj->options || !obj->options->write_html_p) return 0; /* This is a fine place to write out any HTML before the real meat begins. In this sample code, we tell it to start a table. */ clazz = ((MimeInlineTextVCardClass *) obj->clazz); /* initialize vcard string to empty; */ NS_MsgSACopy(&(clazz->vCardString), ""); obj->options->state->separator_suppressed_p = PR_TRUE; return 0; } char *strcpySafe (char *dest, const char *src, size_t destLength) { char *result = strncpy (dest, src, --destLength); dest[destLength] = '\0'; return result; } static int MimeInlineTextVCard_parse_line (char *line, PRInt32 length, MimeObject *obj) { // This routine gets fed each line of data, one at a time. char* linestring; MimeInlineTextVCardClass *clazz = ((MimeInlineTextVCardClass *) obj->clazz); if (!obj->output_p) return 0; if (!obj->options || !obj->options->output_fn) return 0; if (!obj->options->write_html_p) { return COM_MimeObject_write(obj, line, length, PR_TRUE); } linestring = (char *) PR_MALLOC (length + 1); memset(linestring, 0, (length + 1)); if (linestring) { strcpySafe((char *)linestring, line, length + 1); NS_MsgSACat (&clazz->vCardString, linestring); PR_Free (linestring); } return 0; } //////////////////////////////////////////////////////////////////////////////// static PRInt32 INTL_ConvertCharset(const char* from_charset, const char* to_charset, const char* inBuffer, const PRInt32 inLength, char** outBuffer, PRInt32* outLength) { nsresult res; // invalid input if (nsnull == from_charset || nsnull == to_charset || '\0' == *from_charset || '\0' == *to_charset || nsnull == inBuffer) return -1; // from to identical if (!nsCRT::strcasecmp(from_charset, to_charset)) return -1; // us-ascii is a subset of utf-8 if ((!nsCRT::strcasecmp(from_charset, "us-ascii") && !nsCRT::strcasecmp(to_charset, "UTF-8")) || (!nsCRT::strcasecmp(from_charset, "UTF-8") && !nsCRT::strcasecmp(to_charset, "us-ascii"))) return -1; nsAutoString outString; res = ConvertToUnicode(from_charset, inBuffer, outString); // known bug in 4.x, it mixes Shift_JIS (or EUC-JP) and ISO-2022-JP in vCard fields if (NS_ERROR_MODULE_UCONV == NS_ERROR_GET_MODULE(res)) { if (!nsCRT::strcasecmp("ISO-2022-JP", from_charset)) { res = ConvertToUnicode("Shift_JIS", inBuffer, outString); if (NS_ERROR_MODULE_UCONV == NS_ERROR_GET_MODULE(res)) { res = ConvertToUnicode("EUC-JP", inBuffer, outString); } } } if (NS_SUCCEEDED(res)) { nsCAutoString result; res = ConvertFromUnicode(to_charset, outString, result); if (NS_SUCCEEDED(res)) { *outLength = result.Length(); *outBuffer = PL_strdup(result.get()); } } return NS_SUCCEEDED(res) ? 0 : -1; } //////////////////////////////////////////////////////////////////////////////// static int MimeInlineTextVCard_parse_eof (MimeObject *obj, PRBool abort_p) { nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; int status = 0; MimeInlineTextVCardClass *clazz = ((MimeInlineTextVCardClass *) obj->clazz); VObject *t, *v; if (obj->closed_p) return 0; /* Run parent method first, to flush out any buffered data. */ // status = ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_eof(obj, abort_p); status = ((MimeObjectClass*)COM_GetmimeInlineTextClass())->parse_eof(obj, abort_p); if (status < 0) return status; // Don't quote vCards... if ( (obj->options) && ((obj->options->format_out == nsMimeOutput::nsMimeMessageQuoting) || (obj->options->format_out == nsMimeOutput::nsMimeMessageBodyQuoting)) ) return 0; if (!clazz->vCardString) return 0; v = vCardService->Parse_MIME(clazz->vCardString, strlen(clazz->vCardString)); NS_ASSERTION(v, "parse of vCard failed"); if (clazz->vCardString) { PR_Free ((char*) clazz->vCardString); clazz->vCardString = NULL; } if (obj->output_p && obj->options && obj->options->write_html_p && obj->options->headers != MimeHeadersCitation) { /* This is a fine place to write any closing HTML. In fact, you may want all the writing to be here, and all of the above would just collect data into datastructures, though that isn't very "streaming". */ t = v; while (v && status >= 0) { /* write out html */ status = WriteOutVCard (obj, v); /* parse next vcard incase they're embedded */ v = vCardService->NextVObjectInList(v); } (void)vCardService->CleanVObject(t); } if (status < 0) return status; return 0; } static int EndVCard (MimeObject *obj) { int status = 0; /* Scribble HTML-ending stuff into the stream */ char htmlFooters[32]; PR_snprintf (htmlFooters, sizeof(htmlFooters), "%s%s", MSG_LINEBREAK, MSG_LINEBREAK); status = COM_MimeObject_write(obj, htmlFooters, strlen(htmlFooters), PR_FALSE); if (status < 0) return status; return 0; } static int BeginVCard (MimeObject *obj) { int status = 0; /* Scribble HTML-starting stuff into the stream */ char htmlHeaders[32]; s_unique++; PR_snprintf (htmlHeaders, sizeof(htmlHeaders), "%s%s", MSG_LINEBREAK, MSG_LINEBREAK); status = COM_MimeObject_write(obj, htmlHeaders, strlen(htmlHeaders), PR_TRUE); if (status < 0) return status; return 0; } #ifndef MOZ_THUNDERBIRD static int WriteEachLineToStream (MimeObject *obj, const char *line) { int status = 0; char *htmlLine; int htmlLen = strlen(line) + 1; htmlLine = (char *) PR_MALLOC (htmlLen); if (htmlLine) { htmlLine[0] = '\0'; PL_strcat (htmlLine, line); status = COM_MimeObject_write(obj, htmlLine, strlen(htmlLine), PR_TRUE); PR_Free ((void*) htmlLine); } else status = VCARD_OUT_OF_MEMORY; return status; } static int OutputTable (MimeObject *obj, PRBool endTable, PRBool border, char *cellspacing, char *cellpadding, char *bgcolor) { int status = 0; char * htmlLine = NULL; if (endTable) { status = WriteEachLineToStream (obj, ""); } else { int htmlLen = strlen("") + 1; if (border) htmlLen += strlen (" BORDER"); if (cellspacing) htmlLen += strlen(" CELLSPACING=") + strlen(cellspacing); if (cellpadding) htmlLen += strlen(" CELLPADDING=") + strlen(cellpadding); if (bgcolor) htmlLen += strlen(" BGCOLOR=") + strlen(bgcolor); if (border || cellspacing || cellpadding || bgcolor) htmlLen++; htmlLine = (char *) PR_MALLOC (htmlLen); if (htmlLine) { htmlLine[0] = '\0'; PL_strcat (htmlLine, ""); status = COM_MimeObject_write(obj, htmlLine, strlen(htmlLine), PR_TRUE); PR_Free ((void*) htmlLine); } else status = VCARD_OUT_OF_MEMORY; } return status; } static int OutputTableRowOrData(MimeObject *obj, PRBool outputRow, PRBool end, char * align, char* valign, char* colspan, char* width) { int status = 0; char * htmlLine = NULL; if (end) if (outputRow) status = WriteEachLineToStream (obj, ""); else status = WriteEachLineToStream (obj, ""); else { int htmlLen = strlen("") + 1; if (align) htmlLen += strlen(" ALIGN=") + strlen(align); if (colspan) htmlLen += strlen(" COLSPAN=") + strlen(colspan); if (width) htmlLen += strlen(" WIDTH=") + strlen(width); if (valign) htmlLen += strlen(" VALIGN=") + strlen(valign); if (align || valign || colspan || width) htmlLen++; htmlLine = (char *) PR_MALLOC (htmlLen); if (htmlLine) { htmlLine[0] = '\0'; if (outputRow) PL_strcat (htmlLine, ""); status = COM_MimeObject_write(obj, htmlLine, strlen(htmlLine), PR_TRUE); PR_Free ((void*) htmlLine); } else status = VCARD_OUT_OF_MEMORY; } return status; } static int OutputFont(MimeObject *obj, PRBool endFont, char * size, char* color) { int status = 0; char * htmlLine = NULL; if (endFont) status = WriteEachLineToStream (obj, ""); else { int htmlLen = strlen("") + 1; if (size) htmlLen += strlen(" SIZE=") + strlen(size); if (color) htmlLen += strlen(" COLOR=") + strlen(color); if (size || color) htmlLen++; htmlLine = (char *) PR_MALLOC (htmlLen); if (htmlLine) { htmlLine[0] = '\0'; PL_strcat (htmlLine, ""); status = COM_MimeObject_write(obj, htmlLine, strlen(htmlLine), PR_TRUE); PR_Free ((void*) htmlLine); } else status = VCARD_OUT_OF_MEMORY; } return status; } static int OutputVcardAttribute(MimeObject *obj, VObject *v, const char* id) { int status = 0; VObject *prop = NULL; char *string = NULL; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; prop = vCardService->IsAPropertyOf(v, id); if (prop) if (VALUE_TYPE(prop)) { if (VALUE_TYPE(prop) != VCVT_RAW) { string = vCardService->FakeCString(prop); } else { string = vCardService->VObjectAnyValue(prop); } if (string) { status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) { PR_FREEIF (string); return status; } status = WriteLineToStream (obj, string, PR_TRUE); PR_FREEIF (string); if (status < 0) return status; status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) return status; } } return 0; } static int OutputBasicVcard(MimeObject *obj, VObject *v) { int status = 0; char * htmlLine1 = NULL; char * htmlLine2 = NULL; char * htmlLine = NULL; VObject *prop = NULL; char * urlstring = NULL; char * namestring = NULL; char * emailstring = NULL; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; /* get the name and email */ prop = vCardService->IsAPropertyOf(v, VCFullNameProp); if (prop) { if (VALUE_TYPE(prop)) { if (VALUE_TYPE(prop) != VCVT_RAW) { namestring = vCardService->FakeCString(prop); } else { namestring = vCardService->VObjectAnyValue(prop); } if (namestring) { prop = vCardService->IsAPropertyOf(v, VCURLProp); if (prop) { urlstring = vCardService->FakeCString(prop); if (urlstring) htmlLine1 = PR_smprintf ("%s ", urlstring, namestring); else htmlLine1 = PR_smprintf ("%s ", namestring); PR_FREEIF (urlstring); } else htmlLine1 = PR_smprintf ("%s ", namestring); /* get the email address */ prop = vCardService->IsAPropertyOf(v, VCEmailAddressProp); if (prop) { emailstring = vCardService->FakeCString(prop); if (emailstring) { htmlLine2 = PR_smprintf ("<%s>", emailstring, emailstring); PR_FREEIF (emailstring); } } PR_FREEIF (namestring); if (!htmlLine1 && !htmlLine2) { PR_FREEIF (htmlLine1); PR_FREEIF (htmlLine2); return VCARD_OUT_OF_MEMORY; } else { htmlLine = NS_MsgSACat (&htmlLine, htmlLine1); htmlLine = NS_MsgSACat (&htmlLine, htmlLine2); } PR_FREEIF (htmlLine1); PR_FREEIF (htmlLine2); } } } status = OutputTable (obj, PR_FALSE, PR_FALSE, "0", "0", NULL); if (status < 0) { PR_FREEIF (htmlLine); return status; } if (htmlLine) { status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) { PR_Free (htmlLine); return status; } status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) { PR_Free (htmlLine); return status; } status = WriteLineToStream (obj, htmlLine, PR_TRUE); PR_Free (htmlLine); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; } else status = VCARD_OUT_OF_MEMORY; status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* output the title */ status = OutputVcardAttribute (obj, v, VCTitleProp); if (status < 0) return status; /* write out the org name and company name */ prop = vCardService->IsAPropertyOf(v, VCOrgProp); if (prop) { status = OutputVcardAttribute (obj, prop, VCOrgNameProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnitProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnit2Prop); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnit3Prop); if (status < 0) return status; } status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; return 0; } static int OutputAdvancedVcard(MimeObject *obj, VObject *v) { int status = 0; char * htmlLine1 = NULL; char * htmlLine2 = NULL; VObject *prop = NULL; VObject* prop2 = NULL; char * urlstring = NULL; char * namestring = NULL; char * emailstring = NULL; int numEmail = 0; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; status = OutputTable (obj, PR_FALSE, PR_FALSE, "0", "0", NULL); if (status < 0) return status; /* beginning of first row */ status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", "3", NULL); if (status < 0) return status; /* get the name and email */ prop = vCardService->IsAPropertyOf(v, VCFullNameProp); if (prop) { if (VALUE_TYPE(prop)) { if (VALUE_TYPE(prop) != VCVT_RAW) { namestring = vCardService->FakeCString(prop); } else { namestring = vCardService->VObjectAnyValue(prop); } if (namestring) { prop = vCardService->IsAPropertyOf(v, VCURLProp); if (prop) { urlstring = vCardService->FakeCString(prop); if (urlstring) htmlLine1 = PR_smprintf ("%s ", urlstring, namestring); else htmlLine1 = PR_smprintf ("%s ", namestring); PR_FREEIF (urlstring); } else htmlLine1 = PR_smprintf ("%s ", namestring); PR_FREEIF (namestring); } if (!htmlLine1) { return VCARD_OUT_OF_MEMORY; } } } /* output the name if there was one */ if (htmlLine1) { status = WriteLineToStream (obj, htmlLine1, PR_TRUE); PR_FREEIF (htmlLine1); if (status < 0) return status; } status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* beginning of second row */ status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; /* output the title */ status = OutputVcardAttribute (obj, v, VCTitleProp); if (status < 0) return status; /* write out the org name and company name */ prop = vCardService->IsAPropertyOf(v, VCOrgProp); if (prop) { status = OutputVcardAttribute (obj, prop, VCOrgNameProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnitProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnit2Prop); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCOrgUnit3Prop); if (status < 0) return status; } status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE , "LEFT", "TOP", NULL, "\"10\""); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; /* get the email address */ prop = vCardService->IsAPropertyOf(v, VCEmailAddressProp); if (prop) { emailstring = vCardService->FakeCString(prop); if (emailstring) { numEmail++; /* if its an internet address prepend the mailto url */ prop2 = vCardService->IsAPropertyOf(prop, VCInternetProp); if (prop2) htmlLine2 = PR_smprintf ("<%s>", emailstring, emailstring); else htmlLine2 = PR_smprintf ("%s", emailstring); PR_FREEIF (emailstring); } if (!htmlLine2) { return VCARD_OUT_OF_MEMORY; } } /* output email address */ if (htmlLine2) { status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) { PR_FREEIF (htmlLine2); return status; } status = WriteLineToStream (obj, htmlLine2, PR_TRUE); PR_FREEIF (htmlLine2); if (status < 0) return status; status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) return status; /* output html mail setting only if its true */ prop = vCardService->IsAPropertyOf(v, VCUseHTML); if (prop) { if (VALUE_TYPE(prop)) { namestring = vCardService->FakeCString(prop); if (namestring) if (nsCRT::strcasecmp (namestring, "TRUE") == 0) { PR_FREEIF (namestring); status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) return status; char *tString = VCardGetStringByID(VCARD_LDAP_USEHTML); status = WriteLineToStream (obj, tString, PR_FALSE); PR_FREEIF(tString); if (status < 0) return status; status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) return status; } else PR_FREEIF (namestring); } } } status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* beginning of third row */ /* write out address information if we have any */ status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; /* first column */ status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; prop = vCardService->IsAPropertyOf(v, VCAdrProp); if (prop) { status = OutputVcardAttribute (obj, prop, VCPostalBoxProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCExtAddressProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCStreetAddressProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCCityProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCRegionProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCPostalCodeProp); if (status < 0) return status; status = OutputVcardAttribute (obj, prop, VCCountryNameProp); if (status < 0) return status; } status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* second column */ status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE , NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* third column */ status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; /* output telephone fields */ status = WriteOutVCardPhoneProperties (obj, v); if (status < 0) return status; /* output conference fields */ status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) return status; prop = vCardService->IsAPropertyOf(v, VCCooltalk); if (prop) { char *tString = VCardGetStringByID(VCARD_ADDR_CONFINFO); WriteLineToStream (obj, tString, PR_FALSE); PR_FREEIF(tString); if (status < 0) return status; prop2 = vCardService->IsAPropertyOf(prop, VCUseServer); if (prop2) { if (VALUE_TYPE(prop2)) { namestring = vCardService->FakeCString(prop2); char *tString1 = NULL; if (nsCRT::strcmp (namestring, "0") == 0) { tString1 = VCardGetStringByID(VCARD_ADDR_DEFAULT_DLS); } else { if (nsCRT::strcmp (namestring, "1") == 0) tString1 = VCardGetStringByID(VCARD_ADDR_SPECIFIC_DLS); else if (nsCRT::strcmp (namestring, "2") == 0) tString1 = VCardGetStringByID(VCARD_ADDR_HOSTNAMEIP); } if (tString1) { status = WriteLineToStream (obj, tString1, PR_FALSE); } PR_FREEIF(tString1); PR_FREEIF (namestring); if (status < 0) return status; } } status = OutputVcardAttribute (obj, prop, VCCooltalkAddress); if (status < 0) return status; } status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* beginning of last row */ /* output notes field */ prop = vCardService->IsAPropertyOf(v, VCCommentProp); if (prop) { status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", "3", NULL); if (status < 0) return status; status = OutputVcardAttribute (obj, v, VCCommentProp); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; } status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; /* output second table containing all the additional info */ status = OutputTable (obj, PR_FALSE, PR_FALSE, "0", "0", NULL); if (status < 0) return status; /* beginning of first row */ status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", "2", NULL); if (status < 0) return status; /* output the additional info header */ status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) return status; char *tString = VCardGetStringByID(VCARD_ADDR_ADDINFO); status = WriteLineToStream (obj, tString, PR_FALSE); PR_FREEIF(tString); if (status < 0) return status; status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; /* beginning of remaining rows */ status = WriteOutVCardProperties (obj, v, &numEmail); if (status < 0) return status; status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; return 0; } static int OutputButtons(MimeObject *obj, PRBool basic, VObject *v) { int status = 0; char * htmlLine1 = NULL; char *htmlLine2 = NULL; char* vCard = NULL; char* vEscCard = NULL; int len = 0; char* rsrcString = NULL; if (!obj->options->output_vcard_buttons_p) return status; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; vCard = vCardService->WriteMemoryVObjects(0, &len, v, PR_FALSE); if (!vCard) return VCARD_OUT_OF_MEMORY; vEscCard = nsEscape (vCard, url_XAlphas); PR_FREEIF (vCard); if (!vEscCard) return VCARD_OUT_OF_MEMORY; if (basic) { rsrcString = VCardGetStringByID(VCARD_ADDR_VIEW_COMPLETE_VCARD); htmlLine1 = PR_smprintf ("
", rsrcString, s_unique); } else { rsrcString = VCardGetStringByID(VCARD_ADDR_VIEW_CONDENSED_VCARD); htmlLine1 = PR_smprintf ("
", rsrcString, s_unique); } PR_FREEIF(rsrcString); rsrcString = VCardGetStringByID(VCARD_MSG_ADD_TO_ADDR_BOOK); htmlLine2 = PR_smprintf("
", vEscCard, rsrcString); PR_FREEIF(rsrcString); if (!htmlLine1 || !htmlLine2) { status = VCARD_OUT_OF_MEMORY; goto FAIL; } status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) goto FAIL; /* * WARNING: This HTML is written to the stream using JavaScript, * because we don't want this button to be displayed when JS has * been switched off (in the whole client or just in email). The * button won't work when JS is switched off (since it calls a JS * function), so then we don't want the button to be displayed. * -- erik (and jfriend) */ status = WriteEachLineToStream (obj, ""); if (status < 0) goto FAIL; status = WriteLineToStream (obj, htmlLine2, PR_FALSE); if (status < 0) goto FAIL; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) goto FAIL; FAIL: PR_FREEIF (vEscCard); PR_FREEIF (htmlLine1); PR_FREEIF(htmlLine2); return status; } static int BeginLayer(MimeObject *obj, PRBool basic) { int status = 0; char * captionLine = NULL; if (basic) { //CSS: START OF DIV captionLine = PR_smprintf ("
", s_unique); } else { //CSS: START OF DIV captionLine = PR_smprintf ("
", s_unique); } if (captionLine) { status = WriteEachLineToStream (obj, captionLine); PR_Free(captionLine); if (status < 0) return status; status = OutputTable (obj, PR_FALSE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, NULL, "TOP", NULL, NULL); if (status < 0) return status; status = OutputTable (obj, PR_FALSE, PR_TRUE, "0", "0", "#FFFFFF"); if (status < 0) return status; if (basic) { status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (status < 0) return status; } else { status = OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData(obj, PR_FALSE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; } status = OutputTable (obj, PR_FALSE, PR_FALSE, "4", NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, NULL, NULL, NULL, NULL); if (status < 0) return status; } else status = VCARD_OUT_OF_MEMORY; return status; } static int EndLayer(MimeObject *obj, PRBool basic, VObject* v) { int status = 0; char * captionLine = NULL; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputButtons(obj, basic, v); if (status < 0) return status; status = OutputTableRowOrData (obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); if (status < 0) return status; status = OutputTable (obj, PR_TRUE, PR_FALSE, NULL, NULL, NULL); if (status < 0) return status; if (!basic) { //CSS: END OF DIV status = WriteEachLineToStream (obj, "
"); if (status < 0) return status; status = WriteEachLineToStream (obj, "

"); } else { //CSS: END DIV status = WriteEachLineToStream (obj, "
"); } if (status < 0) return status; return 0; } static int WriteOutVCard (MimeObject *obj, VObject* v) { int status = 0; status = BeginVCard (obj); if (status < 0) return status; /* write out basic layer */ status = BeginLayer(obj, PR_TRUE); if (status < 0) return status; status = OutputBasicVcard(obj, v); if (status < 0) return status; status = EndLayer(obj, PR_TRUE, v); if (status < 0) return status; /* write out advanced layer */ status = BeginLayer(obj, PR_FALSE); if (status < 0) return status; status = OutputAdvancedVcard(obj, v); if (status < 0) return status; status = EndLayer(obj, PR_FALSE, v); if (status < 0) return status; status = EndVCard (obj); if (status < 0) return status; return 0; } static void GetAddressProperties (VObject* o, char ** attribName) { nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return; VObject* domProp = vCardService->IsAPropertyOf(o, VCDomesticProp); VObject* intlProp = vCardService->IsAPropertyOf(o, VCInternationalProp); VObject* postal = vCardService->IsAPropertyOf(o, VCPostalProp); VObject* parcel = vCardService->IsAPropertyOf(o, VCParcelProp); VObject* home = vCardService->IsAPropertyOf(o, VCHomeProp); VObject* work = vCardService->IsAPropertyOf(o, VCWorkProp); char *tString = NULL; if (domProp) { tString = VCardGetStringByID(VCARD_LDAP_DOM_TYPE); } if (intlProp) { tString = VCardGetStringByID(VCARD_LDAP_INTL_TYPE); } if (postal) { tString = VCardGetStringByID(VCARD_LDAP_POSTAL_TYPE); } if (parcel) { tString = VCardGetStringByID(VCARD_LDAP_PARCEL_TYPE); } if (home) { tString = VCardGetStringByID(VCARD_LDAP_HOME_TYPE); } if (work) { tString = VCardGetStringByID(VCARD_LDAP_WORK_TYPE); } if (tString) { NS_MsgSACat (&(*attribName), " "); NS_MsgSACat (&(*attribName), tString); PR_FREEIF(tString); } } static void GetTelephoneProperties (VObject* o, char ** attribName) { nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return; VObject* prefProp = vCardService->IsAPropertyOf(o, VCPreferredProp); VObject* home = vCardService->IsAPropertyOf(o, VCHomeProp); VObject* work = vCardService->IsAPropertyOf(o, VCWorkProp); VObject* voiceProp = vCardService->IsAPropertyOf(o, VCVoiceProp); VObject* fax = vCardService->IsAPropertyOf(o, VCFaxProp); VObject* msg = vCardService->IsAPropertyOf(o, VCMessageProp); VObject* cell = vCardService->IsAPropertyOf(o, VCCellularProp); VObject* pager = vCardService->IsAPropertyOf(o, VCPagerProp); VObject* bbs = vCardService->IsAPropertyOf(o, VCBBSProp); char *tString = NULL; if (prefProp) { tString = VCardGetStringByID(VCARD_LDAP_PREF_TYPE); } if (home) { tString = VCardGetStringByID(VCARD_LDAP_HOME_TYPE); } if (work) { tString = VCardGetStringByID(VCARD_LDAP_WORK_TYPE); } if (voiceProp) { tString = VCardGetStringByID(VCARD_LDAP_VOICE_TYPE); } if (fax) { tString = VCardGetStringByID(VCARD_LDAP_FAX_TYPE); } if (msg) { tString = VCardGetStringByID(VCARD_LDAP_MSG_TYPE); } if (cell) { tString = VCardGetStringByID(VCARD_LDAP_CELL_TYPE); } if (pager) { tString = VCardGetStringByID(VCARD_LDAP_PAGER_TYPE); } if (bbs) { tString = VCardGetStringByID(VCARD_LDAP_BBS_TYPE); } if (tString) { NS_MsgSACat (&(*attribName), " "); NS_MsgSACat (&(*attribName), tString); PR_FREEIF(tString); } } static void GetEmailProperties (VObject* o, char ** attribName) { nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return; VObject* prefProp = vCardService->IsAPropertyOf(o, VCPreferredProp); VObject* home = vCardService->IsAPropertyOf(o, VCHomeProp); VObject* work = vCardService->IsAPropertyOf(o, VCWorkProp); VObject* aol = vCardService->IsAPropertyOf(o, VCAOLProp); VObject* applelink = vCardService->IsAPropertyOf(o, VCAppleLinkProp); VObject* att = vCardService->IsAPropertyOf(o, VCATTMailProp); VObject* cis = vCardService->IsAPropertyOf(o, VCCISProp); VObject* eworld = vCardService->IsAPropertyOf(o, VCEWorldProp); VObject* internet = vCardService->IsAPropertyOf(o, VCInternetProp); VObject* ibmmail = vCardService->IsAPropertyOf(o, VCIBMMailProp); VObject* mcimail = vCardService->IsAPropertyOf(o, VCMCIMailProp); VObject* powershare = vCardService->IsAPropertyOf(o, VCPowerShareProp); VObject* prodigy = vCardService->IsAPropertyOf(o, VCProdigyProp); VObject* telex = vCardService->IsAPropertyOf(o, VCTLXProp); VObject* x400 = vCardService->IsAPropertyOf(o, VCX400Prop); char *tString = NULL; if (prefProp) { tString = VCardGetStringByID(VCARD_LDAP_PREF_TYPE); } if (home) { tString = VCardGetStringByID(VCARD_LDAP_HOME_TYPE); } if (work) { tString = VCardGetStringByID(VCARD_LDAP_WORK_TYPE); } if (aol) { tString = VCardGetStringByID(VCARD_LDAP_AOL_TYPE); } if (applelink) { tString = VCardGetStringByID(VCARD_LDAP_APPLELINK_TYPE); } if (att) { tString = VCardGetStringByID(VCARD_LDAP_ATTMAIL_TYPE); } if (cis) { tString = VCardGetStringByID(VCARD_LDAP_CSI_TYPE); } if (eworld) { tString = VCardGetStringByID(VCARD_LDAP_EWORLD_TYPE); } if (internet) { tString = VCardGetStringByID(VCARD_LDAP_INTERNET_TYPE); } if (ibmmail) { tString = VCardGetStringByID(VCARD_LDAP_IBMMAIL_TYPE); } if (mcimail) { tString = VCardGetStringByID(VCARD_LDAP_MCIMAIL_TYPE); } if (powershare) { tString = VCardGetStringByID(VCARD_LDAP_POWERSHARE_TYPE); } if (prodigy) { tString = VCardGetStringByID(VCARD_LDAP_PRODIGY_TYPE); } if (telex) { tString = VCardGetStringByID(VCARD_LDAP_TLX_TYPE); } if (x400) { tString = VCardGetStringByID(VCARD_LDAP_X400); } if (tString) { NS_MsgSACat (&(*attribName), " "); NS_MsgSACat (&(*attribName), tString); PR_FREEIF(tString); } } static int WriteOutEachVCardPhoneProperty (MimeObject *obj, VObject* o) { char *attribName = NULL; char *value = NULL; int status = 0; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; if (vCardService->VObjectName(o)) { if (nsCRT::strcasecmp (VCTelephoneProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { GetTelephoneProperties(o, &attribName); if (!attribName) attribName = VCardGetStringByID(VCARD_LDAP_PHONE_NUMBER); attribName = NS_MsgSACat(&attribName, ": "); value = vCardService->FakeCString(o); if (value) { if (attribName) { status = OutputFont(obj, PR_FALSE, "-1", NULL); if (status < 0) { PR_FREEIF (value); PR_FREEIF (attribName); return status; } // write a label without charset conversion status = WriteLineToStream (obj, attribName, PR_FALSE); if (status < 0) { PR_FREEIF (value); PR_FREEIF (attribName); return status; } // write value with charset conversion status = WriteLineToStream (obj, value, PR_TRUE); if (status < 0) { PR_FREEIF (value); PR_FREEIF (attribName); return status; } status = OutputFont(obj, PR_TRUE, NULL, NULL); if (status < 0) { PR_FREEIF (value); PR_FREEIF (attribName); return status; } } PR_FREEIF (attribName); } PR_FREEIF (value); } } } return status; } static int WriteOutVCardPhoneProperties (MimeObject *obj, VObject* v) { int status = 0; VObjectIterator t; VObject *eachProp; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; WriteOutEachVCardPhoneProperty (obj, v); vCardService->InitPropIterator(&t,v); while (vCardService->MoreIteration(&t) && status >= 0) { eachProp = vCardService->NextVObject(&t); status = WriteOutEachVCardPhoneProperty (obj, eachProp); } if (status < 0) return status; return 0; } static int WriteOutEachVCardProperty (MimeObject *obj, VObject* o, int* numEmail) { char *attribName = NULL; char * url = NULL; char *value = NULL; int status = 0; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; if (vCardService->VObjectName(o)) { if (nsCRT::strcasecmp (VCPhotoProp, vCardService->VObjectName(o)) == 0) { VObject* urlProp = vCardService->IsAPropertyOf(o, VCURLProp); if (urlProp) { attribName = VCardGetStringByID(VCARD_LDAP_PHOTOGRAPH); /* format the value string to the url */ value = vCardService->FakeCString(o); if (value) url = PR_smprintf ("VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_BIRTHDAY); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCDeliveryLabelProp, vCardService->VObjectName(o)) == 0) { attribName = VCardGetStringByID(VCARD_LDAP_LABEL); GetAddressProperties(o, &attribName); value = vCardService->FakeCString(o); goto DOWRITE; } if (nsCRT::strcasecmp (VCEmailAddressProp, vCardService->VObjectName(o)) == 0) { if ((*numEmail) != 1) { if (VALUE_TYPE(o)) { (*numEmail)++; attribName = VCardGetStringByID(VCARD_LDAP_EMAIL_ADDRESS); GetEmailProperties(o, &attribName); value = vCardService->FakeCString(o); goto DOWRITE; }; } } if (nsCRT::strcasecmp (VCFamilyNameProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_SURNAME); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCGivenNameProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_GIVEN_NAME); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCNamePrefixesProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_NAME_PREFIX); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCNameSuffixesProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_NAME_SUFFIX); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCAdditionalNamesProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_MIDDLE_NAME); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCMailerProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_MAILER); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCTimeZoneProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_TZ); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCGeoProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_GEO); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCBusinessRoleProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_ROLE); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCLogoProp, vCardService->VObjectName(o)) == 0) { VObject* urlProp = vCardService->IsAPropertyOf(o, VCURLProp); if (urlProp) { attribName = VCardGetStringByID(VCARD_LDAP_LOGO); /* format the value string to the url */ value = vCardService->FakeCString(o); if (value) url = PR_smprintf ("VObjectName(o)) == 0) { attribName = VCardGetStringByID(VCARD_LDAP_SECRETARY); goto DOWRITE; } if (nsCRT::strcasecmp (VCLastRevisedProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_REVISION); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCPronunciationProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_SOUND); value = vCardService->FakeCString(o); goto DOWRITE; } } if (nsCRT::strcasecmp (VCVersionProp, vCardService->VObjectName(o)) == 0) { if (VALUE_TYPE(o)) { attribName = VCardGetStringByID(VCARD_LDAP_VERSION); value = vCardService->FakeCString(o); goto DOWRITE; } } if (!attribName) return 0; DOWRITE: OutputTableRowOrData(obj, PR_TRUE, PR_FALSE, "LEFT", "TOP", NULL, NULL); OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); if (attribName) { OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); status = WriteAttribute (obj, attribName); PR_Free (attribName); OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); } if (value) { OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); status = WriteValue (obj, value); PR_Free (value); OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); } if (url) { OutputTableRowOrData (obj, PR_FALSE, PR_FALSE, "LEFT", "TOP", NULL, NULL); status = WriteValue (obj, url); PR_Free (url); OutputTableRowOrData (obj, PR_FALSE, PR_TRUE, NULL, NULL, NULL, NULL); } OutputTableRowOrData(obj, PR_TRUE, PR_TRUE, NULL, NULL, NULL, NULL); } if (status < 0) return status; return 0; } static int WriteOutVCardProperties (MimeObject *obj, VObject* v, int* numEmail) { int status = 0; VObjectIterator t; VObject *eachProp; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; WriteOutEachVCardProperty (obj, v, numEmail); vCardService->InitPropIterator(&t,v); while (vCardService->MoreIteration(&t) && status >= 0) { eachProp = vCardService->NextVObject(&t); status = WriteOutVCardProperties (obj, eachProp, numEmail); } if (status < 0) return status; return 0; } char * FindCharacterSet(MimeObject *obj) { char *retCharSet = nsnull; char *tCharSet = nsnull; char *workString = nsnull; if ( (!obj->headers) || (!obj->headers->all_headers) ) return nsnull; workString = (char *)PR_Malloc(obj->headers->all_headers_size + 1); if (!workString) return nsnull; memset(workString, 0, obj->headers->all_headers_size + 1); memcpy(workString, obj->headers->all_headers, obj->headers->all_headers_size); char *cTypePtr = (char *) PL_strcasestr(workString, HEADER_CONTENT_TYPE); if (!cTypePtr) { PR_FREEIF(workString); return nsnull; } while ( (*cTypePtr) && (*cTypePtr != nsCRT::CR) && (*cTypePtr != nsCRT::LF) ) { tCharSet = (char *) PL_strcasestr(cTypePtr, "charset="); if (tCharSet ) break; ++cTypePtr; } if (tCharSet) { if (strlen(tCharSet) > 8) { retCharSet = PL_strdup( (tCharSet + 8) ); char *ptr = retCharSet; while (*ptr) { if ( (*ptr == ' ') || (*ptr == ';') || (*ptr == nsCRT::CR) || (*ptr == nsCRT::LF) ) { *ptr = '\0'; break; } ptr++; } } } PR_FREEIF(workString); return retCharSet; } static int WriteLineToStream (MimeObject *obj, const char *line, PRBool aDoCharConversion) { int status = 0; char *htmlLine; int htmlLen ; char *converted = NULL; PRInt32 converted_length; PRInt32 res; char *charset = nsnull; if ( (!line) || (!*line) ) return 0; if (aDoCharConversion) { // Seek out a charset! charset = PL_strcasestr(obj->content_type, "charset="); if (!charset) charset = FindCharacterSet(obj); if ( (!charset) || ( (charset) && (!nsCRT::strcasecmp(charset, "us-ascii"))) ) { PR_Free(charset); charset = nsCRT::strdup("ISO-8859-1"); } // convert from the resource charset. res = INTL_ConvertCharset(charset, "UTF-8", line, strlen(line), &converted, &converted_length); if ( (res != 0) || (converted == NULL) ) converted = (char *)line; else converted[converted_length] = '\0'; } else converted = (char *)line; htmlLen = strlen(converted) + strlen("
") + 1; htmlLine = (char *) PR_MALLOC (htmlLen); if (htmlLine) { htmlLine[0] = '\0'; PL_strcat (htmlLine, "
"); PL_strcat (htmlLine, converted); PL_strcat (htmlLine, "
"); status = COM_MimeObject_write(obj, htmlLine, strlen(htmlLine), PR_TRUE); PR_Free ((void*) htmlLine); } else status = VCARD_OUT_OF_MEMORY; if (converted != line) PR_FREEIF(converted); PR_FREEIF(charset); return status; } static int WriteAttribute (MimeObject *obj, const char *attrib) { int status = 0; OutputFont(obj, PR_FALSE, "-1", NULL); status = WriteLineToStream (obj, attrib, PR_FALSE); OutputFont(obj, PR_TRUE, NULL, NULL); return status; } static int WriteValue (MimeObject *obj, const char *value) { int status = 0; OutputFont(obj, PR_FALSE, "-1", NULL); status = WriteLineToStream (obj, value, PR_TRUE); OutputFont(obj, PR_TRUE, NULL, NULL); return status; } extern "C" char * VCardGetStringByID(PRInt32 aMsgId) { char *tempString = nsnull; nsresult res = NS_OK; #ifdef XP_MAC nsCOMPtr stringBundle = nsnull; #endif if (!stringBundle) { char* propertyURL = NULL; propertyURL = VCARD_URL; nsCOMPtr sBundleService = do_GetService(NS_STRINGBUNDLE_CONTRACTID, &res); if (NS_SUCCEEDED(res) && (nsnull != sBundleService)) { res = sBundleService->CreateBundle(propertyURL, getter_AddRefs(stringBundle)); } } if (stringBundle) { PRUnichar *ptrv = nsnull; res = stringBundle->GetStringFromID(aMsgId, &ptrv); if (NS_FAILED(res)) return nsCRT::strdup("???"); else { nsAutoString v; v.Append(ptrv); PR_FREEIF(ptrv); tempString = ToNewUTF8String(v); } } if (!tempString) return nsCRT::strdup("???"); else return tempString; } #else // THUNDERBIRD specific vCard formatting static int WriteOutVCard (MimeObject * aMimeObj, VObject* aVcard) { int status = 0; BeginVCard (aMimeObj); GenerateVCardData(aMimeObj, aVcard); return EndVCard (aMimeObj); } static int GenerateVCardData(MimeObject * aMimeObj, VObject* aVcard) { // style is driven from CSS not here. Just layout the minimal vCard data nsCString vCardOutput; vCardOutput = "
"; // outer table plus the first (and only row) we use for this table // we need to get an escaped vCard url to bind to our add to address book button nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; nsCAutoString vCard; nsCAutoString vEscCard; int len = 0; vCard.Adopt(vCardService->WriteMemoryVObjects(0, &len, aVcard, PR_FALSE)); vEscCard.Adopt(nsEscape (vCard.get(), url_XAlphas)); // first cell in the outer table row is a clickable image which brings up the rich address book UI for the vcard vCardOutput += ""; // the 2nd cell in the outer table row is a nested table containing the actual vCard properties vCardOutput += " "; // 2nd cell in the outer table is our vCard image vCardOutput += "
"; OutputBasicVcard(aMimeObj, aVcard, vCardOutput); // close the properties table vCardOutput += "
"; // now write out the vCard return COM_MimeObject_write(aMimeObj, (char *) vCardOutput.get(), vCardOutput.Length(), PR_TRUE); } static int OutputBasicVcard(MimeObject *aMimeObj, VObject *aVcard, nsACString& vCardOutput) { int status = 0; VObject *prop = NULL; nsCAutoString urlstring; nsCAutoString namestring; nsCAutoString emailstring; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; /* get the name and email */ prop = vCardService->IsAPropertyOf(aVcard, VCFullNameProp); if (prop) { if (VALUE_TYPE(prop)) { if (VALUE_TYPE(prop) != VCVT_RAW) namestring.Adopt(vCardService->FakeCString(prop)); else namestring.Adopt(vCardService->VObjectAnyValue(prop)); if (!namestring.IsEmpty()) { vCardOutput += " "; prop = vCardService->IsAPropertyOf(aVcard, VCURLProp); if (prop) { urlstring.Adopt(vCardService->FakeCString(prop)); if (urlstring.IsEmpty()) vCardOutput += namestring; else vCardOutput += nsPrintfCString(512, "%s", urlstring.get(), namestring.get()); } else vCardOutput += namestring; /* get the email address */ prop = vCardService->IsAPropertyOf(aVcard, VCEmailAddressProp); if (prop) { emailstring.Adopt(vCardService->FakeCString(prop)); if (!emailstring.IsEmpty()) { vCardOutput += nsPrintfCString(512, " <%s>", emailstring.get(), emailstring.get()); } } // if email address property vCardOutput += " "; // end the cell for the name/email address } // if we have a name property } } // if full name property // now each basic property goes on its own line // title status = OutputVcardAttribute (aMimeObj, aVcard, VCTitleProp, vCardOutput); // org name and company name prop = vCardService->IsAPropertyOf(aVcard, VCOrgProp); if (prop) { OutputVcardAttribute (aMimeObj, prop, VCOrgUnitProp, vCardOutput); OutputVcardAttribute (aMimeObj, prop, VCOrgNameProp, vCardOutput); } return 0; } static int OutputVcardAttribute(MimeObject *aMimeObj, VObject *aVcard, const char* id, nsACString& vCardOutput) { int status = 0; VObject *prop = NULL; nsCAutoString string; nsCOMPtr vCardService = do_GetService(MSGVCARDSERVICE_CONTRACT_ID); if (!vCardService) return -1; prop = vCardService->IsAPropertyOf(aVcard, id); if (prop) if (VALUE_TYPE(prop)) { if (VALUE_TYPE(prop) != VCVT_RAW) string.Adopt(vCardService->FakeCString(prop)); else string.Adopt(vCardService->VObjectAnyValue(prop)); if (!string.IsEmpty()) { vCardOutput += " "; vCardOutput += string; vCardOutput += " "; } } return 0; } #endif