Action() { lr_save_datetime("%y%j", DATE_NOW, "JulianDate"); lr_output_message("Today's Julian Date is %s",lr_eval_string("{JulianDate}")); return 0; }
Action() { char chQuery[128]; MYSQL *Mconn; lr_load_dll("libmysql.dll"); Mconn = lr_mysql_connect(MYSQLSERVER, MYSQLUSERNAME, MYSQLPASSWORD, MYSQLDB, atoi(MYSQLPORT)); lr_save_string(lr_eval_string("{pTransactionName}"),"sTransactionName"); lr_save_string(lr_eval_string("{pResult}"),"sResult"); lr_save_string(lr_eval_string("{pRandom}"),"sResponseTime"); lr_save_datetime("%H:%M:%S", TIME_NOW, "sTime"); sprintf(chQuery, "insert into test.sample_writes (sqTransactionName, sqResult, sqResponseTime, sqTime) values ('%s','%s','%s','%s');", lr_eval_string("{sTransactionName}"), lr_eval_string("{sResult}"), lr_eval_string("{sResponseTime}"), lr_eval_string("{sTime}")); lr_mysql_query(Mconn, chQuery); lr_mysql_disconnect(Mconn); return 0; }
// -------------------------------------------------------------------------------------------------- // y_datetime() // Simply returns the current date-time as a string, in this format: // YYYYMMDD,HHMMSS (yesss, separated by a comma. That is most suitable for this moment. // @author: Raymond de Jongh // @author: Floris Kraak // // This mostly exists to facilitate y_write_to_log(), in logging.c // // Comment: Ray, please have a look at lr_save_datetime() for me will you? Thanks ;-) // -- Floris // -------------------------------------------------------------------------------------------------- void y_datetime() { lr_save_datetime("%Y%m%d,%H%M%S", DATE_NOW, "DATE_TIME_STRING"); }
get_google_short_url_qrcode(){ int rc=0; char strFileName[256]; // largest size of file. char *szBuf; unsigned long nLength; if( stricmp("Y",LPCSTR_SaveImageYN ) == FOUND ){ // Run-time Attribute "SaveImageYN" or command line option "-SaveImageYN" // continue if SaveImageYN was specified with Y }else{ return LR_PASS; } set_pShortHostKey_from_url( lr_eval_string("{pShortURL}") ); // from get_google_short_url() //wi_startPrintingTrace(); //lr_output_message(">> pShortHostKey=\"%s\"." ,lr_eval_string("{pShortHostKey}") ); //wi_stopPrinting(); // For shortened URL http://goo.gl/AC4IW", details are at http://goo.gl/#analytics/goo.gl/AC4IW/all_time // {pShortHostKey}=AC4IW in example: URL http://goo.gl/AC4IW.qr redirects to // The QR code impage at http://chart.googleapis.com/chart?cht=qr&chs=100x100&choe=UTF-8&chld=H|0&chl=http://goo.gl/AC4IW web_reg_save_param_ex("ParamName=pImage", "LB=\r\n\r\n", "RB=\"", "Notfound=warning", LAST); // The \r\n\r\n is to begin capture after the two blank lines between HTTP header and body. web_reg_save_param_ex("ParamName=pImage_len", "LB=Content-Length: ", "Notfound=warning", "RB=\r\n", LAST); sprintf( tempString1, "%s_3image", lr_eval_string("{pTransSequence}") ); lr_save_string(tempString1,"pTransName"); wi_start_transaction(); // This URL was obtained from the DNS-level redirect in the HTML header in response to request for .qr, such as: // The document has moved <A // HREF="http://chart.googleapis.com/chart?cht=qr&chs=150x150&choe=UTF-8&chld=H&chl=http://goo.gl/x6wUIS">here</A>.\n // & needs to be coverted to & character in URLs. // WARNING: The 150x150 in this URL may change over time as more characters are needed for uniqueness. // Previously, 100x100 was being returned: // "URL={pShortURL}.qr", web_url("imagefile", "URL=http://chart.googleapis.com/chart?cht=qr&chs=150x150&choe=UTF-8&chld=H&chl={pShortURL}", "Resource=1", "RecContentType=image/png", "Snapshot=t1.inf", LAST); // FIXME: File created has black box at bottom. rc = wi_end_transaction(); // strFileName=wi_define_FileName(): lr_save_datetime("%Y%m%d%H%M%S", DATE_NOW, "pYMDHMS"); // YYMMDDHHMMSS (12 char), no micro seconds sprintf(strFileName, "%s%s_%d_T%s_%s_%s.png" ,lr_eval_string("{pImageFilePath}") ,global_unique_id ,iActionIterations ,lr_eval_string("{pYMDHMS}") ,lr_eval_string("{pShortHostKey}") ,lr_eval_string("{pImage_len}") ); lr_eval_string_ext("{pImage}", strlen("{pImage}"), &szBuf, &nLength, 0, 0, -1); // lr_eval_string_ext( in_str, in_len, pointer out_str, out_len, Reserved for future use. if( nLength <= 0 ){ lr_error_message(">> No image returned for %s.",strFileName); }else{ if( wi_WriteDataToFile(strFileName, szBuf, nLength) == LR_PASS ){ wi_startPrintingInfo(); lr_output_message(">> QRcode_image file created at \"%s\".",strFileName); wi_stopPrinting(); // TODO: 23. Remember after runs to clear out the files to an archive filer. }else{ wi_startPrintingError(); lr_error_message(">>> QRcode_image file NOT created at \"%s\".",strFileName); wi_stopPrinting(); } } return rc; } // retrieve_pShortURL_qrcode()