Qshell Interpreter (qsh) - FTP Directory Listing - IBM

*/
void
MySignalHandler(int signo)
{
switch (signo) {
case SIGINT:
printf(“\nqshc: c ends this program\n”);
printf(“Ended qsh session on %s\n”, sysname);
exit(0);
break;
default:
exit(1);
break;
} /* End of switch */
return;
} /* End of MySignalHandler() */
/*
* Display usage message.
*/
void usage(void)
{
fprintf(stderr, “Usage: qshc [-n] [-p port] hostname\n”);
exit(1);
} /* End of usage() */
[ Legal | AS/400 Glossary ]
Creating and running the server program
Creating the server program
The following example shows how to create the server program on AS/400. The
example assumes that the source for the server program is in member SERVER in
the file QGPL/QCSRC. The server program is owned by a special user profile
QSHSVR that has minimal authorities but private authority to the QSYGETPH(),
QSYRLSPH(), and QWTSETP() APIs. It is not possible to sign on using the
QSHSVR user profile. The server program adopts the authority of QSHSVR so it
can switch to the client’s user profile.
CRTBNDC PGM(QGPL/SERVER)
SRCFILE(QGPL/QCSRC)
SRCMBR(SERVER)
OPTIMIZE(40)
SYSIFCOPT(*IFSIO)
LOCALETYPE(*LOCALE)
USRPRF(*OWNER)
AUT(*USE)
TEXT('Shell server')
CRTUSRPRF USRPRF(QSHSVR)
PASSWORD(*NONE)
USRCLS(*USER)
TEXT('Shell server profile')
CHGOBJOWN OBJ(QGPL/SERVER)
OBJTYPE(*PGM)
NEWOWN(QSHSVR)
GRTOBJAUT OBJ(QSYS/QSYGETPH)
OBJTYPE(*PGM)
USER(QSHSVR)
AUT(*USE)
GRTOBJAUT OBJ(QSYS/QSYRLSPH)
OBJTYPE(*PGM)
Chapter 6. Remote client examples 133