#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>

#include <stdio.h>

externchar    doecho, sndbinary, rcvbinary;    /* telnet options */externchar    *host, scrname[];
extern    FILE    *scrfp;

/*ARGSUSED*/int
status(FILE *sfp, FILE *tfp, int c)
{
    struct    sockaddr_in    sin;
    int            sinlen;

    fprintf(tfp, "\nconnected to \"%s\" ", host);

    sinlen = sizeof(sin);
    if (getsockname(fileno(sfp), (struct sockaddr *)&sin,
            &sinlen) == 0)
        fprintf(tfp, "local port %d ", ntohs(sin.sin_port));
    sinlen = sizeof(sin);
    if (getpeername(fileno(sfp), (struct sockaddr *)&sin,
            &sinlen) == 0)
        fprintf(tfp, "remote port %d ", ntohs(sin.sin_port));
    (void) putc('\n', tfp);
    if (doecho || sndbinary || rcvbinary) {
        printf("options in effect: ");
        if (doecho)
            fprintf(tfp, "remote_echo ");
        if (sndbinary)
            fprintf(tfp, "send_binary ");
        if (rcvbinary)
            fprintf(tfp, "receive_binary ");
        (void) putc('\n', tfp);
    }
    if (scrfp)
        fprintf(tfp, "scripting to file \"%s\"\n", scrname);
    return 0;
}