Server : Apache/2.4.41 (Ubuntu) System : Linux absol.cf 5.4.0-198-generic #218-Ubuntu SMP Fri Sep 27 20:18:53 UTC 2024 x86_64 User : www-data ( 33) PHP Version : 7.4.33 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare, Directory :  /etc/alternatives/mpi/openmpi/opal/

Upload File : current_dir [ Writeable ] document_root [ Writeable ]

/*
 * Copyright (c) 2004-2007 The University of Tennessee and The University
 *                         of Tennessee Research Foundation.  All rights
 *                         reserved.
 * $COPYRIGHT$
 *
 * Additional copyrights may follow
 *
 * $HEADER$
 */

/** @file
 *
 * Simple macros to quickly compute a hash value from a string.
 *
 */

#ifndef OPAL_HASH_STRING_H
#define OPAL_HASH_STRING_H

/**
 *  Compute the hash value and the string length simultaneously
 *
 *  @param str (IN)     The string which will be parsed   (char*)
 *  @param hash (OUT)   Where the hash value will be stored (uint32_t)
 *  @param length (OUT) The computed length of the string (uint32_t)
 */
#define OPAL_HASH_STRLEN( str, hash, length ) \
    do {                                      \
        register const char *_str = (str);    \
        register uint32_t    _hash = 0;       \
        register uint32_t    _len = 0;        \
                                              \
        while( *_str ) {                      \
            _len++;                           \
            _hash += *_str++;                 \
            _hash += (_hash << 10);           \
            _hash ^= (_hash >> 6);            \
        }                                     \
                                              \
        _hash += (_hash << 3);                \
        _hash ^= (_hash >> 11);               \
        (hash) = (_hash + (_hash << 15));     \
        (length)  = _len;                     \
    } while(0)

/**
 *  Compute the hash value
 *
 *  @param str (IN)     The string which will be parsed   (char*)
 *  @param hash (OUT)   Where the hash value will be stored (uint32_t)
 */
#define OPAL_HASH_STR( str, hash )            \
    do {                                      \
        register const char *_str = (str);    \
        register uint32_t    _hash = 0;       \
                                              \
        while( *_str ) {                      \
            _hash += *_str++;                 \
            _hash += (_hash << 10);           \
            _hash ^= (_hash >> 6);            \
        }                                     \
                                              \
        _hash += (_hash << 3);                \
        _hash ^= (_hash >> 11);               \
        (hash) = (_hash + (_hash << 15));     \
    } while(0)

#endif  /* OPAL_HASH_STRING_H */