1/*	$OpenBSD: frm_page.c,v 1.7 2023/10/17 09:52:10 nicm Exp $	*/
2/****************************************************************************
3 * Copyright 2020,2021 Thomas E. Dickey                                     *
4 * Copyright 1998-2010,2012 Free Software Foundation, Inc.                  *
5 *                                                                          *
6 * Permission is hereby granted, free of charge, to any person obtaining a  *
7 * copy of this software and associated documentation files (the            *
8 * "Software"), to deal in the Software without restriction, including      *
9 * without limitation the rights to use, copy, modify, merge, publish,      *
10 * distribute, distribute with modifications, sublicense, and/or sell       *
11 * copies of the Software, and to permit persons to whom the Software is    *
12 * furnished to do so, subject to the following conditions:                 *
13 *                                                                          *
14 * The above copyright notice and this permission notice shall be included  *
15 * in all copies or substantial portions of the Software.                   *
16 *                                                                          *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
19 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
20 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
21 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
22 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
23 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
24 *                                                                          *
25 * Except as contained in this notice, the name(s) of the above copyright   *
26 * holders shall not be used in advertising or otherwise to promote the     *
27 * sale, use or other dealings in this Software without prior written       *
28 * authorization.                                                           *
29 ****************************************************************************/
30
31/****************************************************************************
32 *   Author:  Juergen Pfeifer, 1995,1997                                    *
33 ****************************************************************************/
34
35#include "form.priv.h"
36
37MODULE_ID("$Id: frm_page.c,v 1.7 2023/10/17 09:52:10 nicm Exp $")
38
39/*---------------------------------------------------------------------------
40|   Facility      :  libnform
41|   Function      :  int set_form_page(FORM * form,int  page)
42|
43|   Description   :  Set the page number of the form.
44|
45|   Return Values :  E_OK              - success
46|                    E_BAD_ARGUMENT    - invalid form pointer or page number
47|                    E_BAD_STATE       - called from a hook routine
48|                    E_INVALID_FIELD   - current field can't be left
49|                    E_SYSTEM_ERROR    - system error
50+--------------------------------------------------------------------------*/
51FORM_EXPORT(int)
52set_form_page(FORM *form, int page)
53{
54  int err = E_OK;
55
56  T((T_CALLED("set_form_page(%p,%d)"), (void *)form, page));
57
58  if (!form || (page < 0) || (page >= form->maxpage))
59    RETURN(E_BAD_ARGUMENT);
60
61  if (!(form->status & _POSTED))
62    {
63      form->curpage = (short)page;
64      form->current = _nc_First_Active_Field(form);
65    }
66  else
67    {
68      if (form->status & _IN_DRIVER)
69	err = E_BAD_STATE;
70      else
71	{
72	  if (form->curpage != page)
73	    {
74	      if (!_nc_Internal_Validation(form))
75		err = E_INVALID_FIELD;
76	      else
77		{
78		  Call_Hook(form, fieldterm);
79		  Call_Hook(form, formterm);
80		  err = _nc_Set_Form_Page(form, page, (FIELD *)0);
81		  Call_Hook(form, forminit);
82		  Call_Hook(form, fieldinit);
83		  _nc_Refresh_Current_Field(form);
84		}
85	    }
86	}
87    }
88  RETURN(err);
89}
90
91/*---------------------------------------------------------------------------
92|   Facility      :  libnform
93|   Function      :  int form_page(const FORM * form)
94|
95|   Description   :  Return the current page of the form.
96|
97|   Return Values :  >= 0  : current page number
98|                    -1    : invalid form pointer
99+--------------------------------------------------------------------------*/
100FORM_EXPORT(int)
101form_page(const FORM *form)
102{
103  T((T_CALLED("form_page(%p)"), (const void *)form));
104
105  returnCode(Normalize_Form(form)->curpage);
106}
107
108/* frm_page.c ends here */
109