xref: /freebsd/contrib/ncurses/form/fld_dup.c (revision 7a65641922f404b84e9a249d48593de84d8e8d17)
10e3d5408SPeter Wemm /****************************************************************************
2e1865124SBaptiste Daroussin  * Copyright 2020 Thomas E. Dickey                                          *
3e1865124SBaptiste Daroussin  * Copyright 1998-2010,2012 Free Software Foundation, Inc.                  *
40e3d5408SPeter Wemm  *                                                                          *
50e3d5408SPeter Wemm  * Permission is hereby granted, free of charge, to any person obtaining a  *
60e3d5408SPeter Wemm  * copy of this software and associated documentation files (the            *
70e3d5408SPeter Wemm  * "Software"), to deal in the Software without restriction, including      *
80e3d5408SPeter Wemm  * without limitation the rights to use, copy, modify, merge, publish,      *
90e3d5408SPeter Wemm  * distribute, distribute with modifications, sublicense, and/or sell       *
100e3d5408SPeter Wemm  * copies of the Software, and to permit persons to whom the Software is    *
110e3d5408SPeter Wemm  * furnished to do so, subject to the following conditions:                 *
120e3d5408SPeter Wemm  *                                                                          *
130e3d5408SPeter Wemm  * The above copyright notice and this permission notice shall be included  *
140e3d5408SPeter Wemm  * in all copies or substantial portions of the Software.                   *
150e3d5408SPeter Wemm  *                                                                          *
160e3d5408SPeter Wemm  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
170e3d5408SPeter Wemm  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
180e3d5408SPeter Wemm  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
190e3d5408SPeter Wemm  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
200e3d5408SPeter Wemm  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
210e3d5408SPeter Wemm  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
220e3d5408SPeter Wemm  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
230e3d5408SPeter Wemm  *                                                                          *
240e3d5408SPeter Wemm  * Except as contained in this notice, the name(s) of the above copyright   *
250e3d5408SPeter Wemm  * holders shall not be used in advertising or otherwise to promote the     *
260e3d5408SPeter Wemm  * sale, use or other dealings in this Software without prior written       *
270e3d5408SPeter Wemm  * authorization.                                                           *
280e3d5408SPeter Wemm  ****************************************************************************/
290e3d5408SPeter Wemm 
300e3d5408SPeter Wemm /****************************************************************************
314a1a9510SRong-En Fan  *   Author:  Juergen Pfeifer, 1995,1997                                    *
320e3d5408SPeter Wemm  ****************************************************************************/
330e3d5408SPeter Wemm 
340e3d5408SPeter Wemm #include "form.priv.h"
350e3d5408SPeter Wemm 
36*7a656419SBaptiste Daroussin MODULE_ID("$Id: fld_dup.c,v 1.18 2020/05/24 01:40:20 anonymous.maarten Exp $")
370e3d5408SPeter Wemm 
380e3d5408SPeter Wemm /*---------------------------------------------------------------------------
390e3d5408SPeter Wemm |   Facility      :  libnform
400e3d5408SPeter Wemm |   Function      :  FIELD *dup_field(FIELD *field, int frow, int fcol)
410e3d5408SPeter Wemm |
420e3d5408SPeter Wemm |   Description   :  Duplicates the field at the specified position. All
430e3d5408SPeter Wemm |                    field attributes and the buffers are copied.
440e3d5408SPeter Wemm |                    If an error occurs, errno is set to
450e3d5408SPeter Wemm |
460e3d5408SPeter Wemm |                    E_BAD_ARGUMENT - invalid argument
470e3d5408SPeter Wemm |                    E_SYSTEM_ERROR - system error
480e3d5408SPeter Wemm |
490e3d5408SPeter Wemm |   Return Values :  Pointer to the new field or NULL if failure
500e3d5408SPeter Wemm +--------------------------------------------------------------------------*/
FORM_EXPORT(FIELD *)51*7a656419SBaptiste Daroussin FORM_EXPORT(FIELD *)
527a69bbfbSPeter Wemm dup_field(FIELD *field, int frow, int fcol)
530e3d5408SPeter Wemm {
540e3d5408SPeter Wemm   FIELD *New_Field = (FIELD *)0;
550e3d5408SPeter Wemm   int err = E_BAD_ARGUMENT;
560e3d5408SPeter Wemm 
5706bfebdeSXin LI   T((T_CALLED("dup_field(%p,%d,%d)"), (void *)field, frow, fcol));
580e3d5408SPeter Wemm   if (field && (frow >= 0) && (fcol >= 0) &&
590e3d5408SPeter Wemm       ((err = E_SYSTEM_ERROR) != 0) &&	/* trick : this resets the default error */
605ca44d1cSRong-En Fan       (New_Field = typeMalloc(FIELD, 1)))
610e3d5408SPeter Wemm     {
6206bfebdeSXin LI       T((T_CREATE("field %p"), (void *)New_Field));
630e3d5408SPeter Wemm       *New_Field = *_nc_Default_Field;
6473f0a83dSXin LI       New_Field->frow = (short)frow;
6573f0a83dSXin LI       New_Field->fcol = (short)fcol;
660e3d5408SPeter Wemm       New_Field->link = New_Field;
670e3d5408SPeter Wemm       New_Field->rows = field->rows;
680e3d5408SPeter Wemm       New_Field->cols = field->cols;
690e3d5408SPeter Wemm       New_Field->nrow = field->nrow;
700e3d5408SPeter Wemm       New_Field->drows = field->drows;
710e3d5408SPeter Wemm       New_Field->dcols = field->dcols;
720e3d5408SPeter Wemm       New_Field->maxgrow = field->maxgrow;
730e3d5408SPeter Wemm       New_Field->nbuf = field->nbuf;
740e3d5408SPeter Wemm       New_Field->just = field->just;
750e3d5408SPeter Wemm       New_Field->fore = field->fore;
760e3d5408SPeter Wemm       New_Field->back = field->back;
770e3d5408SPeter Wemm       New_Field->pad = field->pad;
780e3d5408SPeter Wemm       New_Field->opts = field->opts;
790e3d5408SPeter Wemm       New_Field->usrptr = field->usrptr;
800e3d5408SPeter Wemm 
810e3d5408SPeter Wemm       if (_nc_Copy_Type(New_Field, field))
820e3d5408SPeter Wemm 	{
83*7a656419SBaptiste Daroussin 	  size_t len;
840e3d5408SPeter Wemm 
850e3d5408SPeter Wemm 	  len = Total_Buffer_Size(New_Field);
86*7a656419SBaptiste Daroussin 	  if ((New_Field->buf = (FIELD_CELL *)malloc(len * 20)))
870e3d5408SPeter Wemm 	    {
88*7a656419SBaptiste Daroussin 	      memcpy(New_Field->buf, field->buf, len);
894a1a9510SRong-En Fan 	      returnField(New_Field);
900e3d5408SPeter Wemm 	    }
910e3d5408SPeter Wemm 	}
920e3d5408SPeter Wemm     }
930e3d5408SPeter Wemm 
940e3d5408SPeter Wemm   if (New_Field)
950e3d5408SPeter Wemm     free_field(New_Field);
960e3d5408SPeter Wemm 
970e3d5408SPeter Wemm   SET_ERROR(err);
984a1a9510SRong-En Fan   returnField((FIELD *)0);
990e3d5408SPeter Wemm }
1000e3d5408SPeter Wemm 
1010e3d5408SPeter Wemm /* fld_dup.c ends here */
102