libxdas_sessions.c

Go to the documentation of this file.

/*----------------------------------------------------------------------------
 * Copyright (c) 2006, Novell, Inc.
 * All rights reserved.
 * 
 * Redistribution and use in source and binary forms, with or without 
 * modification, are permitted provided that the following conditions are 
 * met:
 * 
 *     * Redistributions of source code must retain the above copyright 
 *       notice, this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above copyright 
 *       notice, this list of conditions and the following disclaimer in the 
 *       documentation and/or other materials provided with the distribution.
 *     * Neither the name of the Novell nor the names of its contributors 
 *       may be used to endorse or promote products derived from this 
 *       software without specific prior written permission.
 * 
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR 
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *--------------------------------------------------------------------------*/

#include <xdasd.h>

#include "libxdas_impl.h"

#include <stdlib.h>
#include <stdio.h>
#include <time.h>

#ifdef _WIN32
# define WIN32_LEAN_AND_MEAN
# include <windows.h>
#endif

xdas_session * xdas_validate_session(xdas_audit_ref_t das_ref)
{
   xdas_session * xs = (xdas_session *)das_ref;
   return (xs && xs->signature == XDAS_SESSION_SIG)? xs: 0;
}

void xdas_set_session_rights(xdas_session * xs)
{
   /* for now, give everyone all rights */
   xs->security = XDAS_AUDIT_SERVICE | XDAS_AUDIT_SUBMIT 
         | XDAS_AUDIT_IMPORT | XDAS_AUDIT_CONTROL | XDAS_AUDIT_READ;

   /* get security level information here 
    *    this is platform-specific -
    *    we'll need an #ifdef, or an abstraction
    *
    * store security bits in xs->security
    * if (xs->security == 0) return auth failure.
    */
}

int xdas_session_has_rights(xdas_session * xs, unsigned rights)
{
   return (xs->security & rights) == rights? 1: 0;
}

#ifdef _WIN32

static const char * xdas_abbreviate_win32_tzname(const wchar_t * tzstr, 
      char * buf, size_t bufsz)
{
   wchar_t outbuf[32];
   wchar_t * p = outbuf;

   *p++ = *tzstr++;
   while (*tzstr)
   {
      while (*tzstr && *tzstr != L' ')
         tzstr++;
      if (*tzstr)
         *p++ = *++tzstr;
   }
   *p = 0;
   wcstombs(buf, outbuf, bufsz);
   return buf;
}

#endif

static void escape_str(char * dst, const char * src)
{
   do 
   {
      if (*src == ':' || *src == '%')
         *dst++ = '%';
      *dst++ = *src++;
   } while (*src);
}

int xdas_set_time_info(xdas_session * xs)
{
   char tztmp[sizeof xs->time_zone] = "";

   /* @todo: Timezone info has properly been escaped now, but still may
    *        not contain the correct information or format. See Java impl.
    */

#ifdef _WIN32

   HKEY key;
   DWORD tzschema;
   TIME_ZONE_INFORMATION tzi;

   /* read registry time server name for time_source field */
   *xs->time_source = 0;
   if (RegOpenKeyA(HKEY_LOCAL_MACHINE, 
         "SYSTEM\\CurrentControlSet\\Services\\w32time\\Parameters", 
         &key) == ERROR_SUCCESS) 
   {
      char * p;
      DWORD dwBufSz = (DWORD)sizeof(xs->time_source);
      RegQueryValueExA(key, "NtpServer", 0, 0, (LPBYTE)xs->time_source, &dwBufSz);
      RegCloseKey(key);
      if ((p = strchr(xs->time_source, ',')) != 0)
         *p = 0;
   }

   /* get time zone information for time_zone field */
   tzschema = GetTimeZoneInformation(&tzi);
   if (tzschema != TIME_ZONE_ID_INVALID)
   {
      char stz[32];     /* Bias variables are minutes west of GMT */
      LONG bias = tzi.Bias + tzi.StandardBias;
      int ccnt = sprintf(tztmp, "%s%ld", 
            xdas_abbreviate_win32_tzname(tzi.StandardName, stz, sizeof(stz)), 
            bias / 60);
      if (bias % 60)
         ccnt += sprintf(tztmp + ccnt, "%%:%ld", bias % 60);

      if (tzschema != TIME_ZONE_ID_UNKNOWN)
         sprintf(tztmp + ccnt, "%s", 
               xdas_abbreviate_win32_tzname(tzi.DaylightName, stz, sizeof(stz)));
   }

#else

   /* timezone variable is seconds west of GMT */
   int ccnt = sprintf(tztmp, "%s%ld", tzname[0], timezone / 3600);
   if (timezone % 3600)
      ccnt += sprintf(tztmp + ccnt, "%%:%ld", timezone % 3600 / 60);
   if (*tzname[1])
      sprintf(tztmp + ccnt, "%s", tzname[1]);

#endif

   escape_str(xs->time_zone, tztmp);

   xs->time_uncert_int = 0;
   xs->time_uncert_ind = 0;

   return 0;
}

void xdas_internal_terminate_session(xdas_session * xs)
{
   xdas_service_disconnect(xs);
   xdas_buffer_free(xs->req);
   xdas_buffer_free(xs->rsp);
   free(xs->org_info[0]);
   free(xs);
}