//-----------------------------------------------------------------------------
// Copyright (c) 2016, 2017 Oracle and/or its affiliates.  All rights reserved.
// This program is free software: you can modify it and/or redistribute it
// under the terms of:
//
// (i)  the Universal Permissive License v 1.0 or at your option, any
//      later version (http://oss.oracle.com/licenses/upl); and/or
//
// (ii) the Apache License v 2.0. (http://www.apache.org/licenses/LICENSE-2.0)
//-----------------------------------------------------------------------------

//-----------------------------------------------------------------------------
// TestCQN.c
//   Tests continuous query notification.
//-----------------------------------------------------------------------------

#ifdef _WIN32
#include <windows.h>
#define sleep(seconds) Sleep(seconds * 1000)
#else
#include <unistd.h>
#endif

#include "Test.h"
#define SQL_TEXT            "select * from TestTempTable"

//-----------------------------------------------------------------------------
// TestCallback()
//   Test callback for continuous query notification.
//-----------------------------------------------------------------------------
void TestCallback(void *context, dpiSubscrMessage *message)
{
    dpiSubscrMessageQuery *query;
    dpiSubscrMessageTable *table;
    dpiSubscrMessageRow *row;
    uint32_t i, j, k;

    // check for error
    if (message->errorInfo) {
        fprintf(stderr, "ERROR: %.*s (%s: %s)\n",
                message->errorInfo->messageLength, message->errorInfo->message,
                message->errorInfo->fnName, message->errorInfo->action);
        return;
    }

    // display contents of message
    printf("===========================================================\n");
    printf("NOTIFICATION RECEIVED from database %.*s (SUBSCR ID %d)\n",
            message->dbNameLength, message->dbName, message->eventType);
    printf("===========================================================\n");
    for (i = 0; i < message->numQueries; i++) {
        query = &message->queries[i];
        printf("--> Query ID: %" PRIu64 "\n", query->id);
        for (j = 0; j < query->numTables; j++) {
            table = &query->tables[j];
            printf("--> --> Table Name: %.*s\n", table->nameLength,
                    table->name);
            printf("--> --> Table Operation: %d\n", table->operation);
            if (table->numRows > 0) {
                printf("--> --> Table Rows:\n");
                for (k = 0; k < table->numRows; k++) {
                    row = &table->rows[k];
                    printf("--> --> --> ROWID: %.*s\n", row->rowidLength,
                            row->rowid);
                    printf("--> --> --> Operation: %d\n", row->operation);
                }
            }
        }
    }
}



//-----------------------------------------------------------------------------
// main()
//-----------------------------------------------------------------------------
int main(int argc, char **argv)
{
    uint32_t subscrId, numQueryColumns, i;
    dpiCommonCreateParams commonParams;
    dpiSubscrCreateParams params;
    dpiSubscr *subscr;
    uint64_t queryId;
    dpiStmt *stmt;
    dpiConn *conn;

    // connect to database
    // NOTE: events mode must be configured
    if (InitializeDPI() < 0)
        return -1;
    if (dpiContext_initCommonCreateParams(gContext, &commonParams) < 0)
        return ShowError();
    commonParams.createMode = DPI_MODE_CREATE_EVENTS;
    conn = GetConnection(0, &commonParams);
    if (!conn)
        return -1;

    // create subscription
    if (dpiContext_initSubscrCreateParams(gContext, &params) < 0)
        return ShowError();
    params.qos = DPI_SUBSCR_QOS_QUERY | DPI_SUBSCR_QOS_ROWIDS;
    params.callback = TestCallback;
    if (dpiConn_newSubscription(conn, &params, &subscr, &subscrId) < 0)
        return ShowError();

    // register query
    if (dpiSubscr_prepareStmt(subscr, SQL_TEXT, strlen(SQL_TEXT), &stmt) < 0)
        return ShowError();
    if (dpiStmt_execute(stmt, DPI_MODE_EXEC_DEFAULT, &numQueryColumns) < 0)
        return ShowError();
    if (dpiStmt_getSubscrQueryId(stmt, &queryId) < 0)
        return ShowError();
    dpiStmt_release(stmt);
    printf("Registered query with id %" PRIu64 "\n\n", queryId);

    // wait for events to come through
    printf("In another session, modify the results of the query\n\n%s\n\n",
            SQL_TEXT);
    printf("Use Ctrl-C to terminate or wait for 100 seconds\n");
    for (i = 0; i < 20; i++) {
        printf("Waiting for notifications...\n");
        sleep(5);
    }

    // clean up
    dpiSubscr_release(subscr);
    dpiConn_release(conn);

    printf("Done.\n");
    return 0;
}