/*
 *    This file is part of MotionPlus.
 *
 *    MotionPlus 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 3 of the License, or
 *    (at your option) any later version.
 *
 *    MotionPlus 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 MotionPlus.  If not, see <https://www.gnu.org/licenses/>.
 *
 *    Copyright 2020-2023 MotionMrDave@gmail.com
 *
*/
#include "motionplus.hpp"
#include "conf.hpp"
#include "logger.hpp"
#include "util.hpp"
#include "motion_loop.hpp"
#include "sound.hpp"
#include "dbse.hpp"
#include "webu.hpp"
#include "video_v4l2.hpp"
#include "movie.hpp"
#include "netcam.hpp"
#include "draw.hpp"

pthread_key_t tls_key_threadnr;
volatile enum MOTPLS_SIGNAL motsignal;

/** Process signals sent */
static void motpls_signal_process(ctx_motapp *motapp)
{
    int indx;

    switch(motsignal){
    case MOTPLS_SIGNAL_ALARM:       /* Trigger snapshot */
        if (motapp->cam_list != NULL) {
            for (indx=0; indx<motapp->cam_cnt; indx++) {
                if (motapp->cam_list[indx]->conf->snapshot_interval) {
                    motapp->cam_list[indx]->snapshot = true;
                }
            }
        }
        break;
    case MOTPLS_SIGNAL_USR1:        /* Trigger the end of a event */
        if (motapp->cam_list != NULL) {
            for (indx=0; indx<motapp->cam_cnt; indx++) {
                motapp->cam_list[indx]->event_stop = true;
            }
        }
        break;
    case MOTPLS_SIGNAL_SIGHUP:      /* Restart the threads */
        motapp->restart_all = true;
        /*FALLTHROUGH*/
    case MOTPLS_SIGNAL_SIGTERM:     /* Quit application */

        motapp->webcontrol_finish = true;
        for (indx=0; indx<motapp->cam_cnt; indx++) {
            motapp->cam_list[indx]->event_stop = true;
            motapp->cam_list[indx]->finish_dev = true;
            motapp->cam_list[indx]->restart_dev = false;
        }
        for (indx=0; indx<motapp->snd_cnt; indx++) {
            motapp->snd_list[indx]->event_stop = true;
            motapp->snd_list[indx]->finish_dev = true;
            motapp->snd_list[indx]->restart_dev = false;
        }
        motapp->finish_all = true;
    default:
        break;
    }
    motsignal = MOTPLS_SIGNAL_NONE;
}

/** Handle signals sent */
static void sig_handler(int signo)
{

    /*The FALLTHROUGH is a special comment required by compiler.  Do not edit it*/
    switch(signo) {
    case SIGALRM:
        motsignal = MOTPLS_SIGNAL_ALARM;
        break;
    case SIGUSR1:
        motsignal = MOTPLS_SIGNAL_USR1;
        break;
    case SIGHUP:
        motsignal = MOTPLS_SIGNAL_SIGHUP;
        break;
    case SIGINT:
        /*FALLTHROUGH*/
    case SIGQUIT:
        /*FALLTHROUGH*/
    case SIGTERM:
        motsignal = MOTPLS_SIGNAL_SIGTERM;
        break;
    case SIGSEGV:
        exit(0);
    case SIGVTALRM:
        printf("SIGVTALRM went off\n");
        pthread_exit(NULL);
        break;
    }
}

/**  POSIX compliant replacement of the signal(SIGCHLD, SIG_IGN). */
static void sigchild_handler(int signo)
{
    (void)signo;

    #ifdef WNOHANG
        while (waitpid(-1, NULL, WNOHANG) > 0) {};
    #endif /* WNOHANG */

    return;
}

/** Attach handlers to a number of signals that MotionPlus need to catch. */
static void setup_signals(void)
{
    struct sigaction sig_handler_action;
    struct sigaction sigchild_action;

    #ifdef SA_NOCLDWAIT
        sigchild_action.sa_flags = SA_NOCLDWAIT;
    #else
        sigchild_action.sa_flags = 0;
    #endif

    sigchild_action.sa_handler = sigchild_handler;
    sigemptyset(&sigchild_action.sa_mask);

    #ifdef SA_RESTART
        sig_handler_action.sa_flags = SA_RESTART;
    #else
        sig_handler_action.sa_flags = 0;
    #endif

    sig_handler_action.sa_handler = sig_handler;
    sigemptyset(&sig_handler_action.sa_mask);

    /* Enable automatic zombie reaping */
    sigaction(SIGCHLD, &sigchild_action, NULL);
    sigaction(SIGPIPE, &sigchild_action, NULL);
    sigaction(SIGALRM, &sig_handler_action, NULL);
    sigaction(SIGHUP, &sig_handler_action, NULL);
    sigaction(SIGINT, &sig_handler_action, NULL);
    sigaction(SIGQUIT, &sig_handler_action, NULL);
    sigaction(SIGTERM, &sig_handler_action, NULL);
    sigaction(SIGUSR1, &sig_handler_action, NULL);

    /* use SIGVTALRM as a way to break out of the ioctl, don't restart */
    sig_handler_action.sa_flags = 0;
    sigaction(SIGVTALRM, &sig_handler_action, NULL);
}

/* Write out the pid file*/
static void motpls_pid_write(ctx_motapp *motapp)
{
    FILE *pidf = NULL;

    if (motapp->conf->pid_file != "") {
        pidf = myfopen(motapp->conf->pid_file.c_str(), "w+e");
        if (pidf) {
            (void)fprintf(pidf, "%d\n", getpid());
            myfclose(pidf);
            MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO
                ,_("Created process id file %s. Process ID is %d")
                ,motapp->conf->pid_file.c_str(), getpid());
        } else {
            MOTION_LOG(EMG, TYPE_ALL, SHOW_ERRNO
                , _("Cannot create process id file (pid file) %s")
                , motapp->conf->pid_file.c_str());
        }
    }
}

/** Remove the process id file ( pid file ) before MotionPlus exit. */
static void motpls_pid_remove(ctx_motapp *motapp)
{

    if ((motapp->conf->pid_file != "") &&
        (motapp->restart_all == false)) {
        if (!unlink(motapp->conf->pid_file.c_str())) {
            MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, _("Removed process id file (pid file)."));
        } else{
            MOTION_LOG(ERR, TYPE_ALL, SHOW_ERRNO, _("Error removing pid file"));
        }
    }

}

/**  Turn MotionPlus into a daemon through forking. */
static void motpls_daemon()
{
    int fd;
    struct sigaction sig_ign_action;

    #ifdef SA_RESTART
        sig_ign_action.sa_flags = SA_RESTART;
    #else
        sig_ign_action.sa_flags = 0;
    #endif

    sig_ign_action.sa_handler = SIG_IGN;
    sigemptyset(&sig_ign_action.sa_mask);

    if (fork()) {
        MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, _("MotionPlus going to daemon mode"));
        exit(0);
    }

    /*
     * Changing dir to root enables people to unmount a disk
     * without having to stop MotionPlus
     */
    if (chdir("/")) {
        MOTION_LOG(ERR, TYPE_ALL, SHOW_ERRNO, _("Could not change directory"));
    }

    #if (defined(BSD) && !defined(__APPLE__))
        setpgrp(0, getpid());
    #else
        setpgrp();
    #endif

    if ((fd = open("/dev/tty", O_RDWR|O_CLOEXEC)) >= 0) {
        ioctl(fd, TIOCNOTTY, NULL);
        close(fd);
    }

    setsid();

    fd = open("/dev/null", O_RDONLY|O_CLOEXEC);
    if (fd != -1) {
        dup2(fd, STDIN_FILENO);
        close(fd);
    }

    fd = open("/dev/null", O_WRONLY|O_CLOEXEC);
    if (fd != -1) {
        dup2(fd, STDOUT_FILENO);
        dup2(fd, STDERR_FILENO);
        close(fd);
    }

    sigaction(SIGTTOU, &sig_ign_action, NULL);
    sigaction(SIGTTIN, &sig_ign_action, NULL);
    sigaction(SIGTSTP, &sig_ign_action, NULL);
}

static void motpls_shutdown(ctx_motapp *motapp)
{
    motpls_pid_remove(motapp);

    log_deinit(motapp);

    webu_deinit(motapp);

    dbse_deinit(motapp);

    conf_deinit(motapp);

}

static void motpls_device_ids(ctx_motapp *motapp)
{
    /* Set the device id's on the ctx_dev.  They must be unique */
    int indx, indx2;
    int invalid_ids;

    /* Defaults */
    for (indx=0; indx<motapp->cam_cnt; indx++) {
        if (motapp->cam_list[indx]->conf->device_id != 0) {
            motapp->cam_list[indx]->device_id = motapp->cam_list[indx]->conf->device_id;
        } else {
            motapp->cam_list[indx]->device_id = indx + 1;
        }
    }
    for (indx=0; indx<motapp->snd_cnt; indx++) {
        if (motapp->snd_list[indx]->conf->device_id != 0) {
            motapp->snd_list[indx]->device_id = motapp->snd_list[indx]->conf->device_id;
        } else {
            motapp->snd_list[indx]->device_id = motapp->cam_cnt + indx + 1;
        }
    }

    /*Check for unique values*/
    invalid_ids = false;
    for (indx=0; indx<motapp->cam_cnt; indx++) {
        for (indx2=indx+1; indx2<motapp->cam_cnt; indx2++) {
           if (motapp->cam_list[indx]->device_id == motapp->cam_list[indx2]->device_id) {
                invalid_ids = true;
            }
        }
        for (indx2=0; indx2<motapp->snd_cnt; indx2++) {
           if (motapp->cam_list[indx]->device_id == motapp->snd_list[indx2]->device_id) {
                invalid_ids = true;
            }
        }
    }
    for (indx=0; indx<motapp->snd_cnt; indx++) {
        for (indx2=indx+1; indx2<motapp->snd_cnt; indx2++) {
           if (motapp->snd_list[indx]->device_id == motapp->snd_list[indx2]->device_id) {
                invalid_ids = true;
            }
        }
    }

    if (invalid_ids) {
        MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("Device IDs are not unique."));
        MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("Falling back to sequence numbers"));
        for (indx=0; indx<motapp->cam_cnt; indx++) {
            motapp->cam_list[indx]->device_id = indx + 1;
        }
        for (indx=0; indx<motapp->snd_cnt; indx++) {
            motapp->snd_list[indx]->device_id = motapp->cam_cnt + indx + 1;
        }
    }

}

static void motpls_ntc(void)
{

    #ifdef HAVE_V4L2
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("v4l2   : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("v4l2   : not available"));
    #endif

    #ifdef HAVE_WEBP
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("webp   : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("webp   : not available"));
    #endif

    #ifdef HAVE_LIBCAM
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("libcam : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("libcam : not available"));
    #endif

    #ifdef HAVE_MYSQL
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("mysql  : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("mysql  : not available"));
    #endif

    #ifdef HAVE_MARIADB
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("MariaDB: available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("MariaDB: not available"));
    #endif

    #ifdef HAVE_SQLITE3
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("sqlite3: available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("sqlite3: not available"));
    #endif

    #ifdef HAVE_PGSQL
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("pgsql  : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("pgsql  : not available"));
    #endif

    #ifdef ENABLE_NLS
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("nls    : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("nls    : not available"));
    #endif

    #ifdef HAVE_ALSA
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("alsa   : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("alsa   : not available"));
    #endif

    #ifdef HAVE_FFTW3
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("fftw3  : available"));
    #else
        MOTION_LOG(DBG, TYPE_ALL, NO_ERRNO,_("fftw3  : not available"));
    #endif

}

/** Initialize upon start up or restart */
static void motpls_startup(ctx_motapp *motapp, int daemonize)
{

    log_init_app(motapp);  /* This is needed prior to any function possibly calling motion_log*/

    conf_init(motapp);

    log_init(motapp);

    mytranslate_init();

    mytranslate_text("",motapp->conf->native_language);

    if (daemonize) {
        if (motapp->conf->daemon && motapp->conf->setup_mode == 0) {
            motpls_daemon();
            MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, _("MotionPlus running as daemon process"));
        }
    }

    if (motapp->conf->setup_mode) {
        MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO,_("MotionPlus running in setup mode."));
    }

    conf_parms_log(motapp);

    motpls_pid_write(motapp);

    motpls_ntc();

    motpls_device_ids(motapp);

    dbse_init(motapp);

    draw_init_chars();

    webu_init(motapp);

}

/** Start a camera thread */
static void motpls_start_thread_cam(ctx_dev *cam)
{
    int retcd;
    pthread_attr_t thread_attr;

    pthread_attr_init(&thread_attr);
    pthread_attr_setdetachstate(&thread_attr, PTHREAD_CREATE_DETACHED);

    cam->restart_dev = true;
    retcd = pthread_create(&cam->thread_id, &thread_attr, &mlp_main, cam);
    if (retcd != 0) {
        MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("Unable to start camera thread."));
    }
    pthread_attr_destroy(&thread_attr);

}

static void motpls_start_thread_snd(ctx_dev *snd)
{
    int retcd;
    pthread_attr_t thread_attr;

    pthread_attr_init(&thread_attr);
    pthread_attr_setdetachstate(&thread_attr, PTHREAD_CREATE_DETACHED);

    snd->restart_dev = true;
    retcd = pthread_create(&snd->thread_id, &thread_attr, &snd_loop, snd);
    if (retcd != 0) {
        MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("Unable to start sound thread."));
    }
    pthread_attr_destroy(&thread_attr);

}

static void motpls_restart(ctx_motapp *motapp)
{

    MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("Restarting MotionPlus."));

    motpls_shutdown(motapp);

    SLEEP(2, 0);

    motpls_startup(motapp, false);

    MOTION_LOG(WRN, TYPE_ALL, NO_ERRNO,_("MotionPlus restarted"));

    motapp->restart_all = false;

}

/* Check for whether any cams are locked */
static void motpls_watchdog(ctx_motapp *motapp, int camindx)
{
    int indx;

    if (motapp->cam_list[camindx]->running_dev == false) {
        return;
    }

    motapp->cam_list[camindx]->watchdog--;
    if (motapp->cam_list[camindx]->watchdog > 0) {
        return;
    }

    MOTION_LOG(ERR, TYPE_ALL, NO_ERRNO
        , _("Camera %d - Watchdog timeout.")
        , motapp->cam_list[camindx]->device_id);

    /* Shut down all the cameras */
    for (indx=0; indx<motapp->cam_cnt; indx++) {
        pthread_mutex_unlock(&motapp->mutex_camlst);
        pthread_mutex_unlock(&motapp->mutex_parms);
        pthread_mutex_unlock(&motapp->mutex_camlst);
        pthread_mutex_unlock(&motapp->mutex_post);
        if (motapp->dbse != NULL) {
            pthread_mutex_unlock(&motapp->dbse->mutex_dbse);
        }
        pthread_mutex_unlock(&motapp->global_lock);
        pthread_mutex_unlock(&motapp->cam_list[indx]->stream.mutex);
        pthread_mutex_unlock(&motapp->cam_list[indx]->parms_lock);

        if ((motapp->cam_list[indx]->camera_type == CAMERA_TYPE_NETCAM) &&
            (motapp->cam_list[indx]->netcam != NULL)) {
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam->mutex);
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam->mutex_pktarray);
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam->mutex_transfer);
            motapp->cam_list[indx]->netcam->finish = true;
        }
        if ((motapp->cam_list[indx]->camera_type == CAMERA_TYPE_NETCAM) &&
            (motapp->cam_list[indx]->netcam_high != NULL)) {
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam_high->mutex);
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam_high->mutex_pktarray);
            pthread_mutex_unlock(&motapp->cam_list[indx]->netcam_high->mutex_transfer);
            motapp->cam_list[indx]->netcam_high->finish = true;
        }
        motapp->cam_list[indx]->event_stop = true;
        motapp->cam_list[indx]->finish_dev = true;
    }

    SLEEP(motapp->cam_list[camindx]->conf->watchdog_kill, 0);

    /* When in a watchdog timeout and we get to a kill situation,
     * we WILL have to leak memory because the freeing/deinit
     * processes could lock this thread which would stop everything.
    */
    for (indx=0; indx<motapp->cam_cnt; indx++) {
        if (motapp->cam_list[indx]->netcam != NULL) {
            if (motapp->cam_list[indx]->netcam->handler_finished == false) {
                MOTION_LOG(ERR, TYPE_ALL, NO_ERRNO
                    , _("Camera %d - Watchdog netcam kill.")
                    , motapp->cam_list[indx]->device_id);
                pthread_kill(motapp->cam_list[indx]->netcam->thread_id, SIGVTALRM);
            }
        }
        if (motapp->cam_list[indx]->netcam_high != NULL) {
            if (motapp->cam_list[indx]->netcam_high->handler_finished == false) {
                MOTION_LOG(ERR, TYPE_ALL, NO_ERRNO
                    , _("Camera %d - Watchdog netcam_high kill.")
                    , motapp->cam_list[indx]->device_id);
                pthread_kill(motapp->cam_list[indx]->netcam_high->thread_id, SIGVTALRM);
            }
        }
        if (motapp->cam_list[indx]->running_dev == true) {
            MOTION_LOG(ERR, TYPE_ALL, NO_ERRNO
                , _("Camera %d - Watchdog kill.")
                , motapp->cam_list[indx]->device_id);
            pthread_kill(motapp->cam_list[indx]->thread_id, SIGVTALRM);
        };
        motapp->cam_list[indx]->running_dev = false;
        motapp->cam_list[indx]->restart_dev = false;
    }
    motapp->restart_all = true;
    motapp->finish_all = true;
    motapp->webcontrol_finish = true;
    motapp->threads_running = 0;

}

static int motpls_check_threadcount(ctx_motapp *motapp)
{
    int thrdcnt, indx;

    thrdcnt = 0;

    for (indx=0; indx<motapp->cam_cnt; indx++) {
        if (motapp->cam_list[indx]->running_dev || motapp->cam_list[indx]->restart_dev) {
            thrdcnt++;
        }
    }
    for (indx=0; indx<motapp->snd_cnt; indx++) {
        if (motapp->snd_list[indx]->running_dev || motapp->snd_list[indx]->restart_dev) {
            thrdcnt++;
        }
    }

    if ((motapp->webcontrol_finish == false) &&
        (motapp->webcontrol_daemon != NULL)) {
        thrdcnt++;
    }

    if (((thrdcnt == 0) && motapp->finish_all) ||
        ((thrdcnt == 0) && (motapp->threads_running == 0))) {
        return 1;
    } else {
        return 0;
    }

}

static void motpls_init(ctx_motapp *motapp, int argc, char *argv[])
{
    motapp->argc = argc;
    motapp->argv = argv;

    motapp->cam_list = (ctx_dev **)mymalloc(sizeof(ctx_dev *));
    motapp->cam_list[0] = NULL;

    motapp->snd_list = (ctx_dev **)mymalloc(sizeof(ctx_dev *));
    motapp->snd_list[0] = NULL;

    motapp->threads_running = 0;
    motapp->finish_all = false;
    motapp->restart_all = false;
    motapp->parms_changed = false;
    motapp->pause = false;
    motapp->cam_add = false;
    motapp->cam_delete = -1;
    motapp->cam_cnt = 0;
    motapp->snd_cnt = 0;

    motapp->conf = new ctx_config;
    motapp->dbse = NULL;

    motapp->webcontrol_running = false;
    motapp->webcontrol_finish = false;
    motapp->webcontrol_daemon = NULL;
    motapp->webcontrol_headers = NULL;
    motapp->webcontrol_actions = NULL;
    motapp->webcontrol_clients.clear();
    memset(motapp->webcontrol_digest_rand, 0, sizeof(motapp->webcontrol_digest_rand));

    pthread_key_create(&tls_key_threadnr, NULL);
    pthread_setspecific(tls_key_threadnr, (void *)(0));

    pthread_mutex_init(&motapp->global_lock, NULL);
    pthread_mutex_init(&motapp->mutex_parms, NULL);
    pthread_mutex_init(&motapp->mutex_camlst, NULL);
    pthread_mutex_init(&motapp->mutex_post, NULL);

}

/* Check for whether to add a new cam */
static void motpls_cam_add(ctx_motapp *motapp)
{
    int indx_cam, indx;

    if (motapp->cam_add == false) {
        return;
    }

    pthread_mutex_lock(&motapp->mutex_camlst);
        conf_camera_add(motapp);
    pthread_mutex_unlock(&motapp->mutex_camlst);

    indx = 1;
    for (indx_cam=0; indx_cam<motapp->cam_cnt; indx_cam++) {
        if (indx < motapp->cam_list[indx_cam]->device_id) {
            indx = motapp->cam_list[indx_cam]->device_id;
        }
    }
    indx++;

    motapp->cam_list[motapp->cam_cnt-1]->device_id = indx;
    motapp->cam_list[motapp->cam_cnt-1]->conf->device_id = indx;
    motapp->cam_list[motapp->cam_cnt-1]->conf->webcontrol_port = 0;

    motapp->cam_add = false;

}

/* Check for whether to delete a new cam */
static void motpls_cam_delete(ctx_motapp *motapp)
{
    int indx1, indx2, maxcnt;
    ctx_dev **tmp, *cam;

    if ((motapp->cam_delete == -1) || (motapp->cam_cnt == 0)) {
        motapp->cam_delete = -1;
        return;
    }

    if (motapp->cam_delete >= motapp->cam_cnt) {
        MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO
            , _("Invalid camera specified for deletion. %d"), motapp->cam_delete);
        motapp->cam_delete = -1;
        return;
    }

    cam = motapp->cam_list[motapp->cam_delete];

    MOTION_LOG(NTC, TYPE_STREAM, NO_ERRNO, _("Stopping %s device_id %d")
        , cam->conf->device_name.c_str(), cam->device_id);
    cam->restart_dev = false;
    cam->finish_dev = true;

    maxcnt = 100;
    indx1 = 0;
    while ((cam->running_dev) && (indx1 < maxcnt)) {
        SLEEP(0, 50000000)
        indx1++;
    }
    if (indx1 == maxcnt) {
        MOTION_LOG(ERR, TYPE_ALL, NO_ERRNO, "Error stopping camera.  Timed out shutting down");
        motapp->cam_delete = -1;
        return;
    }
    MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, "Camera stopped");

    tmp = (ctx_dev **)mymalloc(sizeof(ctx_dev *) * (motapp->cam_cnt));
    tmp[motapp->cam_cnt-1] = NULL;

    indx2 = 0;
    for (indx1=0; indx1<motapp->cam_cnt; indx1++) {
        if (indx1 != motapp->cam_delete) {
            tmp[indx2] = motapp->cam_list[indx1];
            indx2++;
        }
    }

    pthread_mutex_lock(&motapp->mutex_camlst);
        delete motapp->cam_list[motapp->cam_delete]->conf;
        delete motapp->cam_list[motapp->cam_delete];
        myfree(&motapp->cam_list);
        motapp->cam_cnt--;
        motapp->cam_list = tmp;
    pthread_mutex_unlock(&motapp->mutex_camlst);

    motapp->cam_delete = -1;

}

/** Main entry point of MotionPlus. */
int main (int argc, char **argv)
{
    int indx;
    ctx_motapp *motapp;

    motapp = new ctx_motapp;

    motpls_init(motapp, argc, argv);

    setup_signals();

    motpls_startup(motapp, true);

    movie_global_init();

    while (true) {

        if (motapp->restart_all) {
            motpls_restart(motapp);
        }

        for (indx=0; indx<motapp->cam_cnt; indx++) {
            motpls_start_thread_cam(motapp->cam_list[indx]);
        }

        for (indx=0; indx<motapp->snd_cnt; indx++) {
            motpls_start_thread_snd(motapp->snd_list[indx]);
        }

        MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO
            ,_("Motionplus pid: %d"), getpid());

        while (true) {
            SLEEP(1, 0);

            if (motpls_check_threadcount(motapp)) {
                break;
            }

            for (indx=0; indx<motapp->cam_cnt; indx++) {
                /* Check if threads wants to be restarted */
                if ((motapp->cam_list[indx]->running_dev == false) &&
                    (motapp->cam_list[indx]->restart_dev == true)) {
                    MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO
                        ,_("MotionPlus camera %d restart")
                        , motapp->cam_list[indx]->device_id);
                    motpls_start_thread_cam(motapp->cam_list[indx]);
                }
                motpls_watchdog(motapp, indx);
            }
            for (indx=0; indx<motapp->snd_cnt; indx++) {
                if ((motapp->snd_list[indx]->running_dev == false) &&
                    (motapp->snd_list[indx]->restart_dev == true)) {
                    MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO
                        ,_("MotionPlus sound %d restart")
                        , motapp->snd_list[indx]->device_id);
                    motpls_start_thread_snd(motapp->snd_list[indx]);
                }
            }

            if (motsignal != MOTPLS_SIGNAL_NONE) {
                motpls_signal_process(motapp);
            }

            motpls_cam_add(motapp);
            motpls_cam_delete(motapp);

        }

        /* If there are no cameras running, this allows for adding */
        motpls_cam_add(motapp);

        motapp->finish_all = false;

        MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, _("Motionplus devices finished"));

        if (motapp->restart_all) {
            SLEEP(1, 0);    /* Rest before restarting */
        } else {
            break;
        }
    }

    MOTION_LOG(NTC, TYPE_ALL, NO_ERRNO, _("MotionPlus terminating"));

    movie_global_deinit();

    motpls_shutdown(motapp);

    pthread_key_delete(tls_key_threadnr);
    pthread_mutex_destroy(&motapp->global_lock);
    pthread_mutex_destroy(&motapp->mutex_parms);
    pthread_mutex_destroy(&motapp->mutex_camlst);
    pthread_mutex_destroy(&motapp->mutex_post);

    delete motapp->conf;
    delete motapp;

    return 0;
}