fld_link.c 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990
  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 : FIELD *link_field(FIELD *field, int frow, int fcol)
  36. |
  37. | Description : Duplicates the field at the specified position. The
  38. | new field shares its buffers with the original one,
  39. | the attributes are independent.
  40. | If an error occurs, errno is set to
  41. |
  42. | E_BAD_ARGUMENT - invalid argument
  43. | E_SYSTEM_ERROR - system error
  44. |
  45. | Return Values : Pointer to the new field or NULL if failure
  46. +--------------------------------------------------------------------------*/
  47. FIELD *link_field(FIELD * field, int frow, int fcol)
  48. {
  49. FIELD *New_Field = (FIELD *)0;
  50. int err = E_BAD_ARGUMENT;
  51. if (field && (frow>=0) && (fcol>=0) &&
  52. ((err=E_SYSTEM_ERROR) != 0) && /* trick: this resets the default error */
  53. (New_Field = (FIELD *)malloc(sizeof(FIELD))) )
  54. {
  55. *New_Field = *_nc_Default_Field;
  56. New_Field->frow = frow;
  57. New_Field->fcol = fcol;
  58. New_Field->link = field->link;
  59. field->link = New_Field;
  60. New_Field->buf = field->buf;
  61. New_Field->rows = field->rows;
  62. New_Field->cols = field->cols;
  63. New_Field->nrow = field->nrow;
  64. New_Field->nbuf = field->nbuf;
  65. New_Field->drows = field->drows;
  66. New_Field->dcols = field->dcols;
  67. New_Field->maxgrow= field->maxgrow;
  68. New_Field->just = field->just;
  69. New_Field->fore = field->fore;
  70. New_Field->back = field->back;
  71. New_Field->pad = field->pad;
  72. New_Field->opts = field->opts;
  73. New_Field->usrptr = field->usrptr;
  74. if (_nc_Copy_Type(New_Field,field))
  75. return New_Field;
  76. }
  77. if (New_Field)
  78. free_field(New_Field);
  79. SET_ERROR( err );
  80. return (FIELD *)0;
  81. }
  82. /* fld_link.c ends here */