////////////////////////////////////////////////////////////////////////////////
/// DISCLAIMER
///
/// Copyright 2014-2016 ArangoDB GmbH, Cologne, Germany
/// Copyright 2004-2014 triAGENS GmbH, Cologne, Germany
///
/// 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.
///
/// Copyright holder is ArangoDB GmbH, Cologne, Germany
///
/// @author Dr. Frank Celler
////////////////////////////////////////////////////////////////////////////////

#include "VocbaseContext.h"
#include "GeneralServer/AuthenticationFeature.h"
#include "Logger/Logger.h"
#include "VocBase/vocbase.h"

using namespace arangodb::rest;

namespace arangodb {

double VocbaseContext::ServerSessionTtl =
    60.0 * 60.0 * 24 * 60;  // 2 month session timeout

VocbaseContext::VocbaseContext(
    GeneralRequest* req,
    TRI_vocbase_t& vocbase,
    bool isInternal,
    auth::Level systemLevel,
    auth::Level dbLevel
): ExecContext(isInternal, req->user(), req->databaseName(), systemLevel, dbLevel),
   _vocbase(vocbase) {
  // _vocbase has already been refcounted for us
  TRI_ASSERT(!_vocbase.isDangling());
}

VocbaseContext::~VocbaseContext() {
  TRI_ASSERT(!_vocbase.isDangling());
  _vocbase.release();
}

/*static*/ VocbaseContext* VocbaseContext::create(
    GeneralRequest* req, TRI_vocbase_t& vocbase
) {
  // _vocbase has already been refcounted for us
  TRI_ASSERT(!vocbase.isDangling());

  AuthenticationFeature* auth = AuthenticationFeature::instance();

  if (auth == nullptr) {
    return nullptr;
  }

  if (!auth->isActive()) {
    return new VocbaseContext(req, vocbase, /*isInternal*/ false,
                              /*sysLevel*/ auth::Level::RW,
                              /*dbLevel*/ auth::Level::RW);
  }

  if (req->authenticated()) {
    // superusers will have an empty username. This MUST be invalid
    // for users authenticating with name / password
    if (req->user().empty()) {
      if (req->authenticationMethod() != AuthenticationMethod::JWT) {
        std::string msg = "only jwt can be used to authenticate as superuser";
        LOG_TOPIC(WARN, Logger::AUTHENTICATION) << msg;
        THROW_ARANGO_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, msg);
      }

      return new VocbaseContext(req, vocbase, /*isInternal*/ true,
                                /*sysLevel*/ auth::Level::RW,
                                /*dbLevel*/ auth::Level::RW);
    }

    auth::UserManager* um = auth->userManager();
    TRI_ASSERT(um != nullptr);
    auth::Level dbLvl = um->databaseAuthLevel(req->user(), req->databaseName());
    auth::Level sysLvl = dbLvl;

    if (req->databaseName() != TRI_VOC_SYSTEM_DATABASE) {
      sysLvl = um->databaseAuthLevel(req->user(), TRI_VOC_SYSTEM_DATABASE);
    }

    return new VocbaseContext(req, vocbase, /*isInternal*/ false,
                              /*sysLevel*/ sysLvl,
                              /*dbLevel*/ dbLvl);
  }

  return new VocbaseContext(req, vocbase, /*isInternal*/ false,
                            /*sysLevel*/ auth::Level::NONE,
                            /*dbLevel*/ auth::Level::NONE);
}

void VocbaseContext::forceSuperuser() {
  TRI_ASSERT(!_internal || _user.empty());
  _internal = true;
  _systemDbAuthLevel = auth::Level::RW;
  _databaseAuthLevel = auth::Level::RW;
}

void VocbaseContext::forceReadOnly() {
  TRI_ASSERT(!_internal || _user.empty());
  _internal = true;
  _systemDbAuthLevel = auth::Level::RO;
  _databaseAuthLevel = auth::Level::RO;
}

} // arangodb