archive_crc32.h 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. /*-
  2. * Copyright (c) 2009 Joerg Sonnenberger
  3. * All rights reserved.
  4. *
  5. * Redistribution and use in source and binary forms, with or without
  6. * modification, are permitted provided that the following conditions
  7. * are met:
  8. * 1. Redistributions of source code must retain the above copyright
  9. * notice, this list of conditions and the following disclaimer.
  10. * 2. Redistributions in binary form must reproduce the above copyright
  11. * notice, this list of conditions and the following disclaimer in the
  12. * documentation and/or other materials provided with the distribution.
  13. *
  14. * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  15. * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  16. * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17. * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  18. * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  19. * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  20. * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  21. * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22. * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  23. * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24. *
  25. * $FreeBSD: head/lib/libarchive/archive_crc32.h 201102 2009-12-28 03:11:36Z kientzle $
  26. */
  27. #ifndef __LIBARCHIVE_BUILD
  28. #error This header is only to be used internally to libarchive.
  29. #endif
  30. /*
  31. * When zlib is unavailable, we should still be able to validate
  32. * uncompressed zip archives. That requires us to be able to compute
  33. * the CRC32 check value. This is a drop-in compatible replacement
  34. * for crc32() from zlib. It's slower than the zlib implementation,
  35. * but still pretty fast: This runs about 300MB/s on my 3GHz P4
  36. * compared to about 800MB/s for the zlib implementation.
  37. */
  38. static unsigned long
  39. crc32(unsigned long crc, const void *_p, size_t len)
  40. {
  41. unsigned long crc2, b, i;
  42. const unsigned char *p = _p;
  43. static volatile int crc_tbl_inited = 0;
  44. static unsigned long crc_tbl[256];
  45. if (!crc_tbl_inited) {
  46. for (b = 0; b < 256; ++b) {
  47. crc2 = b;
  48. for (i = 8; i > 0; --i) {
  49. if (crc2 & 1)
  50. crc2 = (crc2 >> 1) ^ 0xedb88320UL;
  51. else
  52. crc2 = (crc2 >> 1);
  53. }
  54. crc_tbl[b] = crc2;
  55. }
  56. crc_tbl_inited = 1;
  57. }
  58. crc = crc ^ 0xffffffffUL;
  59. /* A use of this loop is about 20% - 30% faster than
  60. * no use version in any optimization option of gcc. */
  61. for (;len >= 8; len -= 8) {
  62. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  63. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  64. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  65. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  66. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  67. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  68. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  69. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  70. }
  71. while (len--)
  72. crc = crc_tbl[(crc ^ *p++) & 0xff] ^ (crc >> 8);
  73. return (crc ^ 0xffffffffUL);
  74. }