My best day was a few days ago, but still very slow.
Day Time Rank Score Time Rank Score 12 00:09:34 243 0 00:18:42 378 0
I'm usually much slower than you guys. Looks like you have more experience solving such tasks than me, you already solved both previous years.
Just got my VR headset. It is quite good, but unfortunately, it does not have an action button. So, it becomes difficult to interact with applications when your phone inside.
To set any response header, you should overwrite OnPreHTTP method in your CSP Page class.
Class User.Page Extends %CSP.Page { ClassMethod OnPage() As %Status { &html<<html> <head> </head> <body>> ; To do... &html<</body> </html>> Quit $$$OK } /// Event handler for <b>PreHTTP</b> event: this is invoked before /// the HTTP headers for a CSP page have been sent. All changes to the /// <class>%CSP.Response</class> class, such as adding cookies, HTTP headers, /// setting the content type etc. must be made from within the OnPreHTTP() method. /// Also changes to the state of the CSP application such as changing /// %session.EndSession or %session.AppTimeout must be made within the OnPreHTTP() method. /// It is prefered that changes to %session.Preserve are also made in the OnPreHTTP() method /// as this is more efficient, although it is supported in any section of the page. /// Return <b>0</b> to prevent <method>OnPage</method> from being called. ClassMethod OnPreHTTP() As %Boolean [ ServerOnly = 1 ] { Do %response.SetHeader("X-MyHeader", "some info") quit 1 } }
In HTTP/2 added some features which are impossible or maybe possible in Cache
And other features which also important but mostly on TCP Stack, and maybe really not Cache part.
Looks like there is some error with autodetecting links in a post here, just fixed it with manually marking correctly as a link in his comment.
That's why it's an article and not a question.
So, for now, yes. I changed to article
In the first implementation, I tried to actually build the tree. But missed something, and got some duplications in the lowest branches. Then using the same tree trying to solve second part, I found more than one unbalanced branches and a long time had not noticed how it could be until I noticed duplications. Then I removed this way, and first part becomes much simpler if just search node which does not have parents. In the second part, you actually already have a tree when you know when it started from the first part.
Looks like just some simple implementation for Long Pulling requests.
But how about getting not just a progress but how to get some data before task finished.
And also, I see beg security Issue, when I can get information from any other process. You use TaskId directly from the request like you trust everybody. And also easy to get SUBSCRIPT error.
BTW: do you suppose to acept someone's answer? Looks like it is mostly just discissing topic.
Today's task was pretty difficult, it takes few hours to solve it. I made a mistake in first part even if I got the right answer, but after when I rewrote my first part, the second part was solved quite fast. But I lost so much time to figure it out.
For current process
USER>f fmt="enuw","rusw","current","" do ##class(%SYS.NLS.Format).%New(fmt) w !,fmt,?10,$zd($h,11),?15,$zd($h,12) enuw Wed Wednesday rusw Сре Среда current St středa Wed Wednesday
Or for all new processes, without restart
%SYS>write $zd($h,12)
Wednesday
%SYS>Set ^SYS("NLS","Config","LocaleFormat")=1
%SYS>write $zd($h,12)
Wednesday
%SYS>Do Locale^NLSLOAD("rusw")
%SYS>write $zd($h,12)
СредаLooks like we in the same timezone, and you solve tasks faster than me. When your time today was 15:47 minutes for the first task. But on the main Leaderboard fastest time 2:58. I really don't understand how it would be possible, to solve it so fast.
anagram used all letters, so I just compared lengths of strings and used $tr() to remove all characters from string one in another.
So, your code I would change like
ClassMethod IsAnagram(word,test) as %Boolean {
if $L(word)'=$L(test) return 0
return $tr(word,test)=""
}Our team is growing
Join our leaderboard, too. ))
It would be better if you can add your SQL query, and if it is not a secret also Classes definition. So, we could see if something may be wrong with it. And you also should look at the book in the documentation about SQL Optimizations.
set input="1212" set len=$l(input)/2 set sum=0 f i=1:1:len { if $e(input,i)=$e(input,len+i),$i(sum, i*2) } zw sum
I also started from $zstrip, but in task 1111 should produce 1, when $zstrip returns only one 1.
for the second task, you should simply compare values from the first half of string with the same position from the second half.
If anybody wants to join this advent, we can use our own private leaderboard, with my code 130669-ab1f69bf.
ClassMethod HelloWorld(Name As %String)
{
set result = {
"name": (Name)
}
quit result.%ToJSON()
}
Why do you use such a strange url? You created the application with your class as Dispatch class. So, in this case, you should call this.
http://localhost:57772/USER/REST/Arun
where /USER/REST is web application, and everything else is already what should be in a REST.
PS. I would not recommend do not use uppercase for web applications
Look at this project on github from @David Reche
Something like this, but in %SYS namespace. Documentation
%SYS>s props("Database")="SAMPLES",sc=##Class(Config.MapPackages).Create("USER","PackageA",.props)
After all details, it means, that no reasons to use $lb, or any other ways, it should be as is as a string, but with this length's header.
In Cache, we don't have binary strings as do other languages, but what is a byte, it is a symbol for text, so text will be arrays of bytes.
write $c(166, 70, 114, 105, 110, 103, 101) ¦Fringe
The only thing you should care as already mentioned above is different codepages.
Let's try for some example:
And try to get the same.
USER>set data="TestТест" USER>zzdump data 0000: 0054 0065 0073 0074 0422 0435 0441 0442 TestТест USER>set msg=$zcvt(data,"O","UTF8") ; convert from Unicode USER>set msg=$c(160+$l(msg))_msg ; of course should be changed for bigger text USER>zzdump msg 0000: AC 54 65 73 74 D0 A2 D0 B5 D1 81 D1 82 ¬TestТеÑ.Ñ.
and as you can see we got the same result
What do you mean by overhead from $lb?
What is $c(166), some magic number? And why you encode the string as a list of codes, why not keep it as a string?
$lb it is also a string, but compressed for some types of values.
I think bitlogic operations is the best which you can use with bitstring.
Congratulations, you did it.