/*

   +----------------------------------------------------------------------+

   | Copyright (c) The PHP Group                                          |

   +----------------------------------------------------------------------+

   | This source file is subject to version 3.01 of the PHP license,      |

   | that is bundled with this package in the file LICENSE, and is        |

   | available through the world-wide-web at the following url:           |

   | https://www.php.net/license/3_01.txt                                 |

   | If you did not receive a copy of the PHP license and are unable to   |

   | obtain it through the world-wide-web, please send a note to          |

   | license@php.net so we can mail you a copy immediately.               |

   +----------------------------------------------------------------------+

 */

#include "fuzzer.h"

#include "Zend/zend.h"

#include <main/php_config.h>

#include "main/php_main.h"

#include <stdio.h>

#include <stdint.h>

#include <stdlib.h>

#include "fuzzer-sapi.h"

#include "ext/standard/php_var.h"

int LLVMFuzzerTestOneInput(const uint8_t *Data, size_t FullSize) {

  const uint8_t *Start = memchr(Data, '|', FullSize);

  if (!Start) {

    return 0;

  }

  ++Start;

  if (fuzzer_request_startup() == FAILURE) {

    return 0;

  }

  size_t Size = (Data + FullSize) - Start;

  unsigned char *orig_data = malloc(Size+1);

  memcpy(orig_data, Start, Size);

  orig_data[Size] = '\0';

  fuzzer_setup_dummy_frame();

  {

    const unsigned char *data = orig_data;

    zval result;

    ZVAL_UNDEF(&result);

    php_unserialize_data_t var_hash;

    PHP_VAR_UNSERIALIZE_INIT(var_hash);

    php_var_unserialize(&result, (const unsigned char **) &data, data + Size, &var_hash);

    PHP_VAR_UNSERIALIZE_DESTROY(var_hash);

    if (Z_TYPE(result) == IS_OBJECT

      && zend_string_equals_literal(Z_OBJCE(result)->name, "HashContext")) {

      zval args[2];

      ZVAL_COPY_VALUE(&args[0], &result);

      ZVAL_STRINGL(&args[1], (char *) Data, (Start - Data) - 1);

      fuzzer_call_php_func_zval("hash_update", 2, args);

      zval_ptr_dtor(&args[1]);

      fuzzer_call_php_func_zval("hash_final", 1, args);

    }

    zval_ptr_dtor(&result);

  }

  free(orig_data);

  fuzzer_request_shutdown();

  return 0;

}

int LLVMFuzzerInitialize(int *argc, char ***argv) {

  fuzzer_init_php(NULL);

  /* fuzzer_shutdown_php(); */

  return 0;

}