/* Editor Settings: expandtabs and use 4 spaces for indentation
 * ex: set softtabstop=4 tabstop=8 expandtab shiftwidth=4: *
 * -*- mode: c, c-basic-offset: 4 -*- */

/*
 * Copyright Likewise Software    2004-2008
 * All rights reserved.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 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 General Public License
 * for more details.  You should have received a copy of the GNU General
 * Public License along with this program.  If not, see
 * <http://www.gnu.org/licenses/>.
 *
 * LIKEWISE SOFTWARE MAKES THIS SOFTWARE AVAILABLE UNDER OTHER LICENSING
 * TERMS AS WELL.  IF YOU HAVE ENTERED INTO A SEPARATE LICENSE AGREEMENT
 * WITH LIKEWISE SOFTWARE, THEN YOU MAY ELECT TO USE THE SOFTWARE UNDER THE
 * TERMS OF THAT SOFTWARE LICENSE AGREEMENT INSTEAD OF THE TERMS OF THE GNU
 * GENERAL PUBLIC LICENSE, NOTWITHSTANDING THE ABOVE NOTICE.  IF YOU
 * HAVE QUESTIONS, OR WISH TO REQUEST A COPY OF THE ALTERNATE LICENSING
 * TERMS OFFERED BY LIKEWISE SOFTWARE, PLEASE CONTACT LIKEWISE SOFTWARE AT
 * license@likewisesoftware.com
 */

/*
 * Copyright (C) Likewise Software. All rights reserved.
 *
 * Module Name:
 *
 *        sighandler.c
 *
 * Abstract:
 *
 *        Registry
 *
 *        Signal Handler API
 *
 * Authors: Krishna Ganugapati (krishnag@likewisesoftware.com)
 *          Sriram Nambakam (snambakam@likewisesoftware.com)
 *          Kyle Stemen (kstemen@likewisesoftware.com)
 *          Marc Guy (mguy@likewisesoftware.com)
 *
 */

#include "registryd.h"

static
void
RegSrvNOPHandler(
    int unused
    )
{
}

DWORD
RegSrvIgnoreSIGHUP(
    VOID
    )
{
    DWORD dwError = ERROR_SUCCESS;

    // Instead of ignoring the signal by passing SIG_IGN, we install a nop
    // signal handler. This way if we later decide to catch it with sigwait,
    // the signal will still get delivered to the process.
    if (signal(SIGHUP, RegSrvNOPHandler) < 0) {
        dwError = errno;
        BAIL_ON_REG_ERROR(dwError);
    }

cleanup:

    return dwError;

error:

    goto cleanup;
}

static
void
RegSrvInterruptHandler(
    int Signal
    )
{
    if (Signal == SIGINT)
    {
        raise(SIGTERM);
    }
}

static
void
RegSrvHandleSIGHUP(
    VOID
    )
{
    return;

#if 0

    DWORD dwError = 0;
    HANDLE hServer = (HANDLE)NULL;

    LSA_LOG_VERBOSE("Refreshing configuration");


    dwError = LsaSrvOpenServer(
                getuid(),
                getgid(),
                &hServer);
    BAIL_ON_REG_ERROR(dwError);

    dwError = LsaSrvRefreshConfiguration(hServer);
    BAIL_ON_REG_ERROR(dwError);

    LSA_LOG_INFO("Refreshed configuration successfully");

cleanup:

    if (hServer != (HANDLE)NULL)
    {
        RegSrvCloseServer(hServer);
    }

    return;

error:

    REG_LOG_ERROR("Failed to refresh configuration. [Error code:%d]", dwError);

    goto cleanup;

#endif
}

DWORD
RegSrvHandleSignals(
    VOID
    )
{
    DWORD dwError = 0;
    struct sigaction action;
    sigset_t catch_signal_mask;
    sigset_t old_signal_mask;
    int which_signal = 0;
    BOOLEAN bWaitForSignals = TRUE;
    int sysRet = 0;

    // After starting up threads, we now want to handle SIGINT async
    // instead of using sigwait() on it.  The reason for this is so
    // that a debugger (such as gdb) can break in properly.
    // See http://sourceware.org/ml/gdb/2007-03/msg00145.html and
    // http://bugzilla.kernel.org/show_bug.cgi?id=9039.

    memset(&action, 0, sizeof(action));
    action.sa_handler = RegSrvInterruptHandler;

    sysRet = sigaction(SIGINT, &action, NULL);
    dwError = (sysRet != 0) ? errno : 0;
    BAIL_ON_REG_ERROR(dwError);

    // Unblock SIGINT
    sigemptyset(&catch_signal_mask);
    sigaddset(&catch_signal_mask, SIGINT);

    dwError = pthread_sigmask(SIG_UNBLOCK, &catch_signal_mask, NULL);
    BAIL_ON_REG_ERROR(dwError);

    // These should already be blocked...
    sigemptyset(&catch_signal_mask);
    sigaddset(&catch_signal_mask, SIGTERM);
    sigaddset(&catch_signal_mask, SIGHUP);
    sigaddset(&catch_signal_mask, SIGQUIT);
    sigaddset(&catch_signal_mask, SIGPIPE);

    dwError = pthread_sigmask(SIG_BLOCK, &catch_signal_mask, &old_signal_mask);
    BAIL_ON_REG_ERROR(dwError);

    while (bWaitForSignals)
    {

      /* wait for a signal to arrive */
      sigwait(&catch_signal_mask, &which_signal);

      REG_LOG_WARNING("Received signal [%d]", which_signal);

      switch (which_signal)
        {

        case SIGINT:
        case SIGTERM:
        case SIGQUIT:

          {
            RegSrvStopProcess();

            bWaitForSignals = FALSE;

            break;
          }

        case SIGPIPE:

          {
             REG_LOG_DEBUG("Handled SIGPIPE");

             break;
          }

        case SIGHUP:

          {
             RegSrvHandleSIGHUP();

             break;
          }

        }
    }

error:
    return dwError;
}

DWORD
RegSrvStopProcess(
    VOID
    )
{
    RegSrvSetProcessToExit(TRUE);
    FakeClientConnection();

    return 0;
}

VOID
FakeClientConnection(
    VOID
    )
{
    DWORD dwError = 0;
    CHAR  szClientPath[PATH_MAX+1];
    DWORD dwFd = -1;
    BOOLEAN bFileExists = FALSE;
    struct sockaddr_un unixaddr;
    PSTR  pszCachePath = NULL;

    dwError = RegSrvGetCachePath(&pszCachePath);
    BAIL_ON_REG_ERROR(dwError);

    if ((dwFd = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) {
        dwError = errno;
        BAIL_ON_REG_ERROR(dwError);
    }

    sprintf(szClientPath, REG_CLIENT_PATH_FORMAT, (long)getpid());

    dwError = RegCheckSockExists(szClientPath, &bFileExists);
    BAIL_ON_REG_ERROR(dwError);

    if (bFileExists) {
        dwError = RegRemoveFile(szClientPath);
        BAIL_ON_REG_ERROR(dwError);
    }

    bFileExists = FALSE;

    memset(&unixaddr, 0, sizeof(unixaddr));
    unixaddr.sun_family = AF_UNIX;
    strcpy(unixaddr.sun_path, szClientPath);
    if (bind(dwFd, (struct sockaddr*)&unixaddr, sizeof(unixaddr)) < 0) {
        dwError = errno;
        BAIL_ON_REG_ERROR(dwError);
    }

    bFileExists = TRUE;

    dwError = RegChangePermissions(unixaddr.sun_path, S_IRWXU);
    BAIL_ON_REG_ERROR(dwError);

    memset(&unixaddr, 0, sizeof(unixaddr));
    unixaddr.sun_family = AF_UNIX;
    sprintf(unixaddr.sun_path, "%s/%s", pszCachePath, REG_SERVER_FILENAME);

    if (connect(dwFd, (struct sockaddr*)&unixaddr, sizeof(unixaddr)) < 0) {
        dwError = errno;
        BAIL_ON_REG_ERROR(dwError);
    }

error:

    if (dwFd >= 0) {
        close(dwFd);
    }

    if (bFileExists)
    {
        RegRemoveFile(szClientPath);
    }

    LWREG_SAFE_FREE_STRING(pszCachePath);
}