成人免费xxxxx在线视频软件_久久精品久久久_亚洲国产精品久久久_天天色天天色_亚洲人成一区_欧美一级欧美三级在线观看

分析Erlang虛擬機(jī)啟動過程

作者：siyao
開發(fā) 開發(fā)工具
本文從源代碼出發(fā)簡單地分析從在控制臺輸入erl按下回車到init完成啟動步驟的過程。本文分析的環(huán)境為Unix環(huán)境，Erlang/OTP版本為R15B01，針對的虛擬機(jī)為SMP風(fēng)格的虛擬機(jī)（也就是在代碼中定義ERTS_SMP宏）。

Erlang虛擬機(jī)的啟動

erl實際上是一個shell腳本，設(shè)置幾個環(huán)境變量之后，調(diào)用執(zhí)行erlexec。erlexec的入口點在 otp_src_R15B01/erts/etc/common/erlexec.c 文件。erlexec的main函數(shù)首先分析erl傳入的參數(shù)和環(huán)境變量，選擇正確版本的beam可執(zhí)行文件，然后將傳入的參數(shù)整理好，加入一些默認(rèn)參數(shù)，***通過系統(tǒng)調(diào)用execv運(yùn)行beam虛擬機(jī)。例如在smp環(huán)境中，運(yùn)行的就是 beam.smp 版本的虛擬機(jī)。因此，erl和erlexec都是加載器，最終執(zhí)行的Erlang虛擬機(jī)進(jìn)程是名字為beam系列的進(jìn)程。

beam進(jìn)程的入口點在 otp_src_R15B01/erts/emulator/sys/unix/erl_main.c 。在這個文件中，main函數(shù)只有一行：

  1. erl_start(argc, argv); 

通過erl_start這個函數(shù)真正進(jìn)入Erlang虛擬機(jī)的世界了。erl_start函數(shù)位于 otp_src_R15B01/erts/emulator/beam/erl_init.c 文件，Erlang虛擬機(jī)初始化相關(guān)的代碼基本上都在這個文件中。這個函數(shù)大約600行，但是結(jié)構(gòu)簡單，大部分代碼都是在處理參數(shù)。把erl_start的主干理出來，就是這樣的：

  1. void erl_start(int argc, char **argv) 
  2.  { 
  3.      early_init(&argc, argv); 
  4.      處理各種參數(shù) 
  5.      設(shè)置信號處理函數(shù) 
  6.      erl_init(ncpu); 
  7.      init_shared_memory(boot_argc, boot_argv); 
  8.      load_preloaded(); 
  9.      erts_initialized = 1; 
  10.      erl_first_process_otp("otp_ring0", NULL, 0, boot_argc, boot_argv); 
  11.      erts_start_schedulers(); 
  12.      erts_sys_main_thread();  
  13.  } 

early_init()函數(shù)進(jìn)行一些非常底層的初始化工作。erl_init()處理一些和Erlang虛擬機(jī)本身的初始化操作，例如各種數(shù)據(jù)結(jié)構(gòu)的初始化。init_shared_memory()進(jìn)行一些和內(nèi)存回收相關(guān)的初始化。

load_preloaded()函數(shù)將需要預(yù)加載的Erlang模塊加載至虛擬機(jī)。需要預(yù)加載的模塊都在 otp_src_R15B01/erts/preloaded/ebin 目錄下。由于在build Erlang/OTP的時候，本地應(yīng)該還沒有Erlang編譯器，所以這個目錄下提供的都是編譯好的.beam文件。這些模塊的源碼位于otp_src_R15B01/erts/preloaded/src 目錄。預(yù)加載模塊在build的時候由工具程序 make_preload 生成C語言文件硬編碼在虛擬機(jī)中了。如果想要修改預(yù)加載的文件，例如在里面加上 erlang:display() 表達(dá)式打印調(diào)試信息，可以修改src中的文件，然后通過編譯器erlc生成.beam文件保存在 otp_src_R15B01/erts/preloaded/ebin目錄下覆蓋原來的文件，再build即可。

在預(yù)加載的文件夾中可以看到，預(yù)加載的有以下模塊：

erl_prim_loader：主要加載器，負(fù)責(zé)所有模塊的加載

erlang：對虛擬機(jī)提供的一些BIF的接口

init：init進(jìn)程的代碼

otp_ring0：Erlang虛擬機(jī)中***個進(jìn)程的代碼，啟動init

prim_file：文件操作接口

prim_inet：網(wǎng)絡(luò)操作接口

prim_zip：壓縮文件操作接口

zlib：zlib庫

把這些必要模塊都加載至虛擬機(jī)之后，通過erl_first_process_otp()函數(shù)創(chuàng)建了Erlang虛擬機(jī)上的***個進(jìn)程，調(diào)用 otp_ring0 模塊中的start/2函數(shù)。start/2 函數(shù)運(yùn)行init模塊的 boot/1 函數(shù)，之后開始Erlang/OTP系統(tǒng)的引導(dǎo)過程。這里先把虛擬機(jī)的啟動過程分析完再講述Erlang/OTP的引導(dǎo)過程。

創(chuàng)建了***個進(jìn)程之后，進(jìn)程還不能運(yùn)行，因為還沒有創(chuàng)建調(diào)度器。erts_start_schedulers()根據(jù)CPU的核心數(shù)和用戶通過參數(shù)設(shè)置的數(shù)值啟動某個數(shù)目的調(diào)度器線程。每一個調(diào)度器都在一個線程中運(yùn)行。調(diào)度器挑選要執(zhí)行的進(jìn)程，然后執(zhí)行進(jìn)程，當(dāng)進(jìn)程的reds用完或進(jìn)程等待IO掛起的時候再挑選另一個進(jìn)程執(zhí)行。以后再撰文詳細(xì)分析Erlang調(diào)度器的工作原理。運(yùn)行了erts_start_schedulers()函數(shù)之后Erlang虛擬機(jī)才真正運(yùn)轉(zhuǎn)起來。

啟動調(diào)度器之后，調(diào)用erts_sys_main_thread()函數(shù)，也就是說beam進(jìn)程的主線程進(jìn)入了erts_sys_main_thread()函數(shù)。下面簡單分析一下erts_sys_main_thread()函數(shù)。

  1. void erts_sys_main_thread(void) 
  2.  { 
  3.      erts_thread_disable_fpe(); 
  4.      smp_sig_notify(0); /* Notify initialized */ 
  5.      while (1) { 
  6.          /* Wait for a signal to arrive... */ 
  7.          select(0, NULL, NULL, NULL, NULL); 
  8.      } 
  9.  } 

這個函數(shù)很簡單，屏蔽浮點數(shù)異常、通知信號處理線程已經(jīng)完成了初始化，然后進(jìn)入一個死循環(huán)等待信號。這個select調(diào)用表示永遠(yuǎn)等待文件IO操作，但是什么文件也不等，只是把線程掛起。但是這個函數(shù)在收到信號的時候會返回。這里順便提一下Erlang虛擬機(jī)中的信號處理。在之前初始化的時候，設(shè)置了信號處理函數(shù)，也就是通過函數(shù) init_break_handler() 設(shè)置了一些信號的處理函數(shù)。這些信號處理函數(shù)收到了信號之后實際上將信號通過管道轉(zhuǎn)發(fā)給了一個專門處理信號的線程，之前在調(diào)用 early_init() 的時候創(chuàng)建了這個線程，這個信號處理線程運(yùn)行的函數(shù)是 signal_dispatcher_thread_func()，這個函數(shù)是一個死循環(huán)，等待從管道中讀取值。虛擬機(jī)的主線程通過 smp_sig_notify() 函數(shù)將通知消息寫入管道發(fā)給信號處理線程。

從Erlang虛擬機(jī)處理信號的方式可以看出，這種處理方式也是Erlang提倡的進(jìn)程間通信方式。

下面分析otp_ring0的start/2調(diào)用init的boot/1引導(dǎo)Erlang/OTP系統(tǒng)的過程。

init進(jìn)程的引導(dǎo)過程

init:boot/1的代碼如下：

  1. boot(BootArgs) -> 
  2.      register(init, self()), 
  3.      process_flag(trap_exit, true), 
  4.      start_on_load_handler_process(), 
  5.      {Start0,Flags,Args} = parse_boot_args(BootArgs), 
  6.      Start = map(fun prepare_run_args/1, Start0), 
  7.      Flags0 = flags_to_atoms_again(Flags), 
  8.      boot(Start,Flags0,Args). 

第2行將當(dāng)前進(jìn)程注冊為init，于是我們就有了init進(jìn)程。第4行啟動了一個新的進(jìn)程ON_LOAD_HANDLER，這個進(jìn)程處理一些和加載相關(guān)的事件。然后對傳入的參數(shù)做一些處理，Start是erl -s參數(shù)傳入的要運(yùn)行的MFA列表，F(xiàn)lags0是調(diào)用erl傳入的一些標(biāo)志，Args是erl -extra 傳入的一些額外參數(shù)。接下來這些參數(shù)傳入boot/3。下面是boot/3的代碼：

  1. boot(Start,Flags,Args) -> 
  2.      BootPid = do_boot(Flags,Start), 
  3.      State = #state{flags = Flags, 
  4.             args = Args, 
  5.             start = Start, 
  6.             bootpid = BootPid}, 
  7.      boot_loop(BootPid,State). 

boot/3調(diào)用do_boot/2，設(shè)置State，然后就進(jìn)入boot_loop/2循環(huán)。下面是do_boot/2的代碼：

  1. do_boot(Flags,Start) -> 
  2.      Self = self(), 
  3.      spawn_link(fun() -> do_boot(Self,Flags,Start) end). 
  4.   
  5.  do_boot(Init,Flags,Start) -> 
  6.      process_flag(trap_exit,true), 
  7.      {Pgm0,Nodes,Id,Path} = prim_load_flags(Flags), 
  8.      Root = b2s(get_flag('-root',Flags)), 
  9.      PathFls = path_flags(Flags), 
  10.      Pgm = b2s(Pgm0), 
  11.      _Pid = start_prim_loader(Init,b2a(Id),Pgm,bs2as(Nodes), 
  12.                               bs2ss(Path),PathFls), 
  13.      BootFile = bootfile(Flags,Root), 
  14.      BootList = get_boot(BootFile,Root), 
  15.      LoadMode = b2a(get_flag('-mode',Flags,false)), 
  16.      Deb = b2a(get_flag('-init_debug',Flags,false)), 
  17.      catch ?ON_LOAD_HANDLER ! {init_debug_flag,Deb}, 
  18.      BootVars = get_flag_args('-boot_var',Flags), 
  19.      ParallelLoad =  
  20.          (Pgm =:= "efile") and (erlang:system_info(thread_pool_size) > 0), 
  21.   
  22.      PathChoice = code_path_choice(), 
  23.      eval_script(BootList,Init,PathFls,{Root,BootVars},Path, 
  24.                  {true,LoadMode,ParallelLoad},Deb,PathChoice), 
  25.   
  26.      %% To help identifying Purify windows that pop up, 
  27.      %% print the node name into the Purify log. 
  28.      (catch erlang:system_info({purify, "Node: " ++ atom_to_list(node())})), 
  29.   
  30.      start_em(Start). 

do_boot/2創(chuàng)建了一個負(fù)責(zé)引導(dǎo)過程的進(jìn)程（do_boot/3，沒有register，讓我們稱為do_boot），boot/2***進(jìn)入了一個boot_loop循環(huán)，接受來自do_boot進(jìn)程的消息。現(xiàn)在系統(tǒng)上有3個進(jìn)程，如下圖所示：

此時的<0.0.0>在boot_loop循環(huán)等待接受<0.2.0>發(fā)出的和boot相關(guān)的消息，<0.1.0>在等待接收和加載相關(guān)的消息。下面看do_boot/3的引導(dǎo)過程。第7-10行從傳入的參數(shù)中獲得加載器相關(guān)的參數(shù)，然后在第11行調(diào)用函數(shù)start_prim_loader通過erl_prim_loader模塊的start/3函數(shù)創(chuàng)建了加載器進(jìn)程。第13-14行從啟動腳本中獲得啟動指令列表。有關(guān)啟動腳本的格式參見文檔 erl -man script ，啟動腳本描述了Erlang運(yùn)行時系統(tǒng)啟動的過程，包含了啟動過程要執(zhí)行的一系列指令。如果啟動erl的時候沒有帶-boot Name參數(shù)，那么默認(rèn)使用start.boot啟動腳本。start.boot是由start.script生成的。start.script內(nèi)容摘要如下所示：

  1. {script, 
  2.      {"OTP  APN 181 01","R15B01"}, 
  3.      [{preLoaded, 
  4.           [erl_prim_loader,erlang,init,otp_ring0,prim_file,prim_inet,prim_zip,zlib]}, 
  5.       {progress,preloaded}, 
  6.       {path,["$ROOT/lib/kernel/ebin","$ROOT/lib/stdlib/ebin"]}, 
  7.       {primLoad,[error_handler]}, 
  8.       {kernel_load_completed}, 
  9.       {progress,kernel_load_completed}, 
  10.       {path,["$ROOT/lib/kernel/ebin"]}, 
  11.       {primLoad, 
  12.           [application,application_controller,application_master, 
  13.            ... 
  14.            standard_error,user,user_drv,user_sup,wrap_log_reader]}, 
  15.       {path,["$ROOT/lib/stdlib/ebin"]}, 
  16.       {primLoad, 
  17.           [array,base64,beam_lib,binary,c,calendar,dets,dets_server,dets_sup, 
  18.            ... 
  19.            supervisor_bridge,sys,timer,unicode,win32reg,zip]}, 
  20.       {progress,modules_loaded}, 
  21.       {path,["$ROOT/lib/kernel/ebin","$ROOT/lib/stdlib/ebin"]}, 
  22.       {kernelProcess,heart,{heart,start,[]}}, 
  23.       {kernelProcess,error_logger,{error_logger,start_link,[]}}, 
  24.       {kernelProcess,application_controller, 
  25.           {application_controller,start, 
  26.               [{application,kernel, 
  27.                    ...}]}}, 
  28.       {progress,init_kernel_started}, 
  29.       {apply, 
  30.           {application,load, 
  31.               [{application,stdlib, 
  32.                    ...}]}}, 
  33.       {progress,applications_loaded}, 
  34.       {apply,{application,start_boot,[kernel,permanent]}}, 
  35.       {apply,{application,start_boot,[stdlib,permanent]}}, 
  36.       {apply,{c,erlangrc,[]}}, 
  37.       {progress,started}]}. 

do_boot/3中的BootFile就是這個文件，BootList就是從第3行開始的這個列表。列表中的每一項表示一個動作，這些動作包括preLoaded、progress、path、primLoad、kernelProcess和apply，這些動作在erl -man script文檔中有詳細(xì)的解釋。do_boot/3的第23行調(diào)用eval_script/8函數(shù)負(fù)責(zé)執(zhí)行這個列表中的每一個動作。下面是eval_script/8的代碼節(jié)選：

  1. eval_script([{progress,Info}|CfgL],Init,PathFs,Vars,P,Ph,Deb,PathChoice) -> 
  2.      debug(Deb,{progress,Info}), 
  3.      init ! {self(),progress,Info}, 
  4.      eval_script(CfgL,Init,PathFs,Vars,P,Ph,Deb,PathChoice); 
  5.  eval_script([{preLoaded,_}|CfgL],Init,PathFs,Vars,P,Ph,Deb,PathChoice) -> 
  6.      eval_script(CfgL,Init,PathFs,Vars,P,Ph,Deb,PathChoice); 
  7.  eval_script([{path,Path}|CfgL],Init,{Pa,Pz},Vars,false,Ph,Deb,PathChoice) -> 
  8.      ... 
  9.      eval_script(CfgL,Init,{Pa,Pz},Vars,false,Ph,Deb,PathChoice); 
  10.  eval_script([{path,_}|CfgL],Init,PathFs,Vars,P,Ph,Deb,PathChoice) -> 
  11.      eval_script(CfgL,Init,PathFs,Vars,P,Ph,Deb,PathChoice); 
  12.  eval_script([{kernel_load_completed}|CfgL],Init,PathFs,Vars,P,{_,embedded,Par},Deb,PathChoice) -> 
  13.      eval_script(CfgL,Init,PathFs,Vars,P,{true,embedded,Par},Deb,PathChoice); 
  14.  eval_script([{kernel_load_completed}|CfgL],Init,PathFs,Vars,P,{_,E,Par},Deb,PathChoice) -> 
  15.      eval_script(CfgL,Init,PathFs,Vars,P,{false,E,Par},Deb,PathChoice); 
  16.  eval_script([{primLoad,Mods}|CfgL],Init,PathFs,Vars,P,{true,E,Par},Deb,PathChoice) 
  17.      ... 
  18.      eval_script(CfgL,Init,PathFs,Vars,P,{true,E,Par},Deb,PathChoice); 
  19.  eval_script([{primLoad,_Mods}|CfgL],Init,PathFs,Vars,P,{false,E,Par},Deb,PathChoice) -> 
  20.      eval_script(CfgL,Init,PathFs,Vars,P,{false,E,Par},Deb,PathChoice); 
  21.  eval_script([{kernelProcess,Server,{Mod,Fun,Args}}|CfgL],Init, 
  22.              PathFs,Vars,P,Ph,Deb,PathChoice) -> 
  23.      start_in_kernel(Server,Mod,Fun,Args,Init), 
  24.      eval_script(CfgL,Init,PathFs,Vars,P,Ph,Deb,PathChoice); 
  25.  eval_script([{apply,{Mod,Fun,Args}}|CfgL],Init,PathFs,Vars,P,Ph,Deb,PathChoice) -> 
  26.      ... 
  27.      eval_script(CfgL,Init,PathFs,Vars,P,Ph,Deb,PathChoice); 
  28.  eval_script([],_,_,_,_,_,_,_) -> 
  29.      ok; 
  30.  eval_script(What,_,_,_,_,_,_,_) -> 
  31.      exit({'unexpected command in bootfile',What}). 

eval_script/8對BootList中的每一個動作進(jìn)行處理。有一些動作要給init進(jìn)程發(fā)送消息，init進(jìn)程的boot_loop/2循環(huán)接收這些消息。boot_loop/2接收的消息中有以下兩個：

  1. boot_loop(BootPid, State) -> 
  2.      receive 
  3.          {BootPid,progress,started} -> 
  4.              {InS,_} = State#state.status, 
  5.              notify(State#state.subscribed), 
  6.              boot_loop(BootPid,State#state{status = {InS,started}, 
  7.                                            subscribed = []}); 
  8.          ...... 
  9.          {'EXIT',BootPid,normal} -> 
  10.              {_,PS} = State#state.status, 
  11.              notify(State#state.subscribed), 
  12.              loop(State#state{status = {started,PS}, 
  13.                               subscribed = []}); 
  14.          ...... 
  15.      end. 

BootList***一條指令是{progress,started}，對應(yīng)了boot_loop/2第3行的消息，在執(zhí)行完這一條指令之后，eval_script/8結(jié)束了執(zhí)行，因此do_boot/3在結(jié)束eval_script/8之后調(diào)用start_em/1之后就正常退出了，進(jìn)程<0.2.0>正常退出，boot_loop/2收到'EXIT'消息，init進(jìn)程進(jìn)入loop/1循環(huán)。此時，init作為初始化的任務(wù)已經(jīng)完成。這一個默認(rèn)的啟動腳本啟動了兩個應(yīng)用程序，kernel和STDLIB，前者是一個普通應(yīng)用程序，后者只是一個庫應(yīng)用程序。如果erl沒有傳入-noshell參數(shù)，kernel還會啟動shell和用戶交互。這兩個應(yīng)用程序是Erlang最簡系統(tǒng)的基礎(chǔ)，前者提供了必要的系統(tǒng)服務(wù)，例如文件服務(wù)、網(wǎng)絡(luò)服務(wù)和錯誤日志記錄服務(wù)等，后者提供了編寫程序需要使用的各種工具、數(shù)據(jù)結(jié)構(gòu)以及OTP相關(guān)的重要模塊。

小結(jié) 

通過本文的分析可以看出，Erlang虛擬機(jī)很像一個運(yùn)行了操作系統(tǒng)的計算機(jī)。erl對應(yīng)的是BIOS，加載對應(yīng)bootloader的erlexec。erlexec加載BEAM虛擬機(jī)，BEAM虛擬機(jī)對應(yīng)了操作系統(tǒng)。接下來BEAM進(jìn)行初步的初始化，初始化執(zhí)行環(huán)境，對應(yīng)了操作系統(tǒng)的初始化。初始化完成之后，BEAM像Linux一樣加載系統(tǒng)中的***個進(jìn)程init。init進(jìn)程讀取啟動列表，執(zhí)行啟動系統(tǒng)的步驟。執(zhí)行完這些步驟之后，Erlang成為了一個完全完成了初始化過程可以運(yùn)行的系統(tǒng)。Erlang像操作系統(tǒng)一樣，有自己的調(diào)度系統(tǒng)，內(nèi)存管理系統(tǒng)，還有和外界交互的I/O系統(tǒng)。只不過內(nèi)存管理系統(tǒng)更加的智能，可以主動幫助進(jìn)程進(jìn)行垃圾回收。I/O系統(tǒng)以系統(tǒng)服務(wù)的方式存在，通過Erlang消息通信的方式向其他進(jìn)程提供服務(wù)，因此Erlang的進(jìn)程只需要通過消息這一種語義就能和外界交換數(shù)據(jù)。Erlang中的模塊就好像操作系統(tǒng)中的動態(tài)共享庫，只要加載到系統(tǒng)中，就可以供所有的進(jìn)程訪問。多個模塊可以組織為應(yīng)用程序。Erlang的模塊命名是平坦的，因此不同應(yīng)用程序中的模塊不能重名。Erlang的應(yīng)用程序是對模塊和進(jìn)程的一種組織方式，從一個應(yīng)用程序可以包含一組進(jìn)程的角度看，Erlang的應(yīng)用程序有點類似于Linux系統(tǒng)中的進(jìn)程。

原文：http://www.cnblogs.com/zhengsyao/archive/2012/08/15/Erlang-otp_start_up.html

【編輯推薦】

  1. Erlang之父Joe Armstrong訪談：程序調(diào)試與啤酒
  2. Scala和Erlang，以及多核主導(dǎo)的未來
  3. Erlang面向分布與并發(fā)的編程語言
  4. 看Erlang中Actor模型的執(zhí)行方式和優(yōu)劣
  5. Erlang視點：并行計算和云計算

 

 

責(zé)任編輯：彭凡 來源： 博客園
Erlang
相關(guān)推薦

2017-09-14 10:11:24

OpenStack虛擬機(jī)過程分析

2011-06-28 13:27:13

ARM Linux

2012-02-20 14:47:08

JavaPlay

2018-03-13 13:00:03

Linux運(yùn)維啟動分析

2024-09-11 09:25:03

Tomcat組件PREP

2021-09-10 00:34:22

Java 線程啟動

2010-02-22 17:39:22

CentOS vmwa

2010-10-13 10:21:37

物理機(jī)虛擬機(jī)遷移

2017-03-01 20:08:36

PHP內(nèi)核分析

2009-06-12 16:15:42

死鎖Java虛擬機(jī)

2011-07-28 10:34:38

Cocoa 程序 啟動

2014-06-23 10:31:09

Android啟動過程

2011-09-05 17:35:18

MTK啟動過程RTOS

2012-05-18 10:22:23

2010-07-26 09:02:38

2013-07-17 09:32:58

2009-12-03 10:00:46

Linux系統(tǒng)啟動

2014-12-18 09:41:44

虛擬化遷移

2009-08-10 10:49:27

Linux下安裝VMw

2021-01-26 09:30:32

加密虛擬機(jī)攻擊
點贊
收藏

51CTO技術(shù)棧公眾號

主站蜘蛛池模板： 亚洲视频在线免费观看 | 青青久草 | 黄色一级大片在线免费看产 | 国产精品综合色区在线观看 | 亚洲区一| 欧美精品三区 | 亚洲激情在线观看 | 精品欧美黑人一区二区三区 | 亚洲国产一区二区三区 | 亚洲一区二区在线电影 | 午夜电影一区二区 | 国产999在线观看 | 国产乱码精品一区二区三区中文 | 亚洲精品二区 | 激情网五月天 | 精品一区二区三区在线观看国产 | 中文字幕一区在线观看视频 | 国产成人在线播放 | 国产三区av | 99国产精品久久久 | 国产欧美在线 | 精品一区二区三区在线观看 | 日日骚网 | 中文字幕亚洲一区二区三区 | 午夜天堂精品久久久久 | 国产在线观看免费 | 两性午夜视频 | 黑人一级片视频 | 国产伦精品一区二区三区高清 | 精品国产一区二区国模嫣然 | 亚洲三区在线观看 | 久久久久久久一级 | 亚洲欧美日韩中文在线 | 久久久久久久综合 | 欧美成人精品一区 | 亚洲 欧美 精品 | 91在线免费视频 | 国产高清一区二区 | 99久久精品国产毛片 | 欧美男人亚洲天堂 | 国产日韩欧美激情 |