src/protocols/zephyr/ZFlsSubs.c

   1 /* This file is part of the Project Athena Zephyr Notification System.
   2  * It contains source for the ZFlushSubscriptions 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 #include <internal.h>
  16
  17 #ifndef lint
  18 static const char rcsid_ZFlushSubscriptions_c[] = "$Id: ZFlsSubs.c 2096 2001-07-31 01:00:39Z warmenhoven $";
  19 #endif
  20
  21 Code_t ZFlushSubscriptions()
  22 {
  23         register int i;
  24
  25         if (!__subscriptions_list)
  26                 return (ZERR_NONE);
  27
  28         for (i=0;i<__subscriptions_num;i++) {
  29                 free(__subscriptions_list[i].zsub_class);
  30                 free(__subscriptions_list[i].zsub_classinst);
  31                 free(__subscriptions_list[i].zsub_recipient);
  32         }
  33
  34         free((char *)__subscriptions_list);
  35
  36         __subscriptions_list = 0;
  37         __subscriptions_num = 0;
  38
  39         return (ZERR_NONE);
  40 }
  41