Header And Logo

PostgreSQL
| The world's most advanced open source database.

Functions | Variables

parallel.c File Reference

#include "postgres_fe.h"
#include "pg_upgrade.h"
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/wait.h>
Include dependency graph for parallel.c:

Go to the source code of this file.

Functions

void parallel_exec_prog (const char *log_file, const char *opt_log_file, const char *fmt,...)
void parallel_transfer_all_new_dbs (DbInfoArr *old_db_arr, DbInfoArr *new_db_arr, char *old_pgdata, char *new_pgdata, char *old_tablespace)
bool reap_child (bool wait_for_child)

Variables

static int parallel_jobs

Function Documentation

void parallel_exec_prog ( const char *  log_file,
const char *  opt_log_file,
const char *  fmt,
  ... 
)

Definition at line 65 of file parallel.c.

References exec_prog(), i, UserOpts::jobs, NULL, parallel_jobs, PG_FATAL, pg_log(), pg_malloc(), reap_child(), strerror(), user_opts, and vsnprintf().

Referenced by create_new_objects(), and generate_old_dump().

{
    va_list     args;
    char        cmd[MAX_STRING];
#ifndef WIN32
    pid_t       child;
#else
    HANDLE      child;
    exec_thread_arg *new_arg;
#endif

    va_start(args, fmt);
    vsnprintf(cmd, sizeof(cmd), fmt, args);
    va_end(args);

    if (user_opts.jobs <= 1)
        /* throw_error must be true to allow jobs */
        exec_prog(log_file, opt_log_file, true, "%s", cmd);
    else
    {
        /* parallel */
#ifdef WIN32
        cur_thread_args = (void **)exec_thread_args;
#endif  
        /* harvest any dead children */
        while (reap_child(false) == true)
            ;

        /* must we wait for a dead child? */
        if (parallel_jobs >= user_opts.jobs)
            reap_child(true);
            
        /* set this before we start the job */
        parallel_jobs++;
    
        /* Ensure stdio state is quiesced before forking */
        fflush(NULL);

#ifndef WIN32
        child = fork();
        if (child == 0)
            /* use _exit to skip atexit() functions */
            _exit(!exec_prog(log_file, opt_log_file, true, "%s", cmd));
        else if (child < 0)
            /* fork failed */
            pg_log(PG_FATAL, "could not create worker process: %s\n", strerror(errno));
#else
        if (thread_handles == NULL)
        {
            int i;

            thread_handles = pg_malloc(user_opts.jobs * sizeof(HANDLE));
            exec_thread_args = pg_malloc(user_opts.jobs * sizeof(exec_thread_arg *));

            /*
             *  For safety and performance, we keep the args allocated during
             *  the entire life of the process, and we don't free the args
             *  in a thread different from the one that allocated it.
             */
            for (i = 0; i < user_opts.jobs; i++)
                exec_thread_args[i] = pg_malloc(sizeof(exec_thread_arg));
        }

        /* use first empty array element */
        new_arg = exec_thread_args[parallel_jobs-1];

        /* Can only pass one pointer into the function, so use a struct */
        strcpy(new_arg->log_file, log_file);
        strcpy(new_arg->opt_log_file, opt_log_file);
        strcpy(new_arg->cmd, cmd);

        child = (HANDLE) _beginthreadex(NULL, 0, (void *) win32_exec_prog,
                        new_arg, 0, NULL);
        if (child == 0)
            pg_log(PG_FATAL, "could not create worker thread: %s\n", strerror(errno));

        thread_handles[parallel_jobs-1] = child;
#endif
    }

    return;
}

void parallel_transfer_all_new_dbs ( DbInfoArr old_db_arr,
DbInfoArr new_db_arr,
char *  old_pgdata,
char *  new_pgdata,
char *  old_tablespace 
)

Definition at line 170 of file parallel.c.

References i, UserOpts::jobs, NULL, parallel_jobs, PG_FATAL, pg_log(), pg_malloc(), reap_child(), strerror(), transfer_all_new_dbs(), and user_opts.

Referenced by transfer_all_new_tablespaces().

{
#ifndef WIN32
    pid_t       child;
#else
    HANDLE      child;
    transfer_thread_arg *new_arg;
#endif

    if (user_opts.jobs <= 1)
        /* throw_error must be true to allow jobs */
        transfer_all_new_dbs(old_db_arr, new_db_arr, old_pgdata, new_pgdata, NULL);
    else
    {
        /* parallel */
#ifdef WIN32
        cur_thread_args = (void **)transfer_thread_args;
#endif
        /* harvest any dead children */
        while (reap_child(false) == true)
            ;

        /* must we wait for a dead child? */
        if (parallel_jobs >= user_opts.jobs)
            reap_child(true);
            
        /* set this before we start the job */
        parallel_jobs++;
    
        /* Ensure stdio state is quiesced before forking */
        fflush(NULL);

#ifndef WIN32
        child = fork();
        if (child == 0)
        {
            transfer_all_new_dbs(old_db_arr, new_db_arr, old_pgdata, new_pgdata,
                                 old_tablespace);
            /* if we take another exit path, it will be non-zero */
            /* use _exit to skip atexit() functions */
            _exit(0);
        }
        else if (child < 0)
            /* fork failed */
            pg_log(PG_FATAL, "could not create worker process: %s\n", strerror(errno));
#else
        if (thread_handles == NULL)
        {
            int i;

            thread_handles = pg_malloc(user_opts.jobs * sizeof(HANDLE));
            transfer_thread_args = pg_malloc(user_opts.jobs * sizeof(transfer_thread_arg *));

            /*
             *  For safety and performance, we keep the args allocated during
             *  the entire life of the process, and we don't free the args
             *  in a thread different from the one that allocated it.
             */
            for (i = 0; i < user_opts.jobs; i++)
                transfer_thread_args[i] = pg_malloc(sizeof(transfer_thread_arg));
        }

        /* use first empty array element */
        new_arg = transfer_thread_args[parallel_jobs-1];

        /* Can only pass one pointer into the function, so use a struct */
        new_arg->old_db_arr = old_db_arr;
        new_arg->new_db_arr = new_db_arr;
        strcpy(new_arg->old_pgdata, old_pgdata);
        strcpy(new_arg->new_pgdata, new_pgdata);
        strcpy(new_arg->old_tablespace, old_tablespace);

        child = (HANDLE) _beginthreadex(NULL, 0, (void *) win32_exec_prog,
                        new_arg, 0, NULL);
        if (child == 0)
            pg_log(PG_FATAL, "could not create worker thread: %s\n", strerror(errno));

        thread_handles[parallel_jobs-1] = child;
#endif
    }

    return;
}

bool reap_child ( bool  wait_for_child  ) 

Definition at line 274 of file parallel.c.

References UserOpts::jobs, parallel_jobs, PG_FATAL, pg_log(), strerror(), user_opts, WEXITSTATUS, and WIFEXITED.

Referenced by create_new_objects(), generate_old_dump(), parallel_exec_prog(), parallel_transfer_all_new_dbs(), and transfer_all_new_tablespaces().

{
#ifndef WIN32
    int work_status;
    int ret;
#else
    int             thread_num;
    DWORD           res;
#endif

    if (user_opts.jobs <= 1 || parallel_jobs == 0)
        return false;

#ifndef WIN32
    ret = waitpid(-1, &work_status, wait_for_child ? 0 : WNOHANG);

    /* no children or, for WNOHANG, no dead children */
    if (ret <= 0 || !WIFEXITED(work_status))
        return false;

    if (WEXITSTATUS(work_status) != 0)
        pg_log(PG_FATAL, "child worker exited abnormally: %s\n", strerror(errno));

#else
    /* wait for one to finish */
    thread_num = WaitForMultipleObjects(parallel_jobs, thread_handles,
                    false, wait_for_child ? INFINITE : 0);

    if (thread_num == WAIT_TIMEOUT || thread_num == WAIT_FAILED)
        return false;

    /* compute thread index in active_threads */
    thread_num -= WAIT_OBJECT_0;
    
    /* get the result */
    GetExitCodeThread(thread_handles[thread_num], &res);
    if (res != 0)
        pg_log(PG_FATAL, "child worker exited abnormally: %s\n", strerror(errno));

    /* dispose of handle to stop leaks */
    CloseHandle(thread_handles[thread_num]);

    /*  Move last slot into dead child's position */
    if (thread_num != parallel_jobs - 1)
    {
        void *tmp_args;
    
        thread_handles[thread_num] = thread_handles[parallel_jobs - 1];

        /*
         *  We must swap the arg struct pointers because the thread we
         *  just moved is active, and we must make sure it is not
         *  reused by the next created thread.  Instead, the new thread
         *  will use the arg struct of the thread that just died.
         */
        tmp_args = cur_thread_args[thread_num];
        cur_thread_args[thread_num] = cur_thread_args[parallel_jobs - 1];
        cur_thread_args[parallel_jobs - 1] = tmp_args;
    }
#endif

    /* do this after job has been removed */
    parallel_jobs--;

    return true;
}


Variable Documentation

int parallel_jobs [static]

Definition at line 23 of file parallel.c.

Referenced by parallel_exec_prog(), parallel_transfer_all_new_dbs(), and reap_child().