git.m6w6.name Git - m6w6/ext-http/blob - scripts/gen_curlinfo.php

   1 #!/usr/bin/env php
   2 <?php
   3
   4 error_reporting(0);
   5
   6 function failure() {
   7         fprintf(STDERR, "FAILURE: %s\n", error_get_last()["message"]);
   8         exit(-1);
   9 }
  10
  11 function file_re($file, $pattern, $all = true) {
  12         static $path;
  13
  14         $path or $path = isset($_SERVER['argv'][1]) ? $_SERVER['argv'][1].'/include/curl/' : "/usr/local/include/curl/";
  15
  16         if ($content = file_get_contents($path . $file)) {
  17                 if ($all) {
  18                         if (preg_match_all($pattern, $content, $matches, PREG_SET_ORDER)) {
  19                                 return $matches;
  20                         }
  21                 } else {
  22                         if (preg_match($pattern, $content, $matches)) {
  23                                 return $matches;
  24                         }
  25                 }
  26                 trigger_error("no match in $file for $pattern");
  27         }
  28         failure();
  29 }
  30
  31 $ifdefs = array(
  32         'PRIMARY_IP' => 'PHP_HTTP_CURL_VERSION(7,19,0)',
  33         'APPCONNECT_TIME' => 'PHP_HTTP_CURL_VERSION(7,19,0)',
  34         'CONDITION_UNMET' => 'PHP_HTTP_CURL_VERSION(7,19,4)',
  35         'PRIMARY_PORT' => 'PHP_HTTP_CURL_VERSION(7,21,0)',
  36         'LOCAL_PORT' => 'PHP_HTTP_CURL_VERSION(7,21,0)',
  37         'LOCAL_IP' => 'PHP_HTTP_CURL_VERSION(7,21,0)',
  38         'HTTP_VERSION' => 'PHP_HTTP_CURL_VERSION(7,50,0)',
  39         'PROXY_SSL_VERIFYRESULT' => 'PHP_HTTP_CURL_VERSION(7,52,0)',
  40         'PROTOCOL' => 'PHP_HTTP_CURL_VERSION(7,52,0)',
  41         'SCHEME' => 'PHP_HTTP_CURL_VERSION(7,52,0)',
  42         'RETRY_AFTER' => 'PHP_HTTP_CURL_VERSION(7,66,0)',
  43         'EFFECTIVE_METHOD' => 'PHP_HTTP_CURL_VERSION(7,72,0)',
  44         'PROXY_ERROR' => 'PHP_HTTP_CURL_VERSION(7,73,0)',
  45 );
  46 $exclude = array(
  47         'ACTIVESOCKET',
  48         'CERTINFO',
  49         'COOKIELIST',
  50         'FTP_ENTRY_PATH',
  51         'LASTSOCKET',
  52         'PRIVATE',
  53         'RTSP_CLIENT_CSEQ',
  54         'RTSP_CSEQ_RECV',
  55         'RTSP_SERVER_CSEQ',
  56         'RTSP_SESSION_ID',
  57         'TLS_SESSION',
  58         'TLS_SSL_PTR',
  59 );
  60
  61 $translate = array(
  62         'HTTP_CONNECTCODE' => "connect_code",
  63         'COOKIELIST' => 'cookies',
  64 );
  65
  66 $templates = array(
  67 'STRING' =>
  68 '       if (CURLE_OK == curl_easy_getinfo(ch, %s, &c)) {
  69                 ZVAL_STRING(&tmp, STR_PTR(c));
  70                 zend_hash_str_update(info, "%s", lenof("%2$s"), &tmp);
  71         }
  72 ',
  73 'DOUBLE' =>
  74 '       if (CURLE_OK == curl_easy_getinfo(ch, %s, &d)) {
  75                 ZVAL_DOUBLE(&tmp, d);
  76                 zend_hash_str_update(info, "%s", lenof("%2$s"), &tmp);
  77         }
  78 ',
  79 'LONG' =>
  80 '       if (CURLE_OK == curl_easy_getinfo(ch, %s, &l)) {
  81                 ZVAL_LONG(&tmp, l);
  82                 zend_hash_str_update(info, "%s", lenof("%2$s"), &tmp);
  83         }
  84 ',
  85 'OFF_T' =>
  86 '       if (CURLE_OK == curl_easy_getinfo(ch, %s, &o)) {
  87                 ZVAL_LONG(&tmp, o);
  88                 zend_hash_str_update(info, "%s", lenof("%2$s"), &tmp);
  89         }
  90 ',
  91 'SLIST' =>
  92 '       if (CURLE_OK == curl_easy_getinfo(ch, %s, &s)) {
  93                 array_init(&tmp);
  94                 for (p = s; p; p = p->next) {
  95                         if (p->data) {
  96                                 add_next_index_string(&tmp, p->data);
  97                         }
  98                 }
  99                 zend_hash_str_update(info, "%s", lenof("%2$s"), &tmp);
 100                 curl_slist_free_all(s);
 101         }
 102 ',
 103 );
 104
 105 $infos = file_re('curl.h', '/^\s*(CURLINFO_(\w+))\s*=\s*CURLINFO_(STRING|LONG|DOUBLE|SLIST|OFF_T)\s*\+\s*\d+\s*,?\s*$/m');
 106
 107 ob_start();
 108 foreach ($infos as $info) {
 109         list(, $full, $short, $type) = $info;
 110         if (in_array($short, $exclude) || substr($short, -2) === "_T") continue;
 111         if (isset($ifdefs[$short])) printf("#if %s\n", $ifdefs[$short]);
 112         printf($templates[$type], $full, strtolower((isset($translate[$short])) ? $translate[$short] : $short));
 113         if (isset($ifdefs[$short])) printf("#endif\n");
 114 }
 115
 116 file_put_contents("src/php_http_client_curl.c",
 117         preg_replace('/(\/\* BEGIN::CURLINFO \*\/\n).*(\n\s*\/\* END::CURLINFO \*\/)/s', '$1'. ob_get_contents() .'$2',
 118                 file_get_contents("src/php_http_client_curl.c")));
 119
 120 ?>