Changeset 1194


Ignore:
Timestamp:
Mar 2, 2022 3:46:05 PM (9 months ago)
Author:
ilavsky
Message:

More fixes for out of firewall issues

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/User Procedures/Indra 2/IN3_BlueSkyReader.ipf

    r1193 r1194  
    6060        SVAR ListOfCatalogs=root:Packages:Irena:BlueSkySamplePlot:ListOfCatalogs
    6161        ListOfCatalogs=""
    62         string response = FetchURL(TempAddress)
    63         Variable error = GetRTError(1)  // Check for error before using response
    64         if (error != 0)
    65                 abort "Server not accessible"
     62        URLRequest/Z url=TempAddress
     63        if(V_Flag!=0)
     64                abort "Server not available"
    6665        endif
    67         JSONXOP_Parse/Z  (response)
     66        JSONXOP_Parse/Z(S_serverResponse)
    6867        if(V_Flag!=0)
    6968                abort "Cannot parse server response"
     
    8786//              TempAddress =  ServerAddress+"/node/search/?filter[lookup][condition][key]="+StringFromList(i, AllCatalogs)+"&sort="
    8887//              print TempAddress
    89 //              JSONXOP_Parse(FetchURL(TempAddress))
    90 //              jsonId = V_Value
     88//      URLRequest/Z url=TempAddress
     89//      if(V_Flag!=0)
     90//              abort "Server not available"
     91//      endif
     92//      JSONXOP_Parse/Z(S_serverResponse)
     93//      if(V_Flag!=0)
     94//              abort "Cannot parse server response"
     95//      endif
     96//      variable jsonId = V_Value
    9197//              TempJSONAdd =  "/data/0/attributes/specs/0"     
    9298//              tempStr = JSON_GetString(jsonID, TempJSONAdd)
     
    368374        TempAddress +=IDwave[selRow]+"/primary/data?format=json"
    369375        //print TempAddress
    370         JSONXOP_Parse(FetchURL(TempAddress))
     376        URLRequest/Z url=TempAddress
     377        if(V_Flag!=0)
     378                abort "Server not available"
     379        endif
     380        JSONXOP_Parse/Z(S_serverResponse)
     381        if(V_Flag!=0)
     382                abort "Cannot parse server response"
     383        endif
    371384        variable jsonId = V_Value
    372385        //JSONXOP_Dump jsonId
     
    476489        //this fails on IP8:
    477490        //TempAddress +=StringFromList(0, ListOfCatalogs)+"?page[offset]=00&page[limit]=1000&filter[time_range][condition][since]="+num2str(startTimeSec, "%.15g")+"&filter[time_range][condition][until]="+num2str(endTimeSec, "%.15g")+"&sort=time"
    478         // defqault pagse limit is 100 -  page[offset]=0&page[limit]=1000 loads first 1000 scans.
    479         JSONXOP_Parse(FetchURL(TempAddress))
     491        // default pagse limit is 100 -  page[offset]=0&page[limit]=1000 loads first 1000 scans.
     492        URLRequest/Z url=TempAddress
     493        if(V_Flag!=0)
     494                abort "Server not available"
     495        endif
     496        JSONXOP_Parse/Z(S_serverResponse)
     497        if(V_Flag!=0)
     498                abort "Cannot parse server response"
     499        endif
    480500        variable jsonId = V_Value
    481501        //print jsonID
Note: See TracChangeset for help on using the changeset viewer.