AS/400 HELP

"FTPLOG”

FTPLOG is a combination of two programs. FTPLOG is an EXIT program attached to QIBM_QTMF_SVR_LOGIN that records all sign-on attempts to your AS/400 ftp server. FTPHIST displays the log file.

FTPLOG was developed and tested at V4r5 and V5r1.

FTPLOG records and shows the userid and PASSWORD. This may present a security issue. A version is available without the password.

Do not use FTPLOG if you do not want an FTP userid password recorded.

PC INSTRUCTIONS:

Download "FTPLOG to your PC.

Go to a DOS session and enter the following;

FTP SYSTEM (system = your AS/400’s name or IP address)

Enter a valid user id and password

CD QGPL

LCD C:\DIRECTORY (directory= the directory on your pc where you downloaded “ ftplog.savf”

QUOTE SITE NAMEFMT 1

BIN

PUT FTPLOG.SAVF

QUOTE RCMD RSTLIB SAVLIB(FTPLOG) DEV(*SAVF) SAVF(QGPL/FTPLOG)

 Note: If there is a security problem restoring all objects with the command above, sign on to your as/400 as Qsecofr and run RSTLIB from the command line.

DOWNLOAD ftplog.savf

AS/400 INSTRUCTIONS:

DO NOT ATTEMPT TO INSTALL FTPLOG WITHOUT PERMISSION FROM YOUR AS/400 ADMINSTRATOR.

DO NOT ATTEMPT TO INSTALL FTPLOG WITHOUT A FULL UNDERSTANDING OF THE COMMANDS LISTED BELOW.

1) In order for FTPLOG to work it must be registered as an EXIT program.

2) The log files FTPLOG and its logical FTPLOGL1 must be copied to library QGPL as it’s assumed QGPL is in the library list when FTPPOG is called every time the FTP server validates a sign-on attempt. Use the command DSPSYSVAL QUSRLIBL and/or DSPSYSVAL QSYSLIBL to verify that QGPL is in either list. If not you must change either library list to include QGPL. Do NOT install FTPLOG if QGPL is not in either library list as the FTP server may reject all sign-on requests.

3) The instructions below were tested on V4r5 and v5r1 AS/400s. They may not apply or work on other releases. FTPLOG may not work on other releases.

On the command line enter:

RNMOBJ OBJ(QGPL/FTPLOG) OBJTYPE(*FILE) NEWOBJ(FTPLOGSAVF)

MOVOBJ OBJ(FTPLOG/FTPLOG) OBJTYPE(*FILE) TOLIB(QGPL)

MOVOBJ OBJ(FTPLOG/FTPLOGL1) OBJTYPE(*FILE) TOLIB(QGPL)

WRKREGINF scroll down to “QIBM_QTMF_SVR_LOGIN TCPL0100”

OPTION 8

OPTION 1 (add) enter OPT Exit Library

1 FTPLOG FTPLOG

press enter to add FTPLOG as an exit program

The FTP server must be stopped and restarted in order for FTPLOG to work.

Enter:

ENDTCPSVR SERVER(*FTP)

STRTCPSVR SERVER(*FTP)

NOTE: if FTPLOG is not properly installed your FTP server may reject all users. To cancel FTPLOG use the following commands:

WRKREGINF scroll down to “QIBM_QTMF_SVR_LOGIN TCPL0100”

OPTION 8

OPTION 4 (remove) OPT Exit Library

1 FTPLOG FTPLOG

ENDTCPSVR SERVER(*FTP)

STRTCPSVR SERVER(*FTP)

To view FTP server sign-on attempts;

ADDLIBLE FTPLOG

CALL FTPHIST