gnunet-svn
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[GNUnet-SVN] [gnurl] 252/254: mk-lib1521.pl: updated to match the test c


From: gnunet
Subject: [GNUnet-SVN] [gnurl] 252/254: mk-lib1521.pl: updated to match the test changes in 916ec30a
Date: Sat, 17 Jun 2017 16:54:44 +0200

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

ng0 pushed a commit to annotated tag gnurl-7.54.1
in repository gnurl.

commit 49ff9390344930cdc5a6df57b68297c98f78b728
Author: Dan Fandrich <address@hidden>
AuthorDate: Tue Jun 13 22:03:35 2017 +0200

    mk-lib1521.pl: updated to match the test changes in 916ec30a
---
 tests/libtest/mk-lib1521.pl | 37 ++++++++++++++++++++++---------------
 1 file changed, 22 insertions(+), 15 deletions(-)

diff --git a/tests/libtest/mk-lib1521.pl b/tests/libtest/mk-lib1521.pl
index b1eaba8d8..406a88306 100644
--- a/tests/libtest/mk-lib1521.pl
+++ b/tests/libtest/mk-lib1521.pl
@@ -22,7 +22,7 @@
 ###########################################################################
 
 # Usage:
-# cat ../../include/curl/curl.h | perl mk-lib1521.pl > lib1521.c
+#   perl mk-lib1521.pl < ../../include/curl/curl.h > lib1521.c
 
 # minimum and maximum long signed values
 my $minlong = "LONG_MIN";
@@ -106,9 +106,10 @@ curl_xferinfo_callback xferinfocb;
 
 int test(char *URL)
 {
-  CURL *curl;
-  CURL *dep;
-  CURLSH *share;
+  int res = 0;
+  CURL *curl = NULL;
+  CURL *dep = NULL;
+  CURLSH *share = NULL;
   char errorbuffer[CURL_ERROR_SIZE];
   void *conv_from_network_cb = NULL;
   void *conv_to_network_cb = NULL;
@@ -118,19 +119,23 @@ int test(char *URL)
   struct curl_slist *slist=NULL;
   struct curl_httppost *httppost=NULL;
   FILE *stream = stderr;
+  struct data object;
   (void)URL; /* not used */
-  dep = curl_easy_init();
+  easy_init(dep);
+  easy_init(curl);
   share = curl_share_init();
-  curl = curl_easy_init();
-  if(curl) {
-    struct data object;
+  if(!share) {
+    res = CURLE_OUT_OF_MEMORY;
+    goto test_cleanup;
+  }
+
 HEADER
     ;
 
 while(<STDIN>) {
     if($_ =~ /^  CINIT\(([^ ]*), ([^ ]*), (\d*)\)/) {
         my ($name, $type, $val)=($1, $2, $3);
-        my $w="    ";
+        my $w="  ";
         my $pref = "$w(void)curl_easy_setopt(curl, CURLOPT_$name,";
         my $i = ' ' x (length($w) + 23);
         if($type eq "STRINGPOINT") {
@@ -203,12 +208,14 @@ while(<STDIN>) {
 
 
 print <<FOOTER
-    curl_easy_setopt(curl, 1, 0);
-    curl_easy_cleanup(curl);
-    curl_easy_cleanup(dep);
-    curl_share_cleanup(share);
-  }
-  return 0;
+  curl_easy_setopt(curl, 1, 0);
+
+test_cleanup:
+  curl_easy_cleanup(curl);
+  curl_easy_cleanup(dep);
+  curl_share_cleanup(share);
+
+  return res;
 }
 FOOTER
     ;

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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]