summaryrefslogtreecommitdiff
path: root/subversion/bindings/swig/perl/native/svn_ra.c
diff options
context:
space:
mode:
Diffstat (limited to 'subversion/bindings/swig/perl/native/svn_ra.c')
-rw-r--r--subversion/bindings/swig/perl/native/svn_ra.c184
1 files changed, 151 insertions, 33 deletions
diff --git a/subversion/bindings/swig/perl/native/svn_ra.c b/subversion/bindings/swig/perl/native/svn_ra.c
index 36362e2..09e96fc 100644
--- a/subversion/bindings/swig/perl/native/svn_ra.c
+++ b/subversion/bindings/swig/perl/native/svn_ra.c
@@ -5007,6 +5007,141 @@ XS(_wrap_svn_ra_create_callbacks) {
}
+XS(_wrap_svn_ra_open5) {
+ {
+ svn_ra_session_t **arg1 = (svn_ra_session_t **) 0 ;
+ char **arg2 = (char **) 0 ;
+ char **arg3 = (char **) 0 ;
+ char *arg4 = (char *) 0 ;
+ char *arg5 = (char *) 0 ;
+ svn_ra_callbacks2_t *arg6 = (svn_ra_callbacks2_t *) 0 ;
+ void *arg7 = (void *) 0 ;
+ apr_hash_t *arg8 = (apr_hash_t *) 0 ;
+ apr_pool_t *arg9 = (apr_pool_t *) 0 ;
+ apr_pool_t *_global_pool ;
+ svn_ra_session_t *temp1 ;
+ char *temp2 ;
+ char *temp3 ;
+ int res4 ;
+ char *buf4 = 0 ;
+ int alloc4 = 0 ;
+ int res5 ;
+ char *buf5 = 0 ;
+ int alloc5 = 0 ;
+ void *argp6 = 0 ;
+ int res6 = 0 ;
+ int res7 ;
+ int argvi = 0;
+ svn_error_t *result = 0 ;
+ dXSARGS;
+
+ {
+ _global_pool = arg9 = svn_swig_pl_make_pool (ST(items-1));
+ SPAGAIN;
+ }
+ arg1 = &temp1;
+ arg2 = &temp2;
+ arg3 = &temp3;
+ if ((items < 5) || (items > 6)) {
+ SWIG_croak("Usage: svn_ra_open5(repos_URL,uuid,callbacks,callback_baton,config,pool);");
+ }
+ res4 = SWIG_AsCharPtrAndSize(ST(0), &buf4, NULL, &alloc4);
+ if (!SWIG_IsOK(res4)) {
+ SWIG_exception_fail(SWIG_ArgError(res4), "in method '" "svn_ra_open5" "', argument " "4"" of type '" "char const *""'");
+ }
+ arg4 = (char *)(buf4);
+ res5 = SWIG_AsCharPtrAndSize(ST(1), &buf5, NULL, &alloc5);
+ if (!SWIG_IsOK(res5)) {
+ SWIG_exception_fail(SWIG_ArgError(res5), "in method '" "svn_ra_open5" "', argument " "5"" of type '" "char const *""'");
+ }
+ arg5 = (char *)(buf5);
+ res6 = SWIG_ConvertPtr(ST(2), &argp6,SWIGTYPE_p_svn_ra_callbacks2_t, 0 | 0 );
+ if (!SWIG_IsOK(res6)) {
+ SWIG_exception_fail(SWIG_ArgError(res6), "in method '" "svn_ra_open5" "', argument " "6"" of type '" "svn_ra_callbacks2_t const *""'");
+ }
+ arg6 = (svn_ra_callbacks2_t *)(argp6);
+ res7 = SWIG_ConvertPtr(ST(3),SWIG_as_voidptrptr(&arg7), 0, 0);
+ if (!SWIG_IsOK(res7)) {
+ SWIG_exception_fail(SWIG_ArgError(res7), "in method '" "svn_ra_open5" "', argument " "7"" of type '" "void *""'");
+ }
+ {
+ arg8 = svn_swig_pl_objs_to_hash_by_name (ST(4), "svn_config_t *",
+ _global_pool);
+ }
+ if (items > 5) {
+
+ }
+ {
+ if (!arg6) {
+ SWIG_exception(SWIG_ValueError,"Received a NULL pointer.");
+ }
+ }
+ {
+ result = (svn_error_t *)svn_ra_open5(arg1,(char const **)arg2,(char const **)arg3,(char const *)arg4,(char const *)arg5,(struct svn_ra_callbacks2_t const *)arg6,arg7,arg8,arg9);
+
+
+
+ }
+ {
+ if (result) {
+ SV *exception_handler = perl_get_sv ("SVN::Error::handler", FALSE);
+
+ if (SvOK(exception_handler)) {
+ SV *callback_result;
+
+ PUTBACK;
+ svn_swig_pl_callback_thunk (CALL_SV, exception_handler,
+ &callback_result, "S", result,
+ SWIGTYPE_p_svn_error_t);
+ SPAGAIN;
+ } else {
+ ST(argvi) = SWIG_NewPointerObj(result, SWIGTYPE_p_svn_error_t, 0);
+ argvi++;
+ }
+ }
+ }
+ {
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = SWIG_NewPointerObj(*arg1, SWIGTYPE_p_svn_ra_session_t, 0); argvi++ ;
+ }
+ {
+ if (*arg2 == NULL) {
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = &PL_sv_undef; argvi++ ;
+ } else {
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = sv_2mortal(newSVpv(*arg2, 0)); argvi++ ;
+ }
+ }
+ {
+ if (*arg3 == NULL) {
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = &PL_sv_undef; argvi++ ;
+ } else {
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = sv_2mortal(newSVpv(*arg3, 0)); argvi++ ;
+ }
+ }
+
+
+
+ if (alloc4 == SWIG_NEWOBJ) free((char*)buf4);
+ if (alloc5 == SWIG_NEWOBJ) free((char*)buf5);
+
+
+
+
+ XSRETURN(argvi);
+ fail:
+
+
+
+ if (alloc4 == SWIG_NEWOBJ) free((char*)buf4);
+ if (alloc5 == SWIG_NEWOBJ) free((char*)buf5);
+
+
+
+
+ SWIG_croak_null();
+ }
+}
+
+
XS(_wrap_svn_ra_open4) {
{
svn_ra_session_t **arg1 = (svn_ra_session_t **) 0 ;
@@ -7157,13 +7292,7 @@ XS(_wrap_svn_ra_get_mergeinfo) {
}
}
{
- /* FIXME: Missing argout typemap: svn_ra_get_mergeinfo arg 2 (svn_mergeinfo_catalog_t *) */
-
-
-
-
- SWIG_exception(SWIG_ValueError, "svn_ra_get_mergeinfo is not implemented yet");
-
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = SWIG_NewPointerObj(*arg2, SWIGTYPE_p_apr_hash_t, 0); argvi++ ;
}
@@ -9435,13 +9564,7 @@ XS(_wrap_svn_ra_get_locations) {
}
}
{
- /* FIXME: Missing argout typemap: svn_ra_get_locations arg 2 (apr_hash_t **) */
-
-
-
-
- SWIG_exception(SWIG_ValueError, "svn_ra_get_locations is not implemented yet");
-
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = SWIG_NewPointerObj(*arg2, SWIGTYPE_p_apr_hash_t, 0); argvi++ ;
}
@@ -15900,13 +16023,7 @@ XS(_wrap_svn_ra_plugin_invoke_get_locations) {
}
}
{
- /* FIXME: Missing argout typemap: svn_ra_plugin_invoke_get_locations arg 3 (apr_hash_t **) */
-
-
-
-
- SWIG_exception(SWIG_ValueError, "svn_ra_plugin_invoke_get_locations is not implemented yet");
-
+ if (argvi >= items) EXTEND(sp,1); ST(argvi) = SWIG_NewPointerObj(*arg3, SWIGTYPE_p_apr_hash_t, 0); argvi++ ;
}
@@ -17571,7 +17688,7 @@ XS(_wrap_svn_ra_invoke_init_func) {
static swig_type_info _swigt__p_apr_array_header_t = {"_p_apr_array_header_t", "apr_array_header_t *|svn_rangelist_t *", 0, 0, (void*)0, 0};
static swig_type_info _swigt__p_apr_file_t = {"_p_apr_file_t", "apr_file_t *", 0, 0, (void*)0, 0};
-static swig_type_info _swigt__p_apr_hash_t = {"_p_apr_hash_t", "apr_hash_t *", 0, 0, (void*)0, 0};
+static swig_type_info _swigt__p_apr_hash_t = {"_p_apr_hash_t", "svn_mergeinfo_catalog_t|apr_hash_t *", 0, 0, (void*)0, 0};
static swig_type_info _swigt__p_apr_int32_t = {"_p_apr_int32_t", "apr_int32_t *|time_t *", 0, 0, (void*)0, 0};
static swig_type_info _swigt__p_apr_int64_t = {"_p_apr_int64_t", "apr_int64_t *|svn_filesize_t *|apr_time_t *", 0, 0, (void*)0, 0};
static swig_type_info _swigt__p_apr_pool_t = {"_p_apr_pool_t", "apr_pool_t *", 0, 0, (void*)0, 0};
@@ -18305,6 +18422,7 @@ static swig_command_info swig_commands[] = {
{"SVN::_Ra::delete_svn_ra_callbacks_t", _wrap_delete_svn_ra_callbacks_t},
{"SVN::_Ra::svn_ra_initialize", _wrap_svn_ra_initialize},
{"SVN::_Ra::svn_ra_create_callbacks", _wrap_svn_ra_create_callbacks},
+{"SVN::_Ra::svn_ra_open5", _wrap_svn_ra_open5},
{"SVN::_Ra::svn_ra_open4", _wrap_svn_ra_open4},
{"SVN::_Ra::svn_ra_open3", _wrap_svn_ra_open3},
{"SVN::_Ra::svn_ra_open2", _wrap_svn_ra_open2},
@@ -18757,57 +18875,57 @@ XS(SWIG_init) {
SvREADONLY_on(sv);
}
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_DEPTH", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("depth"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_MERGEINFO", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("mergeinfo"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_LOG_REVPROPS", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("log-revprops"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_PARTIAL_REPLAY", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("partial-replay"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_COMMIT_REVPROPS", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("commit-revprops"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_ATOMIC_REVPROPS", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("atomic-revprops"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_INHERITED_PROPS", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("inherited-props"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_EPHEMERAL_TXNPROPS", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("ephemeral-txnprops"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_GET_FILE_REVS_REVERSE", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("get-file-revs-reversed"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_CAPABILITY_LIST", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_FromCharPtr("list"));
SvREADONLY_on(sv);
} while(0) /*@SWIG@*/;
- /*@SWIG:/opt/svnrm/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
+ /*@SWIG:/tmp/svn-rel/prefix/share/swig/3.0.12/perl5/perltypemaps.swg,65,%set_constant@*/ do {
SV *sv = get_sv((char*) SWIG_prefix "SVN_RA_ABI_VERSION", TRUE | 0x2 | GV_ADDMULTI);
sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(2)));
SvREADONLY_on(sv);
generated by cgit v1.2.3 (git 2.25.1) at 2024-06-01 07:01:52 +0000