124 Disconnect_Fields(FORM *form)  in Disconnect_Fields()  argument
126   if (form->field)  in Disconnect_Fields()
130       for (fields = form->field; *fields; fields++)  in Disconnect_Fields()
132 	  if (form == (*fields)->form)  in Disconnect_Fields()
133 	    (*fields)->form = (FORM *)0;  in Disconnect_Fields()
136       form->rows = form->cols = 0;  in Disconnect_Fields()
137       form->maxfield = form->maxpage = -1;  in Disconnect_Fields()
138       form->field = (FIELD **)0;  in Disconnect_Fields()
139       if (form->page)  in Disconnect_Fields()
140 	free(form->page);  in Disconnect_Fields()
141       form->page = (_PAGE *) 0;  in Disconnect_Fields()
157 Connect_Fields(FORM *form, FIELD **fields)  in Connect_Fields()  argument
163   T((T_CALLED("Connect_Fields(%p,%p)"), (void *)form, (void *)fields));  in Connect_Fields()
165   assert(form);  in Connect_Fields()
167   form->field = fields;  in Connect_Fields()
168   form->maxfield = 0;  in Connect_Fields()
169   form->maxpage = 0;  in Connect_Fields()
178       if (fields[field_cnt]->form)  in Connect_Fields()
183       fields[field_cnt]->form = form;  in Connect_Fields()
192       form->page = pg;  in Connect_Fields()
219       if (form->rows < maximum_row_in_field)  in Connect_Fields()
220 	form->rows = (short)maximum_row_in_field;  in Connect_Fields()
221       if (form->cols < maximum_col_in_field)  in Connect_Fields()
222 	form->cols = (short)maximum_col_in_field;  in Connect_Fields()
226   form->maxfield = (short)field_cnt;  in Connect_Fields()
227   form->maxpage = (short)page_nr;  in Connect_Fields()
230   for (page_nr = 0; page_nr < form->maxpage; page_nr++)  in Connect_Fields()
234       for (j = form->page[page_nr].pmin; j <= form->page[page_nr].pmax; j++)  in Connect_Fields()
242 	  form->page[page_nr].smin = fld->index;  in Connect_Fields()
243 	  form->page[page_nr].smax = fld->sprev->index;  in Connect_Fields()
247 	  form->page[page_nr].smin = 0;  in Connect_Fields()
248 	  form->page[page_nr].smax = 0;  in Connect_Fields()
267 Associate_Fields(FORM *form, FIELD **fields)  in Associate_Fields()  argument
269   int res = Connect_Fields(form, fields);  in Associate_Fields()
273       if (form->maxpage > 0)  in Associate_Fields()
275 	  form->curpage = 0;  in Associate_Fields()
276 	  form_driver(form, FIRST_ACTIVE_MAGIC);  in Associate_Fields()
280 	  form->curpage = -1;  in Associate_Fields()
281 	  form->current = (FIELD *)0;  in Associate_Fields()
304   FORM *form = (FORM *)0;  in NCURSES_SP_NAME()  local
310       form = typeMalloc(FORM, 1);  in NCURSES_SP_NAME()
312       if (form)  in NCURSES_SP_NAME()
314 	  T((T_CREATE("form %p"), (void *)form));  in NCURSES_SP_NAME()
315 	  *form = *_nc_Default_Form;  in NCURSES_SP_NAME()
319 	  form->win = StdScreen(SP_PARM);  in NCURSES_SP_NAME()
320 	  form->sub = StdScreen(SP_PARM);  in NCURSES_SP_NAME()
321 	  if ((err = Associate_Fields(form, fields)) != E_OK)  in NCURSES_SP_NAME()
323 	      free_form(form);  in NCURSES_SP_NAME()
324 	      form = (FORM *)0;  in NCURSES_SP_NAME()
329   if (!form)  in NCURSES_SP_NAME()
332   returnForm(form);  in NCURSES_SP_NAME()
367 free_form(FORM *form)  in free_form()  argument
369   T((T_CALLED("free_form(%p)"), (void *)form));  in free_form()
371   if (!form)  in free_form()
374   if (form->status & _POSTED)  in free_form()
377   Disconnect_Fields(form);  in free_form()
378   if (form->page)  in free_form()
379     free(form->page);  in free_form()
380   free(form);  in free_form()
398 set_form_fields(FORM *form, FIELD **fields)  in set_form_fields()  argument
403   T((T_CALLED("set_form_fields(%p,%p)"), (void *)form, (void *)fields));  in set_form_fields()
405   if (!form)  in set_form_fields()
408   if (form->status & _POSTED)  in set_form_fields()
411   old = form->field;  in set_form_fields()
412   Disconnect_Fields(form);  in set_form_fields()
414   if ((res = Associate_Fields(form, fields)) != E_OK)  in set_form_fields()
415     Connect_Fields(form, old);  in set_form_fields()
429 form_fields(const FORM *form)  in form_fields()  argument
431   T((T_CALLED("form_field(%p)"), (const void *)form));  in form_fields()
432   returnFieldPtr(Normalize_Form(form)->field);  in form_fields()
444 field_count(const FORM *form)  in field_count()  argument
446   T((T_CALLED("field_count(%p)"), (const void *)form));  in field_count()
448   returnCode(Normalize_Form(form)->maxfield);  in field_count()