opcode.h

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

	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftpipe */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftsuid */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftsgid */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftsvtx */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftlink */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* fttty */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* fttext */
	MEMBER_TO_FPTR(Perl_ck_ftst),	/* ftbinary */
	MEMBER_TO_FPTR(Perl_ck_chdir),	/* chdir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* chown */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* chroot */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* unlink */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* chmod */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* utime */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* rename */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* link */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* symlink */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* readlink */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* mkdir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* rmdir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* open_dir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* readdir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* telldir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* seekdir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* rewinddir */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* closedir */
	MEMBER_TO_FPTR(Perl_ck_null),	/* fork */
	MEMBER_TO_FPTR(Perl_ck_null),	/* wait */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* waitpid */
	MEMBER_TO_FPTR(Perl_ck_exec),	/* system */
	MEMBER_TO_FPTR(Perl_ck_exec),	/* exec */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* kill */
	MEMBER_TO_FPTR(Perl_ck_null),	/* getppid */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* getpgrp */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* setpgrp */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* getpriority */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* setpriority */
	MEMBER_TO_FPTR(Perl_ck_null),	/* time */
	MEMBER_TO_FPTR(Perl_ck_null),	/* tms */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* localtime */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gmtime */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* alarm */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* sleep */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* shmget */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* shmctl */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* shmread */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* shmwrite */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* msgget */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* msgctl */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* msgsnd */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* msgrcv */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* semop */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* semget */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* semctl */
	MEMBER_TO_FPTR(Perl_ck_require),	/* require */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* dofile */
	MEMBER_TO_FPTR(Perl_ck_eval),	/* entereval */
	MEMBER_TO_FPTR(Perl_ck_null),	/* leaveeval */
	MEMBER_TO_FPTR(Perl_ck_null),	/* entertry */
	MEMBER_TO_FPTR(Perl_ck_null),	/* leavetry */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* ghbyname */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* ghbyaddr */
	MEMBER_TO_FPTR(Perl_ck_null),	/* ghostent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gnbyname */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gnbyaddr */
	MEMBER_TO_FPTR(Perl_ck_null),	/* gnetent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gpbyname */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gpbynumber */
	MEMBER_TO_FPTR(Perl_ck_null),	/* gprotoent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gsbyname */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gsbyport */
	MEMBER_TO_FPTR(Perl_ck_null),	/* gservent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* shostent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* snetent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* sprotoent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* sservent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* ehostent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* enetent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* eprotoent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* eservent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gpwnam */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* gpwuid */
	MEMBER_TO_FPTR(Perl_ck_null),	/* gpwent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* spwent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* epwent */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* ggrnam */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* ggrgid */
	MEMBER_TO_FPTR(Perl_ck_null),	/* ggrent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* sgrent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* egrent */
	MEMBER_TO_FPTR(Perl_ck_null),	/* getlogin */
	MEMBER_TO_FPTR(Perl_ck_fun),	/* syscall */
	MEMBER_TO_FPTR(Perl_ck_rfun),	/* lock */
	MEMBER_TO_FPTR(Perl_ck_null),	/* once */
	MEMBER_TO_FPTR(Perl_ck_null),	/* custom */
}
#endif
#ifdef PERL_CHECK_INITED
;
#endif /* #ifdef PERL_CHECK_INITED */

#ifndef PERL_GLOBAL_STRUCT_INIT

#ifndef DOINIT
EXTCONST U32 PL_opargs[];
#else
EXTCONST U32 PL_opargs[] = {
	0x00000000,	/* null */
	0x00000000,	/* stub */
	0x00003604,	/* scalar */
	0x00000004,	/* pushmark */
	0x00000014,	/* wantarray */
	0x00000c04,	/* const */
	0x00000c44,	/* gvsv */
	0x00000c44,	/* gv */
	0x00022440,	/* gelem */
	0x00000044,	/* padsv */
	0x00000040,	/* padav */
	0x00000040,	/* padhv */
	0x00000040,	/* padany */
	0x00000a40,	/* pushre */
	0x00000244,	/* rv2gv */
	0x00000244,	/* rv2sv */
	0x00000214,	/* av2arylen */
	0x00000240,	/* rv2cv */
	0x00000c00,	/* anoncode */
	0x00003604,	/* prototype */
	0x00004201,	/* refgen */
	0x00002206,	/* srefgen */
	0x0001368c,	/* ref */
	0x00122804,	/* bless */
	0x00013688,	/* backtick */
	0x00012808,	/* glob */
	0x0001d608,	/* readline */
	0x00000c08,	/* rcatline */
	0x00002204,	/* regcmaybe */
	0x00002204,	/* regcreset */
	0x00002604,	/* regcomp */
	0x00000a40,	/* match */
	0x00000a04,	/* qr */
	0x00002a54,	/* subst */
	0x00000654,	/* substcont */
	0x00003014,	/* trans */
	0x00000004,	/* sassign */
	0x00044408,	/* aassign */
	0x0000560d,	/* chop */
	0x0001368c,	/* schop */
	0x0000570d,	/* chomp */
	0x0001378c,	/* schomp */
	0x00013694,	/* defined */
	0x00013604,	/* undef */
	0x00013684,	/* study */
	0x0001368c,	/* pos */
	0x00002264,	/* preinc */
	0x00002254,	/* i_preinc */
	0x00002264,	/* predec */
	0x00002254,	/* i_predec */
	0x0000226c,	/* postinc */
	0x0000235c,	/* i_postinc */
	0x0000226c,	/* postdec */
	0x0000235c,	/* i_postdec */
	0x0002250e,	/* pow */
	0x0002252e,	/* multiply */
	0x0002251e,	/* i_multiply */
	0x0002252e,	/* divide */
	0x0002251e,	/* i_divide */
	0x0002253e,	/* modulo */
	0x0002251e,	/* i_modulo */
	0x00024409,	/* repeat */
	0x0002252e,	/* add */
	0x0002251e,	/* i_add */
	0x0002252e,	/* subtract */
	0x0002251e,	/* i_subtract */
	0x0002250e,	/* concat */
	0x0000290e,	/* stringify */
	0x0002250e,	/* left_shift */
	0x0002250e,	/* right_shift */
	0x00022436,	/* lt */
	0x00022416,	/* i_lt */
	0x00022436,	/* gt */
	0x00022416,	/* i_gt */
	0x00022436,	/* le */
	0x00022416,	/* i_le */
	0x00022436,	/* ge */
	0x00022416,	/* i_ge */
	0x00022436,	/* eq */
	0x00022416,	/* i_eq */
	0x00022436,	/* ne */
	0x00022416,	/* i_ne */
	0x0002243e,	/* ncmp */
	0x0002241e,	/* i_ncmp */
	0x00022416,	/* slt */
	0x00022416,	/* sgt */
	0x00022416,	/* sle */
	0x00022416,	/* sge */
	0x00022416,	/* seq */
	0x00022416,	/* sne */
	0x0002241e,	/* scmp */
	0x0002240e,	/* bit_and */
	0x0002240e,	/* bit_xor */
	0x0002240e,	/* bit_or */
	0x0000222e,	/* negate */
	0x0000231e,	/* i_negate */
	0x00002216,	/* not */
	0x0000220e,	/* complement */
	0x00000404,	/* smartmatch */
	0x0002290e,	/* atan2 */
	0x0001378e,	/* sin */
	0x0001378e,	/* cos */
	0x0001370c,	/* rand */
	0x00013604,	/* srand */
	0x0001378e,	/* exp */
	0x0001378e,	/* log */
	0x0001378e,	/* sqrt */
	0x0001378e,	/* int */
	0x0001378e,	/* hex */
	0x0001378e,	/* oct */
	0x0001378e,	/* abs */
	0x0001379c,	/* length */
	0x1322280c,	/* substr */
	0x0022281c,	/* vec */
	0x0122291c,	/* index */
	0x0122291c,	/* rindex */
	0x0004280d,	/* sprintf */
	0x00042805,	/* formline */
	0x0001379e,	/* ord */
	0x0001378e,	/* chr */
	0x0002290e,	/* crypt */
	0x0001368e,	/* ucfirst */
	0x0001368e,	/* lcfirst */
	0x0001368e,	/* uc */
	0x0001368e,	/* lc */
	0x0001368e,	/* quotemeta */
	0x00000248,	/* rv2av */
	0x00026c04,	/* aelemfast */
	0x00026404,	/* aelem */
	0x00046801,	/* aslice */
	0x00009600,	/* each */
	0x00009608,	/* values */
	0x00009608,	/* keys */
	0x00003600,	/* delete */
	0x00003614,	/* exists */
	0x00000248,	/* rv2hv */
	0x00028404,	/* helem */
	0x00048801,	/* hslice */
	0x00122800,	/* unpack */
	0x0004280d,	/* pack */
	0x00222808,	/* split */
	0x0004280d,	/* join */
	0x00004801,	/* list */
	0x00448400,	/* lslice */
	0x00004805,	/* anonlist */
	0x00004805,	/* anonhash */
	0x05326801,	/* splice */
	0x0004691d,	/* push */
	0x00017604,	/* pop */
	0x00017604,	/* shift */
	0x0004691d,	/* unshift */
	0x0005a841,	/* sort */
	0x00004809,	/* reverse */
	0x0004a841,	/* grepstart */
	0x00000648,	/* grepwhile */
	0x0004a841,	/* mapstart */
	0x00000648,	/* mapwhile */
	0x00022600,	/* range */
	0x00022200,	/* flip */
	0x00000200,	/* flop */
	0x00000600,	/* and */
	0x00000600,	/* or */
	0x00022406,	/* xor */
	0x00000600,	/* dor */
	0x00000640,	/* cond_expr */
	0x00000604,	/* andassign */
	0x00000604,	/* orassign */
	0x00000604,	/* dorassign */
	0x00000240,	/* method */
	0x00004249,	/* entersub */
	0x00000200,	/* leavesub */
	0x00000200,	/* leavesublv */
	0x00013608,	/* caller */
	0x0000481d,	/* warn */
	0x0000485d,	/* die */
	0x00013614,	/* reset */
	0x00000800,	/* lineseq */
	0x00001404,	/* nextstate */
	0x00001404,	/* dbstate */
	0x00000004,	/* unstack */
	0x00000000,	/* enter */
	0x00000800,	/* leave */
	0x00000800,	/* scope */
	0x00001240,	/* enteriter */
	0x00000000,	/* iter */
	0x00001240,	/* enterloop */
	0x00000400,	/* leaveloop */
	0x00004841,	/* return */
	0x00001a44,	/* last */
	0x00001a44,	/* next */
	0x00001a44,	/* redo */
	0x00001a44,	/* dump */
	0x00001a44,	/* goto */
	0x00013644,	/* exit */
	0x00001404,	/* setstate */
	0x00000c40,	/* method_named */
	0x00000640,	/* entergiven */
	0x00000200,	/* leavegiven */
	0x00000640,	/* enterwhen */
	0x00000200,	/* leavewhen */
	0x00000000,	/* break */
	0x00000000,	/* continue */
	0x0052c81d,	/* open */
	0x0001d614,	/* close */
	0x000cc814,	/* pipe_op */
	0x0000d61c,	/* fileno */
	0x0001361c,	/* umask */
	0x0012c804,	/* binmode */
	0x0042e855,	/* tie */
	0x0000f614,	/* untie */
	0x0000f604,	/* tied */
	0x00228814,	/* dbmopen */
	0x00009614,	/* dbmclose */
	0x02222808,	/* sselect */
	0x0001c80c,	/* select */
	0x0001d60c,	/* getc */
	0x122ec81d,	/* read */
	0x0001d654,	/* enterwrite */
	0x00000200,	/* leavewrite */
	0x0005c815,	/* prtf */
	0x0005c815,	/* print */
	0x0005c815,	/* say */
	0x1222c804,	/* sysopen */
	0x0022c804,	/* sysseek */
	0x122ec81d,	/* sysread */
	0x1322c81d,	/* syswrite */
	0x1222c81d,	/* send */
	0x022ec81d,	/* recv */
	0x0001d614,	/* eof */
	0x0001d60c,	/* tell */
	0x0022c804,	/* seek */
	0x00022814,	/* truncate */
	0x0022c80c,	/* fcntl */
	0x0022c80c,	/* ioctl */
	0x0002c91c,	/* flock */
	0x0222c814,	/* socket */
	0x222cc814,	/* sockpair */
	0x0002c814,	/* bind */
	0x0002c814,	/* connect */
	0x0002c814,	/* listen */
	0x000cc81c,	/* accept */
	0x0002c81c,	/* shutdown */
	0x0022c814,	/* gsockopt */
	0x0222c814,	/* ssockopt */
	0x0000d614,	/* getsockname */
	0x0000d614,	/* getpeername */
	0x0000d880,	/* lstat */
	0x0000d880,	/* stat */
	0x0000d894,	/* ftrread */
	0x0000d894,	/* ftrwrite */
	0x0000d894,	/* ftrexec */
	0x0000d894,	/* fteread */
	0x0000d894,	/* ftewrite */
	0x0000d894,	/* fteexec */
	0x0000d894,	/* ftis */
	0x0000d89c,	/* ftsize */
	0x0000d88c,	/* ftmtime */
	0x0000d88c,	/* ftatime */
	0x0000d88c,	/* ftctime */
	0x0000d894,	/* ftrowned */
	0x0000d894,	/* fteowned */
	0x0000d894,	/* ftzero */
	0x0000d894,	/* ftsock */
	0x0000d894,	/* ftchr */
	0x0000d894,	/* ftblk */
	0x0000d894,	/* ftfile */
	0x0000d894,	/* ftdir */
	0x0000d894,	/* ftpipe */
	0x0000d894,	/* ftsuid */
	0x0000d894,	/* ftsgid */
	0x0000d894,	/* ftsvtx */
	0x0000d894,	/* ftlink */
	0x0000d814,	/* fttty */
	0x0000d894,	/* fttext */
	0x0000d894,	/* ftbinary */
	0x0001371c,	/* chdir */
	0x0000491d,	/* chown */
	0x0001379c,	/* chroot */
	0x0000499d,	/* unlink */
	0x0000491d,	/* chmod */
	0x0000491d,	/* utime */
	0x0002291c,	/* rename */
	0x0002291c,	/* link */
	0x0002291c,	/* symlink */
	0x0001368c,	/* readlink */
	0x0013299c,	/* mkdir */
	0x0001379c,	/* rmdir */
	0x0002c814,	/* open_dir */
	0x0000d600,	/* readdir */
	0x0000d60c,	/* telldir */
	0x0002c804,	/* seekdir */
	0x0000d604,	/* rewinddir */
	0x0000d614,	/* closedir */
	0x0000001c,	/* fork */
	0x0000011c,	/* wait */
	0x0002291c,	/* waitpid */
	0x0005291d,	/* system */
	0x0005295d,	/* exec */
	0x0000495d,	/* kill */
	0x0000011c,	/* getppid */
	0x0001371c,	/* getpgrp */
	0x0013291c,	/* setpgrp */
	0x0002291c,	/* getpriority */
	0x0022291c,	/* setpriority */
	0x0000011c,	/* time */
	0x00000000,	/* tms */
	0x00013608,	/* localtime */
	0x00013608,	/* gmtime */
	0x0001369c,	/* alarm */
	0x0001371c,	/* sleep */
	0x0022281d,	/* shmget */
	0x0022281d,	/* shmctl */
	0x0222281d,	/* shmread */
	0x0222281d,	/* shmwrite */
	0x0002281d,	/* msgget */
	0x0022281d,	/* msgctl */
	0x0022281d,	/* msgsnd */
	0x2222281d,	/* msgrcv */
	0x0002281d,	/* semop */
	0x0022281d,	/* semget */
	0x0222281d,	/* semctl */
	0x000136c0,	/* require */
	0x00002240,	/* dofile */
	0x00003640,	/* entereval */
	0x00002200,	/* leaveeval */
	0x00000600,	/* entertry */
	0x00000800,	/* leavetry */
	0x00003600,	/* ghbyname */
	0x00022800,	/* ghbyaddr */
	0x00000000,	/* ghostent */
	0x00003600,	/* gnbyname */
	0x00022800,	/* gnbyaddr */
	0x00000000,	/* gnetent */
	0x00003600,	/* gpbyname */
	0x00002800,	/* gpbynumber */
	0x00000000,	/* gprotoent */
	0x00022800,	/* gsbyname */
	0x00022800,	/* gsbyport */
	0x00000000,	/* gservent */
	0x00003614,	/* shostent */
	0x00003614,	/* snetent */
	0x00003614,	/* sprotoent */
	0x00003614,	/* sservent */
	0x00000014,	/* ehostent */
	0x00000014,	/* enetent */
	0x00000014,	/* eprotoent */
	0x00000014,	/* eservent */
	0x00003600,	/* gpwnam */
	0x00003600,	/* gpwuid */
	0x00000000,	/* gpwent */
	0x00000014,	/* spwent */
	0x00000014,	/* epwent */
	0x00003600,	/* ggrnam */
	0x00003600,	/* ggrgid */
	0x00000000,	/* ggrent */
	0x00000014,	/* sgrent */
	0x00000014,	/* egrent */
	0x0000000c,	/* getlogin */
	0x0004281d,	/* syscall */
	0x0000f604,	/* lock */
	0x00000600,	/* once */
	0x00000000,	/* custom */
};
#endif

#endif /* !PERL_GLOBAL_STRUCT_INIT */

END_EXTERN_C

/* ex: set ro: */