/*
Copyright (C) Magna Carta Software, Inc. 1988-1991.  All Rights Reserved.

FAX02.C
CAPABILITY:
Get state of a CAS-compatible Fax card.

COMPATIBILITY: TURBOC v1.5+, POWERC 1.2+, MSC v5.0+/QUICK C, WATCOM C.
*/

#include <comm.h>
#include <cas.h>


#include <conio.h>

char *logon = "\n\nCopyright (C) Magna Carta Software, Inc. 1989-1991.  All Rights Reserved."
        "\nFAX02 -- Get the status of an installed CAS device."
        "\nThis program was created with Magna Carta's \"C Communications Toolkit\"."
        "\nMagna Carta Software, Inc."
        "\nP.O. Box 475594"
        "\nGarland, TX  75047"
        "\nVoice: (214) 226-6909,  FAX: (214) 226-0386,  BBS: (214) 226-8088.\n";

short main(void);

short main(void)
{
    short ret;
    WORD num_ctl, num_rx;

    fputs(logon, stderr);

    printf("\nTest 1: Get Installed State\n");
    if (!isacas()) {
        fputs("Connection Coprocessor Not Installed", stderr);
        return (EOF);
    }
    printf("Test 2: Run Diagnostics\n");
    ret = cas_run_diagnostics(1);
    if (ret < 0) printf("\tDiagnostics could not be started\n");
    else {
        printf("\tCAS diagnostics running");
        do {
            ret = cas_run_diagnostics(0);
            if (ret < 0) printf("\n\tDiagnostics failed (Error code %d)\n", ret);
            else {
                if (ret == 64) putc('.', stdout);
                else printf("\n\tDiagnostics passed\n");
            }
        } while (ret == 64);
        printf("Test 3: Get Queue Status\n");
        printf("\tSubtest 1: Task Queue\n");
        ret = cas_get_queue_status(CAS_SEND, &num_ctl, &num_rx);
        if (ret < 0) printf("\tError(%#X): Unable to obtain task queue status\n", ret);
        else {
            printf("\t\tTotal no. of task queue changes: %d\n", ret);
            printf("\t\tTotal no. of control files     : %d\n", num_ctl);
        }
    }
    printf("\tSubtest 2: Receive Queue\n");
    ret = cas_get_queue_status(CAS_RECEIVE, &num_ctl, &num_rx);
    if (ret < 0) printf("\tError(%d): Unable to obtain receive queue status", ret);
    else {
        printf("\t\tTotal no. of receive queue changes: %d\n", ret);
        printf("\t\tTotal no. of control files        : %d\n", num_ctl);
        printf("\t\tTotal no. of received files       : %d\n", num_rx);
    }
    printf("\tSubtest 3: Log Queue\n");
    ret = cas_get_queue_status(CAS_LOG, &num_ctl, &num_rx);
    if (ret < 0) printf("\tError(%#X): Unable to obtain log queue status", ret);
    else {
        printf("\t\tTotal no. of log queue changes: %d\n", ret);
        printf("\t\tTotal no. of control files    : %d\n", num_ctl);
    }
    printf("Test 4: Get Autoreceive State\n");
    ret = cas_autoreceive_state(0, 0);
    if (ret < 0) printf("\tError(%#X): Unable to obtain autoreceive state", ret);
    else {
        if (ret == 0) printf("\tAutoreceive disabled\n");
        else printf("\tAutoreceive enabled to %d rings\n", ret);
    }
    printf("Diagnostics Completed");
    getch();

    return (ret);
}