genbor (genbor) wrote in ru_mac,
genbor
genbor
ru_mac

Perlы сервер выдает. Трафик наружу неопознанный

Дано: канистра ж4 / 10.5.8 / МАМР 1.9.4 Работает дома вэб-сервером и видеонаблюдением домашним.

Иногда, внезапно, сервак начинает отдавать наружу какую-то инфу с немалой скоростью и подвешивает проц на 100% не только сервака, но и кладет всю домашнюю сеть, роутер закипает. При чем МАМР в этот момент может быть выключен. Т.е. это не сайт смотрят, однозначно. Других шар, каких-то файлов интересных, на сервере нет.
Стоит прибить процесс PERL, всё прекращается.







И пару перлов я отловил, но прочитать не умею. Подскажите плиз, куда смотреть и о чем думать.

[первый перл]Sampling process 16631 for 3 seconds with 1 millisecond of run time between samples
Sampling completed, processing symbols...
Analysis of sampling Exited process (pid 16631) every 1 millisecond
Call graph:
857 Thread_2503
829 0x1c50
829 0x1d8c
829 perl_run
829 Perl_runops_standard
440 Perl_pp_send
383 sendto$UNIX2003
383 sendto$UNIX2003
22 Perl_sv_setiv
22 Perl_sv_setiv
20 Perl_sv_2iv
16 Perl_my_atof
14 Perl_my_atof2
13 Perl_my_atof2
1 dyld_stub_strlen
1 dyld_stub_strlen
2 Perl_my_atof
3 Perl_sv_2iv
1 Perl_grok_number
1 Perl_grok_number
9 Perl_pp_send
4 __error
2 dyld_stub_pthread_self
2 dyld_stub_pthread_self
1 __error
1 __pthread_self
1 __pthread_self
2 Perl_PerlIO_fileno
2 Perl_PerlIO_fileno
125 Perl_pp_unstack
122 Perl_free_tmps
99 Perl_sv_free
50 Perl_sv_clear
27 szone_free
27 szone_free
15 Perl_sv_clear
3 free
3 free
3 malloc_zone_free
3 malloc_zone_free
2 Perl_safesysfree
2 Perl_safesysfree
14 free
14 free
10 dyld_stub_free
10 dyld_stub_free
9 malloc_zone_free
9 malloc_zone_free
7 szone_free
7 szone_free
6 dyld_stub_malloc_zone_free
6 dyld_stub_malloc_zone_free
3 Perl_sv_free
12 Perl_free_tmps
11 Perl_sv_clear
11 Perl_sv_clear
3 Perl_pp_unstack
62 Perl_runops_standard
26 Perl_pp_eq
26 Perl_pp_eq
12 Perl_pp_padsv
12 Perl_pp_padsv
5 Perl_pp_const
5 Perl_pp_const
5 Perl_pp_nextstate
5 Perl_pp_nextstate
4 Perl_pp_ge
4 Perl_pp_ge
3 Perl_pp_unstack
3 Perl_pp_unstack
1 Perl_pp_and
1 Perl_pp_and
1 Perl_pp_gvsv
1 Perl_pp_gvsv
1 Perl_pp_leave
1 Perl_pp_leave
1 Perl_pp_leavesub
1 Perl_pp_leavesub
1 Perl_pp_sassign
1 Perl_pp_sassign
1 Perl_pp_time
1 Perl_pp_time
1 Perl_pp_wantarray
1 Perl_pp_wantarray
56 Perl_pp_time
42 time
26 gettimeofday
14 __gettimeofday
14 __gettimeofday
7 dyld_stub___commpage_gettimeofday
7 dyld_stub___commpage_gettimeofday
4 gettimeofday
1 __commpage_gettimeofday
1 __commpage_gettimeofday
5 time
3 dyld_stub_fesetenv
3 dyld_stub_fesetenv
3 fegetenv
3 fegetenv
3 fesetenv
3 fesetenv
2 dyld_stub_gettimeofday
2 dyld_stub_gettimeofday
8 Perl_pp_time
3 Perl_sv_setiv
3 Perl_sv_setiv
3 dyld_stub_time
3 dyld_stub_time
54 Perl_pp_entersub
36 XS_Socket_pack_sockaddr_in
18 Perl_newSVpvn
18 Perl_sv_setpvn
10 Perl_sv_grow
8 Perl_safesysmalloc
3 malloc
3 malloc_zone_malloc
2 szone_malloc
2 szone_malloc
1 malloc_zone_malloc
2 Perl_safesysmalloc
1 Perl_safesysmalloc
1 malloc
1 malloc
1 dyld_stub_malloc
1 dyld_stub_malloc
1 dyld_stub_pthread_getspecific
1 dyld_stub_pthread_getspecific
2 Perl_sv_grow
5 Perl_sv_upgrade
5 Perl_sv_upgrade
3 Perl_sv_setpvn
5 XS_Socket_pack_sockaddr_in
4 Perl_sv_2mortal
4 Perl_sv_2mortal
4 dyld_stub_Perl_Tmarkstack_ptr_ptr
4 dyld_stub_Perl_Tmarkstack_ptr_ptr
3 dyld_stub_Perl_Tstack_base_ptr
3 dyld_stub_Perl_Tstack_base_ptr
2 XS_Socket_pack_sockaddr_in
1 Perl_newSVpvn
1 Perl_newSVpvn
1 Perl_sv_2mortal
1 Perl_sv_2mortal
14 Perl_pp_entersub
2 Perl_save_int
2 Perl_save_int
1 Perl_pop_scope
1 Perl_pop_scope
1 Perl_push_return
1 Perl_push_return
24 Perl_pp_repeat
8 Perl_sv_pvn_force_flags
4 __memcpy
4 __memcpy
2 Perl_sv_pvn_force_flags
1 Perl_sv_2pv_flags
1 Perl_sv_2pv_flags
1 dyld_stub_memmove
1 dyld_stub_memmove
7 Perl_pp_repeat
6 Perl_sv_setsv_flags
6 Perl_sv_setsv_flags
3 Perl_sv_2iv
3 Perl_sv_2iv
17 Perl_pp_and
17 Perl_pp_and
11 Perl_pp_padsv
11 Perl_pp_padsv
7 Perl_pp_rv2av
4 Perl_pp_rv2av
2 Perl_sv_setiv
2 Perl_sv_setiv
1 memmove
1 memmove
5 Perl_pp_leavesub
2 Perl_leave_scope
2 Perl_leave_scope
2 Perl_sv_free
2 Perl_sv_free
1 Perl_pp_leavesub
5 Perl_pp_nextstate
5 Perl_pp_nextstate
3 Perl_pp_cond_expr
3 Perl_pp_cond_expr
3 Perl_pp_ge
3 Perl_pp_ge
3 Perl_pp_sassign
2 Perl_pp_sassign
1 Perl_sv_setsv_flags
1 __memcpy
1 __memcpy
2 Perl_pp_enter
1 Perl_pp_enter
1 Perl_push_scope
1 Perl_push_scope
2 Perl_pp_eq
2 Perl_pp_eq
2 Perl_pp_gvsv
2 Perl_pp_gvsv
2 Perl_pp_preinc
2 Perl_pp_preinc
2 dyld_stub_fileno
2 dyld_stub_fileno
2 fileno
2 fileno
1 Perl_pp_const
1 Perl_pp_const
1 Perl_pp_gv
1 Perl_pp_gv
28 perl_run
28 Perl_runops_standard
28 Perl_runops_standard

Total number in stack (recursive counted multiple, when >=5):

Sort by top of stack, same collapsed (when >= 5):
sendto$UNIX2003 383
szone_free 34
Perl_pp_eq 28
Perl_runops_standard 28
Perl_sv_setiv 27
Perl_sv_clear 26
Perl_pp_padsv 23
Perl_pp_and 18
free 17
Perl_pp_entersub 14
__gettimeofday 14
Perl_my_atof2 13
Perl_free_tmps 12
malloc_zone_free 12
Perl_pp_nextstate 10
dyld_stub_free 10
Perl_pp_send 9
Perl_pp_time 9
Perl_pp_ge 7
Perl_pp_repeat 7
dyld_stub___commpage_gettimeofday 7
Perl_pp_const 6
Perl_pp_unstack 6
Perl_sv_2iv 6
Perl_sv_setsv_flags 6
dyld_stub_malloc_zone_free 6
Perl_sv_2mortal 5
Perl_sv_free 5
Perl_sv_upgrade 5
XS_Socket_pack_sockaddr_in 5
__memcpy 5
time 5
Sample analysis of process 16631 written to file /dev/stdout


[второй перл]Sampling process 16662 for 3 seconds with 1 millisecond of run time between samples
Sampling completed, processing symbols...
Analysis of sampling perl (pid 16662) every 1 millisecond
Call graph:
980 Thread_2503
944 0x1c50
944 0x1d8c
944 perl_run
944 Perl_runops_standard
443 Perl_pp_send
399 sendto$UNIX2003
399 sendto$UNIX2003
14 Perl_sv_2iv
7 Perl_my_atof
6 Perl_my_atof2
5 Perl_my_atof2
1 strlen
1 strlen
1 Perl_my_atof
2 Perl_cast_iv
2 Perl_cast_iv
2 Perl_grok_number
2 Perl_grok_number
2 Perl_sv_2iv
1 Perl_ckwarn
1 Perl_ckwarn
14 Perl_sv_setiv
14 Perl_sv_setiv
9 Perl_pp_send
4 PerlIO_isutf8
4 PerlIO_isutf8
2 __error
2 __error
1 Perl_PerlIO_fileno
1 Perl_PerlIO_fileno
129 Perl_pp_unstack
119 Perl_free_tmps
113 Perl_sv_free
52 Perl_sv_clear
28 szone_free
28 szone_free
13 Perl_sv_clear
5 Perl_safesysfree
5 Perl_safesysfree
5 free
5 free
1 malloc_zone_free
1 malloc_zone_free
28 malloc_zone_free
28 malloc_zone_free
8 Perl_sv_free
8 dyld_stub_free
8 dyld_stub_free
7 free
7 free
6 dyld_stub_malloc_zone_free
6 dyld_stub_malloc_zone_free
4 szone_free
4 szone_free
6 Perl_free_tmps
10 Perl_pp_unstack
86 Perl_pp_time
62 time
33 gettimeofday
23 __gettimeofday
23 __gettimeofday
7 dyld_stub___commpage_gettimeofday
7 dyld_stub___commpage_gettimeofday
3 gettimeofday
6 dyld_stub_fegetenv
6 dyld_stub_fegetenv
6 dyld_stub_fesetenv
6 dyld_stub_fesetenv
6 dyld_stub_gettimeofday
6 dyld_stub_gettimeofday
5 fegetenv
5 fegetenv
4 time
2 fesetenv
2 fesetenv
14 dyld_stub_time
14 dyld_stub_time
9 Perl_pp_time
1 Perl_sv_setiv
1 Perl_sv_setiv
70 Perl_pp_entersub
39 XS_Socket_pack_sockaddr_in
24 Perl_newSVpvn
19 Perl_sv_setpvn
13 Perl_sv_grow
9 Perl_safesysmalloc
2 Perl_safesysmalloc
2 Perl_safesysmalloc
2 malloc
2 malloc
2 malloc
2 malloc_zone_malloc
2 malloc_zone_malloc
1 __pthread_getspecific
1 __pthread_getspecific
1 dyld_stub_malloc
1 dyld_stub_malloc
1 dyld_stub_pthread_getspecific
1 dyld_stub_pthread_getspecific
4 Perl_sv_grow
4 Perl_sv_upgrade
4 Perl_sv_upgrade
2 Perl_sv_setpvn
5 Perl_newSVpvn
4 XS_Socket_pack_sockaddr_in
3 dyld_stub_Perl_Tstack_sp_ptr
3 dyld_stub_Perl_Tstack_sp_ptr
2 XS_Socket_pack_sockaddr_in
2 Perl_newSVpvn
2 Perl_newSVpvn
2 dyld_stub_Perl_Tmarkstack_ptr_ptr
2 dyld_stub_Perl_Tmarkstack_ptr_ptr
2 dyld_stub_Perl_Tstack_base_ptr
2 dyld_stub_Perl_Tstack_base_ptr
1 Perl_Tstack_base_ptr
1 Perl_Tstack_base_ptr
1 Perl_sv_2mortal
1 Perl_sv_2mortal
22 Perl_pp_entersub
3 dyld_stub_memcpy
3 dyld_stub_memcpy
2 Perl_leave_scope
2 Perl_leave_scope
2 Perl_save_int
2 Perl_save_int
1 Perl_block_gimme
1 Perl_block_gimme
1 Perl_push_scope
1 Perl_push_scope
70 Perl_runops_standard
28 Perl_pp_eq
28 Perl_pp_eq
16 Perl_pp_nextstate
16 Perl_pp_nextstate
8 Perl_pp_padsv
8 Perl_pp_padsv
5 Perl_pp_const
5 Perl_pp_const
3 Perl_pp_ge
3 Perl_pp_ge
3 Perl_pp_gv
3 Perl_pp_gv
2 Perl_pp_gvsv
2 Perl_pp_gvsv
1 Perl_pp_and
1 Perl_pp_and
1 Perl_pp_leave
1 Perl_pp_leave
1 Perl_pp_pushmark
1 Perl_pp_pushmark
1 Perl_pp_time
1 Perl_pp_time
1 Perl_pp_wantarray
1 Perl_pp_wantarray
34 Perl_pp_repeat
17 Perl_sv_pvn_force_flags
8 Perl_sv_pvn_force_flags
4 Perl_sv_2pv_flags
4 Perl_sv_2pv_flags
3 __memcpy
3 __memcpy
2 dyld_stub_memmove
2 dyld_stub_memmove
8 Perl_sv_setsv_flags
8 Perl_sv_setsv_flags
5 Perl_sv_2iv
4 Perl_sv_2iv
1 Perl_ckwarn
1 Perl_ckwarn
4 Perl_pp_repeat
25 Perl_pp_padsv
25 Perl_pp_padsv
17 Perl_pp_and
17 Perl_pp_and
10 Perl_pp_rv2av
8 Perl_pp_rv2av
1 Perl_sv_setiv
1 Perl_sv_setiv
1 __memcpy
1 __memcpy
7 Perl_pp_eq
7 Perl_pp_eq
6 Perl_pp_const
6 Perl_pp_const
6 Perl_pp_leave
2 Perl_leave_scope
2 Perl_leave_scope
2 Perl_pop_scope
2 Perl_pop_scope
2 Perl_pp_leave
5 Perl_pp_gv
5 Perl_pp_gv
5 Perl_pp_leavesub
3 Perl_sv_free
3 Perl_sv_free
2 Perl_pp_leavesub
5 Perl_pp_sassign
5 Perl_sv_setsv_flags
5 Perl_sv_setsv_flags
4 PerlIOStdio_fileno
4 PerlIOStdio_fileno
4 Perl_pp_enter
4 Perl_pp_enter
4 Perl_pp_nextstate
4 Perl_pp_nextstate
4 Perl_pp_or
4 Perl_pp_or
4 Perl_pp_preinc
4 Perl_pp_preinc
2 Perl_leave_scope
2 Perl_leave_scope
2 Perl_pp_pushmark
2 Perl_pp_pushmark
1 Perl_pp_wantarray
1 Perl_pp_wantarray
1 fileno
1 fileno
36 perl_run
36 Perl_runops_standard
36 Perl_runops_standard

Total number in stack (recursive counted multiple, when >=5):

Sort by top of stack, same collapsed (when >= 5):
sendto$UNIX2003 399
Perl_runops_standard 36
Perl_pp_eq 35
Perl_pp_padsv 33
szone_free 32
malloc_zone_free 29
__gettimeofday 23
Perl_pp_entersub 22
Perl_pp_nextstate 20
Perl_pp_and 18
Perl_sv_setiv 16
dyld_stub_time 14
Perl_sv_clear 13
Perl_sv_setsv_flags 13
free 12
Perl_pp_const 11
Perl_sv_free 11
Perl_pp_time 10
Perl_pp_unstack 10
Perl_pp_send 9
Perl_pp_gv 8
Perl_pp_rv2av 8
Perl_sv_pvn_force_flags 8
dyld_stub_free 8
Perl_newSVpvn 7
dyld_stub___commpage_gettimeofday 7
Perl_free_tmps 6
Perl_leave_scope 6
Perl_sv_2iv 6
dyld_stub_fegetenv 6
dyld_stub_fesetenv 6
dyld_stub_gettimeofday 6
dyld_stub_malloc_zone_free 6
Perl_my_atof2 5
Perl_safesysfree 5
fegetenv 5
Sample analysis of process 16662 written to file /dev/stdout





ЗЫ: с тэгами не перемудрил?
Tags: os x (системные вопросы), сервер, хочется странного
Subscribe
  • Post a new comment

    Error

    Comments allowed for members only

    Anonymous comments are disabled in this journal

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

  • 20 comments