calloc.c 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. /* vi: set sw=4 ts=4: */
  2. /* calloc for uClibc
  3. *
  4. * Copyright (C) 2002 by Erik Andersen <andersen@uclibc.org>
  5. *
  6. * This program is free software; you can redistribute it and/or modify it
  7. * under the terms of the GNU Library General Public License as published by
  8. * the Free Software Foundation; either version 2 of the License, or (at your
  9. * option) any later version.
  10. *
  11. * This program is distributed in the hope that it will be useful, but WITHOUT
  12. * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13. * FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
  14. * for more details.
  15. *
  16. * You should have received a copy of the GNU Library General Public License
  17. * along with this program; if not, write to the Free Software Foundation,
  18. * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  19. */
  20. #include <stdlib.h>
  21. #include <string.h>
  22. #include <errno.h>
  23. /* Experimentally off - libc_hidden_proto(memset) */
  24. void * calloc(size_t nmemb, size_t lsize)
  25. {
  26. void *result;
  27. size_t size=lsize * nmemb;
  28. /* guard vs integer overflow, but allow nmemb
  29. * to fall through and call malloc(0) */
  30. if (nmemb && lsize != (size / nmemb)) {
  31. __set_errno(ENOMEM);
  32. return NULL;
  33. }
  34. if ((result=malloc(size)) != NULL) {
  35. memset(result, 0, size);
  36. }
  37. return result;
  38. }