home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / boot / i386 / root / usr / share / YaST2 / modules / HTTP.ycp < prev    next >
Text File  |  2006-11-29  |  2KB  |  63 lines
  1. /**
  2.  * File:    modules/HTTP.ycp
  3.  * Package: Transfer Protocols
  4.  * Summary: Handle HTTP Requests
  5.  * Authors: Anas Nashif <nashif@suse.de>
  6.  * Flags:   Stable
  7.  *
  8.  * $Id: HTTP.ycp 31241 2006-06-01 12:32:41Z locilka $
  9.  */
  10.  
  11. {
  12.  
  13. module "HTTP";
  14.  
  15. global string user = "";
  16. global string password = "";
  17.  
  18. /**
  19.  * Send a get request
  20.  * @param url url in any standard form
  21.  * @param output file to save result to
  22.  * @return map Reponse map with HTTP code and transfer size and time
  23.  */
  24. global define map Get(string url, string output) ``{
  25.     y2debug("URL: %1", url);
  26.     map response = (map) SCR::Execute(.curl.get, url, $["output":output]);
  27.     return response;
  28. }
  29.  
  30. /**
  31.  * Send a post request
  32.  * @param url url in any standard form
  33.  * @param output file to save result to
  34.  * @param postdata the rest of the url and whatever comes after the ? in the URL
  35.  * @return map Reponse map with HTTP code and transfer size and time
  36.  */
  37.  
  38. global define map Post(string url, string output, string postData) ``{
  39.     y2debug("URL: %1", url);
  40.     map response = (map) SCR::Execute(.curl.get, url, $["output":output, "data":postData]);
  41.     return response;
  42. }
  43.  
  44.  
  45. /**
  46.  * Set user and password for HTTP authentication
  47.  */
  48.  
  49.  
  50. global define map setUserPassword() ``{
  51.     string userpass = sformat("%1:%2", user , password );
  52.     return (map) SCR::Execute(.curl.setUserPassword, userpass, $[]);
  53. }
  54.  
  55. global define void easySSL( boolean easy ) ``{
  56.     y2debug("setting easySSL to %1",easy);
  57.     SCR::Execute(.curl.easySSL, easy, $[]);
  58.     return;
  59. }
  60.  
  61. /* EOF */
  62. }
  63.