embed.h

视频监控网络部分的协议ddns,的模块的实现代码,请大家大胆指正.

#define my_htobe16		Perl_my_htobe16
#endif
#endif
#ifdef PERL_NEED_MY_BETOH16
#ifdef PERL_CORE
#define my_betoh16		Perl_my_betoh16
#endif
#endif
#ifdef PERL_NEED_MY_HTOLE32
#ifdef PERL_CORE
#define my_htole32		Perl_my_htole32
#endif
#endif
#ifdef PERL_NEED_MY_LETOH32
#ifdef PERL_CORE
#define my_letoh32		Perl_my_letoh32
#endif
#endif
#ifdef PERL_NEED_MY_HTOBE32
#ifdef PERL_CORE
#define my_htobe32		Perl_my_htobe32
#endif
#endif
#ifdef PERL_NEED_MY_BETOH32
#ifdef PERL_CORE
#define my_betoh32		Perl_my_betoh32
#endif
#endif
#ifdef PERL_NEED_MY_HTOLE64
#ifdef PERL_CORE
#define my_htole64		Perl_my_htole64
#endif
#endif
#ifdef PERL_NEED_MY_LETOH64
#ifdef PERL_CORE
#define my_letoh64		Perl_my_letoh64
#endif
#endif
#ifdef PERL_NEED_MY_HTOBE64
#ifdef PERL_CORE
#define my_htobe64		Perl_my_htobe64
#endif
#endif
#ifdef PERL_NEED_MY_BETOH64
#ifdef PERL_CORE
#define my_betoh64		Perl_my_betoh64
#endif
#endif
#ifdef PERL_NEED_MY_HTOLES
#ifdef PERL_CORE
#define my_htoles		Perl_my_htoles
#endif
#endif
#ifdef PERL_NEED_MY_LETOHS
#ifdef PERL_CORE
#define my_letohs		Perl_my_letohs
#endif
#endif
#ifdef PERL_NEED_MY_HTOBES
#ifdef PERL_CORE
#define my_htobes		Perl_my_htobes
#endif
#endif
#ifdef PERL_NEED_MY_BETOHS
#ifdef PERL_CORE
#define my_betohs		Perl_my_betohs
#endif
#endif
#ifdef PERL_NEED_MY_HTOLEI
#ifdef PERL_CORE
#define my_htolei		Perl_my_htolei
#endif
#endif
#ifdef PERL_NEED_MY_LETOHI
#ifdef PERL_CORE
#define my_letohi		Perl_my_letohi
#endif
#endif
#ifdef PERL_NEED_MY_HTOBEI
#ifdef PERL_CORE
#define my_htobei		Perl_my_htobei
#endif
#endif
#ifdef PERL_NEED_MY_BETOHI
#ifdef PERL_CORE
#define my_betohi		Perl_my_betohi
#endif
#endif
#ifdef PERL_NEED_MY_HTOLEL
#ifdef PERL_CORE
#define my_htolel		Perl_my_htolel
#endif
#endif
#ifdef PERL_NEED_MY_LETOHL
#ifdef PERL_CORE
#define my_letohl		Perl_my_letohl
#endif
#endif
#ifdef PERL_NEED_MY_HTOBEL
#ifdef PERL_CORE
#define my_htobel		Perl_my_htobel
#endif
#endif
#ifdef PERL_NEED_MY_BETOHL
#ifdef PERL_CORE
#define my_betohl		Perl_my_betohl
#endif
#endif
#ifdef PERL_CORE
#define my_swabn		Perl_my_swabn
#endif
#define gv_fetchpvn_flags	Perl_gv_fetchpvn_flags
#define gv_fetchsv		Perl_gv_fetchsv
#ifdef PERL_CORE
#define is_gv_magical_sv	Perl_is_gv_magical_sv
#endif
#define stashpv_hvname_match	Perl_stashpv_hvname_match
#ifdef DEBUG_LEAKING_SCALARS_FORK_DUMP
#ifdef PERL_CORE
#define dump_sv_child		Perl_dump_sv_child
#endif
#endif
#ifdef PERL_DONT_CREATE_GVSV
#define gv_SVadd		Perl_gv_SVadd
#endif
#ifdef PERL_CORE
#define offer_nice_chunk	Perl_offer_nice_chunk
#endif
#ifndef SPRINTF_RETURNS_STRLEN
#endif
#ifdef PERL_CORE
#define my_clearenv		Perl_my_clearenv
#endif
#ifdef PERL_IMPLICIT_CONTEXT
#ifdef PERL_GLOBAL_STRUCT_PRIVATE
#else
#endif
#endif
#ifndef HAS_STRLCAT
#endif
#ifndef HAS_STRLCPY
#endif
#ifdef PERL_MAD
#ifdef PERL_CORE
#define pad_peg			Perl_pad_peg
#endif
#if defined(PERL_IN_DUMP_C) || defined(PERL_DECL_PROT)
#ifdef PERL_CORE
#define xmldump_attr		S_xmldump_attr
#endif
#endif
#ifdef PERL_CORE
#define xmldump_indent		Perl_xmldump_indent
#define xmldump_vindent		Perl_xmldump_vindent
#define xmldump_all		Perl_xmldump_all
#define xmldump_packsubs	Perl_xmldump_packsubs
#define xmldump_sub		Perl_xmldump_sub
#define xmldump_form		Perl_xmldump_form
#define xmldump_eval		Perl_xmldump_eval
#define sv_catxmlsv		Perl_sv_catxmlsv
#define sv_catxmlpvn		Perl_sv_catxmlpvn
#define sv_xmlpeek		Perl_sv_xmlpeek
#define do_pmop_xmldump		Perl_do_pmop_xmldump
#define pmop_xmldump		Perl_pmop_xmldump
#define do_op_xmldump		Perl_do_op_xmldump
#define op_xmldump		Perl_op_xmldump
#endif
#ifdef PERL_CORE
#define newTOKEN		Perl_newTOKEN
#define token_free		Perl_token_free
#define token_getmad		Perl_token_getmad
#define op_getmad_weak		Perl_op_getmad_weak
#define op_getmad		Perl_op_getmad
#define prepend_madprops	Perl_prepend_madprops
#define append_madprops		Perl_append_madprops
#define addmad			Perl_addmad
#define newMADsv		Perl_newMADsv
#define newMADPROP		Perl_newMADPROP
#define mad_free		Perl_mad_free
#endif
#  if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT)
#ifdef PERL_CORE
#define skipspace0		S_skipspace0
#define skipspace1		S_skipspace1
#define skipspace2		S_skipspace2
#define start_force		S_start_force
#define curmad			S_curmad
#endif
#  endif
#ifdef PERL_CORE
#define madlex			Perl_madlex
#define madparse		Perl_madparse
#endif
#endif
#if !defined(HAS_SIGNBIT)
#endif
#ifdef PERL_CORE
#define mro_meta_init		Perl_mro_meta_init
#endif
#if defined(USE_ITHREADS)
#ifdef PERL_CORE
#define mro_meta_dup		Perl_mro_meta_dup
#endif
#endif
#define mro_get_linear_isa	Perl_mro_get_linear_isa
#if defined(PERL_IN_MRO_C) || defined(PERL_DECL_PROT)
#ifdef PERL_CORE
#define mro_get_linear_isa_c3	S_mro_get_linear_isa_c3
#define mro_get_linear_isa_dfs	S_mro_get_linear_isa_dfs
#endif
#endif
#ifdef PERL_CORE
#define mro_isa_changed_in	Perl_mro_isa_changed_in
#endif
#define mro_method_changed_in	Perl_mro_method_changed_in
#ifdef PERL_CORE
#define boot_core_mro		Perl_boot_core_mro
#endif
#define ck_anoncode		Perl_ck_anoncode
#define ck_bitop		Perl_ck_bitop
#define ck_chdir		Perl_ck_chdir
#define ck_concat		Perl_ck_concat
#define ck_defined		Perl_ck_defined
#define ck_delete		Perl_ck_delete
#define ck_die			Perl_ck_die
#define ck_eof			Perl_ck_eof
#define ck_eval			Perl_ck_eval
#define ck_exec			Perl_ck_exec
#define ck_exists		Perl_ck_exists
#define ck_exit			Perl_ck_exit
#define ck_ftst			Perl_ck_ftst
#define ck_fun			Perl_ck_fun
#define ck_glob			Perl_ck_glob
#define ck_grep			Perl_ck_grep
#define ck_index		Perl_ck_index
#define ck_join			Perl_ck_join
#define ck_lengthconst		Perl_ck_lengthconst
#define ck_lfun			Perl_ck_lfun
#define ck_listiob		Perl_ck_listiob
#define ck_match		Perl_ck_match
#define ck_method		Perl_ck_method
#define ck_null			Perl_ck_null
#define ck_open			Perl_ck_open
#define ck_readline		Perl_ck_readline
#define ck_repeat		Perl_ck_repeat
#define ck_require		Perl_ck_require
#define ck_return		Perl_ck_return
#define ck_rfun			Perl_ck_rfun
#define ck_rvconst		Perl_ck_rvconst
#define ck_sassign		Perl_ck_sassign
#define ck_select		Perl_ck_select
#define ck_shift		Perl_ck_shift
#define ck_smartmatch		Perl_ck_smartmatch
#define ck_sort			Perl_ck_sort
#define ck_spair		Perl_ck_spair
#define ck_split		Perl_ck_split
#define ck_subr			Perl_ck_subr
#define ck_substr		Perl_ck_substr
#define ck_svconst		Perl_ck_svconst
#define ck_trunc		Perl_ck_trunc
#define ck_unpack		Perl_ck_unpack
#define pp_aassign		Perl_pp_aassign
#define pp_abs			Perl_pp_abs
#define pp_accept		Perl_pp_accept
#define pp_add			Perl_pp_add
#define pp_aelem		Perl_pp_aelem
#define pp_aelemfast		Perl_pp_aelemfast
#define pp_alarm		Perl_pp_alarm
#define pp_and			Perl_pp_and
#define pp_andassign		Perl_pp_andassign
#define pp_anoncode		Perl_pp_anoncode
#define pp_anonhash		Perl_pp_anonhash
#define pp_anonlist		Perl_pp_anonlist
#define pp_aslice		Perl_pp_aslice
#define pp_atan2		Perl_pp_atan2
#define pp_av2arylen		Perl_pp_av2arylen
#define pp_backtick		Perl_pp_backtick
#define pp_bind			Perl_pp_bind
#define pp_binmode		Perl_pp_binmode
#define pp_bit_and		Perl_pp_bit_and
#define pp_bit_or		Perl_pp_bit_or
#define pp_bit_xor		Perl_pp_bit_xor
#define pp_bless		Perl_pp_bless
#define pp_break		Perl_pp_break
#define pp_caller		Perl_pp_caller
#define pp_chdir		Perl_pp_chdir
#define pp_chmod		Perl_pp_chmod
#define pp_chomp		Perl_pp_chomp
#define pp_chop			Perl_pp_chop
#define pp_chown		Perl_pp_chown
#define pp_chr			Perl_pp_chr
#define pp_chroot		Perl_pp_chroot
#define pp_close		Perl_pp_close
#define pp_closedir		Perl_pp_closedir
#define pp_complement		Perl_pp_complement
#define pp_concat		Perl_pp_concat
#define pp_cond_expr		Perl_pp_cond_expr
#define pp_connect		Perl_pp_connect
#define pp_const		Perl_pp_const
#define pp_continue		Perl_pp_continue
#define pp_cos			Perl_pp_cos
#define pp_crypt		Perl_pp_crypt
#define pp_dbmclose		Perl_pp_dbmclose
#define pp_dbmopen		Perl_pp_dbmopen
#define pp_dbstate		Perl_pp_dbstate
#define pp_defined		Perl_pp_defined
#define pp_delete		Perl_pp_delete
#define pp_die			Perl_pp_die
#define pp_divide		Perl_pp_divide
#define pp_dofile		Perl_pp_dofile
#define pp_dor			Perl_pp_dor
#define pp_dorassign		Perl_pp_dorassign
#define pp_dump			Perl_pp_dump
#define pp_each			Perl_pp_each
#define pp_egrent		Perl_pp_egrent
#define pp_ehostent		Perl_pp_ehostent
#define pp_enetent		Perl_pp_enetent
#define pp_enter		Perl_pp_enter
#define pp_entereval		Perl_pp_entereval
#define pp_entergiven		Perl_pp_entergiven
#define pp_enteriter		Perl_pp_enteriter
#define pp_enterloop		Perl_pp_enterloop
#define pp_entersub		Perl_pp_entersub
#define pp_entertry		Perl_pp_entertry
#define pp_enterwhen		Perl_pp_enterwhen
#define pp_enterwrite		Perl_pp_enterwrite
#define pp_eof			Perl_pp_eof
#define pp_eprotoent		Perl_pp_eprotoent
#define pp_epwent		Perl_pp_epwent
#define pp_eq			Perl_pp_eq
#define pp_eservent		Perl_pp_eservent
#define pp_exec			Perl_pp_exec
#define pp_exists		Perl_pp_exists
#define pp_exit			Perl_pp_exit
#define pp_exp			Perl_pp_exp
#define pp_fcntl		Perl_pp_fcntl
#define pp_fileno		Perl_pp_fileno
#define pp_flip			Perl_pp_flip
#define pp_flock		Perl_pp_flock
#define pp_flop			Perl_pp_flop
#define pp_fork			Perl_pp_fork
#define pp_formline		Perl_pp_formline
#define pp_ftatime		Perl_pp_ftatime
#define pp_ftbinary		Perl_pp_ftbinary
#define pp_ftblk		Perl_pp_ftblk
#define pp_ftchr		Perl_pp_ftchr
#define pp_ftctime		Perl_pp_ftctime
#define pp_ftdir		Perl_pp_ftdir
#define pp_fteexec		Perl_pp_fteexec
#define pp_fteowned		Perl_pp_fteowned
#define pp_fteread		Perl_pp_fteread
#define pp_ftewrite		Perl_pp_ftewrite
#define pp_ftfile		Perl_pp_ftfile
#define pp_ftis			Perl_pp_ftis
#define pp_ftlink		Perl_pp_ftlink
#define pp_ftmtime		Perl_pp_ftmtime
#define pp_ftpipe		Perl_pp_ftpipe
#define pp_ftrexec		Perl_pp_ftrexec
#define pp_ftrowned		Perl_pp_ftrowned
#define pp_ftrread		Perl_pp_ftrread
#define pp_ftrwrite		Perl_pp_ftrwrite
#define pp_ftsgid		Perl_pp_ftsgid
#define pp_ftsize		Perl_pp_ftsize
#define pp_ftsock		Perl_pp_ftsock
#define pp_ftsuid		Perl_pp_ftsuid
#define pp_ftsvtx		Perl_pp_ftsvtx
#define pp_fttext		Perl_pp_fttext
#define pp_fttty		Perl_pp_fttty
#define pp_ftzero		Perl_pp_ftzero
#define pp_ge			Perl_pp_ge
#define pp_gelem		Perl_pp_gelem
#define pp_getc			Perl_pp_getc
#define pp_getlogin		Perl_pp_getlogin
#define pp_getpeername		Perl_pp_getpeername
#define pp_getpgrp		Perl_pp_getpgrp
#define pp_getppid		Perl_pp_getppid
#define pp_getpriority		Perl_pp_getpriority
#define pp_getsockname		Perl_pp_getsockname
#define pp_ggrent		Perl_pp_ggrent
#define pp_ggrgid		Perl_pp_ggrgid
#define pp_ggrnam		Perl_pp_ggrnam
#define pp_ghbyaddr		Perl_pp_ghbyaddr
#define pp_ghbyname		Perl_pp_ghbyname
#define pp_ghostent		Perl_pp_ghostent
#define pp_glob			Perl_pp_glob
#define pp_gmtime		Perl_pp_gmtime
#define pp_gnbyaddr		Perl_pp_gnbyaddr
#define pp_gnbyname		Perl_pp_gnbyname
#define pp_gnetent		Perl_pp_gnetent
#define pp_goto			Perl_pp_goto
#define pp_gpbyname		Perl_pp_gpbyname
#define pp_gpbynumber		Perl_pp_gpbynumber
#define pp_gprotoent		Perl_pp_gprotoent
#define pp_gpwent		Perl_pp_gpwent
#define pp_gpwnam		Perl_pp_gpwnam
#define pp_gpwuid		Perl_pp_gpwuid
#define pp_grepstart		Perl_pp_grepstart
#define pp_grepwhile		Perl_pp_grepwhile
#define pp_gsbyname		Perl_pp_gsbyname
#define pp_gsbyport		Perl_pp_gsbyport
#define pp_gservent		Perl_pp_gservent
#define pp_gsockopt		Perl_pp_gsockopt
#define pp_gt			Perl_pp_gt
#define pp_gv			Perl_pp_gv
#define pp_gvsv			Perl_pp_gvsv
#define pp_helem		Perl_pp_helem
#define pp_hex			Perl_pp_hex
#define pp_hslice		Perl_pp_hslice
#define pp_i_add		Perl_pp_i_add
#define pp_i_divide		Perl_pp_i_divide
#define pp_i_eq			Perl_pp_i_eq
#define pp_i_ge			Perl_pp_i_ge
#define pp_i_gt			Perl_pp_i_gt
#define pp_i_le			Perl_pp_i_le
#define pp_i_lt			Perl_pp_i_lt
#define pp_i_modulo		Perl_pp_i_modulo
#define pp_i_multiply		Perl_pp_i_multiply
#define pp_i_ncmp		Perl_pp_i_ncmp
#define pp_i_ne			Perl_pp_i_ne
#define pp_i_negate		Perl_pp_i_negate
#define pp_i_subtract		Perl_pp_i_subtract
#define pp_inde