First public release of MyAAC

2025-10-14 17:54:55 +02:00 · 2017-05-01 20:02:45 +02:00
parent 31172b4883
commit b5362d0654
2016 changed files with 114481 additions and 0 deletions
--- a/system/libs/dwoo/plugins/builtin/functions/mailto.php
+++ b/system/libs/dwoo/plugins/builtin/functions/mailto.php
@@ -0,0 +1,117 @@
+<?php
+
+/**
+ * Outputs a mailto link with optional spam-proof (okay probably not) encoding
+ * <pre>
+ *  * address : target email address
+ *  * text : display text to show for the link, defaults to the address if not provided
+ *  * subject : the email subject
+ *  * encode : one of the available encoding (none, js, jscharcode or hex)
+ *  * cc : address(es) to carbon copy, comma separated
+ *  * bcc : address(es) to blind carbon copy, comma separated
+ *  * newsgroups : newsgroup(s) to post to, comma separated
+ *  * followupto : address(es) to follow up, comma separated
+ *  * extra : additional attributes to add to the &lt;a&gt; tag
+ * </pre>
+ * This software is provided 'as-is', without any express or implied warranty.
+ * In no event will the authors be held liable for any damages arising from the use of this software.
+ *
+ * @author     Jordi Boggiano <j.boggiano@seld.be>
+ * @copyright  Copyright (c) 2008, Jordi Boggiano
+ * @license    http://dwoo.org/LICENSE   Modified BSD License
+ * @link       http://dwoo.org/
+ * @version    1.1.0
+ * @date       2009-07-18
+ * @package    Dwoo
+ */
+function Dwoo_Plugin_mailto(Dwoo $dwoo, $address, $text=null, $subject=null, $encode=null, $cc=null, $bcc=null, $newsgroups=null, $followupto=null, $extra=null)
+{
+	if (empty($address)) {
+		return '';
+	}
+	if (empty($text)) {
+		$text = $address;
+	}
+
+	// build address string
+	$address .= '?';
+
+	if (!empty($subject)) {
+		$address .= 'subject='.rawurlencode($subject).'&';
+	}
+	if (!empty($cc)) {
+		$address .= 'cc='.rawurlencode($cc).'&';
+	}
+	if (!empty($bcc)) {
+		$address .= 'bcc='.rawurlencode($bcc).'&';
+	}
+	if (!empty($newsgroups)) {
+		$address .= 'newsgroups='.rawurlencode($newsgroups).'&';
+	}
+	if (!empty($followupto)) {
+		$address .= 'followupto='.rawurlencode($followupto).'&';
+	}
+
+	$address = rtrim($address, '?&');
+
+	// output
+	switch($encode)
+	{
+
+	case 'none':
+	case null:
+		return '<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>';
+
+	case 'js':
+	case 'javascript':
+		$str = 'document.write(\'<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>\');';
+		$len = strlen($str);
+
+		$out = '';
+		for ($i=0; $i<$len; $i++) {
+			$out .= '%'.bin2hex($str[$i]);
+		}
+		return '<script type="text/javascript">eval(unescape(\''.$out.'\'));</script>';
+
+		break;
+	case 'javascript_charcode':
+	case 'js_charcode':
+	case 'jscharcode':
+	case 'jschar':
+		$str = '<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>';
+		$len = strlen($str);
+
+		$out = '<script type="text/javascript">'."\n<!--\ndocument.write(String.fromCharCode(";
+		for ($i=0; $i<$len; $i++) {
+			$out .= ord($str[$i]).',';
+		}
+		return rtrim($out, ',') . "));\n-->\n</script>\n";
+
+		break;
+
+	case 'hex':
+		if (strpos($address, '?') !== false) {
+			return $dwoo->triggerError('Mailto: Hex encoding is not possible with extra attributes, use one of : <em>js, jscharcode or none</em>.', E_USER_WARNING);
+		}
+
+		$out = '<a href="&#109;&#97;&#105;&#108;&#116;&#111;&#58;';
+		$len = strlen($address);
+		for ($i=0; $i<$len; $i++) {
+			if (preg_match('#\w#', $address[$i])) {
+				$out .= '%'.bin2hex($address[$i]);
+			} else {
+				$out .= $address[$i];
+			}
+		}
+		$out .= '" '.$extra.'>';
+		$len = strlen($text);
+		for ($i=0; $i<$len; $i++) {
+			$out .= '&#x'.bin2hex($text[$i]);
+		}
+		return $out.'</a>';
+
+	default:
+		return $dwoo->triggerError('Mailto: <em>encode</em> argument is invalid, it must be one of : <em>none (= no value), js, js_charcode or hex</em>', E_USER_WARNING);
+
+	}
+}