AdminRegisterComposer.java

Go to the documentation of this file.

/*
 * Turró i Cutiller Foundation. License notice.
 * Copyright (C) 2015 Lluis Turró Cutiller <http://www.turro.org/>
 *
 * 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/>.
 */
 
package org.turro.contacts.zul.register;
 
import java.io.UnsupportedEncodingException;
import java.util.List;
import java.util.Set;
import java.util.logging.Level;
import java.util.logging.Logger;
import org.amic.util.string.Strings;
import org.turro.action.Actions;
import org.turro.action.MailSenders;
import org.turro.action.PushSenders;
import org.turro.command.Command;
import org.turro.command.Context;
import org.turro.contacts.Connector;
import org.turro.contacts.Contact;
import org.turro.contacts.SignUp;
import org.turro.contacts.db.ContactsPU;
import org.turro.contacts.form.ContactWrapper;
import org.turro.elephant.context.Application;
import org.turro.elephant.context.ElephantContext;
import org.turro.elephant.context.HeadlessApplication;
import org.turro.elephant.context.IConstructor;
import org.turro.elephant.impl.context.ContextFactory;
import org.turro.elephant.security.IUser;
import org.turro.elephant.util.ZkossUtils;
import org.turro.i18n.I_;
import org.turro.jpa.Dao;
import org.turro.mail.impl.MailPool;
import org.turro.mail.queue.QueueManager;
import org.turro.marker.ElephantMarker;
import org.turro.security.SocialGroups;
import org.zkoss.zk.ui.Component;
import org.zkoss.zk.ui.event.Event;
import org.zkoss.zk.ui.select.SelectorComposer;
import org.zkoss.zk.ui.select.annotation.Listen;
import org.zkoss.zk.ui.select.annotation.Wire;
import org.zkoss.zk.ui.util.Clients;
import org.zkoss.zul.Textbox;
 
@Deprecated
public class AdminRegisterComposer extends SelectorComposer<Component> {
 
  @Wire("#name")
  private Textbox name;
 
  @Wire("#email")
  private Textbox email;
 
  private SignUp sue;
  
  @Listen("onClick = #register")
  public void onRegister(Event event) {
    SignUp su = new SignUp();
    su.setName(name.getValue());
    su.setEmail(email.getValue());
    su.setComment("");
    if(su.isValid()) {
      if(existPending(su.getEmail())) {
        ZkossUtils.confirmProcess(I_.get("Email pending to confirm") +
                "\n\n" +
                I_.get("Resend confirmation e-mail"), new Command() {
          @Override
          public Object execute(Context context) {
            sendEmail(sue);
            Clients.showNotification(I_.format("Confirmation e-mail has been sent to %s", sue.getEmail()));
            return true;
          }
        });
      } else if(existEmail(su.getEmail())) {
        Clients.showNotification(I_.format("%s already exists", su.getEmail()));
      } else {
        try {
          if(createContact(su)) {
            su.setConfirmed(true);
            su = new ContactsPU().saveObject(su);
            sendMailToAdmin(su);
            sendWelcomeMailToUser(su);
            Clients.showNotification(I_.get("Created"));
          }          
        } catch (Exception ex) {
          Logger.getLogger(AdminRegisterComposer.class.getName()).log(Level.SEVERE, ElephantContext.logMsg(null), ex);
        }
      }
    } else {
      Clients.showNotification("No valid values");
    }
  }
 
  private static boolean existEmail(String email) {
    Dao dao = new ContactsPU();
    List l = dao.getResultList(
            "select c from Connector c where c.value = ?",
            new Object[] { email }
    );
    if(l.isEmpty()) {
      l = dao.getResultList(
              "select c from SignUp c where c.email = ? and confirmed = TRUE",
              new Object[] { email }
      );
    }
    return !l.isEmpty();
  }
 
  private boolean existPending(String email) {
    Dao dao = new ContactsPU();
    List l = dao.getResultList(
            "select c from SignUp c where c.email = ? and confirmed = FALSE",
            new Object[] { email }
    );
    if(!l.isEmpty()) {
      sue = (SignUp) l.iterator().next();
    }
    return !l.isEmpty();
  }
 
  private boolean sendEmail(SignUp signUp) {
    IConstructor constructor = HeadlessApplication.getInstance().getConstructor();
    MailPool mp = (MailPool) ContextFactory.getImplementation(constructor, "IMailPool");
    mp.setEncoding(ElephantContext.getEncoding());
    mp.addCssFile(ElephantContext.getRealPath("/_internal/css/mail.css"));
    mp.addToPool(null, signUp.getEmail(), null, 
            I_.get("Email pending to confirm") + " : " + ElephantContext.getSiteName(),
            getMessage(signUp, constructor), "text/html");
    mp.sendPool();
    return true;
  }
 
  private String getMessage(SignUp signUp, IConstructor constructor) {
    ElephantMarker em = new ElephantMarker(constructor);
    em.put("signUp", signUp);
    return em.parse("signup", "pending");
  }
  
  public static boolean createContact(SignUp signUp) throws Exception {
    if(Application.getApplication().isInRole("contact:new") && !existEmail(signUp.getEmail())) {
      Contact contact = new Contact();
      contact.setName(signUp.getName());
      Connector email = new Connector();
      email.setContact(contact);
      email.setDescription(IUser.CONNECTOR_EMAIL);
      email.setValue(signUp.getEmail());
      contact.getConnectors().add(email);
      if(!Strings.isBlank(ElephantContext.getSiteSyndicate())) {
        String groups[] = ElephantContext.getSiteSyndicate().split(",");
        SocialGroups.syndicate(List.of(contact), Set.of(groups), null);
        contact = new ContactWrapper(contact).save();
      }
      new QueueManager().subscribeDefaults(contact.getIContact());
      return true;
    }
    return false;
  }
  
  private static void sendMailToAdmin(SignUp signUp) {
    String message = signUp.getName() + ": " + signUp.getEmail();
    if(!Strings.isBlank(signUp.getComment())) message += "\n" + signUp.getComment();
    if(!Strings.isBlank(signUp.getValueMap())) message += "\n" + signUp.getValueMap();
    MailSenders.getPool().addAdministrators().send("New user", message);
    PushSenders.getPool().addAdministrators().send("New user", message);
  }
 
  private static void sendWelcomeMailToUser(SignUp signUp) throws UnsupportedEncodingException {
    IConstructor constructor = HeadlessApplication.getInstance().getConstructor();
 
    ElephantMarker em = new ElephantMarker(constructor);
    em.put("signUp", signUp);
    try {
      em.put("link", ElephantContext.getServerUrl("http") + "?" + Actions.createAction(signUp.getEmail(), "/user/"));
    } catch (Exception ex) {
      Logger.getLogger(AdminRegisterComposer.class.getName()).log(Level.SEVERE, ElephantContext.logMsg(null), ex);
    }
 
    MailPool mp = (MailPool) ContextFactory.getImplementation(constructor, "IMailPool");
    mp.setEncoding(ElephantContext.getEncoding());
    mp.addCssFile(ElephantContext.getRealPath("/_internal/css/mail.css"));
    mp.addToPool(null, signUp.getEmail(), null, 
            I_.get("Welcome") + " : " + ElephantContext.getSiteName(),
            em.parse("signup", "welcome"), "text/html");
    mp.sendPool();
  }
 
}