[gnurl] 54/282: singleuse.pl: support new API functions, fix curl_dbg_ handling

[gnunet]

This is an automated email from the git hooks/post-receive script.

ng0 pushed a commit to branch master
in repository gnurl.

commit d265a7d36bdcc1a5e6223267249f09fce6cd2f11
Author: Daniel Stenberg <address@hidden>
AuthorDate: Thu Jan 23 08:59:22 2020 +0100

    singleuse.pl: support new API functions, fix curl_dbg_ handling
---
 scripts/singleuse.pl | 19 ++++++++++++-------
 1 file changed, 12 insertions(+), 7 deletions(-)

diff --git a/scripts/singleuse.pl b/scripts/singleuse.pl
index 0a5876a72..a27c015a9 100755
--- a/scripts/singleuse.pl
+++ b/scripts/singleuse.pl
@@ -6,7 +6,7 @@
 #                            | (__| |_| |  _ <| |___
 #                             \___|\___/|_| \_\_____|
 #
-# Copyright (C) 2019, Daniel Stenberg, <address@hidden>, et al.
+# Copyright (C) 2019 - 2020, Daniel Stenberg, <address@hidden>, et al.
 #
 # This software is licensed as described in the file COPYING, which
 # you should have received as part of this distribution. The terms
@@ -116,9 +116,11 @@ my %api = (
     'curl_multi_socket' => 'API',
     'curl_multi_socket_action' => 'API',
     'curl_multi_socket_all' => 'API',
+    'curl_multi_poll' => 'API',
     'curl_multi_strerror' => 'API',
     'curl_multi_timeout' => 'API',
     'curl_multi_wait' => 'API',
+    'curl_multi_wakeup' => 'API',
     'curl_mvaprintf' => 'API',
     'curl_mvfprintf' => 'API',
     'curl_mvprintf' => 'API',
@@ -179,16 +181,16 @@ for(sort keys %exist) {
     #printf "%s is defined in %s, used by: %s\n", $_, $exist{$_}, $uses{$_};
     if(!$uses{$_}) {
         # this is a symbol with no "global" user
-        if($_ =~ /^curl_/) {
+        if($_ =~ /^curl_dbg_/) {
+            # we ignore the memdebug symbols
+        }
+        elsif($_ =~ /^curl_/) {
             if(!$api{$_}) {
                 # not present in the API, or for debug-builds
                 print STDERR "Bad curl-prefix: $_\n";
                 $err++;
             }
         }
-        elsif($_ =~ /^curl_dbg_/) {
-            # we ignore the memdebug symbols
-        }
         elsif($wl{$_}) {
             #print "$_ is WL\n";
         }
@@ -201,8 +203,11 @@ for(sort keys %exist) {
         # global prefix, make sure it is "blessed"
         if(!$api{$_}) {
             # not present in the API, or for debug-builds
-            print STDERR "Bad curl-prefix $_\n";
-            $err++;
+            if($_ !~ /^curl_dbg_/) {
+                # ignore the memdebug symbols
+                print STDERR "Bad curl-prefix $_\n";
+                $err++;
+            }
         }
     }
 }

-- 
To stop receiving notification emails like this one, please contact
address@hidden.