| /**************************************************************************** |
| * Copyright (c) 1998 Free Software Foundation, Inc. * |
| * * |
| * Permission is hereby granted, free of charge, to any person obtaining a * |
| * copy of this software and associated documentation files (the * |
| * "Software"), to deal in the Software without restriction, including * |
| * without limitation the rights to use, copy, modify, merge, publish, * |
| * distribute, distribute with modifications, sublicense, and/or sell * |
| * copies of the Software, and to permit persons to whom the Software is * |
| * furnished to do so, subject to the following conditions: * |
| * * |
| * The above copyright notice and this permission notice shall be included * |
| * in all copies or substantial portions of the Software. * |
| * * |
| * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * |
| * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * |
| * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * |
| * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * |
| * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * |
| * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * |
| * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * |
| * * |
| * Except as contained in this notice, the name(s) of the above copyright * |
| * holders shall not be used in advertising or otherwise to promote the * |
| * sale, use or other dealings in this Software without prior written * |
| * authorization. * |
| ****************************************************************************/ |
| |
| /**************************************************************************** |
| * Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1995,1997 * |
| ****************************************************************************/ |
| |
| #include "form.priv.h" |
| |
| MODULE_ID("$Id: fld_newftyp.c,v 1.1.1.1 2012/03/29 17:21:09 uid42307 Exp $") |
| |
| static FIELDTYPE const default_fieldtype = { |
| 0, /* status */ |
| 0L, /* reference count */ |
| (FIELDTYPE *)0, /* pointer to left operand */ |
| (FIELDTYPE *)0, /* pointer to right operand */ |
| NULL, /* makearg function */ |
| NULL, /* copyarg function */ |
| NULL, /* freearg function */ |
| NULL, /* field validation function */ |
| NULL, /* Character check function */ |
| NULL, /* enumerate next function */ |
| NULL /* enumerate previous function */ |
| }; |
| |
| const FIELDTYPE* _nc_Default_FieldType = &default_fieldtype; |
| |
| /*--------------------------------------------------------------------------- |
| | Facility : libnform |
| | Function : FIELDTYPE *new_fieldtype( |
| | bool (* const field_check)(FIELD *,const void *), |
| | bool (* const char_check) (int, const void *) ) |
| | |
| | Description : Create a new fieldtype. The application programmer must |
| | write a field_check and a char_check function and give |
| | them as input to this call. |
| | If an error occurs, errno is set to |
| | E_BAD_ARGUMENT - invalid arguments |
| | E_SYSTEM_ERROR - system error (no memory) |
| | |
| | Return Values : Fieldtype pointer or NULL if error occured |
| +--------------------------------------------------------------------------*/ |
| FIELDTYPE *new_fieldtype( |
| bool (* const field_check)(FIELD *,const void *), |
| bool (* const char_check) (int,const void *) ) |
| { |
| FIELDTYPE *nftyp = (FIELDTYPE *)0; |
| |
| if ( (field_check) || (char_check) ) |
| { |
| nftyp = (FIELDTYPE *)malloc(sizeof(FIELDTYPE)); |
| if (nftyp) |
| { |
| *nftyp = default_fieldtype; |
| nftyp->fcheck = field_check; |
| nftyp->ccheck = char_check; |
| } |
| else |
| { |
| SET_ERROR( E_SYSTEM_ERROR ); |
| } |
| } |
| else |
| { |
| SET_ERROR( E_BAD_ARGUMENT ); |
| } |
| return nftyp; |
| } |
| |
| /*--------------------------------------------------------------------------- |
| | Facility : libnform |
| | Function : int free_fieldtype(FIELDTYPE *typ) |
| | |
| | Description : Release the memory associated with this fieldtype. |
| | |
| | Return Values : E_OK - success |
| | E_CONNECTED - there are fields referencing the type |
| | E_BAD_ARGUMENT - invalid fieldtype pointer |
| +--------------------------------------------------------------------------*/ |
| int free_fieldtype(FIELDTYPE *typ) |
| { |
| if (!typ) |
| RETURN(E_BAD_ARGUMENT); |
| |
| if (typ->ref!=0) |
| RETURN(E_CONNECTED); |
| |
| if (typ->status & _RESIDENT) |
| RETURN(E_CONNECTED); |
| |
| if (typ->status & _LINKED_TYPE) |
| { |
| if (typ->left ) typ->left->ref--; |
| if (typ->right) typ->right->ref--; |
| } |
| free(typ); |
| RETURN(E_OK); |
| } |
| |
| /* fld_newftyp.c ends here */ |
