diff options
Diffstat (limited to 'tests/libtest/mk-lib1521.pl')
| -rw-r--r-- | tests/libtest/mk-lib1521.pl | 59 |
1 files changed, 57 insertions, 2 deletions
diff --git a/tests/libtest/mk-lib1521.pl b/tests/libtest/mk-lib1521.pl index 60c65f57e..7b31c0b28 100644 --- a/tests/libtest/mk-lib1521.pl +++ b/tests/libtest/mk-lib1521.pl @@ -78,6 +78,31 @@ int test(char *URL) CURL *dep; CURLSH *share; (void)URL; /* not used */ + char errorbuffer[CURL_ERROR_SIZE]; + curl_write_callback writecb; + curl_read_callback readcb; + curl_progress_callback progresscb; + curl_write_callback headercb; + curl_debug_callback debugcb; + curl_ssl_ctx_callback ssl_ctx_cb; + curl_ioctl_callback ioctlcb; + void *conv_from_network_cb; + void *conv_to_network_cb; + void *conv_from_utf8_cb; + curl_sockopt_callback sockoptcb; + curl_opensocket_callback opensocketcb; + curl_seek_callback seekcb; + curl_sshkeycallback ssh_keycb; + void *interleavecb; + curl_chunk_bgn_callback chunk_bgn_cb; + curl_chunk_end_callback chunk_end_cb; + curl_fnmatch_callback fnmatch_cb; + curl_closesocket_callback closesocketcb; + curl_xferinfo_callback xferinfocb; + char *stringpointerextra="moooo"; + struct curl_slist *slist=NULL; + struct curl_httppost *httppost=NULL; + FILE *stream = stderr; dep = curl_easy_init(); share = curl_share_init(); curl = curl_easy_init(); @@ -106,16 +131,46 @@ while(<STDIN>) { if($name =~ /DEPENDS/) { print "${pref} dep);\n"; } - elsif($name =~ /SHARE/) { + elsif($name =~ "SHARE") { print "${pref} share);\n"; } + elsif($name eq "ERRORBUFFER") { + print "${pref} errorbuffer);\n"; + } + elsif(($name eq "POSTFIELDS") || + ($name eq "COPYPOSTFIELDS")) { + print "${pref} stringpointerextra);\n"; + } + elsif(($name eq "HTTPHEADER") || + ($name eq "POSTQUOTE") || + ($name eq "PREQUOTE") || + ($name eq "HTTP200ALIASES") || + ($name eq "TELNETOPTIONS") || + ($name eq "MAIL_RCPT") || + ($name eq "RESOLVE") || + ($name eq "PROXYHEADER") || + ($name eq "QUOTE")) { + print "${pref} slist);\n"; + } + elsif($name eq "HTTPPOST") { + print "${pref} httppost);\n"; + } + elsif($name eq "STDERR") { + print "${pref} stream);\n"; + } else { print "${pref} &object);\n"; } print "${pref} NULL);\n"; } elsif($type eq "FUNCTIONPOINT") { - print "${pref} &func);\n"; + if($name =~ /([^ ]*)FUNCTION/) { + my $l=lc($1); + print "${pref} ${l}cb);\n"; + } + else { + print "${pref} &func);\n"; + } print "${pref} NULL);\n"; } elsif($type eq "OFF_T") { |