src/ptclib/pils.cxx

   1 /*
   2  * pils.cxx
   3  *
   4  * Microsoft Internet Location Server Protocol interface class.
   5  *
   6  * Portable Windows Library
   7  *
   8  * Copyright (c) 1993-2003 Equivalence Pty. Ltd.
   9  *
  10  * The contents of this file are subject to the Mozilla Public License
  11  * Version 1.0 (the "License"); you may not use this file except in
  12  * compliance with the License. You may obtain a copy of the License at
  13  * http://www.mozilla.org/MPL/
  14  *
  15  * Software distributed under the License is distributed on an "AS IS"
  16  * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
  17  * the License for the specific language governing rights and limitations
  18  * under the License.
  19  *
  20  * The Original Code is Portable Windows Library.
  21  *
  22  * The Initial Developer of the Original Code is Equivalence Pty. Ltd.
  23  *
  24  * Contributor(s): ______________________________________.
  25  *
  26  * $Log$
  27  * Revision 1.5  2003/06/05 23:19:52  rjongbloed
  28  * Changed LDAP version to be compatible with ILS servers.
  29  *
  30  * Revision 1.4  2003/04/11 00:07:56  robertj
  31  * More for Microsoft IP address specification wierdness (registration side).
  32  *
  33  * Revision 1.3  2003/04/07 13:05:20  robertj
  34  * Workaround for Microsoft IP address specification wierdness.
  35  *
  36  * Revision 1.2  2003/03/31 12:18:43  robertj
  37  * Fixed pragma implementation
  38  *
  39  * Revision 1.1  2003/03/31 03:35:20  robertj
  40  * Major addition of LDAP functionality.
  41  * Added ILS specialisation of LDAP.
  42  *
  43  */
  44
  45 #ifdef __GNUC__
  46 #pragma implementation "pils.h"
  47 #endif
  48
  49 #include <ptlib.h>
  50
  51 #include <ptclib/pils.h>
  52
  53
  54 #if P_LDAP
  55
  56 // Microsoft in their infinite wisdom save the IP address as an little endian
  57 // integer from a 32 bit integer that was in network byte order (big endian)
  58 // which causes immense confusion. Reading into a PIPSocket::Address does not
  59 // work as it assumes that any integer forms would be in host order.
  60 istream & operator>>(istream & s, PILSSession::MSIPAddress & a)
  61 {
  62   DWORD u;
  63   s >> u;
  64
  65 #if PBYTE_ORDER==PLITTLE_ENDIAN
  66   a = u;
  67 #else
  68   a = PIPSocket::Address((BYTE)(u>>24),(BYTE)(u>>16),(BYTE)(u>>8),(BYTE)u);
  69 #endif
  70
  71   return s;
  72 }
  73
  74
  75 ostream & operator<<(ostream & s, PILSSession::MSIPAddress & a)
  76 {
  77 #if PBYTE_ORDER==PLITTLE_ENDIAN
  78   DWORD u = a;
  79 #else
  80   DWORD u = (a.Byte1()<<24)|(a.Byte2()<<16)|(a.Byte3()<<8)|a.Byte4();
  81 #endif
  82
  83   return s << u;
  84 }
  85
  86
  87 ///////////////////////////////////////////////////////////////////////////////
  88
  89 PILSSession::PILSSession()
  90   : PLDAPSession("objectClass=RTPerson")
  91 {
  92   protocolVersion = 2;
  93 }
  94
  95
  96 BOOL PILSSession::AddPerson(const RTPerson & person)
  97 {
  98   return Add(person.GetDN(), person);
  99 }
 100
 101
 102 BOOL PILSSession::ModifyPerson(const RTPerson & person)
 103 {
 104   return Modify(person.GetDN(), person);
 105 }
 106
 107
 108 BOOL PILSSession::DeletePerson(const RTPerson & person)
 109 {
 110   return Delete(person.GetDN());
 111 }
 112
 113
 114 BOOL PILSSession::SearchPerson(const PString & canonicalName, RTPerson & person)
 115 {
 116   SearchContext context;
 117   if (!Search(context, "cn="+canonicalName))
 118     return FALSE;
 119
 120   if (!GetSearchResult(context, person))
 121     return FALSE;
 122
 123   // Return FALSE if there is more than one match
 124   return !GetNextSearchResult(context);
 125 }
 126
 127
 128 PList<PILSSession::RTPerson> PILSSession::SearchPeople(const PString & filter)
 129 {
 130   PList<RTPerson> persons;
 131
 132   SearchContext context;
 133   if (Search(context, filter)) {
 134     do {
 135       RTPerson * person = new RTPerson;
 136       if (GetSearchResult(context, *person))
 137         persons.Append(person);
 138       else
 139         delete person;
 140     } while (GetNextSearchResult(context));
 141   }
 142
 143   return persons;
 144 }
 145
 146
 147 PString PILSSession::RTPerson::GetDN() const
 148 {
 149   PStringStream dn;
 150
 151   if (!c)
 152     dn << "c=" << c << ", ";
 153
 154   if (!o)
 155     dn << "o=" << o << ", ";
 156
 157   dn << "cn=" + cn + ", objectClass=" + objectClass;
 158
 159   return dn;
 160 }
 161
 162
 163 #endif // P_LDAP
 164
 165
 166 // End of file ////////////////////////////////////////////////////////////////