topic Re: Filename quote fun! in SAS Programming

Filename quote fun!

BillJones — Sun, 07 Dec 2014 10:57:33 GMT

Hello everyone

I'm trying to call cURL within SAS to access an api with oauth 1.0. In order to this, I need to construct an appropriate header. Unfortunately, I cannot specify the header correctly in SAS because of the quotes. I've read several posts here and on other sites about how to handle quotes within a macro variable. My code forms a macro variable with the necessary quotes. The issue is when I put it in the filename statement. I get an error.

%let consumer_key=%quote(")cheezwhiz%quote(");

%let header = "curl --header 'Authorization: OAuth oauth_consumer consumer_key=&consumer_key.'";

%put &header; gives "curl --header 'Authorization: OAuth oauth_consumer consumer_key="cheezwhiz"'" which is exactly what I want.

However, when I try to execute this within a filename statement, e.g., filename curl pipe &header.;, I get the following error message: ERROR 23-2: Invalid option name cheezwhiz.

Does anyone know of a way to circumvent this error?

Thanks very much for any suggestions.

-Bill

Re: Filename quote fun!

data_null__ — Sun, 07 Dec 2014 14:20:28 GMT

Try letting the quote function have all the fun.

%let consumer_key=cheezwhiz;
%let header = %sysfunc(quote(curl --header %sysfunc(quote(Authorization: OAuth oauth_consumer consumer_key=%sysfunc(quote(&consumer_key))))));
%put NOTE: %superq(header); 
 
filename curl pipe &header.; 
filename curl list; 


39         %let consumer_key=cheezwhiz;
40         %let header = %sysfunc(quote(curl --header %sysfunc(quote(Authorization: OAuth oauth_consumer
40       ! consumer_key=%sysfunc(quote(&consumer_key))))));
41         %put NOTE: %superq(header); 
NOTE: "curl --header ""Authorization: OAuth oauth_consumer consumer_key=""""cheezwhiz"""""""
42         
43         filename curl pipe &header.; 
44         filename curl list; 
NOTE: Fileref= CURL
      Physical Name= curl --header "Authorization: OAuth oauth_consumer consumer_key=""cheezwhiz"""

Re: Filename quote fun!

BillJones — Mon, 08 Dec 2014 09:21:37 GMT

data_null_,

Thanks so much for the code! The quote function is definitely having all the fun now.

Thanks again,

Bill

Re: Filename quote fun!

BillJones — Tue, 16 Dec 2014 03:56:11 GMT

Quick follow-up question: How do I add additional quoted strings to the pipe statement. For example, I tried to add a consumer_secret key with code below.

%let consumer_key=cheezwhiz;

%let consumer_secret=coorslight;

%let header = %sysfunc(quote(curl --header %sysfunc(quote(Authorization: OAuth oauth_consumer consumer_key=%sysfunc(quote(&consumer_key)),consumer_secret=%sysfunc(quote(&consumer_secret))))));

%put NOTE: %superq(header);

filename curl pipe &header.;

filename curl list;

The code runs, but I cannot see the second key (consumer_secret) in the log. What's the best way to deal with this issue? Should I use the catx function? Or is there a more direct solution?

-Bill

Re: Filename quote fun!

data_null__ — Tue, 16 Dec 2014 12:34:48 GMT

It's the comma. Do you need it?

Re: Filename quote fun!

BillJones — Tue, 16 Dec 2014 17:50:42 GMT

Thanks for the response and yes I need the commas. They're required for the OAuth header.

Re: Filename quote fun!

data_null__ — Tue, 16 Dec 2014 18:27:59 GMT

Put the comma in %NRSTR(,) %STR might work too.

%let consumer_key=cheezwhiz;
%let consumer_secret=coorslight;
%let header = %sysfunc(quote(curl --header %sysfunc(quote(Authorization: OAuth oauth_consumer consumer_key=%sysfunc(quote(&consumer_key))%nrstr(,)consumer_secret=%sysfunc(quote(&consumer_secret))))));
%put NOTE: %superq(header); 
 
filename curl pipe &header.; 
filename curl list; 



32         %let consumer_key=cheezwhiz;
33         %let consumer_secret=coorslight;
34         %let header = %sysfunc(quote(curl --header %sysfunc(quote(Authorization: OAuth oauth_consumer
34       ! consumer_key=%sysfunc(quote(&consumer_key))%nrstr(,)consumer_secret=%sysfunc(quote(&consumer_secret))))));
35         %put NOTE: %superq(header); 
NOTE: "curl --header ""Authorization: OAuth oauth_consumer consumer_key=""""cheezwhiz"""",consumer_secret=""""coorslight"""""""
36         
37         filename curl pipe &header.; 
38         filename curl list; 
NOTE: Fileref= CURL
      Physical Name= curl --header "Authorization: OAuth oauth_consumer consumer_key=""cheezwhiz"",consumer_secret=""coorslight"""

Re: Filename quote fun!

FriedEgg — Tue, 16 Dec 2014 18:37:23 GMT

There are plenty of method available in SAS to execute these http calls without having to use an external tool, such as cURL.

%let consumer_key=cheezwhiz;

%let consumer_secret=coorslight;

filename headIn temp;

data _null_;

file headIn;

array oauth[2] $ 200 consumer_key consumer_secret;

put 'Authorization: OAuth oauth_consumer ';

do _n_=1 to dim(oauth);

oauth[_n_]=quote(symget(vname(oauth[_n_])));

if _n_>1 then put +(-1) ',';

put +5 oauth[_n_]= @;

end;

run;

filename out temp;

proc http method='post' headerin=headIn url="http://localhost:8681/OAuth/token" out=out;

With careful counting of the number of quotation marks needed, you can do what you are looking to get without using any functions.

%let consumer_key=cheezwhiz;

%let consumer_secret=coorslight;

filename cURL pipe "curl -H ""Authorization: OAuth oauth_consumer consumer_key=""""&consumer_key"""", consumer_secret=""""&consumer_secret""""""";

filename cURL list;

NOTE: Fileref= CURL

Physical Name= curl -H "Authorization: OAuth oauth_consumer consumer_key=""cheezwhiz"", consumer_secret=""coorslight"""

Side note, I've never seen an OAuth scheme like this, or that required quoting of the key and secret in the heading before, but I'll assume you know what you're doing on this front.

Re: Filename quote fun!

BillJones — Tue, 16 Dec 2014 20:45:44 GMT

data _null_,

Thanks very much for the additional code!

-Bill

Re: Filename quote fun!

BillJones — Tue, 16 Dec 2014 21:01:54 GMT

FriedEgg,

Thank you for your thoughts and code. I prefer cURL over proc http because I can simultaneously submit up to 3 requests at once. However, I may try proc http if I run into significant issues accessing the api via cURL.

Also, I try to carefully count the quotes to see if I can construct the header without any functions.

Thanks again,

Bill

Re: Filename quote fun!

Haikuo — Tue, 16 Dec 2014 22:19:54 GMT

On a side note, I have to remind you that given the current direction SAS and other IT industries are heading, proc http may live longer than curl. My company for example, has just recently decided moving to server SAS (Grid) and eradicating PC SAS completely in a short period. Many legacy SAS code, especially those involving OS command and third party utilities (such as curl) have to be modified.

Haikuo