krb5/ss/request_tbl.c

	request_tbl.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * Copyright (c) 2000 by Sun Microsystems, Inc.
 * All rights reserved.
 */

#pragma ident   "%Z%%M% %I% %E% SMI"

/*
 * Copyright 1987, 1988 by MIT Student Information Processing Board
 *
 * For copyright information, see copyright.h.
 */

#include "copyright.h"
#include "ss_internal.h"

#define ssrt ss_request_table   /* for some readable code... */

void
ss_add_request_table(sci_idx, rqtbl_ptr, position, code_ptr)
    int sci_idx;
    ssrt *rqtbl_ptr;
    int position;       /* 1 -> becomes second... */
    int *code_ptr;
{
    register ss_data *info;
    register int i, size;

    info = ss_info(sci_idx);
    for (size=0; info->rqt_tables[size] != (ssrt *)NULL; size++)
        ;
    /* size == C subscript of NULL == #elements */
    size += 2;      /* new element, and NULL */
    info->rqt_tables = (ssrt **)realloc((char *)info->rqt_tables,
                        (unsigned)size*sizeof(ssrt));
    if (info->rqt_tables == (ssrt **)NULL) {
        *code_ptr = errno;
        return;
    }
    if (position > size - 2)
        position = size - 2;

    if (size > 1)
        for (i = size - 2; i >= position; i--)
            info->rqt_tables[i+1] = info->rqt_tables[i];

    info->rqt_tables[position] = rqtbl_ptr;
    info->rqt_tables[size-1] = (ssrt *)NULL;
    *code_ptr = 0;
}

void
ss_delete_request_table(sci_idx, rqtbl_ptr, code_ptr)
     int sci_idx;
     ssrt *rqtbl_ptr;
     int *code_ptr;
{
     register ss_data *info;
     register ssrt **rt1, **rt2;

     *code_ptr = SS_ET_TABLE_NOT_FOUND;
     info = ss_info(sci_idx);
     rt1 = info->rqt_tables;
     for (rt2 = rt1; *rt1; rt1++) {
      if (*rt1 != rqtbl_ptr) {
           *rt2++ = *rt1;
           *code_ptr = 0;
      }
     }
     *rt2 = (ssrt *)NULL;
     return;
}