usr/othersrc/contrib/isode/dsap/net/daprovider.c

/* daprovider.c - DAP: Support for DAP Actions */

#ifndef lint
static char *rcsid = "$Header: /f/osi/dsap/net/RCS/daprovider.c,v 7.1 91/02/22 09:21:06 mrose Interim $";
#endif

/*
 * $Header: /f/osi/dsap/net/RCS/daprovider.c,v 7.1 91/02/22 09:21:06 mrose Interim $
 *
 *
 * $Log:        daprovider.c,v $
 * Revision 7.1  91/02/22  09:21:06  mrose
 * Interim 6.8
 *
 * Revision 7.0  90/07/26  14:45:26  mrose
 * *** empty log message ***
 *
 */

/*
 *                                NOTICE
 *
 *    Acquisition, use, and distribution of this module and related
 *    materials are subject to the restrictions of a license agreement.
 *    Consult the Preface in the User's Manual for the full terms of
 *    this agreement.
 *
 */


/* LINTLIBRARY */

#include <stdio.h>
#include "quipu/dap2.h"
#include "tailor.h"

/* \f   BIND interface */

int       ronot2daplose (di, event, rni)
struct DAPindication    * di;
char                    * event;
struct RoNOTindication  * rni;
{

        char    * cp;
        char      buffer[BUFSIZ];

/*
        if (event)
                SLOG (addr_log, LLOG_EXCEPTIONS, NULLCP,
                        ((rni->rni_cc > 0) ? "%s: %s [%*.*s]" : "%s: %s",
                        event, AcErrString (rni->rni_reason), rni->rni_cc,
                        rni->rni_cc, rni->rni_data));
*/
        (void) sprintf (cp = buffer, " (Error in RO-BIND)");

        if (rni->rni_cc > 0)
                return (daplose (di, DA_RONOT, NULLCP, "%*.*s%s",
                        rni->rni_cc, rni->rni_cc, rni->rni_data, cp));
        else
                return (daplose (di, DA_RONOT, NULLCP, "%s", cp));
}

/* \f   ROS interface */

int       ros2daplose (di, event, rop)
struct DAPindication    * di;
char                    * event;
struct RoSAPpreject     * rop;
{
        char    * cp;
        char      buffer[BUFSIZ];

/*
        if (event)
                SLOG (addr_log, LLOG_EXCEPTIONS, NULLCP,
                        ((rop->rop_cc > 0) ? "%s: %s [%*.*s]" : "%s: %s",
                        event, AcErrString (rop->rop_reason), rop->rop_cc,
                        rop->rop_cc, rop->rop_data));
*/
        (void) sprintf (cp = buffer, " (Error in ROS)");

        if (rop->rop_cc > 0)
                return (daplose (di, DA_ROS, NULLCP, "%*.*s%s",
                        rop->rop_cc, rop->rop_cc, rop->rop_data, cp));
        else
                return (daplose (di, DA_ROS, NULLCP, "%s", cp));
}

int       ros2dapreject (di, event, rou)
struct DAPindication    * di;
char                    * event;
struct RoSAPureject     * rou;
{
        char    * cp;
        char      buffer[BUFSIZ];

        (void) sprintf (cp = buffer, " (Reject at ROS)");

        if (rou->rou_noid)
                return (dapreject (di, DA_ROS, -1, NULLCP, " no op id, reason: %d%s", rou->rou_reason, cp));
        else
                return (dapreject (di, DA_ROS, rou->rou_id, NULLCP, " op id %d, reason: %d%s", rou->rou_id, rou->rou_reason, cp));
}