]> git.mxchange.org Git - friendica.git/blob - include/html2plain.php
Encoding for incoming mails. Fixed invalid message id (with side effect at the moment...
[friendica.git] / include / html2plain.php
1 <?php
2 require_once "html2bbcode.php";
3
4 function breaklines($line, $level)
5 {
6         $wraplen = 75-$level;
7
8         $newlines = array();
9
10         do {
11                 $oldline = $line;
12
13                 $subline = substr($line, 0, $wraplen);
14
15                 $pos = strrpos($subline, ' ');
16
17                 if ($pos == 0)
18                         $pos = strpos($line, ' ');
19
20                 if (($pos > 0) and strlen($line) > $wraplen) {
21                         $newline = trim(substr($line, 0, $pos));
22                         if ($level > 0)
23                                 $newline = str_repeat(">", $level).' '.$newline;
24
25                         $newlines[] = $newline." ";
26                         $line = substr($line, $pos+1);
27                 }
28
29         } while ((strlen($line) > $wraplen) and !($oldline == $line));
30
31         if ($level > 0)
32                 $line = str_repeat(">", $level).' '.$line;
33
34         $newlines[] = $line;
35
36
37         return(implode($newlines, "\n"));
38 }
39
40 function quotelevel($message)
41 {
42         $lines = explode("\n", $message);
43
44         $newlines = array();
45         $level = 0;
46         foreach($lines as $line) {;
47                 $line = trim($line);
48                 $startquote = false;
49                 while (strpos("*".$line, '[quote]') > 0) {
50                         $level++;
51                         $pos = strpos($line, '[quote]');
52                         $line = substr($line, 0, $pos).substr($line, $pos+7);
53                         $startquote = true;
54                 }
55
56                 $currlevel = $level;
57
58                 while (strpos("*".$line, '[/quote]') > 0) {
59                         $level--;
60                         if ($level < 0)
61                                 $level = 0;
62
63                         $pos = strpos($line, '[/quote]');
64                         $line = substr($line, 0, $pos).substr($line, $pos+8);
65                 }
66
67                 if (!$startquote or ($line != ''))
68                         $newlines[] = breaklines($line, $currlevel);
69         }
70         return(implode($newlines, "\n"));
71 }
72
73 function html2plain($html)
74 {
75         global $lang;
76
77         $message = str_replace("\r", "", $html);
78
79         $doc = new DOMDocument();
80         $doc->preserveWhiteSpace = false;
81
82         $message = mb_convert_encoding($message, 'HTML-ENTITIES', "UTF-8");
83
84         @$doc->loadHTML($message);
85
86         $xpath = new DomXPath($doc);
87         $list = $xpath->query("//pre");
88         foreach ($list as $node) {
89                 $node->nodeValue = str_replace("\n", "\r", $node->nodeValue);
90         }
91
92         $message = $doc->saveHTML();
93         $message = str_replace(array("\n<", ">\n", "\r", "\n", "\xC3\x82\xC2\xA0"), array("<", ">", "<br>", " ", ""), $message);
94         $message = preg_replace('= [\s]*=i', " ", $message);
95
96         // nach <a href="...">...</a> suchen, die ... miteinander vergleichen und bei Gleichheit durch ein einzelnes ... ersetzen.
97         $pattern = '/<a.*?href="(.*?)".*?>(.*?)<\/a>/is';
98         preg_match_all($pattern, $message, $result, PREG_SET_ORDER);
99
100         foreach ($result as $treffer) {
101                 if ($treffer[1] == $treffer[2]) {
102                         $search = '<a href="'.$treffer[1].'" target="_blank">'.$treffer[1].'</a>';
103                         $message = str_replace($search, $treffer[1], $message);
104                 }
105         }
106         @$doc->loadHTML($message);
107
108         node2bbcode($doc, 'html', array(), '', '');
109         node2bbcode($doc, 'body', array(), '', '');
110
111         // MyBB-Auszeichnungen
112         node2bbcode($doc, 'span', array('style'=>'text-decoration: underline;'), '_', '_');
113         node2bbcode($doc, 'span', array('style'=>'font-style: italic;'), '/', '/');
114         node2bbcode($doc, 'span', array('style'=>'font-weight: bold;'), '*', '*');
115
116         node2bbcode($doc, 'strong', array(), '*', '*');
117         node2bbcode($doc, 'b', array(), '*', '*');
118         node2bbcode($doc, 'i', array(), '/', '/');
119         node2bbcode($doc, 'u', array(), '_', '_');
120
121         node2bbcode($doc, 'blockquote', array(), '[quote]', "[/quote]\n");
122
123         node2bbcode($doc, 'br', array(), "\n", '');
124
125         node2bbcode($doc, 'span', array(), "", "");
126         node2bbcode($doc, 'pre', array(), "", "");
127         node2bbcode($doc, 'div', array(), "\r", "\r");
128         node2bbcode($doc, 'p', array(), "\n", "\n");
129
130         //node2bbcode($doc, 'ul', array(), "\n[list]", "[/list]\n");
131         //node2bbcode($doc, 'ol', array(), "\n[list=1]", "[/list]\n");
132         node2bbcode($doc, 'li', array(), "\n* ", "\n");
133
134         node2bbcode($doc, 'hr', array(), str_repeat("-", 70), "");
135
136         node2bbcode($doc, 'tr', array(), "\n", "");
137         node2bbcode($doc, 'td', array(), "\t", "");
138
139         node2bbcode($doc, 'h1', array(), "\n\n*", "*\n");
140         node2bbcode($doc, 'h2', array(), "\n\n*", "*\n");
141         node2bbcode($doc, 'h3', array(), "\n\n*", "*\n");
142         node2bbcode($doc, 'h4', array(), "\n\n*", "*\n");
143         node2bbcode($doc, 'h5', array(), "\n\n*", "*\n");
144         node2bbcode($doc, 'h6', array(), "\n\n*", "*\n");
145
146         node2bbcode($doc, 'a', array('href'=>'/(.+)/'), ' $1', '', true);
147         node2bbcode($doc, 'img', array('alt'=>'/(.+)/'), '$1', '');
148         node2bbcode($doc, 'img', array('title'=>'/(.+)/'), '$1', '');
149         node2bbcode($doc, 'img', array(), '', '');
150         node2bbcode($doc, 'img', array('src'=>'/(.+)/'), '[img]$1', '[/img]');
151
152         $message = $doc->saveHTML();
153
154         $message = str_replace("[img]", "", $message);
155         $message = str_replace("[/img]", "", $message);
156
157         // was ersetze ich da?
158         // Irgendein stoerrisches UTF-Zeug
159         $message = str_replace(chr(194).chr(160), ' ', $message);
160
161         $message = str_replace("&nbsp;", " ", $message);
162
163         // Aufeinanderfolgende DIVs
164         $message = preg_replace('=\r *\r=i', "\n", $message);
165         $message = str_replace("\r", "\n", $message);
166
167         $message = strip_tags($message);
168
169         $message = html_entity_decode($message, ENT_QUOTES, 'UTF-8');
170
171         do {
172                 $oldmessage = $message;
173                 $message = str_replace("\n\n\n", "\n\n", $message);
174         } while ($oldmessage != $message);
175
176         $message = quotelevel(trim($message));
177
178         return(trim($message));
179 }
180 ?>