username \ pvm3 \ bin \ LINUX \ files
To start the console process, run the program by typing:
When the environment is set up and running, then just execute PVM programs from any window other than the console used to configure the environment. Type the name of the executable as you would any other program, and the environment will handle all of the parallel communication and execution of slave task processes.
If a user accidentally forgets to type "halt" before logging off, there will be daemon processes left running on the remote machines as well as a number of temporary files that must be deleted before the pvm will work properly again. To recover, try the following steps:
dhyatt 10532 0.0 0.5 1384 724 ? S 15:57 0:00 /usr/local/pvm3/lib/LINUX/pvmd3 -s -d0x0 -nstation2 1 c6261101:075f 4 dhyatt 11099 0.0 0.8 1752 1028 ttyp0 S 17:04 0:00 -bash dhyatt 11122 0.0 0.8 2776 1140 ttyp0 R 17:05 0:00 ps -auwx dhyatt 11123 0.0 0.3 1124 408 ttyp0 S 17:05 0:00 grep dhyatt
-rw------- 1 dhyatt faculty 15 Apr 15 15:55 pvmd.1024 -rw------- 1 dhyatt faculty 129 Apr 15 15:55 pvml.1024
// The Master program will send an integer to the slave and will expect to // receive back the reciprocal of that number #include < stdio.h > #include < pvm3.h > #define SLAVENAME "slave0" #define MAXTASKS 10 main() { int nproc, numtasks, num, i, who, msgtype; int mytid; /* my task id */ float reciprocal; /* reciprocal */ int tids[MAXTASKS]; /* slave task ids */ struct pvmhostinfo *hostp[MAXTASKS]; /* pointers to host information */ /* Note: the above struct is not necessary in this minimal program but is a common variable used in many larger PVM programs. It is required for a number of system calls. We thank our substitute, Mr. Tepper, for pointing this out. See "master2.0" for example. */ /* Find this processes task id in PVM */ mytid = pvm_mytid(); /* Set number of slave processes desired */ nproc = MAXTASKS; /* Start up slave tasks */ // If the number of tasks spawned does not match nproc, there's a problem! numtasks = pvm_spawn(SLAVENAME, (char**)0, 0, "", nproc, tids); /* Broadcast data to each slave task */ msgtype = 99; for (i=0; i < nproc; i++) // Cycle through all processes { num = i; // Assign value to num pvm_initsend(PvmDataDefault); // Get message buffer ready to send pvm_pkint(&num, 1, 1); // Pack the number into the buffer pvm_send(tids[num], msgtype); // Send buffer to appropriate process } /* Wait for results from slaves */ msgtype = 55; // This value is arbitrary, just for ID purposes for( i=0 ; i < nproc ; i++ ) // Wait for replies from all processes { pvm_recv( -1, msgtype ); // Wait for message of right type pvm_upkint( &who, 1, 1 ); // Find out who sent message pvm_upkfloat(&reciprocal, 1, 1); // Unpack Reciprocal // Display results printf("Process: %d Reciprocal: %10.6f\n", who, reciprocal ); } /* Program Finished - exit PVM before stopping */ pvm_exit(); }
// This slave process will receive an integer, and send back the reciprocal #include < stdio.h > #include < pvm3.h > main() { int mytid, nproc; int master, msgtype; float reciprocal; int num; /* Enroll in pvm */ mytid = pvm_mytid(); // Get my processor ID /* Receive data from master */ msgtype = 99; // This was arbitrarily set in master.c pvm_recv( -1, msgtype ); // Get ready to receive initial data pvm_upkint(&num,1, 1); // Unpack Number sent by master if (num==0) {reciprocal = 0.0;} else {reciprocal = 1.0 / num;} /* Send data back to master */ pvm_initsend( PvmDataDefault ); // Get ready to send data pvm_pkint( &mytid, 1, 1 ); // Pack which processor I am pvm_pkfloat( &reciprocal, 1, 1); // Pack Reciprocal of number sent msgtype = 55; // Identify message type master = pvm_parent(); // Find out where I came from pvm_send( master, msgtype ); // Send message back to parent process /* Program finished. Exit PVM before stopping */ pvm_exit(); }
Also look at the process ID Numbers, since there were only three machines running in the environment when this program was run. Therefore, the ones that started with the 262*** were all on one machine, the processes starting with 524*** were on another, and 768*** were on the third.
Process: 786448 Reciprocal: 0.250000 Process: 262167 Reciprocal: 0.142857 Process: 262168 Reciprocal: 0.125000 Process: 786449 Reciprocal: 0.200000 Process: 524309 Reciprocal: 0.000000 Process: 786450 Reciprocal: 0.166667 Process: 524310 Reciprocal: 1.000000 Process: 524311 Reciprocal: 0.500000 Process: 524312 Reciprocal: 0.333333 Process: 262169 Reciprocal: 0.111111
The code for those programs is linked below followed by the example
output.
master1.c
slave1.c
Example Output:
   
corona:~/pvm3/bin/LINUX$
   
master1
   
Enter the number of tasks to start? (Max is 10)
   
10
   
System: (station1.tjhsst.edu)
   
   
Process: 1048583 Random: 1693851068
   
System: (station2.tjhsst.edu)
   
   
Process: 786445 Random: 143796173
   
System: (station5.tjhsst.edu)
   
   
Process: 524301 Random: 2124593721
   
System: (mirage.tjhsst.edu)
   
   
Process: 1310733 Random: 1824686042
   
System: (vortex.tjhsst.edu)
   
   
Process: 1572877 Random: 376641819
   
System: (station2.tjhsst.edu)
   
   
Process: 786446 Random: 1297272263
   
System: (station5.tjhsst.edu)
   
   
Process: 524302 Random: 2120426857
   
System: (mirage.tjhsst.edu)
   
   
Process: 1310734 Random: 954237623
   
System: (vortex.tjhsst.edu)
   
   
Process: 1572878 Random: 1380927037
   
System: (corona.tjhsst.edu)
   
   
Process: 262159 Random: 2008959114
   
corona:~/pvm3/bin/LINUX$
Listed below are the two programs as well as the example output:
master2.c
The following text shows a sample run using the programs described previously.
Console Window:
station16:~$ pvm    Start running PVM from station16
pvm> add station1     Set up the environment
1 successful
pvm> add station2
1 successful
pvm> add station3
1 successful
pvm> conf     Check the configuration
4 hosts, 1 data format
pvm> halt
HOST
DTID
ARCH
SPEED
station16 40000 LINUX 1000
station1 80000 LINUX 1000
station2 c0000 LINUX 1000
station3 100000 LINUX 1000
Runtime Window:
station16:~/pvm3/bin/LINUX$ master1     Run the master program from the LINUX directory on station16
How many slave programs (1-MAXTASKS)?
10
Init done:
      Initialization is done and packets have been sent. The last column of the array will hold the sum of the elements
in the row.
0: 5.00 40.00 73.00 14.00 21.00 77.00 86.00 0.00
Slave processes are calculating sums and sending back results
1: 85.00 23.00 16.00 77.00 73.00 39.00 66.00 0.00
2: 97.00 65.00 71.00 32.00 10.00 80.00 72.00 0.00
3: 61.00 76.00 8.00 63.00 57.00 75.00 3.00 0.00
4: 24.00 1.00 0.00 81.00 93.00 26.00 96.00 0.00
5: 15.00 55.00 82.00 52.00 30.00 98.00 29.00 0.00
6: 55.00 89.00 47.00 4.00 7.00 71.00 36.00 0.00
7: 17.00 3.00 60.00 78.00 80.00 68.00 41.00 0.00
8: 37.00 96.00 97.00 13.00 49.00 97.00 95.00 0.00
9: 43.00 75.00 91.00 58.00 82.00 73.00 10.00 0.00
Master process has all data and can now print out results
I got 343.000000 from 3 which is tid 262213
I got 321.000000 from 4 which is tid 262214
I got 316.000000 from 0 which is tid 1048628
I got 484.000000 from 8 which is tid 786477
I got 379.000000 from 1 which is tid 1048629
I got 432.000000 from 9 which is tid 786478
I got 427.000000 from 2 which is tid 1048630
I got 361.000000 from 5 which is tid 524353
I got 309.000000 from 6 which is tid 524354
I got 347.000000 from 7 which is tid 524355
Final:
0: 5.00 40.00 73.00 14.00 21.00 77.00 86.00 316.00
1: 85.00 23.00 16.00 77.00 73.00 39.00 66.00 379.00
2: 97.00 65.00 71.00 32.00 10.00 80.00 72.00 427.00
3: 61.00 76.00 8.00 63.00 57.00 75.00 3.00 343.00
4: 24.00 1.00 0.00 81.00 93.00 26.00 96.00 321.00
5: 15.00 55.00 82.00 52.00 30.00 98.00 29.00 361.00
6: 55.00 89.00 47.00 4.00 7.00 71.00 36.00 309.00
7: 17.00 3.00 60.00 78.00 80.00 68.00 41.00 347.00
8: 37.00 96.00 97.00 13.00 49.00 97.00 95.00 484.00
9: 43.00 75.00 91.00 58.00 82.00 73.00 10.00 432.00
Console Window:
pvm> halt     Always remember to shut down PVM by typing halt. Otherwise, the slave processes remain alive on the other systems even after the user has logged off the console.
station16:~$ logout
Eamon Walsh |
Mandelbrot Set and PVM Eamon used PVM to improve calculation speed for fractals such as the Mandelbrot Set. The image to the left shows the familiar image in the process of being generated. The master program displays a row at a time as soon as the slave process has returned the necessary data.
|
Mike Gordon |
Computer Simulation and PVM Mike used PVM to increase execution speed when simulating the behavior of projectiles in flight. This graphic represents the solution set of possible hits on a target when all possible angles between 0 and 90 degrees (the vertical axis) are matched with a full range of velocities (the horizontal axis). Every pixel on the screen represented a different combination of angle and velocity that was run through the simulation. The green line indicates those combinations which hit the target whereas black means the projectile missed. A more thorough description of this activity can be found in the article Getting Started with Supercomputing.
|