/*
 * Copyright (C) 2007-2012 Argeo GmbH
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *         http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
package org.argeo.cms.auth;

import java.security.AccessController;
import java.security.Principal;
import java.security.PrivilegedAction;
import java.security.PrivilegedActionException;
import java.security.PrivilegedExceptionAction;
import java.util.HashSet;
import java.util.Locale;
import java.util.Set;
import java.util.UUID;

import javax.security.auth.Subject;
import javax.security.auth.x500.X500Principal;

import org.argeo.api.NodeConstants;
import org.argeo.cms.CmsException;
import org.argeo.cms.internal.auth.CmsSessionImpl;
import org.argeo.cms.internal.auth.ImpliedByPrincipal;
import org.argeo.cms.internal.kernel.Activator;
import org.osgi.service.useradmin.Authorization;

/**
 * Programmatic access to the currently authenticated user, within a CMS
 * context.
 */
public final class CurrentUser {
	// private final static Log log = LogFactory.getLog(CurrentUser.class);
	// private final static BundleContext bc =
	// FrameworkUtil.getBundle(CurrentUser.class).getBundleContext();
	/*
	 * CURRENT USER API
	 */

	/**
	 * Technical username of the currently authenticated user.
	 * 
	 * @return the authenticated username or null if not authenticated / anonymous
	 */
	public static String getUsername() {
		return getUsername(currentSubject());
	}

	/**
	 * Human readable name of the currently authenticated user (typically first name
	 * and last name).
	 */
	public static String getDisplayName() {
		return getDisplayName(currentSubject());
	}

	/** Whether a user is currently authenticated. */
	public static boolean isAnonymous() {
		return isAnonymous(currentSubject());
	}

	/** Locale of the current user */
	public final static Locale locale() {
		return locale(currentSubject());
	}

	/** Roles of the currently logged-in user */
	public final static Set<String> roles() {
		return roles(currentSubject());
	}

	/** Returns true if the current user is in the specified role */
	public static boolean isInRole(String role) {
		Set<String> roles = roles();
		return roles.contains(role);
	}

	/** Executes as the current user */
	public final static <T> T doAs(PrivilegedAction<T> action) {
		return Subject.doAs(currentSubject(), action);
	}

	/** Executes as the current user */
	public final static <T> T tryAs(PrivilegedExceptionAction<T> action) throws PrivilegedActionException {
		return Subject.doAs(currentSubject(), action);
	}

	/*
	 * WRAPPERS
	 */

	public final static String getUsername(Subject subject) {
		if (subject == null)
			throw new CmsException("Subject cannot be null");
		if (subject.getPrincipals(X500Principal.class).size() != 1)
			return NodeConstants.ROLE_ANONYMOUS;
		Principal principal = subject.getPrincipals(X500Principal.class).iterator().next();
		return principal.getName();
	}

	public final static String getDisplayName(Subject subject) {
		return getAuthorization(subject).toString();
	}

	public final static Set<String> roles(Subject subject) {
		Set<String> roles = new HashSet<String>();
		roles.add(getUsername(subject));
		for (Principal group : subject.getPrincipals(ImpliedByPrincipal.class)) {
			roles.add(group.getName());
		}
		return roles;
	}

	public final static Locale locale(Subject subject) {
		Set<Locale> locales = subject.getPublicCredentials(Locale.class);
		if (locales.isEmpty()) {
			Locale defaultLocale = Activator.getNodeState().getDefaultLocale();
			return defaultLocale;
		} else
			return locales.iterator().next();
	}

	/** Whether this user is currently authenticated. */
	public static boolean isAnonymous(Subject subject) {
		if (subject == null)
			return true;
		String username = getUsername(subject);
		return username == null || username.equalsIgnoreCase(NodeConstants.ROLE_ANONYMOUS);
	}

	public CmsSession getCmsSession() {
		Subject subject = currentSubject();
		CmsSessionId cmsSessionId = subject.getPrivateCredentials(CmsSessionId.class).iterator().next();
		return CmsSessionImpl.getByUuid(cmsSessionId.getUuid());
	}

	/*
	 * HELPERS
	 */
	private static Subject currentSubject() {
		// CmsAuthenticated cmsView = getNodeAuthenticated();
		// if (cmsView != null)
		// return cmsView.getSubject();
		Subject subject = getAccessControllerSubject();
		if (subject != null)
			return subject;
		throw new CmsException("Cannot find related subject");
	}

	private static Subject getAccessControllerSubject() {
		return Subject.getSubject(AccessController.getContext());
	}

	// public static boolean isAuthenticated() {
	// return getAccessControllerSubject() != null;
	// }

	/**
	 * The node authenticated component (typically a CMS view) related to this
	 * display, or null if none is available from this call. <b>Not API: Only for
	 * low-level access.</b>
	 */
	// private static CmsAuthenticated getNodeAuthenticated() {
	// return UiContext.getData(CmsAuthenticated.KEY);
	// }

	private static Authorization getAuthorization(Subject subject) {
		return subject.getPrivateCredentials(Authorization.class).iterator().next();
	}

	public static boolean logoutCmsSession(Subject subject) {
		UUID nodeSessionId;
		if (subject.getPrivateCredentials(CmsSessionId.class).size() == 1)
			nodeSessionId = subject.getPrivateCredentials(CmsSessionId.class).iterator().next().getUuid();
		else
			return false;
		CmsSessionImpl cmsSession = CmsSessionImpl.getByUuid(nodeSessionId.toString());
		cmsSession.close();
		// if (log.isDebugEnabled())
		// log.debug("Logged out CMS session " + cmsSession.getUuid());
		return true;
	}

	private CurrentUser() {
	}
}