Changeset 28


Ignore:
Timestamp:
10/30/2008 10:31:48 PM (15 years ago)
Author:
marcus
Message:

r13 | svn | 2008-01-18 10:01:21 +0100 (Fr, 18 Jan 2008) | 1 line

sfd2db version for ingres and mysql

Location:
SH_SHM/trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • SH_SHM/trunk/inputs/STATINF.DAT

    r16 r28  
    1313GRC4 lat:+49.0867465 lon: +11.5262720 elevation: 503.0 array:01 xrel: 22.280903 yrel: -67.175827 name:Graefenberg,_F.R.G. 
    1414BFO     lat:+48.3301    lon: +08.3296   elevation: 589.0        array:01        xrel:-213.690201        yrel:-151.307358        name:FRG,_Black_Forest 
    15 BRG     lat:+50.8732    lon: +13.9428   elevation: 296.0        array:01 xrel: 191.024750       yrel: 131.459946        name:FRG,_BERGGIESHUEBEL 
     15BRG     lat:+50.8732    lon: +13.9428   elevation: 296.0        array:01 xrel: 191.024750       yrel: 131.459930        name:FRG,_BERGGIESHUEBEL 
    1616BSEG  lat:+53.9353      lon: +10.3169  elevation: 40.0  array:01        xrel: -59.134197        yrel: 471.934845        name:FRG,_Bad_Segeberg 
    1717BUG     lat:+51.4406    lon: +07.2693   elevation: 85.0 array:01        xrel:-273.834259        yrel: 194.549149        name:FRG,_Bochum 
    … …  
    1919CLZ     lat:+51.8416    lon: +10.3724   elevation: 680.0        array:01        xrel: -58.248501        yrel: 239.136337        name:FRG,_Clausthal 
    2020FUR     lat:+48.1629    lon: +11.2752   elevation: 565.0        array:01        xrel:  4.071681 yrel:-169.898315        name:FRG,_Fuerstenfeldbruck 
     21GEC2  lat:+48.8451   lon: +13.7016      elevation: 1132.5       array:01 xrel: 181.566162       yrel: -94.044502   
    2122GRFO    lat:+49.6909    lon: +11.2203   elevation: 384.0        array:01        xrel: 000.000000        yrel: 000.000000        name:Graefenberg,_F.R.G. 
     23GTTG  lat:+51.54639  lon:   9.96417     elevation: 272          array:01        xrel: -86.857529        yrel: 206.311935 
     24GTTN  lat:+51.54639  lon:   9.96417     elevation: 272          array:01        xrel: -86.857529        yrel: 206.311935 
    2225HLG     lat:+54.1847    lon: +07.8839   elevation: 41.0 array:01        xrel:-217.084610        yrel: 499.665619        name:FRG,_Helgoland 
    2326IBBN    lat:+52.3072    lon:  +7.7566   elevation: 140.0  array:01      xrel:-235.478378        yrel: 290.906403        name:FRG,_Ibbenbueren 
    … …  
    2528NRDL  lat:+52.49432     lon: +10.10728  elevation: -355.0       array:01        xrel: -75.348038        yrel: 311.712280        name:FRG,_Niedersachsen_Riedel 
    2629RGN     lat:+54.5477    lon: +13.3214   elevation: 15.0 array:01 xrel: 135.506195       yrel: 540.027588        name:FRG,_Ruegen 
    27 RUE     lat:+52.4759    lon:+13.7800    elevation: 0.0          array:01        xrel: 173.356400        yrel: 309.664154        name:Ruedersdorf,FRG 
     30RUE     lat:+52.4759    lon:+13.7800    elevation: 40.0         array:01        xrel: 173.356400        yrel: 309.664154        name:Ruedersdorf,FRG 
    2831STU     lat:+48.7708    lon:  +9.1933   elevation:360.0 array:01 xrel:-148.543243       yrel:-102.305916        name:FRG,_Stuttgart 
    2932TNS     lat:+50.2225    lon: +08.4473   elevation: 815.0        array:01        xrel:-197.271896        yrel:  59.108604        name:FRG,_Taunus 
    3033UBBA  lat:50.81877      lon: 10.00098   elevation:-526.41       array:01 xrel: -85.653702       yrel: 125.407867 
     34LEIB    lat:+48.5227    lon: +9.0829    elevation: 315.0        array:01        xrel: 76.900192 yrel:  84.137474 
    3135WERD    lat:+50.4476    lon: +12.3064   elevation: 589.0        array:01        xrel: 76.900192 yrel:  84.137474 
    3236TANN  lat:+50.415               lon: 12.461             elevation: 0.0          array:01        xrel: 87.906998 yrel:  80.512680 
    … …  
    4044LID   lat:+54.5481      lon: +13.3664   elevation: 0.00 array:01        xrel: 138.407028        yrel: 540.072083        name:GRF,_Liddow 
    4145WERN    lat:+50.2874    lon: +12.3761   elevation: 600.0        array:01        xrel:  82.111969        yrel:  66.324837 
    42 FBE   lat:+50.92117     lon: +13.35414  elevation: 234.9        name:Freiberg,_Saxonia 
     46FBE   lat:+50.92117     lon: +13.35414  elevation: 234.9        array:01        xrel: 149.567154        yrel: 136.793716        name:Freiberg,_Saxonia 
     47SCHF    lat:+50.6772    lon: +12.4031   elevation: 435. array:01        xrel: 83.339912 yrel:109.666695 name: Schoenfels,_OTSN/SXNET 
     48TRIB  lat:+50.352               lon: +12.137    elevation: 510. name: Obertriebel 
     49ROHR    lat:+50.234             lon: +12.317    elevation: 629. name: Rohrbach 
     50WUET    lat:+51.009             lon: +12.580    elevation: 196. name: Wuestenhain 
     51PLN     lat:+50.4867    lon: +12.1589   elevation: 423.0        array:01        xrel:66.401680  yrel:88.485001  name:FRG,_PLAUEN 
     52PST     lat:+50.8635    lon: +12.2548   elevation: 290.0        name:FRG,_Posterstein 
     53ROTZ  lat:+49.7669   lon: +12.20701 elevation: 430.     array:01        xrel:  70.863037        yrel:   8.450440        name:Rotzenmuehle,_Bavaria                                 name:Fuerstenfeldbruck-Netz,Germany 
     54RJOB    lat:+47.7372    lon: +12.7957   elevation: 860.0 
     55MANZ    lat:+49.9862    lon: +12.1083   elevation: 635.0        array:01        xrel:  63.484955        yrel:  32.834408        name:Manzenberg,Germany 
     56WLF     lat:+49.6646    lon:+6.1526             elevation: 295.0        array:01        xrel:-364.716980        yrel:  -2.924297 
    4357YJBT  lat:+40.52261  lon:+115.94469     elevation: 550.0        array:04        xrel:   7.111600        yrel:   1.210859 
    4458XYFT  lat:+40.51747     lon:+115.90297  elevation: 590.0        array:04 xrel:   3.585657  yrel:   0.639343 
    … …  
    5367CHCT  lat:+40.91310  lon:+115.83700 elevation: 886.8    array:04 
    5468SHCT  lat:+40.44020  lon:+115.52350 elevation: 650.0    array:04 
     69GMS1  lat:+52.8784   lon:+8.8758    elevation:  35.0    name:GMS-1_Heiligenfelde 
     70GMS2  lat:+53.0320   lon:+9.3714    elevation:  45.0    name:GMS-2_Westerwalsede 
     71GMS3  lat:+52.9714   lon:+9.6950    elevation:  73.0    name:GMS-3_Kreuzkamp 
     72GMS4  lat:+53.0061   lon:+9.3645    elevation:  57.0    name:GMS-4_Suederwalsede 
     73KM01  lat:-6.1012    lon:+105.4270 
     74KM02  lat:-6.0920               lon:+105.4210 
     75KM04  lat:-6.0767               lon:+105.4009 
     76KM05    lat:-6.1009             lon:+105.4260 
    5577CA1 lat:+43.4549333 lon: +12.1963833 elevation: 651.0 array:09 xrel:  0.000 yrel:  0.000 name:Citta_Castello,_ITALY 
    5678CA2 lat:+43.4573833 lon: +12.1970833 elevation: 625.0 array:09 xrel:  0.058 yrel:  0.274 name:Citta_Castello,_ITALY 
    … …  
    172194VIEL lat:+50.187     lon: +12.104     elevation: 670.                                      name:Fuerstenfeldbruck-Netz,Germany 
    173195LE0087 lat:+50.187     lon: +12.104 
    174 MANZ lat:+49.985     lon: +12.104                                                name:Fuerstenfeldbruck-Netz,Germany 
    175196LE0086 lat:+49.985     lon: +12.104 
    176197RELO lat:+50.28      lon: +12.08                                                 name:Fuerstenfeldbruck-Netz,Germany 
    177 ROTZ lat:+49.768     lon: +12.208     elevation: 430.                                      name:Fuerstenfeldbruck-Netz,Germany 
    178198LE0084 lat:+49.768     lon: +12.208 
    179199BAC    lat:+50.0855  lon: +12.83933 
    … …  
    521541SRBF  lat:+48.915          lon: +07.852   elevation:  200                                                name:FRANCE, Fosse Rhenan 
    522542STR     lat:+48.584        lon: +07.766   elevation:  135                                                name:FRANCE, Fosse Rhenan 
     543STRF  lat:+48.5840   lon: +07.7660  elevation:  135 
    523544THEF  lat:+48.227          lon: +05.986   elevation:  469                                                name:FRANCE, Fosse Rhenan 
    524545WLS     lat:+48.413        lon: +07.353   elevation:  775                                                name:FRANCE, Fosse Rhenan 
    … …  
    545566SCHN lat:+50.053     lon: +11.854     elevation:1040.                                      name:Fuerstenfeldbruck-Netz,Germany 
    546567BINY  lat:+42.0896      lon: -75.9708     name:New_York 
     568HTL     lat:+50.99430000        lon:  -4.48490000 
    547569CALB    lat:+34.14300000        lon:-118.62700000       elevation:0.0          name:Calabasas,California_USA 
    548570HEA     lat:+51.35833000        lon:  -1.26388900       name:HEADLEY,_G.B. 
    … …  
    583605GWS     lat:+51.49200000        lon: +10.68900000       name:FRG 
    584606TIE     lat:+50.82500000        lon: +10.17500000       name:FRG,_TIEFENORT 
    585 PLN     lat:+50.48670000        lon: +12.15890000       name:FRG,_PLAUEN 
    586 PST     lat:+50.86350000        lon: +12.25480000       name:FRG 
    587607ASCN    lat: -7.9327            lon: -14.3601           elevation:+173.0       name:Ascension 
    588608LSZ     lat:-15.2766            lon:  28.1882           elevation:+1184.0      name:Lusaka 
    … …  
    791811DEV     lat:+45.90000000        lon: +22.90000000 
    792812DIX     lat:+46.08000000        lon:  +7.41000000 
    793 DOU     lat:+50.00500000        lon:  +4.59500000       name:Dourbes,_Belgium 
     813DOU     lat:+50.10000000        lon:  +4.59000000       name:Dourbes,_Belgium 
    794814EBH     lat:+56.25000000        lon:  -3.51000000 
    795815EGL     lat:+55.86000000        lon:  -2.74000000 
    … …  
    952972OTT     lat:+45.39000000        lon: +75.72000000 
    953973SDV     lat: +8.87900000        lon: +70.63300000       elevation:+1550.0       name:Santo_domingo,Venezuela 
    954 EDI     lat:+55.92000000        lon:  +3.19000000 
     974EDI     lat:+55.92000000        lon:  -3.19000000 
    955975EAU     lat:+55.84000000        lon:  +3.45000000 
    956976EAB     lat:+56.19000000        lon:  +4.34000000 
    … …  
    13891409BLA     lat:+37.211     lon:-80.421   elevation:+634.0 
    13901410EFI     lat:-51.480     lon:-58.410   elevation:+0.0 
    1391 WLF     lat:+49.6646    lon:+6.1526   elevation:+295.0 
     1411JNU     lat:  +33.12000 lon: +130.88000  elevation: 0.540  
    13921412GRAX lat:+49.6918877 lon: +11.2217202 elevation: 499.5 array:01 xrel:  0.000 yrel:   0.000 name:Graefenberg,_F.R.G. 
    13931413FUS     lat:+48.5       lon:+10.5 
     1414MMA0B   lat:33.01527  lon:35.40305   elevation:809.3 xrel:-0.0054 yrel: 0.0093 array:98 
     1415MMAIA   lat:33.01518  lon:35.40311   elevation:809.7 xrel: 0.0000 yrel: 0.0000 array:98 
     1416MMA0    lat:33.01518  lon:35.40311   elevation:809.7 xrel: 0.0000 yrel: 0.0000 array:98 
     1417MMA1    lat:33.01812  lon:35.40620   elevation:776.5 xrel: 0.2878 yrel: 0.3266 array:98 
     1418MMA2    lat:33.01249  lon:35.40572   elevation:775.6 xrel: 0.2449 yrel:-0.2979 array:98 
     1419MMA3    lat:33.01205  lon:35.40056   elevation:792.3 xrel:-0.2372 yrel:-0.3479 array:98 
     1420MMA4    lat:33.01462  lon:35.39752   elevation:851.4 xrel:-0.5223 yrel:-0.0633 array:98 
     1421MMB1    lat:33.01513  lon:35.41081   elevation:733.3 xrel: 0.7196 yrel:-0.0044 array:98 
     1422MMB2    lat:33.00971  lon:35.39526   elevation:878.4 xrel:-0.7324 yrel:-0.6083 array:98 
     1423MMB3    lat:33.01954  lon:35.39714   elevation:811.8 xrel:-0.5590 yrel: 0.4823 array:98 
     1424MMB4    lat:33.02084  lon:35.40199   elevation:806.3 xrel:-0.1061 yrel: 0.6270 array:98 
     1425MMC1    lat:33.03052  lon:35.40368   elevation:827.3 xrel: 0.0502 yrel: 1.7016 array:98 
     1426MMC2    lat:33.02681  lon:35.41164   elevation:701.0 xrel: 0.7946 yrel: 1.2915 array:98 
     1427MMC3    lat:33.01826  lon:35.41381   elevation:712.5 xrel: 0.9996 yrel: 0.3438 array:98 
     1428MMC4    lat:33.00722  lon:35.41861   elevation:749.8 xrel:-1.4501 yrel:-0.8798 array:98 
     1429MMC5    lat:33.00869  lon:35.41269   elevation:766.4 xrel: 0.8969 yrel:-0.7185 array:98 
     1430MMC6    lat:33.01203  lon:35.39151   elevation:892.6 xrel:-1.0836 yrel:-0.3512 array:98 
     1431MMC7    lat:33.02205  lon:35.39256   elevation:816.2 xrel:-0.9872 yrel: 0.7605 array:98 
     1432 

  • SH_SHM/trunk/source/motif/shm.c

    r22 r28  
    33 *      ===== 
    44 * 
    5  * $Revision: 7 $, $Date: 2008-01-16 19:12:14 +0100 (Mi, 16 Jan 2008) $ 
     5 * $Revision: 13 $, $Date: 2008-01-18 10:01:21 +0100 (Fr, 18 Jan 2008) $ 
    66 * 
    77 * main module of shm 
    … …  
    594594static TSyBoolean     xmv_polar_on=FALSE;      /* particle motion switched on */ 
    595595static TSyBoolean     xmv_keeptrc_auto=FALSE; /* 'Keep Traces' Button autom. */ 
     596static TSyBoolean     xmv_onlymainwdw=FALSE; /* open only main window */ 
    596597/*static char           xmv_filter_name[cBcShortStrLth+1][MAXFILNAME];*/ /* filter names */ 
    597598/* theoretical phases (must be same sequence as in dialog box) */ 
    … …  
    792793                XtManageChild( xmv_w[k_widget_analyst_box] ); 
    793794        } /*endif*/ 
     795 
     796        { 
     797        /* check whether to open only main window */ 
     798        char parval[cBcLineLth+1]; 
     799        ca_qstr( argc, argv, "wdw", parval ); 
     800        if  (strcmp(parval+1,"m") == 0) 
     801                xmv_onlymainwdw = TRUE; 
     802        } 
    794803 
    795804        xm_initialize(); 
    … …  
    49284937        if  (XtIsManaged(widget))  XtUnmanageChild( widget ); 
    49294938        if  (w > 0 && h > 0) XtConfigureWidget( widget, x, y, w, h, border ); 
    4930         XtManageChild( widget ); 
    4931         XtMoveWidget( XtParent(widget), x, y ); 
     4939        if  (!xmv_onlymainwdw)  { 
     4940                XtManageChild( widget ); 
     4941                XtMoveWidget( XtParent(widget), x, y ); 
     4942        } /*endif*/ 
    49324943 
    49334944        widget = wa[k_widget_phase_box]; 
    … …  
    49394950        if  (XtIsManaged(widget))  XtUnmanageChild( widget ); 
    49404951        if  (w > 0 && h > 0) XtConfigureWidget( widget, x, y, w, h, border ); 
    4941         XtManageChild( widget ); 
    4942         XtMoveWidget( XtParent(widget), x, y ); 
     4952        if  (!xmv_onlymainwdw)  { 
     4953                XtManageChild( widget ); 
     4954                XtMoveWidget( XtParent(widget), x, y ); 
     4955        } /*endif*/ 
    49434956 
    49444957        widget = wa[k_widget_param_box]; 
    … …  
    49504963        if  (XtIsManaged(widget))  XtUnmanageChild( widget ); 
    49514964        if  (w > 0 && h > 0) XtConfigureWidget( widget, x, y, w, h, border ); 
    4952         XtManageChild( widget ); 
    4953         XtMoveWidget( XtParent(widget), x, y ); 
     4965        if  (!xmv_onlymainwdw)  { 
     4966                XtManageChild( widget ); 
     4967                XtMoveWidget( XtParent(widget), x, y ); 
     4968        } /*endif*/ 
    49544969 
    49554970} /* end of xm_configure_windows */ 

  • SH_SHM/trunk/source/seed_io/sfd2db.c

    r16 r28  
    33 *      ======== 
    44 * 
    5  * version 6, 25-Feb-2007 
     5 * $Revision: 13 $, $Date: 2008-01-18 10:01:21 +0100 (Fr, 18 Jan 2008) $ 
    66 * 
    77 * reads lines from sfdfile and creates commands to insert into sfdb database 
    … …  
    285285                if  (!noinsert) 
    286286                        fprintf( out, 
    287                                 "insert %sinto sftab values ( \"%s\", \"%s\", \"%c\", \"%d\", \"%s\", \"%4d%02d%02d\", \"%2d%02d%02d.%03d\", \"%4d%02d%02d\", \"%2d%02d%02d.%03d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", NULL );\n", 
     287                                "insert %sinto sftab ( station, chan, comp, pathid, relpath, sdate, stime, edate, etime, recnum, hswap, recsize, offset, dataflags, priority, dataformat ) values ( \'%s\', \'%s\', \'%c\', %d, \'%s\', %4d%02d%02d, %2d%02d%02d.%03d, %4d%02d%02d, %2d%02d%02d.%03d, %d, %d, %d, %d, %d, %d, %d);\n", 
    288288                                ignstr, station, chan, comp, pathid, rpath, stime.year, stime.month, stime.day, 
    289289                                stime.hour, stime.min, stime.sec, stime.ms, etime.year, etime.month, 
    … …  
    293293                if  (update) 
    294294                        fprintf( out, 
    295                                 "update %ssftab set sdate=\"%4d%02d%02d\", stime=\"%2d%02d%02d.%03d\", edate=\"%4d%02d%02d\", etime=\"%2d%02d%02d.%03d\", recnum=\"%d\", dataflags=\"%d\", priority=\"%d\", dataformat=\"%d\", hswap=\"%d\" where pathid=\"%d\" and relpath=\"%s\";\n", 
     295                                "update %ssftab set sdate=%4d%02d%02d, stime=%2d%02d%02d.%03d, edate=%4d%02d%02d, etime=%2d%02d%02d.%03d, recnum=%d, dataflags=%d, priority=%d, dataformat=%d, hswap=%d where pathid=%d and relpath=\'%s\';\n", 
    296296                                ignstr, stime.year, stime.month, stime.day, stime.hour, stime.min, 
    297297                                stime.sec, stime.ms, etime.year, etime.month, etime.day, etime.hour, 
    … …  
    300300                sfcnt++; 
    301301 
     302                /* old lines for mysql  
     303                                "insert %sinto sftab values ( \"%s\", \"%s\", \"%c\", \"%d\", \"%s\", \"%4d%02d%02d\", \"%2d%02d%02d.%03d\", \"%4d%02d%02d\", \"%2d%02d%02d.%03d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", \"%d\", NULL );\n", 
     304                                "update %ssftab set sdate=\"%4d%02d%02d\", stime=\"%2d%02d%02d.%03d\", edate=\"%4d%02d%02d\", etime=\"%2d%02d%02d.%03d\", recnum=\"%d\", dataflags=\"%d\", priority=\"%d\", dataformat=\"%d\", hswap=\"%d\" where pathid=\"%d\" and relpath=\"%s\";\n", 
     305                */ 
     306 
    302307        } /*endwhile*/ 
    303308 
Note: See TracChangeset for help on using the changeset viewer.