mirror of
https://github.com/zeromq/libzmq.git
synced 2024-12-13 10:52:56 +01:00
da31917f4f
Relicense permission collected from all relevant authors as tallied at: https://github.com/rlenferink/libzmq-relicense/blob/master/checklist.md The relicense grants are collected under RELICENSE/ and will be moved to the above repository in a later commit. Fixes https://github.com/zeromq/libzmq/issues/2376
427 lines
13 KiB
C++
427 lines
13 KiB
C++
/* SPDX-License-Identifier: MPL-2.0 */
|
|
|
|
#include "precompiled.hpp"
|
|
#include "err.hpp"
|
|
#include "macros.hpp"
|
|
|
|
const char *zmq::errno_to_string (int errno_)
|
|
{
|
|
switch (errno_) {
|
|
#if defined ZMQ_HAVE_WINDOWS
|
|
case ENOTSUP:
|
|
return "Not supported";
|
|
case EPROTONOSUPPORT:
|
|
return "Protocol not supported";
|
|
case ENOBUFS:
|
|
return "No buffer space available";
|
|
case ENETDOWN:
|
|
return "Network is down";
|
|
case EADDRINUSE:
|
|
return "Address in use";
|
|
case EADDRNOTAVAIL:
|
|
return "Address not available";
|
|
case ECONNREFUSED:
|
|
return "Connection refused";
|
|
case EINPROGRESS:
|
|
return "Operation in progress";
|
|
#endif
|
|
case EFSM:
|
|
return "Operation cannot be accomplished in current state";
|
|
case ENOCOMPATPROTO:
|
|
return "The protocol is not compatible with the socket type";
|
|
case ETERM:
|
|
return "Context was terminated";
|
|
case EMTHREAD:
|
|
return "No thread available";
|
|
case EHOSTUNREACH:
|
|
return "Host unreachable";
|
|
default:
|
|
#if defined _MSC_VER
|
|
#pragma warning(push)
|
|
#pragma warning(disable : 4996)
|
|
#endif
|
|
return strerror (errno_);
|
|
#if defined _MSC_VER
|
|
#pragma warning(pop)
|
|
#endif
|
|
}
|
|
}
|
|
|
|
void zmq::zmq_abort (const char *errmsg_)
|
|
{
|
|
#if defined ZMQ_HAVE_WINDOWS
|
|
|
|
// Raise STATUS_FATAL_APP_EXIT.
|
|
ULONG_PTR extra_info[1];
|
|
extra_info[0] = (ULONG_PTR) errmsg_;
|
|
RaiseException (0x40000015, EXCEPTION_NONCONTINUABLE, 1, extra_info);
|
|
#else
|
|
LIBZMQ_UNUSED (errmsg_);
|
|
print_backtrace ();
|
|
abort ();
|
|
#endif
|
|
}
|
|
|
|
#ifdef ZMQ_HAVE_WINDOWS
|
|
|
|
const char *zmq::wsa_error ()
|
|
{
|
|
return wsa_error_no (WSAGetLastError (), NULL);
|
|
}
|
|
|
|
const char *zmq::wsa_error_no (int no_, const char *wsae_wouldblock_string_)
|
|
{
|
|
// TODO: It seems that list of Windows socket errors is longer than this.
|
|
// Investigate whether there's a way to convert it into the string
|
|
// automatically (wsaError->HRESULT->string?).
|
|
switch (no_) {
|
|
case WSABASEERR:
|
|
return "No Error";
|
|
case WSAEINTR:
|
|
return "Interrupted system call";
|
|
case WSAEBADF:
|
|
return "Bad file number";
|
|
case WSAEACCES:
|
|
return "Permission denied";
|
|
case WSAEFAULT:
|
|
return "Bad address";
|
|
case WSAEINVAL:
|
|
return "Invalid argument";
|
|
case WSAEMFILE:
|
|
return "Too many open files";
|
|
case WSAEWOULDBLOCK:
|
|
return wsae_wouldblock_string_;
|
|
case WSAEINPROGRESS:
|
|
return "Operation now in progress";
|
|
case WSAEALREADY:
|
|
return "Operation already in progress";
|
|
case WSAENOTSOCK:
|
|
return "Socket operation on non-socket";
|
|
case WSAEDESTADDRREQ:
|
|
return "Destination address required";
|
|
case WSAEMSGSIZE:
|
|
return "Message too long";
|
|
case WSAEPROTOTYPE:
|
|
return "Protocol wrong type for socket";
|
|
case WSAENOPROTOOPT:
|
|
return "Bas protocol option";
|
|
case WSAEPROTONOSUPPORT:
|
|
return "Protocol not supported";
|
|
case WSAESOCKTNOSUPPORT:
|
|
return "Socket type not supported";
|
|
case WSAEOPNOTSUPP:
|
|
return "Operation not supported on socket";
|
|
case WSAEPFNOSUPPORT:
|
|
return "Protocol family not supported";
|
|
case WSAEAFNOSUPPORT:
|
|
return "Address family not supported by protocol family";
|
|
case WSAEADDRINUSE:
|
|
return "Address already in use";
|
|
case WSAEADDRNOTAVAIL:
|
|
return "Can't assign requested address";
|
|
case WSAENETDOWN:
|
|
return "Network is down";
|
|
case WSAENETUNREACH:
|
|
return "Network is unreachable";
|
|
case WSAENETRESET:
|
|
return "Net dropped connection or reset";
|
|
case WSAECONNABORTED:
|
|
return "Software caused connection abort";
|
|
case WSAECONNRESET:
|
|
return "Connection reset by peer";
|
|
case WSAENOBUFS:
|
|
return "No buffer space available";
|
|
case WSAEISCONN:
|
|
return "Socket is already connected";
|
|
case WSAENOTCONN:
|
|
return "Socket is not connected";
|
|
case WSAESHUTDOWN:
|
|
return "Can't send after socket shutdown";
|
|
case WSAETOOMANYREFS:
|
|
return "Too many references can't splice";
|
|
case WSAETIMEDOUT:
|
|
return "Connection timed out";
|
|
case WSAECONNREFUSED:
|
|
return "Connection refused";
|
|
case WSAELOOP:
|
|
return "Too many levels of symbolic links";
|
|
case WSAENAMETOOLONG:
|
|
return "File name too long";
|
|
case WSAEHOSTDOWN:
|
|
return "Host is down";
|
|
case WSAEHOSTUNREACH:
|
|
return "No Route to Host";
|
|
case WSAENOTEMPTY:
|
|
return "Directory not empty";
|
|
case WSAEPROCLIM:
|
|
return "Too many processes";
|
|
case WSAEUSERS:
|
|
return "Too many users";
|
|
case WSAEDQUOT:
|
|
return "Disc Quota Exceeded";
|
|
case WSAESTALE:
|
|
return "Stale NFS file handle";
|
|
case WSAEREMOTE:
|
|
return "Too many levels of remote in path";
|
|
case WSASYSNOTREADY:
|
|
return "Network SubSystem is unavailable";
|
|
case WSAVERNOTSUPPORTED:
|
|
return "WINSOCK DLL Version out of range";
|
|
case WSANOTINITIALISED:
|
|
return "Successful WSASTARTUP not yet performed";
|
|
case WSAHOST_NOT_FOUND:
|
|
return "Host not found";
|
|
case WSATRY_AGAIN:
|
|
return "Non-Authoritative Host not found";
|
|
case WSANO_RECOVERY:
|
|
return "Non-Recoverable errors: FORMERR REFUSED NOTIMP";
|
|
case WSANO_DATA:
|
|
return "Valid name no data record of requested";
|
|
default:
|
|
return "error not defined";
|
|
}
|
|
}
|
|
|
|
void zmq::win_error (char *buffer_, size_t buffer_size_)
|
|
{
|
|
const DWORD errcode = GetLastError ();
|
|
#if defined _WIN32_WCE
|
|
DWORD rc = FormatMessageW (
|
|
FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL, errcode,
|
|
MAKELANGID (LANG_NEUTRAL, SUBLANG_DEFAULT), (LPWSTR) buffer_,
|
|
buffer_size_ / sizeof (wchar_t), NULL);
|
|
#else
|
|
const DWORD rc = FormatMessageA (
|
|
FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL, errcode,
|
|
MAKELANGID (LANG_NEUTRAL, SUBLANG_DEFAULT), buffer_,
|
|
static_cast<DWORD> (buffer_size_), NULL);
|
|
#endif
|
|
zmq_assert (rc);
|
|
}
|
|
|
|
int zmq::wsa_error_to_errno (int errcode_)
|
|
{
|
|
switch (errcode_) {
|
|
// 10004 - Interrupted system call.
|
|
case WSAEINTR:
|
|
return EINTR;
|
|
// 10009 - File handle is not valid.
|
|
case WSAEBADF:
|
|
return EBADF;
|
|
// 10013 - Permission denied.
|
|
case WSAEACCES:
|
|
return EACCES;
|
|
// 10014 - Bad address.
|
|
case WSAEFAULT:
|
|
return EFAULT;
|
|
// 10022 - Invalid argument.
|
|
case WSAEINVAL:
|
|
return EINVAL;
|
|
// 10024 - Too many open files.
|
|
case WSAEMFILE:
|
|
return EMFILE;
|
|
// 10035 - Operation would block.
|
|
case WSAEWOULDBLOCK:
|
|
return EBUSY;
|
|
// 10036 - Operation now in progress.
|
|
case WSAEINPROGRESS:
|
|
return EAGAIN;
|
|
// 10037 - Operation already in progress.
|
|
case WSAEALREADY:
|
|
return EAGAIN;
|
|
// 10038 - Socket operation on non-socket.
|
|
case WSAENOTSOCK:
|
|
return ENOTSOCK;
|
|
// 10039 - Destination address required.
|
|
case WSAEDESTADDRREQ:
|
|
return EFAULT;
|
|
// 10040 - Message too long.
|
|
case WSAEMSGSIZE:
|
|
return EMSGSIZE;
|
|
// 10041 - Protocol wrong type for socket.
|
|
case WSAEPROTOTYPE:
|
|
return EFAULT;
|
|
// 10042 - Bad protocol option.
|
|
case WSAENOPROTOOPT:
|
|
return EINVAL;
|
|
// 10043 - Protocol not supported.
|
|
case WSAEPROTONOSUPPORT:
|
|
return EPROTONOSUPPORT;
|
|
// 10044 - Socket type not supported.
|
|
case WSAESOCKTNOSUPPORT:
|
|
return EFAULT;
|
|
// 10045 - Operation not supported on socket.
|
|
case WSAEOPNOTSUPP:
|
|
return EFAULT;
|
|
// 10046 - Protocol family not supported.
|
|
case WSAEPFNOSUPPORT:
|
|
return EPROTONOSUPPORT;
|
|
// 10047 - Address family not supported by protocol family.
|
|
case WSAEAFNOSUPPORT:
|
|
return EAFNOSUPPORT;
|
|
// 10048 - Address already in use.
|
|
case WSAEADDRINUSE:
|
|
return EADDRINUSE;
|
|
// 10049 - Cannot assign requested address.
|
|
case WSAEADDRNOTAVAIL:
|
|
return EADDRNOTAVAIL;
|
|
// 10050 - Network is down.
|
|
case WSAENETDOWN:
|
|
return ENETDOWN;
|
|
// 10051 - Network is unreachable.
|
|
case WSAENETUNREACH:
|
|
return ENETUNREACH;
|
|
// 10052 - Network dropped connection on reset.
|
|
case WSAENETRESET:
|
|
return ENETRESET;
|
|
// 10053 - Software caused connection abort.
|
|
case WSAECONNABORTED:
|
|
return ECONNABORTED;
|
|
// 10054 - Connection reset by peer.
|
|
case WSAECONNRESET:
|
|
return ECONNRESET;
|
|
// 10055 - No buffer space available.
|
|
case WSAENOBUFS:
|
|
return ENOBUFS;
|
|
// 10056 - Socket is already connected.
|
|
case WSAEISCONN:
|
|
return EFAULT;
|
|
// 10057 - Socket is not connected.
|
|
case WSAENOTCONN:
|
|
return ENOTCONN;
|
|
// 10058 - Can't send after socket shutdown.
|
|
case WSAESHUTDOWN:
|
|
return EFAULT;
|
|
// 10059 - Too many references can't splice.
|
|
case WSAETOOMANYREFS:
|
|
return EFAULT;
|
|
// 10060 - Connection timed out.
|
|
case WSAETIMEDOUT:
|
|
return ETIMEDOUT;
|
|
// 10061 - Connection refused.
|
|
case WSAECONNREFUSED:
|
|
return ECONNREFUSED;
|
|
// 10062 - Too many levels of symbolic links.
|
|
case WSAELOOP:
|
|
return EFAULT;
|
|
// 10063 - File name too long.
|
|
case WSAENAMETOOLONG:
|
|
return EFAULT;
|
|
// 10064 - Host is down.
|
|
case WSAEHOSTDOWN:
|
|
return EAGAIN;
|
|
// 10065 - No route to host.
|
|
case WSAEHOSTUNREACH:
|
|
return EHOSTUNREACH;
|
|
// 10066 - Directory not empty.
|
|
case WSAENOTEMPTY:
|
|
return EFAULT;
|
|
// 10067 - Too many processes.
|
|
case WSAEPROCLIM:
|
|
return EFAULT;
|
|
// 10068 - Too many users.
|
|
case WSAEUSERS:
|
|
return EFAULT;
|
|
// 10069 - Disc Quota Exceeded.
|
|
case WSAEDQUOT:
|
|
return EFAULT;
|
|
// 10070 - Stale NFS file handle.
|
|
case WSAESTALE:
|
|
return EFAULT;
|
|
// 10071 - Too many levels of remote in path.
|
|
case WSAEREMOTE:
|
|
return EFAULT;
|
|
// 10091 - Network SubSystem is unavailable.
|
|
case WSASYSNOTREADY:
|
|
return EFAULT;
|
|
// 10092 - WINSOCK DLL Version out of range.
|
|
case WSAVERNOTSUPPORTED:
|
|
return EFAULT;
|
|
// 10093 - Successful WSASTARTUP not yet performed.
|
|
case WSANOTINITIALISED:
|
|
return EFAULT;
|
|
// 11001 - Host not found.
|
|
case WSAHOST_NOT_FOUND:
|
|
return EFAULT;
|
|
// 11002 - Non-Authoritative Host not found.
|
|
case WSATRY_AGAIN:
|
|
return EFAULT;
|
|
// 11003 - Non-Recoverable errors: FORMERR REFUSED NOTIMP.
|
|
case WSANO_RECOVERY:
|
|
return EFAULT;
|
|
// 11004 - Valid name no data record of requested.
|
|
case WSANO_DATA:
|
|
return EFAULT;
|
|
default:
|
|
wsa_assert (false);
|
|
}
|
|
// Not reachable
|
|
return 0;
|
|
}
|
|
|
|
#endif
|
|
|
|
#if defined(HAVE_LIBUNWIND) && !defined(__SUNPRO_CC)
|
|
|
|
#define UNW_LOCAL_ONLY
|
|
#include <libunwind.h>
|
|
#include <dlfcn.h>
|
|
#include <cxxabi.h>
|
|
#include "mutex.hpp"
|
|
|
|
void zmq::print_backtrace (void)
|
|
{
|
|
static zmq::mutex_t mtx;
|
|
mtx.lock ();
|
|
Dl_info dl_info;
|
|
unw_cursor_t cursor;
|
|
unw_context_t ctx;
|
|
unsigned frame_n = 0;
|
|
|
|
unw_getcontext (&ctx);
|
|
unw_init_local (&cursor, &ctx);
|
|
|
|
while (unw_step (&cursor) > 0) {
|
|
unw_word_t offset;
|
|
unw_proc_info_t p_info;
|
|
static const char unknown[] = "?";
|
|
const char *file_name;
|
|
char *demangled_name;
|
|
char func_name[256] = "";
|
|
void *addr;
|
|
int rc;
|
|
|
|
if (unw_get_proc_info (&cursor, &p_info))
|
|
break;
|
|
|
|
rc = unw_get_proc_name (&cursor, func_name, 256, &offset);
|
|
if (rc == -UNW_ENOINFO)
|
|
memcpy (func_name, unknown, sizeof unknown);
|
|
|
|
addr = (void *) (p_info.start_ip + offset);
|
|
|
|
if (dladdr (addr, &dl_info) && dl_info.dli_fname)
|
|
file_name = dl_info.dli_fname;
|
|
else
|
|
file_name = unknown;
|
|
|
|
demangled_name = abi::__cxa_demangle (func_name, NULL, NULL, &rc);
|
|
|
|
printf ("#%u %p in %s (%s+0x%lx)\n", frame_n++, addr, file_name,
|
|
rc ? func_name : demangled_name, (unsigned long) offset);
|
|
free (demangled_name);
|
|
}
|
|
puts ("");
|
|
|
|
fflush (stdout);
|
|
mtx.unlock ();
|
|
}
|
|
|
|
#else
|
|
|
|
void zmq::print_backtrace ()
|
|
{
|
|
}
|
|
|
|
#endif
|