fld_ftlink.c 3.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283
  1. /****************************************************************************
  2. * Copyright (c) 1998 Free Software Foundation, Inc. *
  3. * *
  4. * Permission is hereby granted, free of charge, to any person obtaining a *
  5. * copy of this software and associated documentation files (the *
  6. * "Software"), to deal in the Software without restriction, including *
  7. * without limitation the rights to use, copy, modify, merge, publish, *
  8. * distribute, distribute with modifications, sublicense, and/or sell *
  9. * copies of the Software, and to permit persons to whom the Software is *
  10. * furnished to do so, subject to the following conditions: *
  11. * *
  12. * The above copyright notice and this permission notice shall be included *
  13. * in all copies or substantial portions of the Software. *
  14. * *
  15. * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
  16. * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
  17. * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
  18. * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
  19. * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
  20. * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
  21. * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
  22. * *
  23. * Except as contained in this notice, the name(s) of the above copyright *
  24. * holders shall not be used in advertising or otherwise to promote the *
  25. * sale, use or other dealings in this Software without prior written *
  26. * authorization. *
  27. ****************************************************************************/
  28. /****************************************************************************
  29. * Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1995,1997 *
  30. ****************************************************************************/
  31. #include "form.priv.h"
  32. MODULE_ID("$Id$")
  33. /*---------------------------------------------------------------------------
  34. | Facility : libnform
  35. | Function : FIELDTYPE *link_fieldtype(
  36. | FIELDTYPE *type1,
  37. | FIELDTYPE *type2)
  38. |
  39. | Description : Create a new fieldtype built from the two given types.
  40. | They are connected by an logical 'OR'.
  41. | If an error occurs, errno is set to
  42. | E_BAD_ARGUMENT - invalid arguments
  43. | E_SYSTEM_ERROR - system error (no memory)
  44. |
  45. | Return Values : Fieldtype pointer or NULL if error occurred.
  46. +--------------------------------------------------------------------------*/
  47. FIELDTYPE *link_fieldtype(FIELDTYPE * type1, FIELDTYPE * type2)
  48. {
  49. FIELDTYPE *nftyp = (FIELDTYPE *)0;
  50. if ( type1 && type2 )
  51. {
  52. nftyp = (FIELDTYPE *)malloc(sizeof(FIELDTYPE));
  53. if (nftyp)
  54. {
  55. *nftyp = *_nc_Default_FieldType;
  56. nftyp->status |= _LINKED_TYPE;
  57. if ((type1->status & _HAS_ARGS) || (type2->status & _HAS_ARGS) )
  58. nftyp->status |= _HAS_ARGS;
  59. if ((type1->status & _HAS_CHOICE) || (type2->status & _HAS_CHOICE) )
  60. nftyp->status |= _HAS_CHOICE;
  61. nftyp->left = type1;
  62. nftyp->right = type2;
  63. type1->ref++;
  64. type2->ref++;
  65. }
  66. else
  67. {
  68. SET_ERROR( E_SYSTEM_ERROR );
  69. }
  70. }
  71. else
  72. {
  73. SET_ERROR( E_BAD_ARGUMENT );
  74. }
  75. return nftyp;
  76. }
  77. /* fld_ftlink.c ends here */