执行.exe文件后，报错Segmentation fault (core dumped)

齐天笑猴

执行.exe文件后，报错Segmentation fault (core dumped)，是什么原因？该如何解决呢？使用gdb查看core文件后，提示报错如下

1. <blockquote>Core was generated by `./little_r_micaps.exe 20150102'.

复制代码

exe执行的little_r_micaps.f90文件代码如下

1. PROGRAM MAIN
   
2. IMPLICIT NONE
   
3. CHARACTER*40:: fdate,UTC_date
   
4. CHARACTER*40:: fdate_char,UTC_date_char
   
5. CHARACTER*40:: cTemp
   
6. CHARACTER*80:: plot_path
   
7. CHARACTER*40:: id
   
8. CHARACTER*80:: st_name='SURFACE / CHINA'
   
9. CHARACTER*80:: plat_form='FM-12 SYNOP'
   
10. CHARACTER*80:: source='MICAPS DIAMOND ONE'
    
11. INTEGER i,j,k,qc
    
12. 
    
13. INTEGER yr,mon,date,hr,stat_num  
    
14. INTEGER,ALLOCATABLE:: stat_id(:),sta_class(:)  
    
15. REAL,ALLOCATABLE:: stat_elev(:),temp(:),longi(:),lati(:),dew(:),win_dir(:),V(:),&
    
16. cloud(:),presea(:),pre3h(:),weather1(:),weather2(:),rain6h(:),&
    
17. lcloudz(:),lcloudl(:),lcloudh(:),visib(:),weathn(:),mcloudz(:),&
    
18. hcloudz(:),mark1(:), mark2(:), vtemp24(:), vpre24(:),psfc(:),stat_class(:)
    
19. 
    
20. REAL a(13)
    
21. INTEGER b(13)
    
22. LOGICAL is_sound,bogus,discard
    
23. CHARACTER*40:: stat_name='aaa'
    
24. !.......................INCLUDE.................
    
25.        !INCLUDE 'PARMS3.EXT'
    
26.        !INCLUDE 'FDESC3.EXT'
    
27.        !INCLUDE 'IODECL3.EXT'
    
28.        !INCLUDE 'netcdf.inc'
    
29. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    
30. 
    
31. fdate='15010208'   !beijing time
    
32. UTC_date='15010200' !UTC
    
33. plot_path='/home/sxw/xiaowei/' !PATH
    
34. 
    
35. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    
36. 
    
37. 
    
38. qc=0
    
39. is_sound=.false.
    
40. bogus=.false.
    
41. discard=.false.
    
42. fdate_char='20'//trim(fdate)//'0000'
    
43. UTC_date_char='20'//trim(UTC_date)//'0000'
    
44. a=-888888.0
    
45. b=0
    
46. 
    
47. OPEN (101,FILE=trim(plot_path)//'plot/'//trim(adjustl(fdate))//'.000')
    
48. READ(101,*)
    
49. READ(101,*) yr,mon,date,hr,stat_num
    
50. CLOSE(101)
    
51. 
    
52. ALLOCATE (stat_id(stat_num))
    
53. ALLOCATE (longi(stat_num))
    
54. ALLOCATE (lati(stat_num))
    
55. ALLOCATE (stat_elev(stat_num))
    
56. ALLOCATE (temp(stat_num))
    
57. ALLOCATE (dew(stat_num))
    
58. ALLOCATE (win_dir(stat_num))
    
59. ALLOCATE (V(stat_num))
    
60. ALLOCATE (sta_class(stat_num))
    
61. ALLOCATE (cloud(stat_num))
    
62. ALLOCATE (presea(stat_num))
    
63. ALLOCATE (pre3h(stat_num))
    
64. ALLOCATE (weather1(stat_num))
    
65. ALLOCATE (weather2(stat_num))
    
66. ALLOCATE (rain6h(stat_num))
    
67. ALLOCATE (lcloudz(stat_num))
    
68. ALLOCATE (lcloudl(stat_num))
    
69. ALLOCATE (lcloudh(stat_num))
    
70. ALLOCATE (visib(stat_num))
    
71. ALLOCATE (weathn(stat_num))
    
72. ALLOCATE (mcloudz(stat_num))
    
73. ALLOCATE (hcloudz(stat_num))
    
74. ALLOCATE (mark1(stat_num))
    
75. ALLOCATE (mark2(stat_num))
    
76. ALLOCATE (vtemp24(stat_num))
    
77. ALLOCATE (vpre24(stat_num))
    
78. ALLOCATE (stat_class(stat_num))
    
79.       OPEN(101,FILE=trim(plot_path)//'plot/'//trim(adjustl(fdate))//'.000')
    
80.                 READ(101,*)
    
81.                 READ(101,*)
    
82.                 DO i=1,stat_num
    
83.                     READ(101,*) stat_id(i),longi(i),lati(i),stat_elev(i),sta_class(i),cloud(i),&
    
84.                                 win_dir(i),V(i),presea(i),pre3h(i),weather1(i),weather2(i),&
    
85.                                 rain6h(i),lcloudz(i),lcloudl(i),lcloudh(i),dew(i),visib(i),&
    
86.                                 weathn(i),temp(i),mcloudz(i),hcloudz(i),mark1(i),mark2(i),vtemp24(i),vpre24(i)
    
87.                 ENDDO
    
88.       CLOSE(101)
    
89. 
    
90. OPEN(101,FILE='obs.20'//trim(adjustl(UTC_date))//'',ACCESS='append')
    
91.        DO i=1,stat_num
    
92.                
    
93.                WRITE(ctemp,'(i5)') stat_id(i)
    
94.                WRITE(id,'(i5)') stat_id(i)
    
95. <font color="#ff0000">               WRITE(101,'(2f20.5,4A40,f20.5,5I10,3L10,2I10,A20,13(f13.5,I7))') lati(i), longi(i),adjustl(id),&
    
96.                                                                                 st_name,plat_form,source,stat_elev(i),-888888,-888888,-888888,&
    
97.                                                                                 i,-888888,is_sound,bogus,discard,-888888,-888888,trim(UTC_date_char),&  
    
98.                                                                                 -888888.,0,((a(k),b(k)),k=1,12)</font>
    
99.                                 IF(presea(i)<=500.) psfc(i)=1000+presea(i)/10
    
100.                                 IF(presea(i)>500.) psfc(i)=900+presea(i)/10
     
101.                                 IF(presea(i)==9999.) psfc(i)=-888888.
     
102.                                 IF(temp(i)==9999.) temp(i)=-888888.-273.16
     
103.                                 IF(dew(i)==9999.) dew=-888888.-273.16
     
104.                                 IF(win_dir(i)==9999.) win_dir(i)=-888888.
     
105.                                 IF(V(i)==9999.) V(i)=-888888.
     
106.                                 WRITE(101,'(10(F13.5,I7))') psfc(i)*100,qc,stat_elev(i),qc,(temp(i)+273.16),qc,(dew(i)+273.16),qc,&
     
107.                                                             V(i),qc,win_dir(i),qc,((a(k),b(k)),k=1,4)
     
108. 
     
109.                 WRITE(101,'(10(F13.5,I7))') -777777.,0,-777777.,0,((a(k),b(k)),k=1,8)
     
110.                 WRITE(101,*) 50,0,0
     
111.        ENDDO
     
112. CLOSE(101)
     
113. 
     
114. DEALLOCATE (stat_id)
     
115. DEALLOCATE (longi)
     
116. DEALLOCATE (lati)
     
117. DEALLOCATE (stat_elev)
     
118. DEALLOCATE (stat_class)
     
119. 
     
120. DEALLOCATE (temp)
     
121. 
     
122. DEALLOCATE (win_dir)
     
123. DEALLOCATE (V)
     
124. DEALLOCATE (cloud)
     
125. DEALLOCATE (presea)
     
126. DEALLOCATE (pre3h)
     
127. DEALLOCATE (weather1)
     
128. DEALLOCATE (weather2)
     
129. DEALLOCATE (rain6h)
     
130. DEALLOCATE (lcloudz)
     
131. DEALLOCATE (lcloudl)
     
132. DEALLOCATE (lcloudh)
     
133. DEALLOCATE (visib)
     
134. DEALLOCATE (weathn)
     
135. DEALLOCATE (mcloudz)
     
136. DEALLOCATE (hcloudz)
     
137. DEALLOCATE (mark1)
     
138. DEALLOCATE (mark2)
     
139. DEALLOCATE (vtemp24)
     
140. DEALLOCATE (vpre24)
     
141. 
     
142. 
     
143. 
     
144. END

复制代码

但是感觉提示处没有错误啊？求大家指点迷津。谢谢啦

香草拿铁

Segmentation fault 看到这个就头大
是不是溢出了

齐天笑猴

香草拿铁 发表于 2018-1-9 08:56
Segmentation fault 看到这个就头大
是不是溢出了

溢出？是运行的太大了吗？你之前遇到这个问题吗？

齐天笑猴

程序应该没有问题吧

香草拿铁

看楼主是要对micaps的plot数据.000进行处理，然后输出。
没有特别看仔细。
只是说一下自己的看法。
我之前也遇到过这样段错误的报错。很多时候这个Segmentation fault 并不是根本原因，只是很小的错误造成的。
我建议楼主先不要批量处理，先试试一个000文件是否能够跑通。然后再批量处理

齐天笑猴

香草拿铁 发表于 2018-1-11 21:15
看楼主是要对micaps的plot数据.000进行处理，然后输出。
没有特别看仔细。
只是说一下自己的看法。

非常感谢，我再仔细查看一下！谢谢谢谢啦

香草拿铁

齐天笑猴 发表于 2018-1-12 08:32
非常感谢，我再仔细查看一下！谢谢谢谢啦

客气客气
加油。共勉！