rubywmq 0.3.0-i386-mswin32-mq6
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- data/LICENSE +13 -0
- data/README +73 -0
- data/doc/classes/WMQ.html +6300 -0
- data/doc/classes/WMQ/Message.html +376 -0
- data/doc/classes/WMQ/Message.src/M000001.html +77 -0
- data/doc/classes/WMQ/Message.src/M000002.html +27 -0
- data/doc/classes/WMQ/Queue.html +1459 -0
- data/doc/classes/WMQ/Queue.src/M000003.html +205 -0
- data/doc/classes/WMQ/Queue.src/M000004.html +107 -0
- data/doc/classes/WMQ/Queue.src/M000005.html +198 -0
- data/doc/classes/WMQ/Queue.src/M000006.html +66 -0
- data/doc/classes/WMQ/Queue.src/M000007.html +203 -0
- data/doc/classes/WMQ/Queue.src/M000008.html +265 -0
- data/doc/classes/WMQ/Queue.src/M000009.html +120 -0
- data/doc/classes/WMQ/Queue.src/M000010.html +28 -0
- data/doc/classes/WMQ/Queue.src/M000011.html +30 -0
- data/doc/classes/WMQ/Queue.src/M000012.html +31 -0
- data/doc/classes/WMQ/Queue.src/M000013.html +31 -0
- data/doc/classes/WMQ/Queue.src/M000014.html +31 -0
- data/doc/classes/WMQ/QueueManager.html +1529 -0
- data/doc/classes/WMQ/QueueManager.src/M000015.html +182 -0
- data/doc/classes/WMQ/QueueManager.src/M000016.html +194 -0
- data/doc/classes/WMQ/QueueManager.src/M000017.html +92 -0
- data/doc/classes/WMQ/QueueManager.src/M000018.html +70 -0
- data/doc/classes/WMQ/QueueManager.src/M000019.html +49 -0
- data/doc/classes/WMQ/QueueManager.src/M000020.html +49 -0
- data/doc/classes/WMQ/QueueManager.src/M000021.html +63 -0
- data/doc/classes/WMQ/QueueManager.src/M000022.html +61 -0
- data/doc/classes/WMQ/QueueManager.src/M000023.html +65 -0
- data/doc/classes/WMQ/QueueManager.src/M000024.html +232 -0
- data/doc/classes/WMQ/QueueManager.src/M000025.html +30 -0
- data/doc/classes/WMQ/QueueManager.src/M000026.html +31 -0
- data/doc/classes/WMQ/QueueManager.src/M000027.html +31 -0
- data/doc/classes/WMQ/QueueManager.src/M000028.html +38 -0
- data/doc/classes/WMQ/QueueManager.src/M000029.html +33 -0
- data/doc/classes/WMQ/QueueManager.src/M000030.html +21 -0
- data/doc/classes/WMQ/QueueManager.src/M000031.html +284 -0
- data/doc/classes/WMQ/QueueManager.src/M000032.html +24 -0
- data/doc/classes/WMQ/QueueManager.src/M000033.html +18 -0
- data/doc/classes/WMQ/QueueManager.src/M000034.html +46 -0
- data/doc/classes/WMQ/QueueManager.src/M000035.html +27 -0
- data/doc/classes/WMQ/WMQException.html +111 -0
- data/doc/created.rid +1 -0
- data/doc/files/ext/lib/wmq_const_admin_rb.html +128 -0
- data/doc/files/ext/lib/wmq_const_rb.html +128 -0
- data/doc/files/ext/lib/wmq_temp_rb.html +122 -0
- data/doc/files/ext/wmq_c.html +101 -0
- data/doc/files/ext/wmq_message_c.html +101 -0
- data/doc/files/ext/wmq_queue_c.html +101 -0
- data/doc/files/ext/wmq_queue_manager_c.html +101 -0
- data/doc/fr_class_index.html +31 -0
- data/doc/fr_file_index.html +33 -0
- data/doc/fr_method_index.html +61 -0
- data/doc/index.html +24 -0
- data/doc/rdoc-style.css +208 -0
- data/examples/each_a.rb +31 -0
- data/examples/each_b.rb +40 -0
- data/examples/each_header.rb +37 -0
- data/examples/files_to_q.cfg +24 -0
- data/examples/files_to_q.rb +46 -0
- data/examples/get_a.rb +34 -0
- data/examples/get_client.rb +50 -0
- data/examples/put1_a.rb +24 -0
- data/examples/put1_b.rb +32 -0
- data/examples/put1_c.rb +31 -0
- data/examples/put_a.rb +34 -0
- data/examples/put_b.rb +42 -0
- data/examples/put_dlh.rb +40 -0
- data/examples/put_dynamic_q.rb +37 -0
- data/examples/put_rfh.rb +66 -0
- data/examples/put_rfh2_a.rb +42 -0
- data/examples/put_rfh2_b.rb +42 -0
- data/examples/put_xmit_q.rb +32 -0
- data/examples/q_to_files.cfg +17 -0
- data/examples/q_to_files.rb +47 -0
- data/examples/request.rb +59 -0
- data/examples/server.rb +96 -0
- data/lib/wmq.rb +25 -0
- data/lib/wmq/wmq.so +0 -0
- data/lib/wmq/wmq_const.rb +745 -0
- data/lib/wmq/wmq_const_admin.rb +555 -0
- data/lib/wmq/wmq_temp.rb +197 -0
- data/tests/test.rb +299 -0
- metadata +131 -0
|
@@ -0,0 +1,30 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>comp_code (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Return the completion code for the last MQ operation
|
|
15
|
+
*
|
|
16
|
+
* Returns => FixNum
|
|
17
|
+
* * WMQ::MQCC_OK 0
|
|
18
|
+
* * WMQ::MQCC_WARNING 1
|
|
19
|
+
* * WMQ::MQCC_FAILED 2
|
|
20
|
+
* * WMQ::MQCC_UNKNOWN -1
|
|
21
|
+
*
|
|
22
|
+
*/
|
|
23
|
+
VALUE QueueManager_comp_code(VALUE self)
|
|
24
|
+
{
|
|
25
|
+
PQUEUE_MANAGER pqm;
|
|
26
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
27
|
+
return LONG2NUM(pqm->comp_code);
|
|
28
|
+
}</pre>
|
|
29
|
+
</body>
|
|
30
|
+
</html>
|
|
@@ -0,0 +1,31 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>reason_code (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Return the reason code for the last MQ operation
|
|
15
|
+
*
|
|
16
|
+
* Returns => FixNum
|
|
17
|
+
* * For a complete list of reason codes, please see WMQ Constants or
|
|
18
|
+
* the WebSphere MQ documentation for Reason Codes
|
|
19
|
+
*
|
|
20
|
+
* Note
|
|
21
|
+
* * The list of Reason Codes varies depending on the version of WebSphere MQ
|
|
22
|
+
* and the operating system on which Ruby WMQ was compiled
|
|
23
|
+
*/
|
|
24
|
+
VALUE QueueManager_reason_code(VALUE self)
|
|
25
|
+
{
|
|
26
|
+
PQUEUE_MANAGER pqm;
|
|
27
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
28
|
+
return LONG2NUM(pqm->reason_code);
|
|
29
|
+
}</pre>
|
|
30
|
+
</body>
|
|
31
|
+
</html>
|
|
@@ -0,0 +1,31 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>reason (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Returns a textual representation of the reason_code for the last MQ operation
|
|
15
|
+
*
|
|
16
|
+
* Returns => String
|
|
17
|
+
* * For a complete list of reasons, please see WMQ Constants or
|
|
18
|
+
* the WebSphere MQ documentation for Reason Codes
|
|
19
|
+
*
|
|
20
|
+
* Note
|
|
21
|
+
* * The list of Reason Codes varies depending on the version of WebSphere MQ
|
|
22
|
+
* and the operating system on which Ruby WMQ was compiled
|
|
23
|
+
*/
|
|
24
|
+
VALUE QueueManager_reason(VALUE self)
|
|
25
|
+
{
|
|
26
|
+
PQUEUE_MANAGER pqm;
|
|
27
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
28
|
+
return rb_str_new2(wmq_reason(pqm->reason_code));
|
|
29
|
+
}</pre>
|
|
30
|
+
</body>
|
|
31
|
+
</html>
|
|
@@ -0,0 +1,38 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>exception_on_error (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Returns whether this QueueManager instance is set
|
|
15
|
+
* to throw a WMQ::WMQException whenever an MQ operation fails
|
|
16
|
+
*
|
|
17
|
+
* Returns:
|
|
18
|
+
* * true : This QueueManager instance will throw a WMQ::WMQException whenever
|
|
19
|
+
* an MQ operation fails. I.e. if comp_code != WMQ::OK.
|
|
20
|
+
* * false: WMQ::WMQException will not be thrown
|
|
21
|
+
*
|
|
22
|
+
* Note:
|
|
23
|
+
* * RuntimeError and ArgumentError exceptions are always thrown regardless of the
|
|
24
|
+
* value of exception_on_error
|
|
25
|
+
*/
|
|
26
|
+
VALUE QueueManager_exception_on_error(VALUE self)
|
|
27
|
+
{
|
|
28
|
+
PQUEUE_MANAGER pqm;
|
|
29
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
30
|
+
if (pqm->exception_on_error)
|
|
31
|
+
{
|
|
32
|
+
return Qtrue;
|
|
33
|
+
}
|
|
34
|
+
|
|
35
|
+
return Qfalse;
|
|
36
|
+
}</pre>
|
|
37
|
+
</body>
|
|
38
|
+
</html>
|
|
@@ -0,0 +1,33 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>connected? (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Returns whether this QueueManager instance is currently
|
|
15
|
+
* connected to a WebSphere MQ queue manager
|
|
16
|
+
*
|
|
17
|
+
* Returns:
|
|
18
|
+
* * true : This QueueManager instance is connected to a local or remote queue manager
|
|
19
|
+
* * false: This QueueManager instance is not currently connected to a local or
|
|
20
|
+
* remote queue manager
|
|
21
|
+
*/
|
|
22
|
+
VALUE QueueManager_connected_q(VALUE self)
|
|
23
|
+
{
|
|
24
|
+
PQUEUE_MANAGER pqm;
|
|
25
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
26
|
+
if (pqm->hcon)
|
|
27
|
+
{
|
|
28
|
+
return Qtrue;
|
|
29
|
+
}
|
|
30
|
+
return Qfalse;
|
|
31
|
+
}</pre>
|
|
32
|
+
</body>
|
|
33
|
+
</html>
|
|
@@ -0,0 +1,21 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>name (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* Returns the QueueManager name => String
|
|
15
|
+
*/
|
|
16
|
+
VALUE QueueManager_name(VALUE self)
|
|
17
|
+
{
|
|
18
|
+
return rb_iv_get(self,"@name");
|
|
19
|
+
}</pre>
|
|
20
|
+
</body>
|
|
21
|
+
</html>
|
|
@@ -0,0 +1,284 @@
|
|
|
1
|
+
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
2
|
+
<!DOCTYPE html
|
|
3
|
+
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
|
4
|
+
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
5
|
+
|
|
6
|
+
<html>
|
|
7
|
+
<head>
|
|
8
|
+
<title>execute (WMQ::QueueManager)</title>
|
|
9
|
+
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
10
|
+
<link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
|
|
11
|
+
</head>
|
|
12
|
+
<body class="standalone-code">
|
|
13
|
+
<pre>/*
|
|
14
|
+
* call-seq:
|
|
15
|
+
* execute(...)
|
|
16
|
+
*
|
|
17
|
+
* Execute an Administration command against the local queue manager
|
|
18
|
+
*
|
|
19
|
+
* Parameters:
|
|
20
|
+
* * Since the number of parameters can vary dramatically, all parameters are passed by name in a hash
|
|
21
|
+
* * The entire MQ Administration interface has been implemented.
|
|
22
|
+
* Rather than re-documentation the hundreds of options, a standard
|
|
23
|
+
* convention has been used to map the MQ constants to Symbols in Ruby.
|
|
24
|
+
*
|
|
25
|
+
* For all MQ Admin commands, just drop the MQAI_ off the front and
|
|
26
|
+
* convert the command name to lower case.
|
|
27
|
+
* * E.g. MQAI_INQUIRE_Q becomes inquire_q
|
|
28
|
+
*
|
|
29
|
+
* For the hundreds of parameters, a similiar technique is followed.
|
|
30
|
+
* Remove the prefixes: MQCA_, MQIA_, etc.. and convert to lowercase
|
|
31
|
+
* * E.g. MQCA_Q_NAME becomes :q_name
|
|
32
|
+
*
|
|
33
|
+
* Example
|
|
34
|
+
* WMQ::QueueManager.connect do |qmgr|
|
|
35
|
+
* result = qmgr.execute(
|
|
36
|
+
* :command => :inquire_q,
|
|
37
|
+
* :q_name => 'MY.LOCAL.QUEUE',
|
|
38
|
+
* :q_type => WMQ::MQQT_LOCAL,
|
|
39
|
+
* :current_q_depth => nil
|
|
40
|
+
* )
|
|
41
|
+
* # OR, we can replace the method name execute with the MQAI command:
|
|
42
|
+
* result = qmgr.inquire_q(
|
|
43
|
+
* :q_name => 'MY.LOCAL.QUEUE',
|
|
44
|
+
* :q_type => WMQ::MQQT_LOCAL,
|
|
45
|
+
* :current_q_depth => nil
|
|
46
|
+
* )
|
|
47
|
+
*
|
|
48
|
+
* Complete Example:
|
|
49
|
+
* require 'wmq/wmq'
|
|
50
|
+
* require 'wmq/wmq_const_admin'
|
|
51
|
+
* WMQ::QueueManager.connect(:q_mgr_name=>'REID', :connection_name=>'localhost(1414)') do |qmgr|
|
|
52
|
+
* qmgr.reset_q_stats(:q_name=>'*').each {|item| p item }
|
|
53
|
+
* end
|
|
54
|
+
*
|
|
55
|
+
* Some one line examples
|
|
56
|
+
* qmgr.inquire_q(:q_name=>'TEST*').each {|item| p item }
|
|
57
|
+
*
|
|
58
|
+
* qmgr.inquire_q(:q_name=>'TEST*', :q_type=>WMQ::MQQT_LOCAL, :current_q_depth=>nil).each {|item| p item }
|
|
59
|
+
*
|
|
60
|
+
* qmgr.inquire_process(:process_name=>'*').each {|item| p item }
|
|
61
|
+
*
|
|
62
|
+
* qmgr.ping_q_mgr.each {|item| p item }
|
|
63
|
+
*
|
|
64
|
+
* qmgr.refresh_security.each {|item| p item }
|
|
65
|
+
*
|
|
66
|
+
* qmgr.inquire_q_status(:q_name=>'TEST*', :q_status_type=>:q_status, :q_status_attrs=>:process_id).each {|item| p item }
|
|
67
|
+
*
|
|
68
|
+
* qmgr.start_channel_listener.each {|item| p item }
|
|
69
|
+
*
|
|
70
|
+
* qmgr.inquire_channel_status(:channel_name=>'*').each {|item| p item }
|
|
71
|
+
*/
|
|
72
|
+
VALUE QueueManager_execute(VALUE self, VALUE hash)
|
|
73
|
+
{
|
|
74
|
+
#ifdef MQHB_UNUSABLE_HBAG
|
|
75
|
+
VALUE val, str;
|
|
76
|
+
PQUEUE_MANAGER pqm;
|
|
77
|
+
Data_Get_Struct(self, QUEUE_MANAGER, pqm);
|
|
78
|
+
|
|
79
|
+
Check_Type(hash, T_HASH);
|
|
80
|
+
|
|
81
|
+
if (pqm->admin_bag == MQHB_UNUSABLE_HBAG) /* Lazy create admin bag */
|
|
82
|
+
{
|
|
83
|
+
pqm->mqCreateBag(MQCBO_ADMIN_BAG, &pqm->admin_bag, &pqm->comp_code, &pqm->reason_code);
|
|
84
|
+
CHECK_COMPLETION_CODE("Creating the admin bag")
|
|
85
|
+
}
|
|
86
|
+
else
|
|
87
|
+
{
|
|
88
|
+
pqm->mqClearBag(pqm->admin_bag, &pqm->comp_code, &pqm->reason_code);
|
|
89
|
+
CHECK_COMPLETION_CODE("Clearing the admin bag")
|
|
90
|
+
}
|
|
91
|
+
|
|
92
|
+
if (pqm->reply_bag == MQHB_UNUSABLE_HBAG) /* Lazy create reply bag */
|
|
93
|
+
{
|
|
94
|
+
pqm->mqCreateBag(MQCBO_ADMIN_BAG, &pqm->reply_bag, &pqm->comp_code, &pqm->reason_code);
|
|
95
|
+
CHECK_COMPLETION_CODE("Creating the reply bag")
|
|
96
|
+
}
|
|
97
|
+
else
|
|
98
|
+
{
|
|
99
|
+
pqm->mqClearBag(pqm->reply_bag, &pqm->comp_code, &pqm->reason_code);
|
|
100
|
+
CHECK_COMPLETION_CODE("Clearing the reply bag")
|
|
101
|
+
}
|
|
102
|
+
|
|
103
|
+
val = rb_hash_aref(hash, ID2SYM(ID_command)); /* :command */
|
|
104
|
+
if (NIL_P(val))
|
|
105
|
+
{
|
|
106
|
+
rb_raise(rb_eArgError, "WMQ::QueueManager#execute Mandatory parameter :command missing");
|
|
107
|
+
}
|
|
108
|
+
#if RUBY_VERSION_CODE > 183
|
|
109
|
+
rb_hash_foreach(hash, QueueManager_execute_each, (VALUE)pqm);
|
|
110
|
+
#else
|
|
111
|
+
rb_iterate (rb_each, hash, QueueManager_execute_each, (VALUE)pqm);
|
|
112
|
+
#endif
|
|
113
|
+
if(pqm->trace_level) printf ("WMQ::QueueManager#execute() Queue Manager Handle:%ld\n", pqm->hcon);
|
|
114
|
+
|
|
115
|
+
pqm->mqExecute(
|
|
116
|
+
pqm->hcon, /* MQ connection handle */
|
|
117
|
+
wmq_command_lookup(rb_to_id(val)), /* Command to be executed */
|
|
118
|
+
MQHB_NONE, /* No options bag */
|
|
119
|
+
pqm->admin_bag, /* Handle to bag containing commands */
|
|
120
|
+
pqm->reply_bag, /* Handle to bag to receive the response*/
|
|
121
|
+
MQHO_NONE, /* Put msg on SYSTEM.ADMIN.COMMAND.QUEUE*/
|
|
122
|
+
MQHO_NONE, /* Create a dynamic q for the response */
|
|
123
|
+
&pqm->comp_code, /* Completion code from the mqexecute */
|
|
124
|
+
&pqm->reason_code); /* Reason code from mqexecute call */
|
|
125
|
+
|
|
126
|
+
if(pqm->trace_level) printf("WMQ::QueueManager#execute() completed with reason:%s\n", wmq_reason(pqm->reason_code));
|
|
127
|
+
|
|
128
|
+
if (pqm->comp_code == MQCC_OK)
|
|
129
|
+
{
|
|
130
|
+
MQLONG numberOfBags; /* number of bags in response bag */
|
|
131
|
+
MQHBAG qAttrsBag; /* bag containing q attributes */
|
|
132
|
+
VALUE array;
|
|
133
|
+
MQLONG size;
|
|
134
|
+
MQLONG length;
|
|
135
|
+
MQCHAR inquiry_buffer[WMQ_EXEC_STRING_INQ_BUFFER_SIZE];
|
|
136
|
+
PMQCHAR pChar;
|
|
137
|
+
|
|
138
|
+
MQLONG qDepth; /* depth of queue */
|
|
139
|
+
MQLONG item_type;
|
|
140
|
+
MQLONG selector;
|
|
141
|
+
MQLONG number_of_items;
|
|
142
|
+
int bag_index, items, k;
|
|
143
|
+
|
|
144
|
+
pqm->mqCountItems(pqm->reply_bag, MQHA_BAG_HANDLE, &numberOfBags, &pqm->comp_code, &pqm->reason_code);
|
|
145
|
+
CHECK_COMPLETION_CODE("Counting number of bags returned from the command server")
|
|
146
|
+
|
|
147
|
+
if(pqm->trace_level > 1) printf("WMQ::QueueManager#execute() %ld bags returned\n", numberOfBags);
|
|
148
|
+
array = rb_ary_new2(numberOfBags);
|
|
149
|
+
|
|
150
|
+
for ( bag_index=0; bag_index<numberOfBags; bag_index++) /* For each bag, extract the queue depth */
|
|
151
|
+
{
|
|
152
|
+
hash = rb_hash_new();
|
|
153
|
+
|
|
154
|
+
pqm->mqInquireBag(pqm->reply_bag, MQHA_BAG_HANDLE, bag_index, &qAttrsBag, &pqm->comp_code, &pqm->reason_code);
|
|
155
|
+
CHECK_COMPLETION_CODE("Inquiring for the attribute bag handle")
|
|
156
|
+
|
|
157
|
+
pqm->mqCountItems(qAttrsBag, MQSEL_ALL_SELECTORS, &number_of_items, &pqm->comp_code, &pqm->reason_code);
|
|
158
|
+
CHECK_COMPLETION_CODE("Counting number of items in this bag")
|
|
159
|
+
|
|
160
|
+
if(pqm->trace_level > 1) printf("WMQ::QueueManager#execute() Bag %ld contains %ld items\n", bag_index, number_of_items);
|
|
161
|
+
|
|
162
|
+
for (items=0; items<number_of_items; items++) /* For each item, extract it's value */
|
|
163
|
+
{
|
|
164
|
+
pqm->mqInquireItemInfo(
|
|
165
|
+
qAttrsBag, /* I: Bag handle */
|
|
166
|
+
MQSEL_ANY_SELECTOR, /* I: Item selector */
|
|
167
|
+
items, /* I: Item index */
|
|
168
|
+
&selector, /* O: Selector of item */
|
|
169
|
+
&item_type, /* O: Data type of item */
|
|
170
|
+
&pqm->comp_code,
|
|
171
|
+
&pqm->reason_code);
|
|
172
|
+
CHECK_COMPLETION_CODE("Inquiring Item details")
|
|
173
|
+
|
|
174
|
+
if (selector > 0) /* Skip system selectors */
|
|
175
|
+
{
|
|
176
|
+
switch (item_type)
|
|
177
|
+
{
|
|
178
|
+
case MQIT_INTEGER:
|
|
179
|
+
pqm->mqInquireInteger(qAttrsBag, MQSEL_ALL_SELECTORS, items, &qDepth, &pqm->comp_code, &pqm->reason_code);
|
|
180
|
+
CHECK_COMPLETION_CODE("Inquiring Integer item")
|
|
181
|
+
|
|
182
|
+
if(pqm->trace_level > 1)
|
|
183
|
+
printf("WMQ::QueueManager#execute() Item %ld: Integer:%ld, selector:%ld\n", items, qDepth, selector);
|
|
184
|
+
|
|
185
|
+
rb_hash_aset(hash, ID2SYM(wmq_selector_id(selector)), LONG2NUM(qDepth));
|
|
186
|
+
break;
|
|
187
|
+
|
|
188
|
+
case MQIT_STRING:
|
|
189
|
+
pqm->mqInquireString(qAttrsBag, MQSEL_ALL_SELECTORS, items, WMQ_EXEC_STRING_INQ_BUFFER_SIZE-1, inquiry_buffer,
|
|
190
|
+
&size, NULL, &pqm->comp_code, &pqm->reason_code);
|
|
191
|
+
if(pqm->trace_level > 2)
|
|
192
|
+
printf("WMQ::QueueManager#execute() mqInquireString buffer size: %ld, string size:%ld\n",
|
|
193
|
+
WMQ_EXEC_STRING_INQ_BUFFER_SIZE,size);
|
|
194
|
+
CHECK_COMPLETION_CODE("Inquiring String item")
|
|
195
|
+
|
|
196
|
+
length = 0;
|
|
197
|
+
pChar = inquiry_buffer + size-1;
|
|
198
|
+
for (k = size; k > 0; k--)
|
|
199
|
+
{
|
|
200
|
+
if (*pChar != ' ' && *pChar != 0)
|
|
201
|
+
{
|
|
202
|
+
length = k;
|
|
203
|
+
break;
|
|
204
|
+
}
|
|
205
|
+
pChar--;
|
|
206
|
+
}
|
|
207
|
+
rb_hash_aset(hash, ID2SYM(wmq_selector_id(selector)), rb_str_new(inquiry_buffer, length));
|
|
208
|
+
|
|
209
|
+
if(pqm->trace_level > 1)
|
|
210
|
+
{
|
|
211
|
+
inquiry_buffer[length] = '\0';
|
|
212
|
+
printf("WMQ::QueueManager#execute() Item %ld: String:'%s', selector:%ld\n",
|
|
213
|
+
items, inquiry_buffer, selector);
|
|
214
|
+
}
|
|
215
|
+
break;
|
|
216
|
+
|
|
217
|
+
case MQIT_BAG:
|
|
218
|
+
printf("Ignoring Bag at this level\n");
|
|
219
|
+
break;
|
|
220
|
+
|
|
221
|
+
default:
|
|
222
|
+
printf("Ignoring Unknown type:%ld\n", item_type);
|
|
223
|
+
break;
|
|
224
|
+
}
|
|
225
|
+
}
|
|
226
|
+
}
|
|
227
|
+
rb_ary_push(array, hash);
|
|
228
|
+
}
|
|
229
|
+
return array;
|
|
230
|
+
}
|
|
231
|
+
else
|
|
232
|
+
{
|
|
233
|
+
VALUE name = rb_iv_get(self,"@name");
|
|
234
|
+
name = StringValue(name);
|
|
235
|
+
|
|
236
|
+
if (pqm->reason_code == MQRCCF_COMMAND_FAILED)
|
|
237
|
+
{
|
|
238
|
+
/* Find out why admin command failed */
|
|
239
|
+
MQLONG result_comp_code, result_reason_code;
|
|
240
|
+
MQHBAG result_bag;
|
|
241
|
+
|
|
242
|
+
pqm->mqInquireBag(pqm->reply_bag, MQHA_BAG_HANDLE, 0, &result_bag, &pqm->comp_code, &pqm->reason_code);
|
|
243
|
+
CHECK_COMPLETION_CODE("Getting the result bag handle")
|
|
244
|
+
|
|
245
|
+
pqm->mqInquireInteger(result_bag, MQIASY_COMP_CODE, MQIND_NONE, &result_comp_code, &pqm->comp_code, &pqm->reason_code);
|
|
246
|
+
CHECK_COMPLETION_CODE("Getting the completion code from the result bag")
|
|
247
|
+
|
|
248
|
+
pqm->mqInquireInteger(result_bag, MQIASY_REASON, MQIND_NONE, &result_reason_code, &pqm->comp_code, &pqm->reason_code);
|
|
249
|
+
CHECK_COMPLETION_CODE("Getting the reason code from the result bag")
|
|
250
|
+
|
|
251
|
+
pqm->comp_code = result_comp_code;
|
|
252
|
+
pqm->reason_code = result_reason_code;
|
|
253
|
+
|
|
254
|
+
if(pqm->trace_level)
|
|
255
|
+
printf("WMQ::QueueManager#execute() Error returned by command server:%s\n", wmq_reason(pqm->reason_code));
|
|
256
|
+
}
|
|
257
|
+
|
|
258
|
+
if (pqm->exception_on_error)
|
|
259
|
+
{
|
|
260
|
+
if (pqm->reason_code == MQRC_CMD_SERVER_NOT_AVAILABLE)
|
|
261
|
+
{
|
|
262
|
+
rb_raise(wmq_exception,
|
|
263
|
+
"WMQ::QueueManager#execute(). Please start the WebSphere MQ Command Server : 'strmqcsv %s', reason:%s",
|
|
264
|
+
RSTRING(name)->ptr,
|
|
265
|
+
wmq_reason(pqm->reason_code));
|
|
266
|
+
}
|
|
267
|
+
else
|
|
268
|
+
{
|
|
269
|
+
rb_raise(wmq_exception,
|
|
270
|
+
"WMQ::QueueManager#execute(). Error executing admin command on Queue Manager:%s, reason:%s",
|
|
271
|
+
RSTRING(name)->ptr,
|
|
272
|
+
wmq_reason(pqm->reason_code));
|
|
273
|
+
}
|
|
274
|
+
}
|
|
275
|
+
return Qfalse;
|
|
276
|
+
}
|
|
277
|
+
return Qnil;
|
|
278
|
+
#else
|
|
279
|
+
rb_notimplement();
|
|
280
|
+
return Qfalse;
|
|
281
|
+
#endif
|
|
282
|
+
}</pre>
|
|
283
|
+
</body>
|
|
284
|
+
</html>
|