[2009–06–15|25ac85f] Nette\Mail – odesílání emailů

A jak je to s plink, link atd. makrama v CurlyBracketsFilter-u ???

cuga napsal(a):

bude mail pridan i do 0.8 verze, nebo mam pro posilani misto stable verze pouzivat devel verzi???

Jinak samozrejme diky za mail, ten chybel :)

Bude stačit, pokud si zkopíruješ složku Mail z development verze do té stable.

Já bych měl prosbu. Pochopil jsem pohledem do zdrojáku, že Nette\Mail je až od verze 0.9. Nedalo by se to (tučně, výrazně, červeně, pro blbce) uvést do Průvodce programátora (https://doc.nette.org/cs/mail) Kdž si jako nováček stáhnu doporučenou verzi (0.8) a vyzkouším si odeslání e-mailu, tak to nebude fungovat ;-)

ÚÚÚžasné ;-))

Nette\Mail\Mail.php, řádek 423: V reguláru asi chybí ungreedy modifikátor (bez něj je v $matches vše až po poslední uvozovku v <img />).
Jinak dobrá práce!

Hlásím „asi bug“:

Subject se nastavuje automaticky z <title>.
Pokud je však v title {$abc}, tak se asi nevyhodnotí, nebo se každopádně poruší hlavička mailu.

Jakub Šulák napsal(a):

Hlásím „asi bug“:

Subject se nastavuje automaticky z <title>.
Pokud je však v title {$abc}, tak se asi nevyhodnotí, nebo se každopádně poruší hlavička mailu.

Chtělo by to podrobnější report…

Jen bych rád připomenul pro ty, kteří dumají nad tím, proč se jim nevypisují obsahy proměnných do templatů při generování emailů, že je nutno registrovat patřičné filtr(y) [ne každý generuje templaty pro mail v presenteru];)

Malý příklad metody:

<?php
	public static function sendRegistrationMail($invoke, $email) {
		try {
			$mail = new NMail();

			//Nastavíme template
			$tpl = new NTemplate();

			// registrace filtru
			$tpl->registerFilter('Nette\Templates\NCurlyBracketsFilter::invoke');

			$tpl->setFile(APP_DIR."/templates/Mails/sendRegistrationMail.phtml");

			$mail->setFrom(MAIL_FROM); // od
			$mail->addTo($email); // komu

			$tpl->title = $invoke->texts['regMailTitle'];
			$tpl->contents = $invoke->texts['regMailContents'];

			$mail->setSubject($invoke->texts['regMailTitle']);

			$mail->setHtmlBody($tpl);

			$mail->send();
			return true;
		} catch(InvalidStateException $err) {
			return $err;
		}
	}
?>

xzajic napsal(a):

generuji templaty pro mail v presenteru a stejně musím registrovat filtry a helpery. Nevím, jestli je to chyba nebo vlastnost, ale bez toho to nejede.

Mužeš si ho vytvářet přes $presenter->createTemplate() a budeš tam mít stejné filtry jako v presenteru. (Tedy jestli si přidáváš filtry správně v templatePrepareFilters a né třeba v startupu). Ještě by si mohl i (clone) $this->template (budou tam i parametry které si do té doby přidal; musíš udělat před renderováním)

hezký návod, jen pár otázek:

1. proč setuješ flash message po redirectu? Tam by se kód po volání redirect neměl dostat.
2. na co je proměnná $req v sendMail metodě? Není nikde využita.

Editoval redhead (17. 9. 2009 22:34)

Dnes jsem to pustil na „ostrou“ e-mailovou adresu a zpráva prý přišla (do Outlook Express) v takovéto podobě:

=?UTF-8?Q?=20formul=C3=A1ra?=
MIME-Version: 1.0
X-Mailer: Nette Framework
Date: Fri, 18 Sep 2009 15:30:17 +0200
From: =?UTF-8?Q?Peter=20Sk=C3=BA=C5=A1ka?= <reguli.peter@gmail.com>
Message-ID: <207c2ed1a7ddcdb25d7fcb8c1639e658@www.intermont-reguli.sk>
Content-Type: multipart/alternative;
boundary="--------a0263df5185113d5ebaca871a3c34797"

----------a0263df5185113d5ebaca871a3c34797
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

NovĂĄ zprĂĄva z kontaktnĂho formulĂĄĹ�e!

Meno: Peter Skúťka
E-mail: reguli.peter@gmail.com
Text zprĂĄvy:

Chceli by sme vam napisat to a to.
----------a0263df5185113d5ebaca871a3c34797
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: 8bit

<h3>NovĂĄ zprĂĄva z kontaktnĂho formulĂĄĹ�e!</h3>

<ul>
<li><strong>Meno:</strong> Peter Skúťka</li>
<li><strong>E-mail:</strong> <a href="mailto:reguli.peter@gmail.com">reguli.peter@gmail.com</a></li>
</ul>

<h4>Text zprĂĄvy:</h4>


<p>Chceli by sme vam napisat to a to.</p>

----------a0263df5185113d5ebaca871a3c34797--

U mě to při testování bylo v pořádku, netuší někdo, v čem by mohl být problém? Revize je (před nočními updaty) nejnovější, musel jsem tam totiž dávat prefixed verzi.

Editoval LastHunter (18. 9. 2009 15:51)

Updatnul jsem revizi Nette, problém ale přetrvává :/ Zkoušel jsem pustit i test, na localhostu i na serveru PASS.

Přišel opět takový mail:

=?UTF-8?Q?=20formul=C3=A1ra?=
MIME-Version: 1.0
X-Mailer: Nette Framework
Date: Fri, 18 Sep 2009 16:22:29 +0200
From: =?UTF-8?Q?Ond=C5=99ej=20Mirtes?= <ondrej@mirtes.cz>
Message-ID: <9aaa55048b2cff711f92188a335da802@www.intermont-reguli.sk>
Content-Type: multipart/alternative;
boundary="--------9730d9c054228b968d22f609c564f5da"

----------9730d9c054228b968d22f609c564f5da
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

NovĂĄ zprĂĄva z kontaktnĂho formulĂĄĹ�e!

Meno: Ond�ej Mirtes
E-mail: ondrej@mirtes.cz
Text zprĂĄvy:

TestovacĂ zprĂĄva.

+Ä�ĹĄÄ�Ĺ�ŞýåĂĂŠ
----------9730d9c054228b968d22f609c564f5da
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: 8bit

<h3>NovĂĄ zprĂĄva z kontaktnĂho formulĂĄĹ�e!</h3>

<ul>
<li><strong>Meno:</strong> Ond�ej Mirtes</li>
<li><strong>E-mail:</strong> <a href="mailto:ondrej@mirtes.cz">ondrej@mirtes.cz</a></li>
</ul>

<h4>Text zprĂĄvy:</h4>


<p>TestovacĂ zprĂĄva.</p>

<p>+Ä�ĹĄÄ�Ĺ�ŞýåĂĂŠ</p>

----------9730d9c054228b968d22f609c564f5da--

Samotné vytváření e-mailu není nic zvláštního:

	protected function createComponentContactForm() {
		$form = new BaseForm;

		$form->addText('name', 'Vaše meno')
			->addRule(NForm::FILLED, 'Vyplňte vaše meno');

		$form->addText('email', 'Váš e-mail')
			->addRule(NForm::FILLED, 'Vyplňte váš e-mail')
			->addRule(NForm::EMAIL, 'E-mail má nesprávný tvar');

		$form->addTextarea('text', 'Správa')
			->addRule(NForm::FILLED, 'Vyplňte správu');

		$form->addSubmit('okSubmit', 'Odeslat');

		$form->onSubmit[] = array($this, 'contactFormSubmitted');

		return $form;
	}

	public function contactFormSubmitted(BaseForm $form) {
		try {
			$this->sendMail($form->getValues());
			$this->flashMessage('Správa úspěšně odoslána!');
			$this->redirect('this');
		} catch (IOException $e) {
			$form->addError($e->getMessage());
		}
	}

	private function sendMail($values) {
		$mail = new NMail;

		$settings = NEnvironment::getConfig('mail');

		$mail->setSubject('Nová správa z kontaktného formulára');
		$mail->setFrom($values['email'], $values['name']);
		$mail->addTo($settings->to, $settings->toName);

		$template = $this->createTemplate();
		$template->setFile(NEnvironment::getVariable('templatesDir') . '/Mail.phtml');

		$template->name = $values['name'];
		$template->email = $values['email'];
		$template->text = $values['text'];

		$mail->setHtmlBody($template);

		try {
			$mail->send();
		} catch (InvalidStateException $e) {
			throw new IOException('Nepodařilo se odeslat e-mail, zkuste to prosím za chvíli.');
		}
	}

A šablona:

<h3>Nová zpráva z kontaktního formuláře!</h3>

<ul>
	<li><strong>Meno:</strong> {$name}</li>
	<li><strong>E-mail:</strong> <a href="mailto:{$email}">{$email}</a></li>
</ul>

<h4>Text zprávy:</h4>

{!$text |texyPublic}

Editoval LastHunter (18. 9. 2009 16:32)

Honza M. napsal(a):

kravčo: Neměl jsem stejný bug jako ondrique. Nefungovalo mi to ani s nejnovější vývojovou verzí a ten test jsem omylem zkoušel na localhostu, kde jsem měl ještě starší nette, takže jsem ti pak poslal špatný výsledek.

Tak máš asi to samé co já. Vyřešils to nějak?

Tyhle chyby se poměrně těžko takhle nadálku řeší, doporučil bych tento postup:

1. vytvořte email v Nette a uložte do souboru
2. pokuste se tentýž email vytvořit v programu, kde to nefunguje a jeho zdrojový soubor uložte do souboru
3. oba soubory porovnejte (porovnávejte i whitespaces)

Do fóra nejlépe dávejte odkazy na stažení vygenerovaných emailů, důležitá je totiž jejich binární podoba.

ad bod 1) pro uložení lze použít tento kód

Mail::$defaultMailer = 'FileMailer';

class FileMailer implements IMailer
{
	function send(Mail $mail)
	{
		file_put_contents('email.dat', $mail->generateMessage());
	}
}

LastHunter napsal(a):

na websupport.sk běží rozšíření HTTP.

Off topic: keď požiadaš oni ťa prehodia na iný stroj kde nie je rozšírenie http a ani eAccelerator. Lenže potom namiesto verzie 5.2.9 bude 5.2.6.

možná to celé souvisí s tím že Nette nezalomí řádek s předmětem. A tak překročí u RFC 2047 max. délku řákdu 75znaků.Blbost Nette na to myslí!!!

Editoval vrtak-cz (18. 9. 2009 20:02)

Pri bugu v Nette\Mail fungovalo riešenie v jednom prípade (ondrique). Teraz sa tomu dosť divím, najmä po tom, čo som si prečítal na bugs.python.org: #1974 a #1645148 a na viacerích fórach súvisiacich s knižnicami na posielanie mailov.

Vraj má Thunderbird i Outlook problémy so správami, kde sa dlhé hlavičky zalamujú tabulátorom, pričom medzeru v pohode zvládnu. Hovorí sa síce len o ASCII hlavičkách, no problém s tabulátorom by mohol súvisieť aj s tými kódovanými. Aj preto je mi záhadou, ako to, že riešenie u ondriqua zabralo… možno tiež skrátil predmet…

Prosím vás teda (Honza M. i LastHunter), skúste či tieto problémy spôsobuje i foldovanie medzerou – v súbore Nette/Mail/MailMimePart.php nahraďte všetky (štyri) výskyty "\t → `" `.

diff --git a/Nette/Mail/MailMimePart.php b/Nette/Mail/MailMimePart.php
index d677e74..0f94006 100644
--- a/Nette/Mail/MailMimePart.php
+++ b/Nette/Mail/MailMimePart.php
@@ -151,7 +151,7 @@ class MailMimePart extends /*Nette\*/Object
 					$email = " <$email>";
 				}
 				if ($len + strlen($email) + 1 > self::LINE_LENGTH) {
-					$s .= self::EOL . "\t";
+					$s .= self::EOL . " ";
 					$len = 1;
 				}
 				$s .= "$email,";
@@ -267,7 +267,7 @@ class MailMimePart extends /*Nette\*/Object
 		foreach ($this->headers as $name => $value) {
 			$output .= $name . ': ' . $this->getEncodedHeader($name);
 			if ($this->parts && $name === 'Content-Type') {
-				$output .= ';' . self::EOL . "\tboundary=\"$boundary\"";
+				$output .= ';' . self::EOL . " boundary=\"$boundary\"";
 			}
 			$output .= self::EOL;
 		}
@@ -340,7 +340,7 @@ class MailMimePart extends /*Nette\*/Object
 			if ($l = strspn($s, $range, $pos)) {
 				while ($len + $l > self::LINE_LENGTH - 2) { // 2 = length of suffix ?=
 					$lx = self::LINE_LENGTH - $len - 2;
-					$o .= substr($s, $pos, $lx) . '?=' . self::EOL . "\t" . $prefix;
+					$o .= substr($s, $pos, $lx) . '?=' . self::EOL . " " . $prefix;
 					$pos += $lx;
 					$l -= $lx;
 					$len = strlen($prefix) + 1;
@@ -353,7 +353,7 @@ class MailMimePart extends /*Nette\*/Object
 				$len += 3;
 				// \xC0 tests UTF-8 character boudnary; 9 is reserved space for 4bytes UTF-8 character
 				if (($s[$pos] & "\xC0") !== "\x80" && $len > self::LINE_LENGTH - 2 - 9) {
-					$o .= '?=' . self::EOL . "\t" . $prefix;
+					$o .= '?=' . self::EOL . " " . $prefix;
 					$len = strlen($prefix) + 1 + 3;
 				}
 				$o .= '=' . strtoupper(bin2hex($s[$pos]));

Udělej si vlastní SendmailMailer který to bude ukládat právě do logu… A v config.ini si ho zapni pro development…

Zaražte mě pokud se mýlím, ale neumí náhodou Nette\Mail nette šablony již v základu? ;-)

To je pravda Mail Template umí, ale pokud vím, tak musíte vždy ručně nastavit cestu k template (viz). Tahle class si soubory automaticky najde, podobně jako Presenter si hledá Template k jednotlivým View.

V podstatě máte tři možnosti, class poslat přímo instanci Template, nebo ji zadat celou cestu k template a nebo stačí prostě poslat název souboru bez phtml a třída si ji najde v adresáři např.

$mail = new MailWithTamplate('mujmail');

class pak hledá tyhle soubory

• {$appdir}/Module<name>/templates/Mail/<PresenterName>/mujmail.phtml
• {$appdir}/templates/Mail/<PresenterName>.mujmail.phtml
• {$appdir}/templates/Mail/<PresenterName>/mujmail.phtml

Pokud to nějaká nová verze umí podobně, tak si ji prostě budu muset stáhnout :)

Editoval Roman Ožana (15. 1. 2010 23:09)