514 lines
20 KiB
Python
514 lines
20 KiB
Python
# -*- coding: utf-8 -*-
|
|
##############################################################################
|
|
#
|
|
# OpenERP, Open Source Business Applications
|
|
# Copyright (C) 2012-2013 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/>.
|
|
#
|
|
##############################################################################
|
|
|
|
from lxml import etree
|
|
import cgi
|
|
import logging
|
|
import lxml.html
|
|
import lxml.html.clean as clean
|
|
import random
|
|
import re
|
|
import socket
|
|
import threading
|
|
import time
|
|
|
|
import openerp
|
|
from openerp.loglevels import ustr
|
|
|
|
_logger = logging.getLogger(__name__)
|
|
|
|
|
|
#----------------------------------------------------------
|
|
# HTML Sanitizer
|
|
#----------------------------------------------------------
|
|
|
|
tags_to_kill = ["script", "head", "meta", "title", "link", "style", "frame", "iframe", "base", "object", "embed"]
|
|
tags_to_remove = ['html', 'body', 'font']
|
|
|
|
# allow new semantic HTML5 tags
|
|
allowed_tags = clean.defs.tags | frozenset('article section header footer hgroup nav aside figure'.split())
|
|
safe_attrs = clean.defs.safe_attrs | frozenset(['style'])
|
|
|
|
def html_sanitize(src, silent=True):
|
|
if not src:
|
|
return src
|
|
src = ustr(src, errors='replace')
|
|
|
|
logger = logging.getLogger(__name__ + '.html_sanitize')
|
|
|
|
# html encode email tags
|
|
part = re.compile(r"(<(([^a<>]|a[^<>\s])[^<>]*)@[^<>]+>)", re.IGNORECASE | re.DOTALL)
|
|
src = part.sub(lambda m: cgi.escape(m.group(1)), src)
|
|
|
|
kwargs = {
|
|
'page_structure': True,
|
|
'style': False, # do not remove style attributes
|
|
'forms': True, # remove form tags
|
|
'remove_unknown_tags': False,
|
|
'allow_tags': allowed_tags,
|
|
}
|
|
if etree.LXML_VERSION >= (2, 3, 1):
|
|
# kill_tags attribute has been added in version 2.3.1
|
|
kwargs.update({
|
|
'kill_tags': tags_to_kill,
|
|
'remove_tags': tags_to_remove,
|
|
})
|
|
else:
|
|
kwargs['remove_tags'] = tags_to_kill + tags_to_remove
|
|
|
|
if etree.LXML_VERSION >= (3, 1, 0):
|
|
kwargs.update({
|
|
'safe_attrs_only': True,
|
|
'safe_attrs': safe_attrs,
|
|
})
|
|
else:
|
|
# lxml < 3.1.0 does not allow to specify safe_attrs. We keep all attributes in order to keep "style"
|
|
kwargs['safe_attrs_only'] = False
|
|
|
|
try:
|
|
# some corner cases make the parser crash (such as <SCRIPT/XSS SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT> in test_mail)
|
|
cleaner = clean.Cleaner(**kwargs)
|
|
cleaned = cleaner.clean_html(src)
|
|
except etree.ParserError:
|
|
if not silent:
|
|
raise
|
|
logger.warning('ParserError obtained when sanitizing %r', src, exc_info=True)
|
|
cleaned = '<p>ParserError when sanitizing</p>'
|
|
except Exception:
|
|
if not silent:
|
|
raise
|
|
logger.warning('unknown error obtained when sanitizing %r', src, exc_info=True)
|
|
cleaned = '<p>Unknown error when sanitizing</p>'
|
|
return cleaned
|
|
|
|
|
|
#----------------------------------------------------------
|
|
# HTML Cleaner
|
|
#----------------------------------------------------------
|
|
|
|
def html_email_clean(html, remove=False, shorten=False, max_length=300):
|
|
""" html_email_clean: clean the html by doing the following steps:
|
|
|
|
- try to strip email quotes, by removing blockquotes or having some client-
|
|
specific heuristics
|
|
- try to strip signatures
|
|
- shorten the html to a maximum number of characters if requested
|
|
|
|
Some specific use case:
|
|
|
|
- MsOffice: ``div.style = border-top:solid;`` delimitates the beginning of
|
|
a quote; detecting by finding WordSection1 of MsoNormal
|
|
- Hotmail: ``hr.stopSpelling`` delimitates the beginning of a quote; detect
|
|
Hotmail by funding ``SkyDrivePlaceholder``
|
|
|
|
:param string html: sanitized html; tags like html or head should not
|
|
be present in the html string. This method therefore
|
|
takes as input html code coming from a sanitized source,
|
|
like fields.html.
|
|
:param boolean remove: remove the html code that is unwanted; otherwise it
|
|
is only flagged and tagged
|
|
:param boolean shorten: shorten the html; every excessing content will
|
|
be flagged as to remove
|
|
:param int max_length: if shortening, maximum number of characters before
|
|
shortening
|
|
"""
|
|
def _replace_matching_regex(regex, source, replace=''):
|
|
""" Replace all matching expressions in source by replace """
|
|
if not source:
|
|
return source
|
|
dest = ''
|
|
idx = 0
|
|
for item in re.finditer(regex, source):
|
|
dest += source[idx:item.start()] + replace
|
|
idx = item.end()
|
|
dest += source[idx:]
|
|
return dest
|
|
|
|
def _create_node(tag, text, tail=None, attrs={}):
|
|
new_node = etree.Element(tag)
|
|
new_node.text = text
|
|
new_node.tail = tail
|
|
for key, val in attrs.iteritems():
|
|
new_node.set(key, val)
|
|
return new_node
|
|
|
|
def _insert_new_node(node, index, new_node_tag, new_node_text, new_node_tail=None, new_node_attrs={}):
|
|
new_node = _create_node(new_node_tag, new_node_text, new_node_tail, new_node_attrs)
|
|
node.insert(index, new_node)
|
|
return new_node
|
|
|
|
def _tag_matching_regex_in_text(regex, node, new_node_tag='span', new_node_attrs={}):
|
|
text = node.text or ''
|
|
if not re.search(regex, text):
|
|
return
|
|
|
|
cur_node = node
|
|
node.text = ''
|
|
idx, iteration = 0, 0
|
|
for item in re.finditer(regex, text):
|
|
if iteration == 0:
|
|
cur_node.text = text[idx:item.start()]
|
|
else:
|
|
_insert_new_node(node, (iteration - 1) * 2 + 1, new_node_tag, text[idx:item.start()])
|
|
new_node = _insert_new_node(node, iteration * 2, new_node_tag, text[item.start():item.end()], None, new_node_attrs)
|
|
|
|
cur_node = new_node
|
|
idx = item.end()
|
|
iteration += 1
|
|
new_node = _insert_new_node(node, -1, new_node_tag, text[idx:] + (cur_node.tail or ''), None, {})
|
|
|
|
if not html or not isinstance(html, basestring):
|
|
return html
|
|
html = ustr(html)
|
|
|
|
# Pre processing
|
|
# ------------------------------------------------------------
|
|
# TDE TODO: --- MAIL ORIGINAL ---: '[\-]{4,}([^\-]*)[\-]{4,}'
|
|
|
|
# html: remove encoding attribute inside tags
|
|
doctype = re.compile(r'(<[^>]*\s)(encoding=(["\'][^"\']*?["\']|[^\s\n\r>]+)(\s[^>]*|/)?>)', re.IGNORECASE | re.DOTALL)
|
|
html = doctype.sub(r"", html)
|
|
|
|
# html: ClEditor seems to love using <div><br /><div> -> replace with <br />
|
|
br_div_tags = re.compile(r'(<div>\s*<br\s*\/>\s*<\/div>)', re.IGNORECASE)
|
|
html = _replace_matching_regex(br_div_tags, html, '<br />')
|
|
|
|
# form a tree
|
|
root = lxml.html.fromstring(html)
|
|
if not len(root) and root.text is None and root.tail is None:
|
|
html = '<div>%s</div>' % html
|
|
root = lxml.html.fromstring(html)
|
|
|
|
# remove all tails and replace them by a span element, because managing text and tails can be a pain in the ass
|
|
for node in root.getiterator():
|
|
if node.tail:
|
|
tail_node = _create_node('span', node.tail)
|
|
node.tail = None
|
|
node.addnext(tail_node)
|
|
|
|
# form node and tag text-based quotes and signature
|
|
quote_tags = re.compile(r'(\n(>)+[^\n\r]*)')
|
|
signature = re.compile(r'([-]{2,}[\s]?[\r\n]{1,2}[^.]+)')
|
|
for node in root.getiterator():
|
|
_tag_matching_regex_in_text(quote_tags, node, 'span', {'text_quote': '1'})
|
|
_tag_matching_regex_in_text(signature, node, 'span', {'text_signature': '1'})
|
|
|
|
# Processing
|
|
# ------------------------------------------------------------
|
|
|
|
# tree: tag nodes
|
|
# signature_begin = False # try dynamic signature recognition
|
|
quote_begin = False
|
|
overlength = False
|
|
cur_char_nbr = 0
|
|
for node in root.getiterator():
|
|
# root: try to tag the client used to write the html
|
|
if 'WordSection1' in node.get('class', '') or 'MsoNormal' in node.get('class', ''):
|
|
root.set('msoffice', '1')
|
|
if 'SkyDrivePlaceholder' in node.get('class', '') or 'SkyDrivePlaceholder' in node.get('id', ''):
|
|
root.set('hotmail', '1')
|
|
|
|
# state of the parsing
|
|
if quote_begin:
|
|
node.set('in_quote', '1')
|
|
node.set('tail_remove', '1')
|
|
if overlength:
|
|
node.set('in_overlength', '1')
|
|
node.set('tail_remove', '1')
|
|
|
|
if root.get('msoffice') and node.tag == 'div' and 'border-top:solid' in node.get('style', ''):
|
|
quote_begin = True
|
|
node.set('in_quote', '1')
|
|
node.set('tail_remove', '1')
|
|
if root.get('hotmail') and node.tag == 'hr' and ('stopSpelling' in node.get('class', '') or 'stopSpelling' in node.get('id', '')):
|
|
quote_begin = True
|
|
node.set('in_quote', '1')
|
|
node.set('tail_remove', '1')
|
|
|
|
# shorten:
|
|
# 1/ truncate the text at the next available space
|
|
# 2/ create a 'read more' node, next to current node
|
|
# 3/ add the truncated text in a new node, next to 'read more' node
|
|
if shorten and not overlength and cur_char_nbr + len(node.text or '') > max_length:
|
|
overlength = True
|
|
# truncate text
|
|
innertext = node.text[0:(max_length - cur_char_nbr)]
|
|
outertext = node.text[(max_length - cur_char_nbr):]
|
|
stop_idx = outertext.find(' ')
|
|
if stop_idx == -1:
|
|
stop_idx = len(outertext)
|
|
node.text = innertext + outertext[0:stop_idx]
|
|
# create <span> ... <a href="#">read more</a></span> node
|
|
read_more_node = _create_node('span', ' ... ', None, {'class': 'oe_mail_expand'})
|
|
read_more_link_node = _create_node('a', 'read more', None, {'href': '#', 'class': 'oe_mail_expand'})
|
|
read_more_node.append(read_more_link_node)
|
|
# create outertext node
|
|
new_node = _create_node('span', outertext[stop_idx:])
|
|
# add newly created nodes in dom
|
|
node.addnext(new_node)
|
|
node.addnext(read_more_node)
|
|
# tag node
|
|
new_node.set('in_overlength', '1')
|
|
|
|
cur_char_nbr += len(node.text or '')
|
|
|
|
if node.tag == 'blockquote' or node.get('text_quote') or node.get('text_signature'):
|
|
node.set('in_quote', '1')
|
|
|
|
# Post processing
|
|
# ------------------------------------------------------------
|
|
|
|
to_remove = []
|
|
for node in root.getiterator():
|
|
if node.get('in_quote') or node.get('in_overlength'):
|
|
# copy the node tail into parent text
|
|
if node.tail and not node.get('tail_remove'):
|
|
parent = node.getparent()
|
|
parent.tail = node.tail + (parent.tail or '')
|
|
to_remove.append(node)
|
|
if node.get('tail_remove'):
|
|
node.tail = ''
|
|
for node in to_remove:
|
|
if remove:
|
|
node.getparent().remove(node)
|
|
else:
|
|
if not 'oe_mail_expand' in node.get('class', ''): # trick: read more link should be displayed even if it's in overlength
|
|
node_class = node.get('class', '') + ' ' + 'oe_mail_cleaned'
|
|
node.set('class', node_class)
|
|
|
|
# html: \n that were tail of elements have been encapsulated into <span> -> back to \n
|
|
html = etree.tostring(root, pretty_print=False)
|
|
linebreaks = re.compile(r'<span>([\s]*[\r\n]+[\s]*)<\/span>', re.IGNORECASE | re.DOTALL)
|
|
html = _replace_matching_regex(linebreaks, html, '\n')
|
|
|
|
return html
|
|
|
|
|
|
#----------------------------------------------------------
|
|
# HTML/Text management
|
|
#----------------------------------------------------------
|
|
|
|
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
|
|
## <peter@fry-it.com>
|
|
## download here: http://www.peterbe.com/plog/html2plaintext
|
|
|
|
html = ustr(html)
|
|
tree = etree.fromstring(html, parser=etree.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(etree.tostring(tree, encoding=encoding))
|
|
# \r char is converted into , must remove it
|
|
html = html.replace(' ', '')
|
|
|
|
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 plaintext2html(text, container_tag=False):
|
|
""" Convert plaintext into html. Content of the text is escaped to manage
|
|
html entities, using cgi.escape().
|
|
- all \n,\r are replaced by <br />
|
|
- enclose content into <p>
|
|
- 2 or more consecutive <br /> are considered as paragraph breaks
|
|
|
|
:param string container_tag: container of the html; by default the
|
|
content is embedded into a <div>
|
|
"""
|
|
text = cgi.escape(ustr(text))
|
|
|
|
# 1. replace \n and \r
|
|
text = text.replace('\n', '<br/>')
|
|
text = text.replace('\r', '<br/>')
|
|
|
|
# 2-3: form paragraphs
|
|
idx = 0
|
|
final = '<p>'
|
|
br_tags = re.compile(r'(([<]\s*[bB][rR]\s*\/?[>]\s*){2,})')
|
|
for item in re.finditer(br_tags, text):
|
|
final += text[idx:item.start()] + '</p><p>'
|
|
idx = item.end()
|
|
final += text[idx:] + '</p>'
|
|
|
|
# 4. container
|
|
if container_tag:
|
|
final = '<%s>%s</%s>' % (container_tag, final, container_tag)
|
|
return ustr(final)
|
|
|
|
def append_content_to_html(html, content, plaintext=True, preserve=False, container_tag=False):
|
|
""" Append extra content at the end of an HTML snippet, trying
|
|
to locate the end of the HTML document (</body>, </html>, or
|
|
EOF), and converting the provided content in html unless ``plaintext``
|
|
is False.
|
|
Content conversion can be done in two ways:
|
|
- wrapping it into a pre (preserve=True)
|
|
- use plaintext2html (preserve=False, using container_tag to wrap the
|
|
whole content)
|
|
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.
|
|
:param bool preserve: if content is plaintext, wrap it into a <pre>
|
|
instead of converting it into html
|
|
"""
|
|
html = ustr(html)
|
|
if plaintext and preserve:
|
|
content = u'\n<pre>%s</pre>\n' % ustr(content)
|
|
elif plaintext:
|
|
content = '\n%s\n' % plaintext2html(content, container_tag)
|
|
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:])
|
|
|
|
#----------------------------------------------------------
|
|
# Emails
|
|
#----------------------------------------------------------
|
|
|
|
# matches any email in a body of text
|
|
email_re = re.compile(r"""([a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,6})""", re.VERBOSE)
|
|
|
|
# matches a string containing only one email
|
|
single_email_re = re.compile(r"""^[a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,6}$""", 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)
|
|
|
|
# Bounce regex
|
|
# Typical form of bounce is bounce-128-crm.lead-34@domain
|
|
# group(1) = the mail ID; group(2) = the model (if any); group(3) = the record ID
|
|
bounce_re = re.compile("[\w]+-(\d+)-?([\w.]+)?-?(\d+)?", re.UNICODE)
|
|
|
|
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
|
|
local_cr = None
|
|
if not cr:
|
|
db_name = getattr(threading.currentThread(), 'dbname', None)
|
|
if db_name:
|
|
local_cr = cr = openerp.registry(db_name).db.cursor()
|
|
else:
|
|
raise Exception("No database cursor found, please pass one explicitly")
|
|
|
|
# Send Email
|
|
try:
|
|
mail_server_pool = openerp.registry(cr.dbname)['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:
|
|
if local_cr:
|
|
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)
|