Thibault Delavallée (OpenERP) has proposed merging 
lp:~openerp-dev/openobject-server/trunk-fetchmail-inbox-tde into 
lp:openobject-server.

Requested reviews:
  OpenERP Core Team (openerp)

For more details, see:
https://code.launchpad.net/~openerp-dev/openobject-server/trunk-fetchmail-inbox-tde/+merge/133055

(E)Mail management

Refactored a bit openerp/tools, moved some (e)mail related functions from misc 
to mail. Moved html_sanitizer into mail. Added html_email_clean, to clean 
incoming emails (remove quotes, signature, ...).
-- 
https://code.launchpad.net/~openerp-dev/openobject-server/trunk-fetchmail-inbox-tde/+merge/133055
Your team OpenERP R&D Team is subscribed to branch 
lp:~openerp-dev/openobject-server/trunk-fetchmail-inbox-tde.
=== modified file 'openerp/osv/fields.py'
--- openerp/osv/fields.py	2012-11-05 13:17:12 +0000
+++ openerp/osv/fields.py	2012-11-06 12:49:29 +0000
@@ -45,7 +45,7 @@
 from openerp.tools.translate import _
 from openerp.tools import float_round, float_repr
 import simplejson
-from openerp.tools.html_sanitize import html_sanitize
+from openerp.tools.mail import html_sanitize
 from openerp import SUPERUSER_ID
 
 _logger = logging.getLogger(__name__)

=== modified file 'openerp/osv/osv.py'
--- openerp/osv/osv.py	2012-09-28 16:52:39 +0000
+++ openerp/osv/osv.py	2012-11-06 12:49:29 +0000
@@ -120,6 +120,7 @@
                     raise except_osv('Database not ready', 'Currently, this database is not fully loaded and can not be used.')
                 return f(self, dbname, *args, **kwargs)
             except orm.except_orm, inst:
+                raise
                 raise except_osv(inst.name, inst.value)
             except except_osv:
                 raise

=== modified file 'openerp/tests/__init__.py'
--- openerp/tests/__init__.py	2012-11-05 08:37:56 +0000
+++ openerp/tests/__init__.py	2012-11-06 12:49:29 +0000
@@ -8,7 +8,7 @@
 See the :ref:`test-framework` section in the :ref:`features` list.
 """
 
-from . import test_expression, test_html_sanitize, test_ir_sequence, test_orm,\
+from . import test_expression, test_mail, test_ir_sequence, test_orm,\
               test_fields, test_basecase, \
               test_view_validation, test_uninstall, test_misc, test_db_cursor
 
@@ -18,7 +18,7 @@
 
 checks = [
     test_expression,
-    test_html_sanitize,
+    test_mail,
     test_db_cursor,
     test_orm,
     test_fields,

=== renamed file 'openerp/tests/test_html_sanitize.py' => 'openerp/tests/test_mail.py'
--- openerp/tests/test_html_sanitize.py	2012-09-05 15:32:12 +0000
+++ openerp/tests/test_mail.py	2012-11-06 12:49:29 +0000
@@ -1,7 +1,29 @@
 #!/usr/bin/env python
 # -*- coding: utf-8 -*-
-import unittest
-from openerp.tools.html_sanitize import html_sanitize
+# This test can be run stand-alone with something like:
+# > PYTHONPATH=. python2 openerp/tests/test_misc.py
+##############################################################################
+#
+#    OpenERP, Open Source Business Applications
+#    Copyright (c) 2012-TODAY OpenERP S.A. <http://openerp.com>
+#
+#    This program is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU Affero General Public License as
+#    published by the Free Software Foundation, either version 3 of the
+#    License, or (at your option) any later version.
+#
+#    This program is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU Affero General Public License for more details.
+#
+#    You should have received a copy of the GNU Affero General Public License
+#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#
+##############################################################################
+
+import unittest2
+from openerp.tools.mail import html_sanitize, html_email_clean, append_content_to_html
 
 test_case = """
 <font size="2" style="color: rgb(31, 31, 31); font-family: monospace; font-variant: normal; line-height: normal; ">test1</font>
@@ -21,21 +43,203 @@
 <a href="javascript:alert('malicious code')">test link</a>
 """
 
-class TestSanitizer(unittest.TestCase):
+GMAIL_REPLY = """<html>
+  <head>
+    <meta content="text/html; charset=ISO-8859-1"
+      http-equiv="Content-Type">
+  </head>
+  <body text="#000000" bgcolor="#FFFFFF">
+    <div class="moz-cite-prefix">R&eacute;ponse via thunderbird, classique.<br>
+      <br>
+      On 11/05/2012 10:51 AM, Thibault Delavall&eacute;e wrote:<br>
+    </div>
+    <blockquote
+cite="mid:CAP76m_WwG6=dy1ayybjpjhvftfk31yyjmohozadrppmacn+...@mail.gmail.com"
+      type="cite">
+      <div>Plop !</div>
+      <ul>
+        <li>Vive les lapins rapides !<br>
+        </li>
+        <li>Nouille</li>
+        <li>Frites</li>
+      </ul>
+      <div><br>
+      </div>
+      <div>Clairement, hein ?</div>
+      -- <br>
+      Thibault Delavall&eacute;e<br>
+    </blockquote>
+    <br>
+    <br>
+    <pre class="moz-signature" cols="72">-- 
+Thibault Delavall&eacute;e
+</pre>
+  </body>
+</html>"""
+
+GAMIL_REPLY_SAN = """<div>R&#233;ponse via thunderbird, classique.<br><br>
+      On 11/05/2012 10:51 AM, Thibault Delavall&#233;e wrote:<br></div>
+    <blockquote>
+      <div>Plop !</div>
+      <ul><li>Vive les lapins rapides !<br></li>
+        <li>Nouille</li>
+        <li>Frites</li>
+      </ul><div><br></div>
+      <div>Clairement, hein ?</div>
+      -- <br>
+      Thibault Delavall&#233;e<br></blockquote>
+    <br><br><pre>-- 
+Thibault Delavall&#233;e
+</pre>"""
+
+
+
+
+GMAIL_REPLY2_SAN = """<div>Je r&#233;ponds, hop, via thunderbird. Mais
+      je vais r&#233;podnre aussi au milieu du thread.<br><br>
+      On 11/05/2012 10:53 AM, Thibault Delavall&#233;e wrote:<br></div>
+    <blockquote>Reply rapide de gmail.</blockquote>
+    <br>
+    Jamais.<br><br><blockquote>
+      <div><br><br><div>2012/11/5 Thibault Delavall&#233;e <span>&lt;<a href="mailto:[email protected]">[email protected]</a>&gt;</span><br><blockquote>
+            <div>
+              <div>R&#233;ponse via thunderbird, classique.
+                <div>
+                  <div><br><br>
+                    On 11/05/2012 10:51 AM, Thibault Delavall&#233;e wrote:<br></div>
+                </div>
+              </div>
+              <div>
+                <div>
+                  <blockquote>
+                    <div>Plop !</div>
+                    <ul><li>Vive les lapins rapides !<br></li>
+                      <li>Nouille</li>
+                    </ul></blockquote>
+                </div>
+              </div>
+            </div>
+          </blockquote>
+        </div>
+      </div>
+    </blockquote>
+    je rajotuerais bien pommes de terre dans la liste.<br><blockquote>
+      <div>
+        <div>
+          <blockquote>
+            <div>
+              <div>
+                <div>
+                  <blockquote>
+                    <ul><li>Frites</li>
+                    </ul><div><br></div>
+                    <div>Clairement, hein ?</div>
+                    -- <br>
+                    Thibault Delavall&#233;e<br></blockquote>
+                  <br><br></div>
+              </div>
+              <span><font>
+                  <pre>-- 
+Thibault Delavall&#233;e
+</pre>
+                </font></span></div>
+          </blockquote>
+        </div>
+        <br><br><div><br></div>
+        -- <br>
+        Thibault Delavall&#233;e<br></div>
+    </blockquote>
+    <br><br><pre>-- 
+Thibault Delavall&#233;e
+</pre>"""
+
+
+
+MAIL_TEMPLATE = """Hey XYZ,
+
+I've fixed that error and tested it a couple of times, it seems to be working
+fine now.
+
+On Fri, Feb 18, 2011 at 7:44 AM, Joe David <[email protected]> wrote:
+Initial thread starts here...
+
+--
+Thanks
[email protected]
+"""
+
+GMAIL_TPL = """Salut Bob!
+Le 28 oct. 2012 à 00:02, Thibault Delavallée a écrit :
+
+> MatrixPlus le 22/02 ? Si c'est ce que tu dis, je suis intéressé, oui !
+
+Non, pas MatrixPlus, juste Matrix.
+
+Et oui, le 22/02 est la date qui doit vous convenir le deux.
+
+Bon, on tente de s’organiser un truc se samedi-là et je réserve des places.
+
+En passant, t’as contacté les gens du KdM pour le truc pour Bénisexe ?
+
+> 2012/10/27 Édouard Gilbert :
+>> Diantre, me disè-je en envoyant un message similaire à Koukouiles, que ne voilà un concert qui pourrait intéresser Thibault ?
+>> 
+>> L’ONL donne, en février et à Lille, Matrix en ciné-concert. Il passe le film sans musique mais c’est pas grave parce qu’il y a un orchestre qui la joue en même temps. Intéressé ?
+>> 
+>> On peut trouver plus d’info sur le site de l’ONL, onlille.com , mais il est tellement mal foutu que je ne trouve pas de lien direct. Je te laisse chercher.
+>> 
+>> Édouard GILBERT
+>> [email protected]
+>> 
+> 
+> 
+> 
+> -- 
+> Thibault Delavallée
+
+Édouard GILBERT
[email protected]
+"""
+
+
+class TestAppendContentToHtml(unittest2.TestCase):
+    """ Test some of our generic utility functions """
+
+    def test_append_to_html(self):
+        test_samples = [
+            ('<!DOCTYPE...><HTML encoding="blah">some <b>content</b></HtMl>', '--\nYours truly', True,
+             '<!DOCTYPE...><html encoding="blah">some <b>content</b>\n<pre>--\nYours truly</pre>\n</html>'),
+            ('<html><body>some <b>content</b></body></html>', '<!DOCTYPE...>\n<html><body>\n<p>--</p>\n<p>Yours truly</p>\n</body>\n</html>', False,
+             '<html><body>some <b>content</b>\n\n\n<p>--</p>\n<p>Yours truly</p>\n\n\n</body></html>'),
+        ]
+        for html, content, flag, expected in test_samples:
+            self.assertEqual(append_content_to_html(html, content, flag), expected, 'append_content_to_html is broken')
+
+
+class TestSanitizer(unittest2.TestCase):
+    # TDE note: could be improved by actually checking the output
 
     def test_simple(self):
         x = "yop"
         self.assertEqual(x, html_sanitize(x))
-        
+
     def test_trailing_text(self):
         x = 'lala<p>yop</p>xxx'
         self.assertEqual(x, html_sanitize(x))
-    
+
     def test_no_exception(self):
         html_sanitize(test_case)
-        
+
     def test_unicode(self):
         html_sanitize("Merci à l'intérêt pour notre produit.nous vous contacterons bientôt. Merci")
 
+
+class TestCleaner(unittest2.TestCase):
+
+    def test_gmail(self):
+        test_case = """youplaboum"""
+        html_email_clean(test_case)
+
+
 if __name__ == '__main__':
-    unittest.main()
\ No newline at end of file
+    unittest2.main()

=== modified file 'openerp/tests/test_misc.py'
--- openerp/tests/test_misc.py	2012-09-19 11:40:47 +0000
+++ openerp/tests/test_misc.py	2012-11-06 12:49:29 +0000
@@ -4,18 +4,6 @@
 import unittest2
 from ..tools import misc
 
-class append_content_to_html(unittest2.TestCase):
-    """ Test some of our generic utility functions """
-
-    def test_append_to_html(self):
-        test_samples = [
-            ('<!DOCTYPE...><HTML encoding="blah">some <b>content</b></HtMl>', '--\nYours truly', True,
-             '<!DOCTYPE...><html encoding="blah">some <b>content</b>\n<pre>--\nYours truly</pre>\n</html>'),
-            ('<html><body>some <b>content</b></body></html>', '<!DOCTYPE...>\n<html><body>\n<p>--</p>\n<p>Yours truly</p>\n</body>\n</html>', False,
-             '<html><body>some <b>content</b>\n\n\n<p>--</p>\n<p>Yours truly</p>\n\n\n</body></html>'),
-        ]
-        for html, content, flag, expected in test_samples:
-            self.assertEqual(misc.append_content_to_html(html,content,flag), expected, 'append_content_to_html is broken')
 
 class test_countingstream(unittest2.TestCase):
     def test_empty_stream(self):

=== modified file 'openerp/tools/__init__.py'
--- openerp/tools/__init__.py	2012-08-13 14:22:32 +0000
+++ openerp/tools/__init__.py	2012-11-06 12:49:29 +0000
@@ -33,7 +33,7 @@
 from yaml_import import *
 from sql import *
 from float_utils import *
-from html_sanitize import *
+from mail import *
 
 #.apidoc title: Tools
 

=== renamed file 'openerp/tools/html_sanitize.py' => 'openerp/tools/mail.py'
--- openerp/tools/html_sanitize.py	2012-09-05 22:57:46 +0000
+++ openerp/tools/mail.py	2012-11-06 12:49:29 +0000
@@ -19,12 +19,23 @@
 #
 ##############################################################################
 
+from lxml.html.soupparser import fromstring
+from lxml.etree import tostring
+import logging
 import lxml.html
+import openerp.pooler as pooler
 import operator
+import random
 import re
+import socket
+import threading
+import time
 
 from openerp.loglevels import ustr
 
+_logger = logging.getLogger(__name__)
+
+
 def html_sanitize(src):
     if not src:
         return src
@@ -90,3 +101,223 @@
                 children[-1].tail = element
         else:
             dest_node.append(element)
+
+
+#----------------------------------------------------------
+# HTML Cleaner
+#----------------------------------------------------------
+
+def html_email_clean(html):
+    """ html_email_clean: clean the html to display in the web client.
+        - strip email quotes (remove blockquote nodes)
+        - strip signatures (remove --\n{\n)Blahblah), by replacing <br> by
+            \n to avoid ignoring signatures converted into html
+    """
+    modified_html = ''
+
+    # 1. <br[ /]> -> \n, because otherwise the tree is obfuscated
+    br_tags = re.compile(r'([<]\s*br\s*\/?[>])')
+    idx = 0
+    for item in re.finditer(br_tags, html):
+        modified_html += html[idx:item.start()] + '\n'
+        idx = item.end()
+    modified_html += html[idx:]
+
+    # 2. form a tree, handle (currently ?) pure-text by enclosing them in a pre
+    root = fromstring(modified_html)
+    if not len(root) and root.text is None and root.tail is None:
+        modified_html = '<div>%s</div>' % modified_html
+        root = fromstring(modified_html)
+
+    # 3. remove blockquotes
+    quotes = [el for el in root.iterchildren(tag='blockquote')]
+    for node in quotes:
+        node.getparent().remove(node)
+
+    # 4. strip signatures
+    signature = re.compile(r'([-]{2}[\s]?[\r\n]{1,2}[^\z]+)')
+    for elem in root.getiterator():
+        if elem.text:
+            match = re.search(signature, elem.text)
+            if match:
+                elem.text = elem.text[:match.start()] + elem.text[match.end():]
+        if elem.tail:
+            match = re.search(signature, elem.tail)
+            if match:
+                elem.tail = elem.tail[:match.start()] + elem.tail[match.end():]
+
+    # 5. \n back to <br/>
+    for el in root.iterchildren():
+        if el.tag == 'pre':
+            continue
+        if el.text:
+            el.text = el.text.replace('\n', '<br />')
+        if el.tail:
+            el.tail = el.tail.replace('\n', '<br />')
+
+    new_html = tostring(root, pretty_print=True)
+    return new_html
+
+
+#----------------------------------------------------------
+# Emails
+#----------------------------------------------------------
+
+email_re = re.compile(r"""
+    ([a-zA-Z][\w\.-]*[a-zA-Z0-9]     # username part
+    @                                # mandatory @ sign
+    [a-zA-Z0-9][\w\.-]*              # domain must start with a letter ... Ged> why do we include a 0-9 then?
+     \.
+     [a-z]{2,3}                      # TLD
+    )
+    """, re.VERBOSE)
+res_re = re.compile(r"\[([0-9]+)\]", re.UNICODE)
+command_re = re.compile("^Set-([a-z]+) *: *(.+)$", re.I + re.UNICODE)
+
+# Updated in 7.0 to match the model name as well
+# Typical form of references is <timestamp-openerp-record_id-model_name@domain>
+# group(1) = the record ID ; group(2) = the model (if any) ; group(3) = the domain
+reference_re = re.compile("<.*-open(?:object|erp)-(\\d+)(?:-([\w.]+))?.*@(.*)>", re.UNICODE)
+
+def html2plaintext(html, body_id=None, encoding='utf-8'):
+    """ From an HTML text, convert the HTML to plain text.
+    If @param body_id is provided then this is the tag where the
+    body (not necessarily <body>) starts.
+    """
+    ## (c) Fry-IT, www.fry-it.com, 2007
+    ## <[email protected]>
+    ## download here: http://www.peterbe.com/plog/html2plaintext
+
+    html = ustr(html)
+
+    from lxml.etree import tostring, fromstring, HTMLParser
+    tree = fromstring(html, parser=HTMLParser())
+
+    if body_id is not None:
+        source = tree.xpath('//*[@id=%s]'%(body_id,))
+    else:
+        source = tree.xpath('//body')
+    if len(source):
+        tree = source[0]
+
+    url_index = []
+    i = 0
+    for link in tree.findall('.//a'):
+        url = link.get('href')
+        if url:
+            i += 1
+            link.tag = 'span'
+            link.text = '%s [%s]' % (link.text, i)
+            url_index.append(url)
+
+    html = ustr(tostring(tree, encoding=encoding))
+
+    html = html.replace('<strong>','*').replace('</strong>','*')
+    html = html.replace('<b>','*').replace('</b>','*')
+    html = html.replace('<h3>','*').replace('</h3>','*')
+    html = html.replace('<h2>','**').replace('</h2>','**')
+    html = html.replace('<h1>','**').replace('</h1>','**')
+    html = html.replace('<em>','/').replace('</em>','/')
+    html = html.replace('<tr>', '\n')
+    html = html.replace('</p>', '\n')
+    html = re.sub('<br\s*/?>', '\n', html)
+    html = re.sub('<.*?>', ' ', html)
+    html = html.replace(' ' * 2, ' ')
+
+    # strip all lines
+    html = '\n'.join([x.strip() for x in html.splitlines()])
+    html = html.replace('\n' * 2, '\n')
+
+    for i, url in enumerate(url_index):
+        if i == 0:
+            html += '\n\n'
+        html += ustr('[%s] %s\n') % (i+1, url)
+
+    return html
+
+def generate_tracking_message_id(res_id):
+    """Returns a string that can be used in the Message-ID RFC822 header field
+
+       Used to track the replies related to a given object thanks to the "In-Reply-To"
+       or "References" fields that Mail User Agents will set.
+    """
+    try:
+        rnd = random.SystemRandom().random()
+    except NotImplementedError:
+        rnd = random.random()
+    rndstr = ("%.15f" % rnd)[2:]
+    return "<%.15f.%s-openerp-%s@%s>" % (time.time(), rndstr, res_id, socket.gethostname())
+
+def email_send(email_from, email_to, subject, body, email_cc=None, email_bcc=None, reply_to=False,
+               attachments=None, message_id=None, references=None, openobject_id=False, debug=False, subtype='plain', headers=None,
+               smtp_server=None, smtp_port=None, ssl=False, smtp_user=None, smtp_password=None, cr=None, uid=None):
+    """Low-level function for sending an email (deprecated).
+
+    :deprecate: since OpenERP 6.1, please use ir.mail_server.send_email() instead.
+    :param email_from: A string used to fill the `From` header, if falsy,
+                       config['email_from'] is used instead.  Also used for
+                       the `Reply-To` header if `reply_to` is not provided
+    :param email_to: a sequence of addresses to send the mail to.
+    """
+
+    # If not cr, get cr from current thread database
+    if not cr:
+        db_name = getattr(threading.currentThread(), 'dbname', None)
+        if db_name:
+            cr = pooler.get_db_only(db_name).cursor()
+        else:
+            raise Exception("No database cursor found, please pass one explicitly")
+
+    # Send Email
+    try:
+        mail_server_pool = pooler.get_pool(cr.dbname).get('ir.mail_server')
+        res = False
+        # Pack Message into MIME Object
+        email_msg = mail_server_pool.build_email(email_from, email_to, subject, body, email_cc, email_bcc, reply_to,
+                   attachments, message_id, references, openobject_id, subtype, headers=headers)
+
+        res = mail_server_pool.send_email(cr, uid or 1, email_msg, mail_server_id=None,
+                       smtp_server=smtp_server, smtp_port=smtp_port, smtp_user=smtp_user, smtp_password=smtp_password,
+                       smtp_encryption=('ssl' if ssl else None), smtp_debug=debug)
+    except Exception:
+        _logger.exception("tools.email_send failed to deliver email")
+        return False
+    finally:
+        cr.close()
+    return res
+
+def email_split(text):
+    """ Return a list of the email addresses found in ``text`` """
+    if not text:
+        return []
+    return re.findall(r'([^ ,<@]+@[^> ,]+)', text)
+
+def append_content_to_html(html, content, plaintext=True):
+    """Append extra content at the end of an HTML snippet, trying
+       to locate the end of the HTML document (</body>, </html>, or
+       EOF), and wrapping the provided content in a <pre/> block
+       unless ``plaintext`` is False. A side-effect of this
+       method is to coerce all HTML tags to lowercase in ``html``,
+       and strip enclosing <html> or <body> tags in content if
+       ``plaintext`` is False.
+
+       :param str html: html tagsoup (doesn't have to be XHTML)
+       :param str content: extra content to append
+       :param bool plaintext: whether content is plaintext and should
+           be wrapped in a <pre/> tag.
+    """
+    html = ustr(html)
+    if plaintext:
+        content = u'\n<pre>%s</pre>\n' % ustr(content)
+    else:
+        content = re.sub(r'(?i)(</?html.*>|</?body.*>|<!\W*DOCTYPE.*>)', '', content)
+        content = u'\n%s\n' % ustr(content)
+    # Force all tags to lowercase
+    html = re.sub(r'(</?)\W*(\w+)([ >])',
+        lambda m: '%s%s%s' % (m.group(1), m.group(2).lower(), m.group(3)), html)
+    insert_location = html.find('</body>')
+    if insert_location == -1:
+        insert_location = html.find('</html>')
+    if insert_location == -1:
+        return '%s%s' % (html, content)
+    return '%s%s%s' % (html[:insert_location], content, html[insert_location:])

=== modified file 'openerp/tools/misc.py'
--- openerp/tools/misc.py	2012-10-24 16:15:27 +0000
+++ openerp/tools/misc.py	2012-11-06 12:49:29 +0000
@@ -30,8 +30,6 @@
 import subprocess
 import logging
 import os
-import random
-import re
 import socket
 import sys
 import threading
@@ -48,8 +46,6 @@
 except ImportError:
     html2text = None
 
-import openerp.loglevels as loglevels
-import openerp.pooler as pooler
 from config import config
 from cache import *
 
@@ -275,168 +271,6 @@
     return izip(xrange(len(l)-1, -1, -1), reversed(l))
 
 #----------------------------------------------------------
-# Emails
-#----------------------------------------------------------
-email_re = re.compile(r"""
-    ([a-zA-Z][\w\.-]*[a-zA-Z0-9]     # username part
-    @                                # mandatory @ sign
-    [a-zA-Z0-9][\w\.-]*              # domain must start with a letter ... Ged> why do we include a 0-9 then?
-     \.
-     [a-z]{2,3}                      # TLD
-    )
-    """, re.VERBOSE)
-res_re = re.compile(r"\[([0-9]+)\]", re.UNICODE)
-command_re = re.compile("^Set-([a-z]+) *: *(.+)$", re.I + re.UNICODE)
-
-# Updated in 7.0 to match the model name as well
-# Typical form of references is <timestamp-openerp-record_id-model_name@domain>
-# group(1) = the record ID ; group(2) = the model (if any) ; group(3) = the domain
-reference_re = re.compile("<.*-open(?:object|erp)-(\\d+)(?:-([\w.]+))?.*@(.*)>", re.UNICODE)
-
-def html2plaintext(html, body_id=None, encoding='utf-8'):
-    """ From an HTML text, convert the HTML to plain text.
-    If @param body_id is provided then this is the tag where the
-    body (not necessarily <body>) starts.
-    """
-    ## (c) Fry-IT, www.fry-it.com, 2007
-    ## <[email protected]>
-    ## download here: http://www.peterbe.com/plog/html2plaintext
-
-    html = ustr(html)
-
-    from lxml.etree import tostring, fromstring, HTMLParser
-    tree = fromstring(html, parser=HTMLParser())
-
-    if body_id is not None:
-        source = tree.xpath('//*[@id=%s]'%(body_id,))
-    else:
-        source = tree.xpath('//body')
-    if len(source):
-        tree = source[0]
-
-    url_index = []
-    i = 0
-    for link in tree.findall('.//a'):
-        url = link.get('href')
-        if url:
-            i += 1
-            link.tag = 'span'
-            link.text = '%s [%s]' % (link.text, i)
-            url_index.append(url)
-
-    html = ustr(tostring(tree, encoding=encoding))
-
-    html = html.replace('<strong>','*').replace('</strong>','*')
-    html = html.replace('<b>','*').replace('</b>','*')
-    html = html.replace('<h3>','*').replace('</h3>','*')
-    html = html.replace('<h2>','**').replace('</h2>','**')
-    html = html.replace('<h1>','**').replace('</h1>','**')
-    html = html.replace('<em>','/').replace('</em>','/')
-    html = html.replace('<tr>', '\n')
-    html = html.replace('</p>', '\n')
-    html = re.sub('<br\s*/?>', '\n', html)
-    html = re.sub('<.*?>', ' ', html)
-    html = html.replace(' ' * 2, ' ')
-
-    # strip all lines
-    html = '\n'.join([x.strip() for x in html.splitlines()])
-    html = html.replace('\n' * 2, '\n')
-
-    for i, url in enumerate(url_index):
-        if i == 0:
-            html += '\n\n'
-        html += ustr('[%s] %s\n') % (i+1, url)
-
-    return html
-
-def generate_tracking_message_id(res_id):
-    """Returns a string that can be used in the Message-ID RFC822 header field
-    
-       Used to track the replies related to a given object thanks to the "In-Reply-To"
-       or "References" fields that Mail User Agents will set.
-    """
-    try:
-        rnd = random.SystemRandom().random()
-    except NotImplementedError:
-        rnd = random.random()
-    rndstr = ("%.15f" % rnd)[2:] 
-    return "<%.15f.%s-openerp-%s@%s>" % (time.time(), rndstr, res_id, socket.gethostname())
-
-def email_send(email_from, email_to, subject, body, email_cc=None, email_bcc=None, reply_to=False,
-               attachments=None, message_id=None, references=None, openobject_id=False, debug=False, subtype='plain', headers=None,
-               smtp_server=None, smtp_port=None, ssl=False, smtp_user=None, smtp_password=None, cr=None, uid=None):
-    """Low-level function for sending an email (deprecated).
-
-    :deprecate: since OpenERP 6.1, please use ir.mail_server.send_email() instead. 
-    :param email_from: A string used to fill the `From` header, if falsy,
-                       config['email_from'] is used instead.  Also used for
-                       the `Reply-To` header if `reply_to` is not provided
-    :param email_to: a sequence of addresses to send the mail to.
-    """
-
-    # If not cr, get cr from current thread database
-    if not cr:
-        db_name = getattr(threading.currentThread(), 'dbname', None)
-        if db_name:
-            cr = pooler.get_db_only(db_name).cursor()
-        else:
-            raise Exception("No database cursor found, please pass one explicitly")
-
-    # Send Email
-    try:
-        mail_server_pool = pooler.get_pool(cr.dbname).get('ir.mail_server')
-        res = False
-        # Pack Message into MIME Object
-        email_msg = mail_server_pool.build_email(email_from, email_to, subject, body, email_cc, email_bcc, reply_to,
-                   attachments, message_id, references, openobject_id, subtype, headers=headers)
-
-        res = mail_server_pool.send_email(cr, uid or 1, email_msg, mail_server_id=None,
-                       smtp_server=smtp_server, smtp_port=smtp_port, smtp_user=smtp_user, smtp_password=smtp_password,
-                       smtp_encryption=('ssl' if ssl else None), smtp_debug=debug)
-    except Exception:
-        _logger.exception("tools.email_send failed to deliver email")
-        return False
-    finally:
-        cr.close()
-    return res
-
-def email_split(text):
-    """ Return a list of the email addresses found in ``text`` """
-    if not text: return []
-    return re.findall(r'([^ ,<@]+@[^> ,]+)', text)
-
-def append_content_to_html(html, content, plaintext=True):
-    """Append extra content at the end of an HTML snippet, trying
-       to locate the end of the HTML document (</body>, </html>, or
-       EOF), and wrapping the provided content in a <pre/> block
-       unless ``plaintext`` is False. A side-effect of this
-       method is to coerce all HTML tags to lowercase in ``html``,
-       and strip enclosing <html> or <body> tags in content if
-       ``plaintext`` is False.
-       
-       :param str html: html tagsoup (doesn't have to be XHTML)
-       :param str content: extra content to append
-       :param bool plaintext: whether content is plaintext and should
-           be wrapped in a <pre/> tag.
-    """
-    html = ustr(html)
-    if plaintext:
-        content = u'\n<pre>%s</pre>\n' % ustr(content)
-    else:
-        content = re.sub(r'(?i)(</?html.*>|</?body.*>|<!\W*DOCTYPE.*>)', '', content)
-        content = u'\n%s\n'% ustr(content)
-    # Force all tags to lowercase
-    html = re.sub(r'(</?)\W*(\w+)([ >])',
-        lambda m: '%s%s%s' % (m.group(1),m.group(2).lower(),m.group(3)), html)
-    insert_location = html.find('</body>')
-    if insert_location == -1:
-        insert_location = html.find('</html>')
-    if insert_location == -1:
-        return '%s%s' % (html, content)
-    return '%s%s%s' % (html[:insert_location], content, html[insert_location:])  
-
-
-#----------------------------------------------------------
 # SMS
 #----------------------------------------------------------
 # text must be latin-1 encoded

_______________________________________________
Mailing list: https://launchpad.net/~openerp-dev-gtk
Post to     : [email protected]
Unsubscribe : https://launchpad.net/~openerp-dev-gtk
More help   : https://help.launchpad.net/ListHelp

Reply via email to