libpurple/protocols/zephyr/ZNewLocU.c

   1 /* This file is part of the Project Athena Zephyr Notification System.
   2  * It contains source for the ZNewLocateUser function.
   3  *
   4  *      Created by:     Robert French
   5  *
   6  *      Copyright (c) 1987,1988,1991 by the Massachusetts Institute of Technology.
   7  *      For copying and distribution information, see the file
   8  *      "mit-copyright.h".
   9  */
  10
  11 #include "internal.h"
  12
  13 Code_t ZLocateUser(user, nlocs, auth)
  14     char *user;
  15     int *nlocs;
  16     Z_AuthProc auth;
  17 {
  18     Code_t retval;
  19     ZNotice_t notice;
  20     ZAsyncLocateData_t zald;
  21
  22     (void) ZFlushLocations();   /* ZFlushLocations never fails (the library
  23                                    is allowed to know this). */
  24
  25     if ((retval = ZRequestLocations(user, &zald, UNACKED, auth)) != ZERR_NONE)
  26         return(retval);
  27
  28     retval = Z_WaitForNotice (&notice, ZCompareALDPred, &zald, SRV_TIMEOUT);
  29     if (retval == ZERR_NONOTICE)
  30         return ETIMEDOUT;
  31     if (retval != ZERR_NONE)
  32         return retval;
  33
  34     if ((retval = ZParseLocations(&notice, &zald, nlocs, NULL)) != ZERR_NONE) {
  35         ZFreeNotice(&notice);
  36         return(retval);
  37     }
  38
  39     ZFreeNotice(&notice);
  40     ZFreeALD(&zald);
  41     return(ZERR_NONE);
  42 }