diff options
author | Martin Lucina <mato@kotelna.sk> | 2010-05-12 16:49:49 +0200 |
---|---|---|
committer | Martin Lucina <mato@kotelna.sk> | 2010-05-12 16:49:49 +0200 |
commit | f6c1c972428f15356af09d6922910ef44d1f6cb3 (patch) | |
tree | 6d12b6e0685429dead952445326ea7415dd9c9f9 /src/uuid.cpp | |
parent | 52ef3f3f2c6f3ba1717b2e729556df713c022636 (diff) | |
parent | 127cb89ac1271bf85798294d450509b7c23019bd (diff) |
Merge branch 'master' of github.com:sustrik/zeromq2
Diffstat (limited to 'src/uuid.cpp')
-rw-r--r-- | src/uuid.cpp | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/src/uuid.cpp b/src/uuid.cpp index 5991bfb..631a625 100644 --- a/src/uuid.cpp +++ b/src/uuid.cpp @@ -97,6 +97,35 @@ const char *zmq::uuid_t::to_string () return string_buf; } +#elif defined ZMQ_HAVE_OPENVMS + +#include <starlet.h> + +#define uuid_generate(x) sys$create_uid(&(x)) + +#define uuid_unparse(x, y) \ + sprintf (y, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x", \ + x.data0, x.data1, x.data2, \ + x.data3 [0], x.data3 [1], \ + x.data3 [2], x.data3 [3], \ + x.data3 [4], x.data3 [5], \ + x.data3 [6], x.data3 [7]); + +zmq::uuid_t::uuid_t () +{ + uuid_generate (uuid); + uuid_unparse (uuid, string_buf); +} + +zmq::uuid_t::~uuid_t () +{ +} + +const char *zmq::uuid_t::to_string () +{ + return string_buf; +} + #else #include <stdio.h> |