10 More Discussions You Might Find Interesting
1. AIX
Hello,
In my environment, I have 2 VIOS. There is 1 lpar uses the first VIOS. Now we would like to move it to second VIOS.
My question is, can we migrate the virtual FC on the lpar to second VIOS?
If not, we have to create new virtual FC on second VIOS and map it to the lpar. This also... (3 Replies)
Discussion started by: Phat
3 Replies
2. AIX
Hi,
$ ioslevel
2.2.4.10
I always get these errors when I perform any action using the web interface of IVM / VIOS
Shutdown Partitions Help
You have chosen to shutdown the following partitions. The recommended shutdown method is to use the client operating systems shutdown... (1 Reply)
Discussion started by: filosophizer
1 Replies
3. AIX
I have 4 VIO server. I have to take backup of VIOS. I got the command "backupios" for taking the backup.
My question is if i am taking "backupios -tape /dev/rmt0 " whether it will take rootvg and all the user defined VG / File system which are using for virtual disk for client lpar.
I... (4 Replies)
Discussion started by: sunnybee
4 Replies
4. AIX
Few questions regarding Power HA ( previously known as HACMP) and VIOS POWERVM IVM ( IBM Virtualization I/O Server )
Is it possible to create HACMP cluster between two VIOS servers
Physical Machine_1
VIOS_SERVER_1
LPAR_1
SHARED_DISK_XX
VIOS_SERVER_2
Physical Machine_2
LPAR_2... (6 Replies)
Discussion started by: filosophizer
6 Replies
5. AIX
Hi, I would like to ask you if you could help me to answer these questions. Please.
How to check in vios, size all pv's and to what they are mapped to?
How to chech on vios/hmc which PowerVM edition is used?
Thank you. (7 Replies)
Discussion started by: phobus
7 Replies
6. AIX
Dear friends.. Will it be OK if I backup VIO Server Using smit mksysb?? will it save all virtual host mapings etc...??? thanks in advance (3 Replies)
Discussion started by: Vit0_Corleone
3 Replies
7. AIX
Can anybody provide me with usefull links to get knowledge how VIOS works and how to configure Lpars on it? I am tired and feel lazy to search through IBM redbooks :-) .. so pls help me :p (3 Replies)
Discussion started by: wwwzviadi
3 Replies
8. AIX
I would like to hear your opinions, comments, pros and cons about the IVE (Integrated virtual ethernet) and VIOS (virtual i/o server)
With the VIOS can create virtual ethernet and virtual disk
With the IVE I dont need to create the vios and I can have virtual ethernet (physical and logical... (3 Replies)
Discussion started by: lo-lp-kl
3 Replies
9. AIX
Hello, I'm having troubles running scripts on the VIOS. I want to run a simple script like:
lsmap -all | grep vhost
I've created the file with just like this:
$ cat script1.sh
lsmap -all | grep vhost
When I run the script, it returns the following error message:
script1.sh:... (5 Replies)
Discussion started by: enzote
5 Replies
10. AIX
hi,
i tried to mount using
$ mount nimsrv01:/export/mksysb_dev/VDEVVIO1 /mksysb
in vios mode.
i got following error..
</code>
Some error messages may contain invalid information
for the Virtual I/O Server environment.
mount: 1831-008 giving up on:... (1 Reply)
Discussion started by: honeym210
1 Replies
Test::TCP(3pm) User Contributed Perl Documentation Test::TCP(3pm)
NAME
Test::TCP - testing TCP program
SYNOPSIS
use Test::TCP;
my $server = Test::TCP->new(
code => sub {
my $port = shift;
...
},
);
my $client = MyClient->new(host => '127.0.0.1', port => $server->port);
undef $server; # kill child process on DESTROY
Using memcached:
use Test::TCP;
my $memcached = Test::TCP->new(
code => sub {
my $port = shift;
exec $bin, '-p' => $port;
die "cannot execute $bin: $!";
},
);
my $memd = Cache::Memcached->new({servers => ['127.0.0.1:' . $memcached->port]});
...
And functional interface is available:
use Test::TCP;
test_tcp(
client => sub {
my ($port, $server_pid) = @_;
# send request to the server
},
server => sub {
my $port = shift;
# run server
},
);
DESCRIPTION
Test::TCP is test utilities for TCP/IP programs.
METHODS
empty_port
my $port = empty_port();
Get the available port number, you can use.
test_tcp
Functional interface.
test_tcp(
client => sub {
my $port = shift;
# send request to the server
},
server => sub {
my $port = shift;
# run server
},
# optional
port => 8080
);
wait_port
wait_port(8080);
Waits for a particular port is available for connect.
OO-ish interface
my $server = Test::TCP->new(%args);
Create new instance of Test::TCP.
Arguments are following:
$args{auto_start}: Boolean
Call "$server->start()" after create instance.
Default: true
$args{code}: CodeRef
The callback function. Argument for callback function is: "$code->($pid)".
This parameter is required.
$server->start()
Start the server process. Normally, you don't need to call this method.
$server->stop()
Stop the server process.
my $pid = $server->pid();
Get the pid of child process.
my $port = $server->port();
Get the port number of child process.
FAQ
How to invoke two servers?
You can call test_tcp() twice!
test_tcp(
client => sub {
my $port1 = shift;
test_tcp(
client => sub {
my $port2 = shift;
# some client code here
},
server => sub {
my $port2 = shift;
# some server2 code here
},
);
},
server => sub {
my $port1 = shift;
# some server1 code here
},
);
Or use OO-ish interface instead.
my $server1 = Test::TCP->new(code => sub {
my $port1 = shift;
...
});
my $server2 = Test::TCP->new(code => sub {
my $port2 = shift;
...
});
# your client code here.
...
How do you test server program written in other languages like memcached?
You can use "exec()" in child process.
use strict;
use warnings;
use utf8;
use Test::More;
use Test::TCP 1.08;
use File::Which;
my $bin = scalar which 'memcached';
plan skip_all => 'memcached binary is not found' unless defined $bin;
my $memcached = Test::TCP->new(
code => sub {
my $port = shift;
exec $bin, '-p' => $port;
die "cannot execute $bin: $!";
},
);
use Cache::Memcached;
my $memd = Cache::Memcached->new({servers => ['127.0.0.1:' . $memcached->port]});
$memd->set(foo => 'bar');
is $memd->get('foo'), 'bar';
done_testing;
AUTHOR
Tokuhiro Matsuno <tokuhirom@gmail.com>
THANKS TO
kazuhooku
dragon3
charsbar
Tatsuhiko Miyagawa
lestrrat
SEE ALSO
LICENSE
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-02-01 Test::TCP(3pm)