src/protocols/zephyr/ZSendList.c

   1 /* This file is part of the Project Athena Zephyr Notification System.
   2  * It contains source for the ZSendList function.
   3  *
   4  *      Created by:     Robert French
   5  *
   6  *      $Source$
   7  *      $Author: warmenhoven $
   8  *
   9  *      Copyright (c) 1987 by the Massachusetts Institute of Technology.
  10  *      For copying and distribution information, see the file
  11  *      "mit-copyright.h".
  12  */
  13 /* $Header$ */
  14
  15 #ifndef lint
  16 static char rcsid_ZSendList_c[] = "$Header$";
  17 #endif
  18
  19 #include <internal.h>
  20
  21 Code_t ZSendList(notice, list, nitems, cert_routine)
  22     ZNotice_t *notice;
  23     char *list[];
  24     int nitems;
  25     Z_AuthProc cert_routine;
  26 {
  27     return(ZSrvSendList(notice, list, nitems, cert_routine, Z_XmitFragment));
  28 }
  29
  30 Code_t ZSrvSendList(notice, list, nitems, cert_routine, send_routine)
  31     ZNotice_t *notice;
  32     char *list[];
  33     int nitems;
  34     Z_AuthProc cert_routine;
  35     Code_t (*send_routine)();
  36 {
  37     Code_t retval;
  38     ZNotice_t newnotice;
  39     char *buffer;
  40     int len;
  41
  42     if ((retval = ZFormatNoticeList(notice, list, nitems, &buffer,
  43                                     &len, cert_routine)) != ZERR_NONE)
  44         return (retval);
  45
  46     if ((retval = ZParseNotice(buffer, len, &newnotice)) != ZERR_NONE)
  47         return (retval);
  48
  49     retval = Z_SendFragmentedNotice(&newnotice, len, cert_routine,
  50                                     send_routine);
  51
  52     free(buffer);
  53
  54     return (retval);
  55 }