packages/infra/v2_0/src/strlen.cxx

   1 //===========================================================================
   2 //
   3 //      strlen.cxx
   4 //
   5 //      ANSI standard strlen() routine
   6 //
   7 //===========================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 // Copyright (C) 2003 Nick Garnett <nickg@calivar.com>
  13 //
  14 // eCos is free software; you can redistribute it and/or modify it under
  15 // the terms of the GNU General Public License as published by the Free
  16 // Software Foundation; either version 2 or (at your option) any later version.
  17 //
  18 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  19 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  20 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  21 // for more details.
  22 //
  23 // You should have received a copy of the GNU General Public License along
  24 // with eCos; if not, write to the Free Software Foundation, Inc.,
  25 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  26 //
  27 // As a special exception, if other files instantiate templates or use macros
  28 // or inline functions from this file, or you compile this file and link it
  29 // with other works to produce a work based on this file, this file does not
  30 // by itself cause the resulting work to be covered by the GNU General Public
  31 // License. However the source code for this file must still be made available
  32 // in accordance with section (3) of the GNU General Public License.
  33 //
  34 // This exception does not invalidate any other reasons why a work based on
  35 // this file might be covered by the GNU General Public License.
  36 //
  37 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  38 // at http://sources.redhat.com/ecos/ecos-license/
  39 // -------------------------------------------
  40 //####ECOSGPLCOPYRIGHTEND####
  41 //===========================================================================
  42 //#####DESCRIPTIONBEGIN####
  43 //
  44 // Author(s):    jlarmour
  45 // Contributors: nickg
  46 // Date:         2000-04-14
  47 // Purpose:
  48 // Description:  strlen() function, to satisfy C++ runtime needs. This
  49 //               function functions correctly, but in the interests of
  50 //               keeping code size down, it uses the smallest implementation
  51 //               possible, and is consequently not very fast.
  52 // Usage:
  53 //
  54 //####DESCRIPTIONEND####
  55 //
  56 //===========================================================================
  57
  58 // CONFIGURATION
  59
  60 #include <pkgconf/system.h>   // Configuration header
  61 #include <pkgconf/infra.h>   // Configuration header
  62
  63 //==========================================================================
  64 // INCLUDES
  65
  66 #include <cyg/infra/cyg_type.h>    // Common type definitions
  67 #include <cyg/infra/cyg_trac.h>    // Tracing support
  68 #include <cyg/infra/cyg_ass.h>     // Assertion support
  69 #include <stddef.h>                // Compiler definitions such as size_t, NULL etc.
  70
  71 //==========================================================================
  72 // EXPORTED SYMBOLS
  73
  74 extern "C" size_t
  75 strlen( const char *s ) CYGBLD_ATTRIB_WEAK_ALIAS(__strlen);
  76
  77 //==========================================================================
  78 // FUNCTIONS
  79
  80 extern "C" size_t
  81 __strlen( const char *s )
  82 {
  83     int retval;
  84
  85     CYG_REPORT_FUNCNAMETYPE( "__strlen", "returning length %d" );
  86     CYG_REPORT_FUNCARG1( "s=%08x", s );
  87
  88     CYG_CHECK_DATA_PTR( s, "s is not a valid pointer!" );
  89
  90     const char *start = s;
  91
  92     while (*s)
  93         s++;
  94
  95     retval = s - start;
  96
  97     CYG_REPORT_RETVAL( retval );
  98
  99     return retval;
 100
 101 } // __strlen()
 102
 103 //==========================================================================
 104 // EOF strlen.cxx