libini/iniObjectNext.c

   1 /**********************************************************************************
   2  * .
   3  *
   4  *
   5  **************************************************
   6  * This code was created by Peter Harvey @ CodeByDesign.
   7  * Released under LGPL 28.JAN.99
   8  *
   9  * Contributions from...
  10  * -----------------------------------------------
  11  * PAH = Peter Harvey           - pharvey@codebydesign.com
  12  * -----------------------------------------------
  13  *
  14  * PAH  19.MAR.99       Now sets hCurProperty to hFirstProperty when found
  15  **************************************************/
  16
  17 #include "inifile_intern.h"
  18 #include "ini.h"
  19 #include <aros/libcall.h>
  20
  21 /*****************************************************************************
  22     NAME */
  23         AROS_LH1(int, iniObjectNext,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(HINI, hIni, D0),
  27
  28 /*  LOCATION */
  29         struct Library *, inifileBase, 25, inifile)
  30
  31 /*  FUNCTION
  32
  33     INPUTS
  34
  35     RESULT
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47     HISTORY
  48
  49 *****************************************************************************/
  50 {
  51     AROS_LIBFUNC_INIT
  52
  53     /* SANITY CHECKS */
  54     if ( hIni == NULL )
  55         return INI_ERROR;
  56
  57         if ( hIni->hCurObject == NULL )
  58                 return INI_NO_DATA;
  59
  60         hIni->hCurObject        = hIni->hCurObject->pNext;
  61         iniPropertyFirst( hIni );
  62
  63         if ( hIni->hCurObject == NULL )
  64                 return INI_NO_DATA;
  65
  66         return INI_SUCCESS;
  67
  68     AROS_LIBFUNC_EXIT
  69 } /* iniObjectNext */
  70