170ef8af1f
* rename ompi_stacktrace to opal_stacktrace * rename ompi_strncpy to opal_strncpy This commit was SVN r6336.
62 строки
1.6 KiB
C
62 строки
1.6 KiB
C
/*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University.
|
|
* All rights reserved.
|
|
* Copyright (c) 2004-2005 The Trustees of the University of Tennessee.
|
|
* All rights reserved.
|
|
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
* University of Stuttgart. All rights reserved.
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
* All rights reserved.
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*
|
|
* This file is only here because some platforms have a broken strncpy
|
|
* (e.g., Itanium with RedHat Advanced Server glibc).
|
|
*/
|
|
|
|
#include "ompi_config.h"
|
|
|
|
#include <string.h>
|
|
|
|
#include "opal/util/strncpy.h"
|
|
|
|
|
|
/**
|
|
* Provide a portable, working strncpy() for platforms that have
|
|
* broken implementations.
|
|
*
|
|
* @param dest Destination string.
|
|
* @param src Source string.
|
|
* @param len Length of the string to copy.
|
|
*
|
|
* @return The value dest.
|
|
*
|
|
* This function is identical in behavior to strncpy(), but is not
|
|
* optimized at all (we're not concerned with high-performance
|
|
* strncpy!). It is only here because some platforms have broken
|
|
* implementations of strncpy() that cause segfaults (cough cough Red
|
|
* Hat Advanced Server glibc cough cough).
|
|
*/
|
|
char *
|
|
opal_strncpy(char *dest, const char *src, size_t len)
|
|
{
|
|
size_t i;
|
|
int pad = 0;
|
|
char *new_dest = dest;
|
|
|
|
for (i = 0; i < len; ++i, ++src, ++new_dest) {
|
|
if (pad != 0)
|
|
*new_dest = '\0';
|
|
else {
|
|
*new_dest = *src;
|
|
if ('\0' == *src)
|
|
pad = 1;
|
|
}
|
|
}
|
|
|
|
return dest;
|
|
}
|