/**
* Respond to a request based on the parameters passed
* @author salvipascual
* */
private function renderResponse($email, $subject, $sender = "", $body = "", $attachments = array(), $format = "html")
{
// get the name of the service based on the subject line
$subjectPieces = explode(" ", $subject);
$serviceName = strtolower($subjectPieces[0]);
unset($subjectPieces[0]);
// get path to the service
$utils = new Utils();
$servicePath = $utils->getPathToService($serviceName);
// check the service requested exists in the services folder
if (!$servicePath) {
return "<p>No service \"{$serviceName}\" was found</p>";
}
// include the service code
include_once "{$servicePath}/service.php";
// check if a subservice is been invoked
$subServiceName = "";
if (isset($subjectPieces[1])) {
$serviceClassMethods = get_class_methods($serviceName);
if (@preg_grep("/^_{$subjectPieces[1]}\$/i", $serviceClassMethods)) {
$subServiceName = strtolower($subjectPieces[1]);
unset($subjectPieces[1]);
}
}
// get the service query
$query = implode(" ", $subjectPieces);
// create a new Request object
$request = new Request();
$request->email = $email;
$request->name = $sender;
$request->subject = $subject;
$request->body = $body;
$request->attachments = $attachments;
$request->service = $serviceName;
$request->subservice = trim($subServiceName);
$request->query = trim($query);
// get details of the service from the XML file
$xml = simplexml_load_file("{$servicePath}/config.xml");
$serviceCreatorEmail = trim((string) $xml->creatorEmail);
$serviceDescription = trim((string) $xml->serviceDescription);
$serviceCategory = trim((string) $xml->serviceCategory);
$serviceUsageText = trim((string) $xml->serviceUsage);
$serviceInsertionDate = date("Y/m/d H:m:s");
// check if the email is valid
if (!filter_var($serviceCreatorEmail, FILTER_VALIDATE_EMAIL)) {
die("Invalid email {$serviceCreatorEmail}");
}
// check if the category is valid
$categories = array('negocios', 'ocio', 'academico', 'social', 'comunicaciones', 'informativo', 'adulto', 'otros');
if (!in_array($serviceCategory, $categories)) {
die("Invalid category {$serviceCategory}");
}
// create a new service Object of the user type
$userService = new $serviceName();
$userService->serviceName = $serviceName;
$userService->serviceDescription = $serviceDescription;
$userService->creatorEmail = $serviceCreatorEmail;
$userService->serviceCategory = $serviceCategory;
$userService->serviceUsage = $serviceUsageText;
$userService->insertionDate = $serviceInsertionDate;
$userService->pathToService = $servicePath;
$userService->utils = $utils;
// run the service and get a response
if (empty($subServiceName)) {
$response = $userService->_main($request);
} else {
$subserviceFunction = "_{$subServiceName}";
$response = $userService->{$subserviceFunction}($request);
}
// a service can return an array of Response or only one.
// we always treat the response as an array
$responses = is_array($response) ? $response : array($response);
// clean the empty fields in the response
foreach ($responses as $rs) {
$rs->email = empty($rs->email) ? $email : $rs->email;
$rs->subject = empty($rs->subject) ? "Respuesta del servicio {$serviceName}" : $rs->subject;
}
// create a new render
$render = new Render();
// render the template and echo on the screen
if ($format == "html") {
$html = "";
for ($i = 0; $i < count($responses); $i++) {
$html .= "<br/><center><small><b>Subject:</b> " . $responses[$i]->subject . "</small></center><br/>";
$html .= $render->renderHTML($userService, $responses[$i]);
if ($i < count($responses) - 1) {
$html .= "<br/><hr/><br/>";
}
}
$usage = nl2br(str_replace('{APRETASTE_EMAIL}', $utils->getValidEmailAddress(), $serviceUsageText));
$html .= "<br/><hr><center><p><b>XML DEBUG</b></p><small>";
$html .= "<p><b>Owner: </b>{$serviceCreatorEmail}</p>";
$html .= "<p><b>Category: </b>{$serviceCategory}</p>";
$html .= "<p><b>Description: </b>{$serviceDescription}</p>";
$html .= "<p><b>Usage: </b><br/>{$usage}</p></small></center>";
return $html;
}
// echo the json on the screen
if ($format == "json") {
return $render->renderJSON($response);
}
// false if no action could be taken
return false;
}
/**
* Respond to a request based on the parameters passed
*
* @author salvipascual
* @param String, email
* @param String
* @param String, email
* @param String
* @param Array of Objects {type,content,path}
* @param Enum: html,json,email
* @param String, email
* @param String $messageID
* */
private function renderResponse($email, $fromEmail, $subject, $sender = "", $body = "", $attachments = array(), $format = "html", $messageID = NULL)
{
// get the time when the service started executing
$execStartTime = date("Y-m-d H:i:s");
// remove double spaces and apostrophes from the subject
// sorry apostrophes break the SQL code :-(
$subject = trim(preg_replace('/\\s{2,}/', " ", preg_replace('/\'|`/', "", $subject)));
// get the name of the service based on the subject line
$subjectPieces = explode(" ", $subject);
$serviceName = strtolower($subjectPieces[0]);
unset($subjectPieces[0]);
// check the service requested actually exists
$utils = new Utils();
$connection = new Connection();
// select the default service if service does not exist
$alias = $serviceName;
if (!$utils->serviceExist($serviceName)) {
$serviceName = $utils->getDefaultService($fromEmail);
} else {
if ($serviceName !== $alias) {
// increase the counter for alias
$connection->deepQuery("UPDATE service_alias SET used = used + 1 WHERE alias = '{$alias}';");
}
}
// update topics if you are contacting via the secure API
if ($serviceName == "secured") {
// disregard any footer message and decript new subject
$message = trim(explode("--", $body)[0]);
$subject = $utils->decript($email, $message);
// get the name of the service based on the subject line
$subjectPieces = explode(" ", $subject);
$serviceName = strtolower($subjectPieces[0]);
unset($subjectPieces[0]);
// if the service don't exist, throw an error and exit
if (!$utils->serviceExist($serviceName)) {
error_log("Service {$serviceName} do not exist");
exit;
}
}
// include the service code
$wwwroot = $this->di->get('path')['root'];
include "{$wwwroot}/services/{$serviceName}/service.php";
// check if a subservice is been invoked
$subServiceName = "";
if (isset($subjectPieces[1]) && !preg_match('/\\?|\\(|\\)|\\\\|\\/|\\.|\\$|\\^|\\{|\\}|\\||\\!/', $subjectPieces[1])) {
$serviceClassMethods = get_class_methods($serviceName);
if (preg_grep("/^_{$subjectPieces[1]}\$/i", $serviceClassMethods)) {
$subServiceName = strtolower($subjectPieces[1]);
unset($subjectPieces[1]);
}
}
// get the service query
$query = implode(" ", $subjectPieces);
// create a new Request object
$request = new Request();
$request->email = $email;
$request->name = $sender;
$request->subject = $subject;
$request->body = $body;
$request->attachments = $attachments;
$request->service = $serviceName;
$request->subservice = trim($subServiceName);
$request->query = trim($query);
// get the path to the service
$servicePath = $utils->getPathToService($serviceName);
// get details of the service
if ($this->di->get('environment') == "sandbox") {
// get details of the service from the XML file
$xml = simplexml_load_file("{$servicePath}/config.xml");
$serviceCreatorEmail = trim((string) $xml->creatorEmail);
$serviceDescription = trim((string) $xml->serviceDescription);
$serviceCategory = trim((string) $xml->serviceCategory);
$serviceUsageText = trim((string) $xml->serviceUsage);
$showAds = isset($xml->showAds) && $xml->showAds == 0 ? 0 : 1;
$serviceInsertionDate = date("Y/m/d H:m:s");
} else {
// get details of the service from the database
$sql = "SELECT * FROM service WHERE name = '{$serviceName}'";
$result = $connection->deepQuery($sql);
$serviceCreatorEmail = $result[0]->creator_email;
$serviceDescription = $result[0]->description;
$serviceCategory = $result[0]->category;
$serviceUsageText = $result[0]->usage_text;
$serviceInsertionDate = $result[0]->insertion_date;
$showAds = $result[0]->ads == 1;
}
// create a new service Object of the user type
$userService = new $serviceName();
$userService->serviceName = $serviceName;
$userService->serviceDescription = $serviceDescription;
$userService->creatorEmail = $serviceCreatorEmail;
$userService->serviceCategory = $serviceCategory;
$userService->serviceUsage = $serviceUsageText;
$userService->insertionDate = $serviceInsertionDate;
$userService->pathToService = $servicePath;
$userService->showAds = $showAds;
$userService->utils = $utils;
// run the service and get a response
if (empty($subServiceName)) {
$response = $userService->_main($request);
} else {
$subserviceFunction = "_{$subServiceName}";
$response = $userService->{$subserviceFunction}($request);
}
// a service can return an array of Response or only one.
// we always treat the response as an array
$responses = is_array($response) ? $response : array($response);
// adding extra responses from Utils
$extraResponses = Utils::getExtraResponses();
$responses = array_merge($responses, $extraResponses);
Utils::clearExtraResponses();
// clean the empty fields in the response
foreach ($responses as $rs) {
$rs->email = empty($rs->email) ? $email : $rs->email;
// check if is first request of the day
$requestsToday = $utils->getTotalRequestsTodayOf($rs->email);
$stars = 0;
if ($requestsToday == 0) {
// run the tickets's game
// @note: este chequeo se hace despues de verificar si es el primer
// correo del dia, para no preguntar chequear mas veces
// innecesariamente en el resto del dia
$stars = $utils->getRaffleStarsOf($rs->email, false);
if ($stars === 4) {
// insert 10 tickets for user
$sqlValues = "('{$email}', 'GAME')";
$sql = "INSERT INTO ticket(email, origin) VALUES " . str_repeat($sqlValues . ",", 9) . "{$sqlValues};";
$connection->deepQuery($sql);
// add notification to user
$utils->addNotification($rs->email, "GAME", "Haz ganado 10 tickets para Rifa por utilizar Apretaste durante 5 días seguidos", "RIFA", "IMPORTANT");
}
$stars++;
}
$rs->subject = empty($rs->subject) ? "Respuesta del servicio {$serviceName}" : $rs->subject;
$rs->content['num_notifications'] = $utils->getNumberOfNotifications($rs->email);
$rs->content['raffle_stars'] = $stars;
$rs->content['requests_today'] = $requestsToday;
}
// create a new render
$render = new Render();
// render the template and echo on the screen
if ($format == "html") {
$html = "";
for ($i = 0; $i < count($responses); $i++) {
$html .= "<br/><center><small><b>To:</b> " . $responses[$i]->email . ". <b>Subject:</b> " . $responses[$i]->subject . "</small></center><br/>";
$html .= $render->renderHTML($userService, $responses[$i]);
if ($i < count($responses) - 1) {
$html .= "<br/><hr/><br/>";
}
}
$usage = nl2br(str_replace('{APRETASTE_EMAIL}', $utils->getValidEmailAddress(), $serviceUsageText));
$html .= "<br/><hr><center><p><b>XML DEBUG</b></p><small>";
$html .= "<p><b>Owner: </b>{$serviceCreatorEmail}</p>";
$html .= "<p><b>Category: </b>{$serviceCategory}</p>";
$html .= "<p><b>Description: </b>{$serviceDescription}</p>";
$html .= "<p><b>Usage: </b><br/>{$usage}</p></small></center>";
return $html;
}
// echo the json on the screen
if ($format == "json") {
return $render->renderJSON($response);
}
// render the template email it to the user
// only save stadistics for email requests
if ($format == "email") {
// get the person, false if the person does not exist
$person = $utils->getPerson($email);
// if the person exist in Apretaste
if ($person !== false) {
// update last access time to current and make person active
$connection->deepQuery("UPDATE person SET active=1, last_access=CURRENT_TIMESTAMP WHERE email='{$email}'");
} else {
$inviteSource = 'alone';
// alone if the user came by himself, no invitation
$sql = "START TRANSACTION;";
// start the long query
// check if the person was invited to Apretaste
$invites = $connection->deepQuery("SELECT * FROM invitations WHERE email_invited='{$email}' AND used=0 ORDER BY invitation_time DESC");
if (count($invites) > 0) {
// check how this user came to know Apretaste, for stadistics
$inviteSource = $invites[0]->source;
// give prizes to the invitations via service invitar
// if more than one person invites X, they all get prizes
foreach ($invites as $invite) {
switch ($invite->source) {
case "internal":
// assign tickets and credits
$sql .= "INSERT INTO ticket (email, origin) VALUES ('{$invite->email_inviter}', 'RAFFLE');";
$sql .= "UPDATE person SET credit=credit+0.25 WHERE email='{$invite->email_inviter}';";
// email the invitor
$newTicket = new Response();
$newTicket->setResponseEmail($invite->email_inviter);
$newTicket->setEmailLayout("email_simple.tpl");
$newTicket->setResponseSubject("Ha ganado un ticket para nuestra Rifa");
$newTicket->createFromTemplate("invitationWonTicket.tpl", array("guest" => $email));
$newTicket->internal = true;
$responses[] = $newTicket;
break;
case "abroad":
$newGuest = new Response();
$newGuest->setResponseEmail($invite->email_inviter);
$newGuest->setResponseSubject("Tu amigo ha atendido tu invitacion");
$inviter = $utils->usernameFromEmail($invite->email_inviter);
$pInviter = $utils->getPerson($invite->email_inviter);
if (!isset($pInviter->name)) {
$pInviter->name = '';
}
if ($pInviter !== false) {
if (trim($pInviter->name) !== '') {
$inviter = $pInviter->name;
}
}
$pGuest = $utils->getPerson($email);
$guest = $email;
if ($pGuest !== false) {
$guest = $pGuest->username;
}
$newGuest->createFromTemplate("invitationNewGuest.tpl", array("inviter" => $inviter, "guest" => $guest, "guest_email" => $email));
$newGuest->internal = true;
$responses[] = $newGuest;
break;
}
}
// mark all opened invitations to that email as used
$sql .= "UPDATE invitations SET used=1, used_time=CURRENT_TIMESTAMP WHERE email_invited='{$email}' AND used=0;";
}
// create a unique username and save the new person
$username = $utils->usernameFromEmail($email);
$sql .= "INSERT INTO person (email, username, last_access, source) VALUES ('{$email}', '{$username}', CURRENT_TIMESTAMP, '{$inviteSource}');";
// save details of first visit
$sql .= "INSERT INTO first_timers (email, source) VALUES ('{$email}', '{$fromEmail}');";
// check list of promotor's emails
$promoters = $connection->deepQuery("SELECT email FROM promoters WHERE email='{$fromEmail}' AND active=1;");
$prize = count($promoters) > 0;
if ($prize) {
// update the promotor
$sql .= "UPDATE promoters SET `usage`=`usage`+1, last_usage=CURRENT_TIMESTAMP WHERE email='{$fromEmail}';";
// add credit and tickets
$sql .= "UPDATE person SET credit=credit+5, source='promoter' WHERE email='{$email}';";
$sqlValues = "('{$email}', 'PROMOTER')";
$sql .= "INSERT INTO ticket(email, origin) VALUES " . str_repeat($sqlValues . ",", 9) . "{$sqlValues};";
}
// run the long query all at the same time
$connection->deepQuery($sql . "COMMIT;");
// send the welcome email
$welcome = new Response();
$welcome->setResponseEmail($email);
$welcome->setEmailLayout("email_simple.tpl");
$welcome->setResponseSubject("Bienvenido a Apretaste!");
$welcome->createFromTemplate("welcome.tpl", array("email" => $email, "prize" => $prize, "source" => $fromEmail));
$welcome->internal = true;
$responses[] = $welcome;
}
// create and configure to send email
$emailSender = new Email();
$emailSender->setRespondEmailID($messageID);
$emailSender->setEmailGroup($fromEmail);
// get params for the email and send the response emails
foreach ($responses as $rs) {
if ($rs->render) {
// save impressions in the database
$ads = $rs->getAds();
if ($userService->showAds && !empty($ads)) {
$sql = "";
if (!empty($ads[0])) {
$sql .= "UPDATE ads SET impresions=impresions+1 WHERE id='{$ads[0]->id}';";
}
if (!empty($ads[1])) {
$sql .= "UPDATE ads SET impresions=impresions+1 WHERE id='{$ads[1]->id}';";
}
$connection->deepQuery($sql);
}
// prepare the email variable
$emailTo = $rs->email;
$subject = $rs->subject;
$images = $rs->images;
$attachments = $rs->attachments;
$body = $render->renderHTML($userService, $rs);
// remove dangerous characters that may break the SQL code
$subject = trim(preg_replace('/\'|`/', "", $subject));
// send the response email
$emailSender->sendEmail($emailTo, $subject, $body, $images, $attachments);
}
}
// saves the openning date if the person comes from remarketing
$connection->deepQuery("UPDATE remarketing SET opened=CURRENT_TIMESTAMP WHERE opened IS NULL AND email='{$email}'");
// calculate execution time when the service stopped executing
$currentTime = new DateTime();
$startedTime = new DateTime($execStartTime);
$executionTime = $currentTime->diff($startedTime)->format('%H:%I:%S');
// get the user email domainEmail
$emailPieces = explode("@", $email);
$domain = $emailPieces[1];
// get the top and bottom Ads
$ads = isset($responses[0]->ads) ? $responses[0]->ads : array();
$adTop = isset($ads[0]) ? $ads[0]->id : "NULL";
$adBottom = isset($ads[1]) ? $ads[1]->id : "NULL";
// save the logs on the utilization table
$safeQuery = $connection->escape($query);
$sql = "INSERT INTO utilization\t(service, subservice, query, requestor, request_time, response_time, domain, ad_top, ad_bottom) VALUES ('{$serviceName}','{$subServiceName}','{$safeQuery}','{$email}','{$execStartTime}','{$executionTime}','{$domain}',{$adTop},{$adBottom})";
$connection->deepQuery($sql);
// return positive answer to prove the email was quequed
return true;
}
// false if no action could be taken
return false;
}
/**
* Respond to a request based on the parameters passed
* @author salvipascual
* */
private function renderResponse($email, $subject, $sender = "", $body = "", $attachments = array(), $format = "html")
{
// get the time when the service started executing
$execStartTime = date("Y-m-d H:i:s");
// get the name of the service based on the subject line
$subjectPieces = explode(" ", $subject);
$serviceName = strtolower($subjectPieces[0]);
unset($subjectPieces[0]);
// check the service requested actually exists
$utils = new Utils();
if (!$utils->serviceExist($serviceName)) {
$serviceName = "ayuda";
}
// include the service code
$wwwroot = $this->di->get('path')['root'];
include "{$wwwroot}/services/{$serviceName}/service.php";
// check if a subservice is been invoked
$subServiceName = "";
if (isset($subjectPieces[1])) {
$serviceClassMethods = get_class_methods($serviceName);
if (preg_grep("/^_{$subjectPieces[1]}\$/i", $serviceClassMethods)) {
$subServiceName = strtolower($subjectPieces[1]);
unset($subjectPieces[1]);
}
}
// get the service query
$query = implode(" ", $subjectPieces);
// create a new Request object
$request = new Request();
$request->email = $email;
$request->name = $sender;
$request->subject = $subject;
$request->body = $body;
$request->attachments = $attachments;
$request->service = $serviceName;
$request->subservice = trim($subServiceName);
$request->query = trim($query);
// get details of the service from the database
$connection = new Connection();
$sql = "SELECT * FROM service WHERE name = '{$serviceName}'";
$result = $connection->deepQuery($sql);
// create a new service Object of the user type
$userService = new $serviceName();
$userService->serviceName = $serviceName;
$userService->serviceDescription = $result[0]->description;
$userService->creatorEmail = $result[0]->creator_email;
$userService->serviceCategory = $result[0]->category;
$userService->serviceUsage = $result[0]->usage_text;
$userService->insertionDate = $result[0]->insertion_date;
$userService->pathToService = $utils->getPathToService($serviceName);
$userService->utils = $utils;
// run the service and get a response
if (empty($subServiceName)) {
$response = $userService->_main($request);
} else {
$subserviceFunction = "_{$subServiceName}";
$response = $userService->{$subserviceFunction}($request);
}
// a service can return an array of Response or only one.
// we always treat the response as an array
$responses = is_array($response) ? $response : array($response);
// clean the empty fields in the response
foreach ($responses as $rs) {
$rs->email = empty($rs->email) ? $email : $rs->email;
$rs->subject = empty($rs->subject) ? "Respuesta del servicio {$serviceName}" : $rs->subject;
}
// create a new render
$render = new Render();
// render the template and echo on the screen
if ($format == "html") {
$html = "";
for ($i = 0; $i < count($responses); $i++) {
$html .= "<br/><center><small><b>To:</b> " . $responses[$i]->email . ". <b>Subject:</b> " . $responses[$i]->subject . "</small></center><br/>";
$html .= $render->renderHTML($userService, $responses[$i]);
if ($i < count($responses) - 1) {
$html .= "<br/><hr/><br/>";
}
}
return $html;
}
// echo the json on the screen
if ($format == "json") {
return $render->renderJSON($response);
}
// render the template email it to the user
// only save stadistics for email requests
if ($format == "email") {
$emailSender = new Email();
// get params for the email and send the response emails
foreach ($responses as $rs) {
if ($rs->render) {
$emailTo = $rs->email;
$subject = $rs->subject;
$images = array_merge($rs->images, $rs->getAds());
$attachments = $rs->attachments;
$body = $render->renderHTML($userService, $rs);
$emailSender->sendEmail($emailTo, $subject, $body, $images, $attachments);
}
}
// get the person, false if the person does not exist
$person = $utils->getPerson($email);
// if the person exist in Apretate
if ($person) {
// if the person is inactive and he/she is not trying to opt-out
if (!$person->active && $serviceName != "excluyeme") {
// make the person active again
$sql = "UPDATE person SET active=1 WHERE email='{$email}'";
$connection->deepQuery($sql);
// add to the email list in Mail Lite
$utils->subscribeToEmailList($email);
}
} else {
// save the new Person
$sql = "INSERT INTO person (email) VALUES ('{$email}')";
$connection->deepQuery($sql);
// check if the person was invited to use Apretaste
$sql = "SELECT * FROM invitations WHERE email_invited = '{$email}' AND used='0'";
$invitations = $connection->deepQuery($sql);
if (count($invitations) > 0) {
// create tickets for all the invitors. When a person
// is invited by more than one person, they all get tickets
$sql = "START TRANSACTION;";
foreach ($invitations as $invite) {
// create the query
$sql .= "INSERT INTO ticket (email, paid) VALUES ('{$invite->email_inviter}', 0);";
$sql .= "UPDATE person SET credit=credit+0.25 WHERE email='{$invite->email_inviter}';";
$sql .= "UPDATE invitations SET used='1' WHERE invitation_id = '{$invite->invitation_id}';";
// email the invitor
$body = "<h1>Nuevo ticket para nuestra Rifa</h1><p>Su contacto {$invite->email_invited} ha usado Apretaste por primera vez gracias a su invitación, por lo cual hemos agregado a su perfil un ticket para nuestra rifa y 25¢ en crédito de Apretaste.</p><p>Muchas gracias por invitar a sus amigos, y gracias por usar Apretaste</p>";
$emailSender->sendEmail($invite->email_inviter, "Ha ganado un ticket para nuestra Rifa", $body);
}
$sql .= "COMMIT;";
$connection->deepQuery($sql);
}
// add to the email list in Mail Lite
$utils->subscribeToEmailList($email);
}
// calculate execution time when the service stopped executing
$currentTime = new DateTime();
$startedTime = new DateTime($execStartTime);
$executionTime = $currentTime->diff($startedTime)->format('%H:%I:%S');
// get the user email domainEmail
$emailPieces = explode("@", $email);
$domain = $emailPieces[1];
// save the logs on the utilization table
$sql = "INSERT INTO utilization\t(service, subservice, query, requestor, request_time, response_time, domain, ad_top, ad_botton) VALUES ('{$serviceName}','{$subServiceName}','{$query}','{$email}','{$execStartTime}','{$executionTime}','{$domain}','','')";
$connection->deepQuery($sql);
// return positive answer to prove the email was quequed
return true;
}
// false if no action could be taken
return false;
}
