script SCRIPT: EnTur.vb - Få inn data fra EnTur

[ZoRaC]

Sitat

 The library '/usr/local/HomeSeer/bin/homeseer/Newtonsoft.Json.dll' could not be found. There were 1 errors and 0 warnings

 

Sitat

[Settings]
ScriptingReferences=System.Core;System.Core.dll,System.Web;System.Web.dll,System.Net;System.Net.dll,Newtonsoft.Json;/usr/local/HomeSeer/bin/homeseer/Newtonsoft.Json.dll

 

 

Hmm, noen tips?

[Moskus]

Mulig at det ikke skal være en "/" foran...? Jeg vet faktisk ikke, dette har vært testet før...

[GeneralVirus]

Noen som har en ide om hva dette kan være? Har fungert knirkefritt siden januar, plutselig kommer denne.

 

Running script C:\Program Files (x86)\HomeSeer HS3\scripts\EnTurRedigert.vb :Exception has been thrown by the target of an invocation.->Does entry point CallsFromStopplace exist in script? at System.RuntimeMethodHandle.InvokeMethod(Object target, Object[] arguments, Signature sig, Boolean constructor) at System.Reflection.RuntimeMethodInfo.UnsafeInvokeInternal(Object obj, Object[] parameters, Object[] arguments) at System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture) at Scheduler.clsRunVBNetScript.ExecuteScript()

 

[Moskus]

Det er ikke bare midlertidige server-problemer? Ser den av og til men den forsvinner av seg selv.

[GeneralVirus]

Tror ikke det. Har vært slik hele tiden siden jeg postet her inne.

[Moskus]

11 timer siden, GeneralVirus skrev:

Tror ikke det. Har vært slik hele tiden siden jeg postet her inne.

Da ville jeg startet med å sjekke om "StopPlace" som du bruker i CallsFromStopplace ikke er endret på EnTurs sider.

 

Her fungerer det fint.

[GeneralVirus]

Der fant jeg ut av feilen. Ser ut som Entur har noe problemer i Tromsø for tiden. Prøvde å bytte til en "StopPlace" i Oslo og da fungerte det fint.

 

Får heller ingen informasjon på EnTur sine sider om busstider i Tromsø. Kommer nok tilbake etterhvert satser jeg på.

[Trash2000]

Er noe rart med compiling av VB i Mono på Ubuntu, tydeligvis. Veldig mange feilmeldinger i compiling av scriptet.

 

Klarte til slutt å kjøre scriptet, men da uten parametre. Har følgende oppsett (se vedlegg).

 

Fikk satt stopplace og quay rett i scriptet, men får ikke skrevet noe status til device. Mulig å gjøre det rett i vb-scriptet? Prøvde å erstatte input(0).Trim med 984 (deviceID). men uten at det hjalp.

 

Logg-responsen også vedlagt. 

 

[Moskus]

På 18.4.2019 den 15.08, Trash2000 skrev:

Fikk satt stopplace og quay rett i scriptet, men får ikke skrevet noe status til device. Mulig å gjøre det rett i vb-scriptet? Prøvde å erstatte input(0).Trim med 984 (deviceID). men uten at det hjalp.

"Main"-rutinen (som er den som kjøres hvis du ikke bruker parametre skriver ikke til device, men til logg'en. Og det fungerer jo utmerket, kan vi se.  

[ZoRaC]

Mulig jeg er blind, for den øverste linja gir feilmelding, men ikke linje nr 2 og i mine øyne er de identiske:

Sitat

...@hs:/usr/local/HomeSeer$ sudo chown hs:hs /usr/local/HomeSeer/bin/homeseer/Newtonsoft.Json.dll
chown: cannot access '/usr/local/HomeSeer/bin/homeseer/Newtonsoft.Json.dll': No such file or directory
....@hs:/usr/local/HomeSeer$ sudo chown hs:hs /usr/local/HomeSeer/bin/homeseer/Newtonsoft.Json.dll

 

Linje 2 er da at jeg skrev path frem til siste / og trykket TAB, da autofullførte den filnavnet med det samme som jeg hadde kopiert inn...
opierte linja inn i ScriptingReferences og da funket det plutselig! ? 

[ZoRaC]

Jeg bor rett ved to holdeplasser og kan ta bussen fra hviken som helst av dem. Jeg ønsker derfor å slå sammen dem til en visning, slik at jeg kan se hvilken holdeplass neste buss går fra.

Endret scriptet litt og fikk slått sammen det til en liste/device:

Dim list As List(Of EstimatedCall) = GetCallsFromStopPlace(stop1, quay, entries)
Dim list2 As List(Of EstimatedCall) = GetCallsFromStopPlace(stop2, quay2, entries)
list.addRange(list2)

MEN, hvordan får jeg sortert dem etter avgangstid?

20:51 (20:47): Rute 19
21:17 (21:17): Rute 19
21:47 (21:47): Rute 19
22:17 (22:17): Rute 19
22:47 (22:47): Rute 19
21:05 (21:05): Rute 8
21:35 (21:35): Rute 8
22:05 (22:05): Rute 8
22:35 (22:35): Rute 8
23:05 (23:05): Rute 8

Jeg har prøvd noen varianter av list.sort() og list.orderby(), men da kommer det bare massevis av feilmeldinger i loggen...  

[Moskus]

Det hadde vært superenkelt hvis HS3 støttet Linq og Lamda-kommandoer, men selv om det til nøds skulle fungere på Windows er det vel ikke en sjanse i helvete at det gjør det på Linux, dessverre...  

[ZoRaC]

3 minutter siden, Moskus skrev:

Det hadde vært superenkelt hvis HS3 støttet Linq og Lamda-kommandoer, men selv om det til nøds skulle fungere på Windows er det vel ikke en sjanse i helvete at det gjør det på Linux, dessverre...  

 

Ok, så det enkleste er å bare gjøre det «manuelt»? Loope listen og sortere element for element?

[Moskus]

Ja, dessverre.

[Moskus]

APIen ble flyttet 1. juli. Det betyr at denne linja i funksjonen "RunQuery":

Dim url As String = "https://api.entur.org/journeyplanner/2.0/index/graphql"

... må endres til dette:

Dim url As String = "https://api.entur.io/journey-planner/v2/graphql"

 

[Rogerbl]

Prøvde å få scriptet å kjøre på min win 10 hs uten hell.
Bare lignende feilmeldinger som andre har fått.
Derfor har jeg begynt å snekre sammen et python script som henter data fra EnTur og leverer de til min Mqtt broker.

Plugin'en mcsMqtt brukes da til å importere dataene inn i HS3 og det fungerer greit.

Men lurer på om der er litt søppeldata i entur sine baser fordi jeg har litt problemer med quay'ene på mitt stoppested.

De er ikke konsekvente, slik at jeg kan få beskjed om at bussen til Kautokeino kan jeg selvsagt ta til Alta, selvom den går motsatt vei....
Sånn går nu dagan! :-)

[Moskus]

9 timer siden, Rogerbl skrev:

Prøvde å få scriptet å kjøre på min win 10 hs uten hell.
Bare lignende feilmeldinger som andre har fått.

Alle har, så vidt jeg vet, funnet ut av sine problemer. Det har vært en del syntax-feil og forvirring mellom stopplace og quay.

 

"Lignende feilmeldinger" blir for udefinert til at jeg kan hjelpe.  

[Rogerbl]

5 timer siden, Moskus skrev:

Alle har, så vidt jeg vet, funnet ut av sine problemer. Det har vært en del syntax-feil og forvirring mellom stopplace og quay.

 

"Lignende feilmeldinger" blir for udefinert til at jeg kan hjelpe.  

Her er en feilmelding jeg får:

jan-09 15.03.10

Error

Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\EnTur.vb: Verdi for typen scriptcode25.VBWrapper.EstimatedCall kan ikke konverteres til scriptcode25.VBWrapper.Trippattern.

jan-09 15.03.10

Error

Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\EnTur.vb: Navneområdet eller typen som er angitt i importene System.Core, inneholder ikke noe felles medlem eller finnes ikke. Kontroller at navneområdet eller typen er definert og inneholder minst ett felles medlem. Kontroller at det importerte elementnavnet ikke bruker noen aliaser.

jan-09 15.03.09

Event

Running script and waiting: C:/Program Files (x86)/HomeSeer HS3/scripts   og her er en annen: Running script C:\Program Files (x86)\HomeSeer HS3\scripts\EnTur.vb :Målet forårsaket et unntak under aktivering.->Does entry point CallsFromStopplace exist in script? ved System.RuntimeMethodHandle.InvokeMethod(Object target, Object[] arguments, Signature sig, Boolean constructor) ved System.Reflection.RuntimeMethodInfo.UnsafeInvokeInternal(Object obj, Object[] parameters, Object[] arguments) ved System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture) ved Scheduler.clsRunVBNetScript.ExecuteScript() jan-09 15.06.35   Event Running script and waiting: C:/Program Files (x86)/HomeSeer HS3/scripts

Endret 9. januar 2020 av Rogerbl
mer info

[Moskus]

Det ser ut som om du bruker det feil, eller så har du vært uheldig når du klippet og limte koden. Kan du poste eventet/eventene som trigger scriptet?

[Rogerbl]

På 9.1.2020 den 19.07, Moskus skrev:

Det ser ut som om du bruker det feil, eller så har du vært uheldig når du klippet og limte koden. Kan du poste eventet/eventene som trigger scriptet?

her er eventet jeg bruker:

 

[Moskus]

9 timer siden, Rogerbl skrev:

her er eventet jeg bruker:

 

 

 

Jeg prøvde med denne parameteren:

3017, NSR:StopPlace:57094, NSR:Quay:97801

... og fikk dette:

 

 

Du har lagt til en referanse til Newtonsoft.JSON.dll?

 

[Rogerbl]

2 timer siden, Moskus skrev:

 

 

Jeg prøvde med denne parameteren:

3017, NSR:StopPlace:57094, NSR:Quay:97801

... og fikk dette:

 

 

Du har lagt til en referanse til Newtonsoft.JSON.dll?

 

ja, men ikke med hele path'en. Kan prøve det. ?

[Rogerbl]

får likevel denne feilmeldingen:

jan-13 12.42.05

Error 3

Running script C:\Program Files (x86)\HomeSeer HS3\scripts\EnTur.vb :Målet forårsaket et unntak under aktivering.->Does entry point CallsFromStopplace exist in script? ved System.RuntimeMethodHandle.InvokeMethod(Object target, Object[] arguments, Signature sig, Boolean constructor) ved System.Reflection.RuntimeMethodInfo.UnsafeInvokeInternal(Object obj, Object[] parameters, Object[] arguments) ved System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture) ved Scheduler.clsRunVBNetScript.ExecuteScript()

[Moskus]

(Du restartet HS3 etter oppdateringen?)

(Hvordan ser ScriptingReference= linja di ut?)

 

Kan du poste hele EnTur.vb scriptet? Det virker som om noe mangler, og jeg kan diff'e det.

 

[Rogerbl]

1 time siden, Moskus skrev:

(Du restartet HS3 etter oppdateringen?)

(Hvordan ser ScriptingReference= linja di ut?)

 

Kan du poste hele EnTur.vb scriptet? Det virker som om noe mangler, og jeg kan diff'e det.

 

ja, restartet Hs3 etter oppdateringen.

[Settings]

ScriptingReferences=System.Core;System.Core.dll,Newtonsoft.Json;C:\Programfiler (x86)\HomeSeer HS3\Bin\homeseer\Newtonsoft.Json.dll

 

 

EnTur.vb