IABSD.fr/xenocara/lib/libX11/src/OCWrap.c

Branch : - branch - master - tag -

• Show log

  Commit

• Author : matthieu
  Date : 2010-05-18 19:37:28
  Hash : aa3c9f93
  Message : Update to libX11 1.3.3. Tested on a bulk ports build by naddy@.

• lib/libX11/src/OCWrap.c

• /*
   * Copyright 1992, 1993 by TOSHIBA Corp.
   *
   * Permission to use, copy, modify, and distribute this software and its
   * documentation for any purpose and without fee is hereby granted, provided
   * that the above copyright notice appear in all copies and that both that
   * copyright notice and this permission notice appear in supporting
   * documentation, and that the name of TOSHIBA not be used in advertising
   * or publicity pertaining to distribution of the software without specific,
   * written prior permission. TOSHIBA make no representations about the
   * suitability of this software for any purpose.  It is provided "as is"
   * without express or implied warranty.
   *
   * TOSHIBA DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
   * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
   * TOSHIBA BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
   * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
   * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
   * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
   * SOFTWARE.
   *
   * Author: Katsuhisa Yano	TOSHIBA Corp.
   *			   	mopi@osa.ilab.toshiba.co.jp
   */
  
  #ifdef HAVE_CONFIG_H
  #include <config.h>
  #endif
  #include "Xlibint.h"
  #include "Xlcint.h"
  
  XOC
  XCreateOC(XOM om, ...)
  {
      va_list var;
      XlcArgList args;
      XOC oc;
      int num_args;
  
      va_start(var, om);
      _XlcCountVaList(var, &num_args);
      va_end(var);
  
      va_start(var, om);
      _XlcVaToArgList(var, num_args, &args);
      va_end(var);
  
      if (args == (XlcArgList) NULL)
  	return (XOC) NULL;
  
      oc = (*om->methods->create_oc)(om, args, num_args);
  
      Xfree(args);
  
      if (oc) {
  	oc->core.next = om->core.oc_list;
  	om->core.oc_list = oc;
      }
  
      return oc;
  }
  
  void
  XDestroyOC(XOC oc)
  {
      XOC prev, oc_list;
  
      prev = oc_list = oc->core.om->core.oc_list;
      if (oc_list == oc)
  	oc->core.om->core.oc_list = oc_list->core.next;
      else {
  	while ((oc_list = oc_list->core.next)) {
  	    if (oc_list == oc) {
  		prev->core.next = oc_list->core.next;
  		break;
  	    }
  	    prev = oc_list;
  	}
      }
  
      (*oc->methods->destroy)(oc);
  }
  
  XOM
  XOMOfOC(XOC oc)
  {
      return oc->core.om;
  }
  
  char *
  XSetOCValues(XOC oc, ...)
  {
      va_list var;
      XlcArgList args;
      char *ret;
      int num_args;
  
      va_start(var, oc);
      _XlcCountVaList(var, &num_args);
      va_end(var);
  
      va_start(var, oc);
      _XlcVaToArgList(var, num_args, &args);
      va_end(var);
  
      if (args == (XlcArgList) NULL)
  	return (char *) NULL;
  
      ret = (*oc->methods->set_values)(oc, args, num_args);
  
      Xfree(args);
  
      return ret;
  }
  
  char *
  XGetOCValues(XOC oc, ...)
  {
      va_list var;
      XlcArgList args;
      char *ret;
      int num_args;
  
      va_start(var, oc);
      _XlcCountVaList(var, &num_args);
      va_end(var);
  
      va_start(var, oc);
      _XlcVaToArgList(var, num_args, &args);
      va_end(var);
  
      if (args == (XlcArgList) NULL)
  	return (char *) NULL;
  
      ret = (*oc->methods->get_values)(oc, args, num_args);
  
      Xfree(args);
  
      return ret;
  }