3 NZ#@sddlTddlZddlZddlZddlZddlZddlZddlZgZy,ddlZej ej dfej ej dfWn YnXyZ2dd@dAZ3dBdCZ4dDdEZ5dFdGZ6dHdIZ7dJdKdLdMdNdOdPdQZ8dRdSZ9dTdUZ:ddVdWZ;dXdYZd^d_Z?dZ@ddkdlZAe+ddme2e3e6e7e9e:e;dn ZBeBjCZDe,eDdo<dpeDdq<eDjCZEe4eEdd<eDjCZFdreFds<eFjCZGeGdd=eGjHee?dtdueBdvdweDdvdxeEdvdyeFdvdzeGdvd{ZIdS))*NZutf_64utf_32utf_16 utf_16_be utf_16_leutf_8BEGIN:VCARDBEGIN:VCARDcCsg|]\}}t|qS)len).0bomcodecr r /usr/share/hplip/base/vcard.py XsrcCsRt|d}|jt}x2tD]*\}}|j|rtjtj|d|jSqWt|dS)zThis function detects unicode byte order markers and if present uses the codecs module instead to open the file instead with appropriate unicode decoding, else returns the file using standard open functionrbrZrtU)openread _maxbomlen_boms startswithioStringIOcodecs)namefstartrrr r r opentextfileZs    rz[^0-9]*z ^[0-9]{10}$z ^[0-9]{7}$cCs,|St|dkr(|ddkr(|ddS|S)N r1r)joinresplit _notdigitsr )nZnumsr r rphonenumber_normaliseps r)cCsftjt|dk r6d|dd|dd|ddfStjt|dk rbd|dd|ddfS|S)Nz (%s) %s-%srz%s-%s)r%match _tendigits _sevendigits)r(r r rphonenumber_format}s &r/cCst|}|r|S|jddS)z>like L{formatname}, except we use the first matching componentnicknamer )nameparser_getfullnameget)rZ _fullnamer r rnameparser_formatsimplenamesr3cCs(d|kr|dSdjddt|DS)z>Gets the full name, joining the first/middle/last if necessaryfull cSsg|] }|r|qSr r )r xr r rrsz*nameparser_getfullname..)r$nameparser_getparts)rr r rr1sr1ZvanZvonZdeZdicCs|jd}|j}t|dkr(|ddfSt|dkrF|dd|dfS|dg}g}|dg}|d=|d=xLt|r|d dj|d dks|d jtkr|d g|}|d =qlW|}dj|dj|dj|fS)Nr4rr rr5r9r9r9r9r9r9)r2r&r lower lastpartsr$)rr(partsrmlr r rnameparser_getparts_FMLs       6 r?cCs|jd}|jd}t|dkr*|ddfS|d}d}d}|dj}t|dkrx|d}t|dkrxdj|dd}|||fS)Nr4,rr rr5)r2r&r r$)rr(r<Z_lastZ_firstZ_middler r rnameparser_getparts_LFMs       rAcCstx6dD].}||kr|jdd|jdd|jddfSqWd|krR|jddddfS|jd}d|krlt|St|S) zfReturns (first, middle, last) for name. If the part doesn't exist then a blank string is returnedfirstmiddlelastr r4r0r@)rBrCrD)r2Znameparser_getrAr?)rir(r r rr7s & r7c@s eZdZdS)VFileExceptionN)__name__ __module__ __qualname__r r r rrFsrFc@sDeZdZddiZddZddZddZd d Zd d Zd dZ dS)VFileZ MACINTOSHZ MAC_ROMANcCs||_d|_dS)N)sourcesaved)selfrKr r r__init__szVFile.__init__cCs|S)Nr )rMr r r__iter__szVFile.__iter__cCs2x(|j}|dkrtt|dkrPqWd}|jd}|dkr|d|jjd}d|ksfd|krd}xb|dd ks|dd kr|dd krd}nd}|j}|dd kr|dd}|d||}qlWx^|r,|j}|dkrPt|dkrP|dd kr|dd krP||jdd7}qW|jd}|dkr`tjd |t|}|d7}|d|}||ddj }|j jd} g} t |t rd} nd} x| D]}|j dr|ddpd} q|j d r|dk r| j|qyJ|dks|dkrtj|}n&|dkr8tj|}d} n td|WnJtk r} z,t | trj| tdt | ||fWYdd} ~ XnXqWt| dkrtd|f| dk r y$tj|jj| | } | |\}}Wn&tk rtd| |fYnX| dgks"| dgkr*|j }| |fS)!NrT:;zquoted-printablezencoding=quoted-printableFr=r8 r5zFixing up bad line: %szLATIN-1zCHARSET=z ENCODING=zQUOTED-PRINTABLEzENCODING=QUOTED-PRINTABLEz ENCODING=Bzunknown encoding: z6Exception %s while processing encoding %s on data '%s'zLine contains no property: %sz+unknown character set '%s' in parameters %sBEGINENDr9r9r9rW)rSr5) _getnextline StopIterationr findr:r& _lookaheadlogdebugstripupper isinstancestrrappendquopriZ decodestringbase64rF Exceptionr getdecoder_charset_aliasesr2 LookupError)rMlineZnormalcontinuationsZcolonsrEZnextlZnextlineZb4itemsZnewitemscharsetedecoder_r r r__next__ s               . zVFile.__next__cCs&|jdk r|j}d|_|S|jSdS)N)rL_readandstripline)rMrir r rrXs  zVFile._getnextlinecCsf|jj}|dk rbt|dkr"dS|dddkr>|ddS|d dksV|d dkrb|dd S|S) Nrr8z r  rWrWr9r9r9)rKreadliner )rMrir r rrqs    zVFile._readandstriplinecCs|jdkst|j|_|jS)N)rLAssertionErrorrq)rMr r rr[s zVFile._lookaheadN) rGrHrIrgrNrOrprXrqr[r r r rrJsu rJc@s(eZdZdZddZddZddZdS) VCardszUnderstands vcards in a vfilecCs ||_dS)N)vfile)rMrwr r rrNszVCards.__init__cCs|S)Nr )rMr r rrOszVCards.__iter__cCsd}}x,|jD]"\}}||fdgdfkr,qd}PqW||fdgdfkrNtg}x6|jD],\}}||fdgdfkr|j||fqZPqZW||fdgdfkrtdt|S)NrUVCARDTrVz'There is a BEGIN:VCARD but no END:VCARD)rwrYrbrFVCard)rMfieldvaluefoundlinesr r rrps"zVCards.__next__N)rGrHrI__doc__rNrOrpr r r rrvsrvc@sDeZdZdZddZddZdDddZd d Zd d Zd dZ ddZ e Z e Z e Z e Ze Ze Ze Ze Ze Ze ZddZddZddZddZddZddZeZddZeZdd Zd!d"Zd#d$Z d%d&Z!dEd(d)Z"dFd*d+Z#d,d-Z$d.d/Z%e$Z&d0d1Z'd2d3Z(d4d5Z)d6d7Z*dGd9d:Z+d;d<Z,d=d>Z-d?d@Z.dAdBZ/dCS)HryzA single vcardc Csd|_d|_i|_i|_g|_xz|D]p\}}t|s|ddkrjddg|dd<n|ddkrddg|dd<|jj||fq&W|j|j|j|j|jdS)Nr8rzX-EVOLUTION-FILE-ASZ evolutionZITEMz.X-ABADRz .X-ABLABELapplez>!$_z_$!<VERSION.cSsg|] }t|qSr )int)r Zxxr r rrsz"VCard.__init__..z is not a valid vcard versionzHOME.TELTELHOMErz HOME.LABELZLABELzWORK.TELWORKz WORK.LABEL)r8r)_version_origin_data_groupsr}r rurendswithrZoriginr& ValueErrorrFrb_parse_update_groups)rMr}rvZverr r rrNs@  *4  zVCard.__init__cCs|jS)z2Returns a dict of the data parsed out of the vcard)r)rMr r rgetdatasz VCard.getdatar cCs|jj||S)N)rr2)rMkeydefaultr r rr2sz VCard.getcCs@||kr |Sx.tddD] }|t||kr|t|SqWdS)zReturns the fieldname to use in the dict. For example, if name is "email" and there is no "email" field in dict, then "email" is returned. If there is already an "email" field then "email2" is returned, etcr8iN)rangerepr)rMrdictrEr r r _getfieldnames zVCard._getfieldnamecCsx|D]x\}}t|jdkr qd|dkrL|d|djddd}n|d}|jdd}t|d||j}||||qWdS)Nrrr-roZ_field_)r r^rZreplacegetattr_default_field)rMr}resultrzr{rtfuncr r rrs   z VCard._parsecCs0x*t|jjD]\}}|j|f|qWdS)zUpdate the groups info N)listrrk _setvalue)rMrkrmr r rr#szVCard._update_groupscCsdS)Nr )rMrzr{rr r r _field_ignore+szVCard._field_ignorecCs|j|||jd|<dS)Nr)unquoter)rMrzr{rr r r _field_FN=szVCard._field_FNcCs|j|||jd|<dS)Ntitle)rr)rMrzr{rr r r _field_TITLEAszVCard._field_TITLEcCs|j|||jd|<dS)Nr0)rr)rMrzr{rr r r_field_NICKNAMEEszVCard._field_NICKNAMEcCs|j|||jd|<dS)NZnotes)rr)rMrzr{rr r r _field_NOTEJszVCard._field_NOTEcCs|j||d<dS)NZuid)r)rMrzr{rr r r _field_UIDNszVCard._field_UIDc Cs|j|}d}}}}}y,|d}|d}|d}|d}|d}Wntk r^YnX|dk rt|r|||jd|<|dk rt|r|||jd|<|dk rt|r|||jd|<|dk rt|r|||jd |<|dk ot|r|||jd |<dS) Nrrr8r*z last namez first namez middle nameprefixsuffix)splitandunquote IndexErrorr r) rMrzr{rZ familynameZ givennameZadditionalnamesZhonorificprefixesZhonorificsuffixesr r r_field_NVs(  zVCard._field_NcCsP|j|}t|r&|d||jd|<x$|ddD]}|||jd|<q4WdS)NrZ organisationrzorganisational unit)rr r)rMrzr{rrr r r _field_ORGus  zVCard._field_ORGc Cs|j|}g}xF|ddD]6}|jdrB|tddjd}n|g}|j|qWd}x0|D](}|dkrpd}|dkr|d}|dkr`dSq`Wd |k} |dkr|j|d || n||d } |j|d | | dS) NrzTYPE=r@rhomerbusinessZX400PREFemail)rtype)rrr r&extendr) rMrzr{rtypesrffrr preferredaddrr r r _field_EMAILs(    zVCard._field_EMAILc Cs|j|}g}xF|ddD]6}|jdrB|tddjd}n|g}|j|qWd}x$|D]}|dkrpd}|dkr`d}q`Wd|k} |dkr|j|d || n||d } |j|d | | dS) NrzTYPE=r@rrrrrurl)rr)rrr r&rr) rMrzr{rrrrrrrrr r r _field_URLs$    zVCard._field_URLcCs^d|dkr(|dd|djd}nd}|dkr@tjdn|j|ddt|i|ddS)Nrrzspeeddial has no groupphone speeddialF)rZr\r]_setgroupvaluer)rMrzr{rgroupr r r_field_X_SPEEDDIALs  zVCard._field_X_SPEEDDIALc sr|j|}d|dkr2|dd|djd}nd}g}xF|ddD]6}|jdrn|tddjd}n|g}|j|qHWddddddfd d |D}d d |D}d d dg}d|krd} n d} x|D]}||krd} PqWd|k} d} d} d|krd} d|krd} t|dks0|dgkr4d} t|}| r`| r`|j|dd|d|| | r| r|j|dd|d|| | r| rd |kr|j|dd|d|| nP| rd |kr|j|dd|d|| | rd |kr|j|dd|d|| d|kr*|j|dd|d|| d |krL|j|dd|d|| d|krn|j|dd|d|| dS)NrrrzTYPE=r@DATACELL)ZBBSMODEMZISDNZCARZPCScsg|]}j||qSr )r2)r r)munger rrsz$VCard._field_TEL..c Ssg|]}|d kr|qS) rrMSGrVOICEFAXrVIDEOPAGERr) rrrrrrrrrrr )r rr r rrsrrrTFrrrrr)rnumberrfaxz business faxzhome faxcellpagerdata)rrZrr r&rr)r) rMrzr{rrrrrZ antivoiceZvoicerZisworkZishomer )rr _field_TELs                   zVCard._field_TELFcCs|dkr|j||||S|jj|d}|dkr@|||g|j|<n>||dkrdtjd||tdf|rpd|d<|dj|dS)z) Set value of an item of a group Nrz$Group %s has different types: %s, %sTr8r)rrr2r\r]Z groups_typeupdate)rMrrr{rrZ group_typer r rr9s zVCard._setgroupvaluec Cs||kr|||<dS|s,|||j||<dS|g}xFdgttddD].}|t||krt|j||t|qHPqHWdgttdt|d}x,tt|D]}||||t||<qWdS)Nr r8cr)rrrrarbr ) rMrrr{rvaluesrsuffixesr>r r rrPszVCard._setvaluecCsf|j|dd}dd|D}dd|D}|jdd}|rTdj|dj|g|d<ndj||d<dS)Nr@) seperatorcSsg|]}|jddjqS)rQr )rr^)r rr r rrksz+VCard._field_CATEGORIES..cSsg|]}t|r|qSr )r )r rr r rrls categoriesrQ)rr2r$)rMrzr{rrrr r r_field_CATEGORIEShs zVCard._field_CATEGORIEScCsD|j|dd}dd|D}dd|D}dj|||jd|<dS)Nr@)rcSsg|]}|jddjqS)rQr )rr^)r rr r rrysz&VCard._field_SOUND..cSsg|]}t|r|qSr )r )r rr r rrzsrQ ringtones)rr$r)rMrzr{rrr r r _field_SOUNDvszVCard._field_SOUNDc Csd}d}xb|ddD]R}|jdr<|tddjd}n|g}x$|D]}|dkrXd}|dkrHd }qHWqW|j|}d} } } } } }}y<|d } |d} |d } |d } |d } |d}|d}Wntk rYnXi}| dk ot| r| |d<| dk rt| r| |d<| dk r:t| r:| |d<| dk rVt| rV| |d<| dk rrt| rr| |d<|dk rt|r||d<|dk rt|r||d<t|r||d<|j|d||dS)NFrrzTYPE=r@rrrTrr8r*rr+poboxstreet2streetcitystate postalcodecountryrZaddress)rr r&rrr)rMrzr{rrrrrr6rZextendedaddressZ streetaddressZlocalityZregionrrrr r r _field_ADRsR      zVCard._field_ADRcCs|djd}|d}t|dkr,|d}nd}|jdsD|jdrV|jdg||n0|dksf|dkrx|jdg||ntjd |dS) Nrrrr zX-PALM-CATEGORY CATEGORIESzX-PALM-NICKNAMENICKNAMEzIgnoring PALM custom field: %s)r&r rrrr\r])rMrzr{rrf0f1r r r _field_X_PALMs  zVCard._field_X_PALMcCs|djd}|d}t|dkr,|d}nd}|jdsD|jdrV|j|||dS|jdsj|jdr|tjd|dStjd||dd fdS) Nrrrr zX-PALM-zX-zIgnoring custom field: %szNo idea what to do with %s (%s)P)r&r rrr\r])rMrzr{rrrrr r rrs  zVCard._default_fieldcCs4|jddjddjddjddjddjd dS) Nz\;rQz\,r@z\nrsz\r\nz rr)r)rMr{r r rrs  z VCard.unquoterQcs|jd|dkr*fdd|j|DSg}d}d}xr|t|kr|||krh|j|d}|d7}q8||dkr||||d7}|d7}q8|||7}|d7}q8Wt|r|j|fdd|DS) N\rcsg|]}j|qSr )r)r r)rMr rrsz)VCard.splitandunquote..r rr8csg|]}j|qSr )r)r r)rMr rr s)rZr&r rb)rMr{rresZbuildrr )rMrrs(      zVCard.splitandunquotecCs|jS)zBest guess as to vcard version)r)rMr r rversionsz VCard.versioncCs|jS)z-Best guess as to what program wrote the vcard)r)rMr r rrsz VCard.origincCs |j|S)N)r)rMitemr r r __getitem__szVCard.__getitem__cCs t|jS)N)rr)rMr r r__repr__szVCard.__repr__N)r )F)F)rQ)0rGrHrIr~rNrr2rrrrZ _field_LABELZ _field_BDAYZ _field_ROLEZ _field_CALURIZ_field_CALADRURIZ _field_FBURLZ _field_REVZ _field_KEYZ _field_SOURCEZ _field_PHOTOrrrrrrZ _field_NAMErZ_field_OrrrrrrrrZ_field_CATEGORYrrrrrrrrrr r r rrysZ2   "i  ; !rycCstj|jddjddS)zTMy own routine to do qouted printable since the builtin one doesn't encode CR or NL!rrz=0Drsz=0A)rc encodestringr)r{r r rmyqpencodestring"srcCs|jddjddjddS)zJReturn a vCard v2 string. Any embedded commas or semi-colons are removed.rr r@rQ)r)r{r r rformat_stringv2'srcCs|jddjddjddS)zOReturn a vCard v3 string. Embedded commas and semi-colons are backslash quotedrr r@z\,rQz\;)r)r{r r rformat_stringv3,srcCstj|jS)zReturn base 64 encoded string)rdrrstrip)r{r r r format_binary4srcCst|tftgfS)zDetermine if v is a sequence such as passed to value in out_line. Note that a sequence of chars is not a sequence for our purposes.)r`r)rr r r _is_sequence:srrQcCs|dkrg}nt|dd}|tkrt|rd}x&|D]}||}t||kr8d}Pq8W|rv|jddd|D}|j|}q||}t||k}|rt|}|jdnt| st|dk r||}dj|g|d}|t|d d t|7}|d d ks t|d S) aReturns a single field correctly formatted and encoded (including trailing newline) @param name: The field name @param attributes: A list of string attributes (eg "TYPE=intl,post" ). Usually empty except for TEL and ADR. You can also pass in None. @param value: The field value. You can also pass in a list of components which will be joined with join_char such as the 6 components of N @param formatter: The function that formats the value/components. See the various format_ functions. They will automatically ensure that ENCODING=foo attributes are added if appropriateNFTzENCODING=QUOTED-PRINTABLEcSsg|] }t|qSr )r)r rr r rr\szout_line..rQrPFrrsr9) r_string_formattersrrrbr$ru_line_reformatr )rZ attributesr{ formatter join_charZqprrr r rout_line@s6       rrcCs|dkr |}t||kr|Sd}|dkrD||d|7}||d}x:t|r~|d|d|7}t||krpP||d}qFW|S)aTakes line string and inserts newlines and spaces on following continuation lines so it all fits in width characters @param width: how many characters to fit it in @param firstlinewidth: if >0 then first line is this width. if equal to zero then first line is same width as rest. if <0 then first line will go immediately to continuation. rr Nz )r )riwidthZfirstlinewidthrr r rrrs     rc Csd}xz|d|D]j}|tddt||7}t|\}}}|tdd|||ddf|7}|jdd}t|r|tdd||7}qW|S)Nr ZFNNr0r)rr3r7r2r ) valsrlimitrrrr=r>Znnr r r out_namess rrcCs,dd|D}t|r(t|d||ddSdS)NcSsg|]}|jdqS)category)r2)r rr r rrsz"out_categories..r@)rr )r r)rrrzZcatsr r rout_categoriessrcCst||ddS)NCATEGORY)rz)r)rrr r rout_categories_applesrc Csd}d}x|D]}|j|}|jdd}t|rR|dkr.r r8rTrrrz TYPE=%s%sr,PREFrz.TELz .X-SPEEDDIALF)r r )r r )rrr r2r_out_tel_mappingr/ra)rrZphonesrrBidxrZspr r rout_tels"&  rc sd}d}x|D]xjdd}t|r8|tdd||7}jddkrLd}nd}d |d|}|td |gfd d dD|7}d}qW|S)Nr TZcompanyZORGrrrrzTYPE=,PREFADRcsg|]}j|dqS)r )r2)r r)rr rr szout_adr..rrrrrrF)r r)Nrrrrrr)r2r r)rrrrBorr )rrout_adrs  "rcs djfdd|d|DS)Nr csg|]}tdd|dqS)ZNOTENmemo)r)r r)rr rrszout_note..)r$)rrrr )rrout_notesrc Csbd}t|dk}|rd}nd}x>|D]6}|td|d|t|dfgt|d|7}d}q$W|S) Nr rzPREF,rz TYPE=%s%srrF)r rr r/)rrrZ_prefrjrr r rout_tel_scp6600s  rcCsPd}xFttt|dD]0}||}|jddr|tddg|d|7}qW|S)Nr r8rrz TYPE=INTERNET)rminr r2r)rrrZ_idxrr r rout_email_scp6600(s  rcCs.|r*|djddr*tdd|dd|SdS)Nrrr r )r2r)rrr r rout_url_scp6604src sLxF|D]>jdddkr d}nd}tdd|gfdddD|SWdS)NrrrrrzTYPE=%scsg|]}j|dqS)r )r2)r r)rr rrAsz#out_adr_scp6600..rrrrrrr )Nrrrrrr)r2r)rrZ_typer )rrout_adr_scp6600:s  rnames wallpapers addressesnumbersremailsurlsrflagsmemosserialsc sdr&dk r&tddDdks&t|d}|j}|jtdddd|jtdd|d ddkrpt}nfd dtD}xt|D]l}||kr||kr||}d |jjd|jjkr|||||d d }n||||}t|r|j|qW|jtddd||j S)NTcSsg|]}|tkr|qSr ) _field_order)r rr r rrQsz output_entry..r _formatterrUrxrrcsg|]}|kr|qSr r )r r) limit_fieldsr rr[sr_limit)rrV) r rurwriterr#__code__ co_varnames co_argcountgetvalue) entryprofiler%ZfmtrZfieldsrrr}r )r%r output_entryMs&  r.z2.1) r$r&rrrrrrrr!r$z3.0rir&)rrrrz vCard v2.1)Z descriptionr-z vCard v3.0ZApplezFull vCard v3.0zSanyo SCP-6600 (Katana))Zvcard2Zvcard3rZfullv3Zscp6600)r r)r r)rQ)rr)r)r)r) rrrrrrrrr r!r")N)Jgrcrdrrr%rZencodings.utf_64Z encodingsrbBOM64_BEBOM64_LEZencodings.utf_32 BOM_UTF32 BOM_UTF32_BE BOM_UTF32_LEZencodings.utf_16 BOM_UTF16 BOM_UTF16_BE BOM_UTF16_LEZencodings.utf_8BOM_UTF8maxrrcompiler'r-r.r)r/r3r1r;r?rAr7rerFrJrvryrrrrrrrrrrrrrr r rrrrrrrr#r.Zprofile_vcard2copyZprofile_vcard3Z profile_appleZ profile_fullZprofile_scp6600rZprofilesr r r r#s       #*\ 2