svn_fs.c

subversion-1.4.5.tar.gz 配置svn的源码

#endif
#ifdef do_close
  #undef do_close
#endif
#ifdef scalar
  #undef scalar
#endif
#ifdef list
  #undef list
#endif
#ifdef apply
  #undef apply
#endif
#ifdef convert
  #undef convert
#endif
#ifdef Error
  #undef Error
#endif
#ifdef form
  #undef form
#endif
#ifdef vform
  #undef vform
#endif
#ifdef LABEL
  #undef LABEL
#endif
#ifdef METHOD
  #undef METHOD
#endif
#ifdef Move
  #undef Move
#endif
#ifdef yylex
  #undef yylex
#endif
#ifdef yyparse
  #undef yyparse
#endif
#ifdef yyerror
  #undef yyerror
#endif
#ifdef invert
  #undef invert
#endif
#ifdef ref
  #undef ref
#endif
#ifdef ENTER
  #undef ENTER
#endif
#ifdef read
  #undef read
#endif
#ifdef write
  #undef write
#endif
#ifdef eof
  #undef eof
#endif



/* -------- TYPES TABLE (BEGIN) -------- */

#define SWIGTYPE_p_apr_hash_t swig_types[0]
#define SWIGTYPE_p_apr_int32_t swig_types[1]
#define SWIGTYPE_p_apr_int64_t swig_types[2]
#define SWIGTYPE_p_apr_pool_t swig_types[3]
#define SWIGTYPE_p_f_p_apr_getopt_t_p_void_p_apr_pool_t__p_svn_error_t swig_types[4]
#define SWIGTYPE_p_f_p_svn_txdelta_window_t_p_void__p_svn_error_t swig_types[5]
#define SWIGTYPE_p_f_p_void_p_struct_svn_error_t__void swig_types[6]
#define SWIGTYPE_p_f_p_void_p_svn_lock_t_p_apr_pool_t__p_svn_error_t swig_types[7]
#define SWIGTYPE_p_int swig_types[8]
#define SWIGTYPE_p_long swig_types[9]
#define SWIGTYPE_p_p_apr_array_header_t swig_types[10]
#define SWIGTYPE_p_p_apr_hash_t swig_types[11]
#define SWIGTYPE_p_p_char swig_types[12]
#define SWIGTYPE_p_p_f_p_svn_txdelta_window_t_p_void__p_svn_error_t swig_types[13]
#define SWIGTYPE_p_p_svn_fs_access_t swig_types[14]
#define SWIGTYPE_p_p_svn_fs_history_t swig_types[15]
#define SWIGTYPE_p_p_svn_fs_id_t swig_types[16]
#define SWIGTYPE_p_p_svn_fs_root_t swig_types[17]
#define SWIGTYPE_p_p_svn_fs_t swig_types[18]
#define SWIGTYPE_p_p_svn_fs_txn_t swig_types[19]
#define SWIGTYPE_p_p_svn_lock_t swig_types[20]
#define SWIGTYPE_p_p_svn_stream_t swig_types[21]
#define SWIGTYPE_p_p_svn_string_t swig_types[22]
#define SWIGTYPE_p_p_svn_txdelta_stream_t swig_types[23]
#define SWIGTYPE_p_p_void swig_types[24]
#define SWIGTYPE_p_svn_auth_baton_t swig_types[25]
#define SWIGTYPE_p_svn_auth_cred_simple_t swig_types[26]
#define SWIGTYPE_p_svn_auth_cred_ssl_client_cert_pw_t swig_types[27]
#define SWIGTYPE_p_svn_auth_cred_ssl_client_cert_t swig_types[28]
#define SWIGTYPE_p_svn_auth_cred_ssl_server_trust_t swig_types[29]
#define SWIGTYPE_p_svn_auth_cred_username_t swig_types[30]
#define SWIGTYPE_p_svn_auth_iterstate_t swig_types[31]
#define SWIGTYPE_p_svn_auth_provider_object_t swig_types[32]
#define SWIGTYPE_p_svn_auth_provider_t swig_types[33]
#define SWIGTYPE_p_svn_auth_ssl_server_cert_info_t swig_types[34]
#define SWIGTYPE_p_svn_commit_info_t swig_types[35]
#define SWIGTYPE_p_svn_config_t swig_types[36]
#define SWIGTYPE_p_svn_delta_editor_t swig_types[37]
#define SWIGTYPE_p_svn_diff_datasource_e swig_types[38]
#define SWIGTYPE_p_svn_diff_file_ignore_space_t swig_types[39]
#define SWIGTYPE_p_svn_diff_file_options_t swig_types[40]
#define SWIGTYPE_p_svn_diff_fns_t swig_types[41]
#define SWIGTYPE_p_svn_diff_output_fns_t swig_types[42]
#define SWIGTYPE_p_svn_diff_t swig_types[43]
#define SWIGTYPE_p_svn_dirent_t swig_types[44]
#define SWIGTYPE_p_svn_errno_t swig_types[45]
#define SWIGTYPE_p_svn_error_t swig_types[46]
#define SWIGTYPE_p_svn_fs_access_t swig_types[47]
#define SWIGTYPE_p_svn_fs_dirent_t swig_types[48]
#define SWIGTYPE_p_svn_fs_history_t swig_types[49]
#define SWIGTYPE_p_svn_fs_id_t swig_types[50]
#define SWIGTYPE_p_svn_fs_path_change_kind_t swig_types[51]
#define SWIGTYPE_p_svn_fs_path_change_t swig_types[52]
#define SWIGTYPE_p_svn_fs_root_t swig_types[53]
#define SWIGTYPE_p_svn_fs_t swig_types[54]
#define SWIGTYPE_p_svn_fs_txn_t swig_types[55]
#define SWIGTYPE_p_svn_io_dirent_t swig_types[56]
#define SWIGTYPE_p_svn_io_file_del_t swig_types[57]
#define SWIGTYPE_p_svn_lock_t swig_types[58]
#define SWIGTYPE_p_svn_log_changed_path_t swig_types[59]
#define SWIGTYPE_p_svn_node_kind_t swig_types[60]
#define SWIGTYPE_p_svn_opt_revision_t swig_types[61]
#define SWIGTYPE_p_svn_opt_revision_value_t swig_types[62]
#define SWIGTYPE_p_svn_opt_subcommand_desc2_t swig_types[63]
#define SWIGTYPE_p_svn_opt_subcommand_desc_t swig_types[64]
#define SWIGTYPE_p_svn_prop_kind swig_types[65]
#define SWIGTYPE_p_svn_stream_t swig_types[66]
#define SWIGTYPE_p_svn_string_t swig_types[67]
#define SWIGTYPE_p_svn_stringbuf_t swig_types[68]
#define SWIGTYPE_p_svn_txdelta_op_t swig_types[69]
#define SWIGTYPE_p_svn_txdelta_stream_t swig_types[70]
#define SWIGTYPE_p_svn_txdelta_window_t swig_types[71]
#define SWIGTYPE_p_svn_version_checklist_t swig_types[72]
#define SWIGTYPE_p_svn_version_t swig_types[73]
#define SWIGTYPE_p_unsigned_char swig_types[74]
#define SWIGTYPE_p_void swig_types[75]
static swig_type_info *swig_types[76];
static swig_module_info swig_module = {swig_types, 76, 0, 0, 0, 0};
#define SWIG_TypeQuery(name) SWIG_TypeQueryModule(&swig_module, &swig_module, name)
#define SWIG_MangledTypeQuery(name) SWIG_MangledTypeQueryModule(&swig_module, &swig_module, name)

/* -------- TYPES TABLE (END) -------- */

#define SWIG_init    boot_SVN___Fs

#define SWIG_name   "SVN::_Fs::boot_SVN___Fs"
#define SWIG_prefix "SVN::_Fs::"

#ifdef __cplusplus
extern "C"
#endif
#ifndef PERL_OBJECT
#ifndef MULTIPLICITY
SWIGEXPORT void SWIG_init (CV* cv);
#else
SWIGEXPORT void SWIG_init (pTHXo_ CV* cv);
#endif
#else
SWIGEXPORT void SWIG_init (CV *cv, CPerlObj *);
#endif


#include "svn_time.h"
#include "svn_pools.h"


#include "svn_md5.h"

#ifdef SWIGPYTHON
#include "swigutil_py.h"
#endif

#ifdef SWIGPERL
#include "swigutil_pl.h"
#endif

#ifdef SWIGRUBY
#include "swigutil_rb.h"
#endif


#include "svn_fs.h"



#ifdef PERL_OBJECT
#define MAGIC_CLASS _wrap_SVN::_Fs_var::
class _wrap_SVN::_Fs_var : public CPerlObj {
public:
#else
#define MAGIC_CLASS
#endif
SWIGCLASS_STATIC int swig_magic_readonly(pTHX_ SV *sv, MAGIC *mg) {
    MAGIC_PPERL
    sv = sv; mg = mg;
    croak("Value is read-only.");
    return 0;
}


#ifdef PERL_OBJECT
};
#endif

#ifdef __cplusplus
extern "C" {
#endif
XS(_wrap_svn_fs_version) {
    {
        svn_version_t *result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 0) || (items > 0)) {
            SWIG_croak("Usage: svn_fs_version();");
        }
        {
            result = (svn_version_t *)svn_fs_version();
            
            
            
            
        }
        ST(argvi) = sv_newmortal();
        SWIG_MakePtr(ST(argvi++), (void *) result, SWIGTYPE_p_svn_version_t, SWIG_SHADOW|0);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_fs_initialize) {
    {
        apr_pool_t *arg1 = (apr_pool_t *) 0 ;
        svn_error_t *result;
        apr_pool_t *_global_pool ;
        int argvi = 0;
        dXSARGS;
        
        {
            _global_pool = arg1 = svn_swig_pl_make_pool (ST(items-1));
        }
        if ((items < 0) || (items > 1)) {
            SWIG_croak("Usage: svn_fs_initialize(pool);");
        }
        if (items > 0) {
            
        }
        {
            result = (svn_error_t *)svn_fs_initialize(arg1);
            
            
            
            
        }
        {
            if (result) {
                SV *exception_handler = perl_get_sv ("SVN::Error::handler", FALSE);
                
                if (SvOK(exception_handler)) {
                    SV *callback_result;
                    
                    svn_swig_pl_callback_thunk (CALL_SV, exception_handler,
                    &callback_result, "S", result,
                    SWIGTYPE_p_svn_error_t);
                } else {
                    ST(argvi) = sv_newmortal();
                    SWIG_MakePtr (ST(argvi), (void *)result, SWIGTYPE_p_svn_error_t ,0);
                    argvi++;
                }
            }
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_fs_set_warning_func) {
    {
        svn_fs_t *arg1 = (svn_fs_t *) 0 ;
        svn_fs_warning_callback_t arg2 = (svn_fs_warning_callback_t) 0 ;
        void *arg3 = (void *) 0 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 3) || (items > 3)) {
            SWIG_croak("Usage: svn_fs_set_warning_func(fs,warning,warning_baton);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_fs_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_fs_set_warning_func. Expected _p_svn_fs_t");
            }
        }
        {
            if (SWIG_ConvertPtr(ST(1), (void **) &arg2, SWIGTYPE_p_f_p_void_p_struct_svn_error_t__void,0) < 0) {
                SWIG_croak("Type error in argument 2 of svn_fs_set_warning_func. Expected _p_f_p_void_p_struct_svn_error_t__void");
            }
        }
        {
            if (SWIG_ConvertPtr(ST(2), (void **) &arg3, 0,0) < 0) {
                SWIG_croak("Type error in argument 3 of svn_fs_set_warning_func. Expected _p_void");
            }
        }
        {
            svn_fs_set_warning_func(arg1,arg2,arg3);
            
            
            
            
        }
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_fs_create) {
    {
        svn_fs_t **arg1 = (svn_fs_t **) 0 ;
        char *arg2 = (char *) 0 ;
        apr_hash_t *arg3 = (apr_hash_t *) 0 ;
        apr_pool_t *arg4 = (apr_pool_t *) 0 ;
        svn_error_t *result;
        apr_pool_t *_global_pool ;
        svn_fs_t *temp1 ;
        int argvi = 0;
        dXSARGS;
        
        {
            _global_pool = arg4 = svn_swig_pl_make_pool (ST(items-1));
        }
        {
            arg1 = (svn_fs_t **)&temp1;
        }
        if ((items < 2) || (items > 3)) {
            SWIG_croak("Usage: svn_fs_create(path,fs_config,pool);");
        }
        if (!SvOK((SV*) ST(0))) arg2 = 0;
        else arg2 = (char *) SvPV(ST(0), PL_na);
        {
            arg3 = svn_swig_pl_strings_to_hash (ST(1), _global_pool);
        }
        if (items > 2) {
            
        }
        {
            result = (svn_error_t *)svn_fs_create(arg1,(char const *)arg2,arg3,arg4);
            
            
            
            
        }
        {
            if (result) {
                SV *exception_handler = perl_get_sv ("SVN::Error::handler", FALSE);
                
                if (SvOK(exception_handler)) {
                    SV *callback_result;
                    
                    svn_swig_pl_callback_thunk (CALL_SV, exception_handler,
                    &callback_result, "S", result,
                    SWIGTYPE_p_svn_error_t);
                } else {
                    ST(argvi) = sv_newmortal();
                    SWIG_MakePtr (ST(argvi), (void *)result, SWIGTYPE_p_svn_error_t ,0);
                    argvi++;
                }
            }
        }
        {
            ST(argvi) = sv_newmortal();
            SWIG_MakePtr(ST(argvi++), (void *)*arg1, SWIGTYPE_p_svn_fs_t,0);
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_fs_open) {
    {
        svn_fs_t **arg1 = (svn_fs_t **) 0 ;
        char *arg2 = (char *) 0 ;
        apr_hash_t *arg3 = (apr_hash_t *) 0 ;
        apr_pool_t *arg4 = (apr_pool_t *) 0 ;
        svn_error_t *result;
        apr_pool_t *_global_pool ;
        svn_fs_t *temp1 ;
        int argvi = 0;
        dXSARGS;
        
        {
            _global_pool = arg4 = svn_swig_pl_make_pool (ST(items-1));
        }
        {
            arg1 = (svn_fs_t **)&temp1;
        }
        if ((items < 2) || (items > 3)) {
            SWIG_croak("Usage: svn_fs_open(path,config,pool);");
        }
        if (!SvOK((SV*) ST(0))) arg2 = 0;
        else arg2 = (char *) SvPV(ST(0), PL_na);
        {
            if (SWIG_ConvertPtr(ST(1), (void **) &arg3, SWIGTYPE_p_apr_hash_t,0) < 0) {
                SWIG_croak("Type error in argument 3 of svn_fs_open. Expected _p_apr_hash_t");
            }
        }
        if (items > 2) {
            
        }
        {
            result = (svn_error_t *)svn_fs_open(arg1,(char const *)arg2,arg3,arg4);
            
            
            
            
        }
        {
            if (result) {
                SV *exception_handler = perl_get_sv ("SVN::Error::handler", FALSE);
                
                if (SvOK(exception_handler)) {
                    SV *callback_result;
                    
                    svn_swig_pl_callback_thunk (CALL_SV, exception_handler,
                    &callback_result, "S", result,
                    SWIGTYPE_p_svn_error_t);
                } else {
                    ST(argvi) = sv_newmortal();
                    SWIG_MakePtr (ST(argvi), (void *)result, SWIGTYPE_p_svn_error_t ,0);
                    argvi++;
                }
            }
        }
        {
            ST(argvi) = sv_newmortal();
            SWIG_MakePtr(ST(argvi++), (void *)*arg1, SWIGTYPE_p_svn_fs_t,0);
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}