| 1486 | | pvmchkuid( uid ) |
| 1487 | | int uid; |
| 1488 | | { |
| 1489 | | char *p; |
| 1490 | | |
| 1491 | | |
| 1492 | | if ( !uid ) |
| 1493 | | { |
| 1494 | | |
| 1495 | | if ( (p = getenv( "PVM_ALLOW_ROOT" )) != NULL )
|
| 1496 | | return; |
| 1497 | | |
| 1498 | | printf( "\n" ); |
| 1499 | | printf( "*** Error: PVM is being run as user \"root\" ***!\n" ); |
| 1500 | | printf( "\n" ); |
| 1501 | | printf( "This is not a good idea, and often doesn't work!\n" ); |
| 1502 | | printf( "\n" ); |
| 1503 | | printf( "The root user cannot typically rsh/ssh to remote\n" ); |
| 1504 | | printf( "computers over the network, to add them as hosts\n" ); |
| 1505 | | printf( "to the PVM virtual machine.\n" ); |
| 1506 | | printf( "\n" ); |
| 1507 | | printf( "You can install PVM in a system-wide directory,\n" ); |
| 1508 | | printf( "with the files *owned* by user \"root\",\n" ); |
| 1509 | | printf( "but you need to *run* PVM as a *regular* user!\n" ); |
| 1510 | | printf( "\n" ); |
| 1511 | | printf( "\n" ); |
| 1512 | | printf( "*If* you know what you're doing, and you are\n" ); |
| 1513 | | printf( "willing to accept the security risks, then you\n" ); |
| 1514 | | printf( "can enable root execution of PVM by setting the\n" ); |
| 1515 | | printf( "%s environment variable in your shell.\n", |
| 1516 | | "PVM_ALLOW_ROOT" ); |
| 1517 | | printf( "\n" ); |
| 1518 | | printf( "Please send any inquiries regarding this feature\n" ); |
| 1519 | | printf( "to: pvm@csm.msr.ornl.gov\n" ); |
| 1520 | | printf( "\n" ); |
| 1521 | | |
| 1522 | | pvmbailout(0); |
| 1523 | | exit(1); |
| 1524 | | } |
| 1525 | | } |