Annotation of parser3/tests/164.html, revision 1.1
1.1 ! misha 1: @main[]
! 2: $sName[164_dir/hf]
! 3:
! 4: ^$hf[^^hashfile::open[$sName]]
! 5: $hf[^hashfile::open[$sName]]
! 6:
! 7: ^checkFiles[$sName]
! 8:
! 9: <hr />
! 10: Storing 3 values and show all items...<br />
! 11: ^put[$hf;1;value 1](1)
! 12: ^put[$hf;2;value 2](3)
! 13: ^put[$hf;3;value 3](4)
! 14: ^print[$hf]
! 15:
! 16: <hr />
! 17: Checking files after storing data...
! 18: ^checkFiles[$sName]
! 19:
! 20: <hr />
! 21: Removing locks...
! 22: <br />^^hf.release[]
! 23: ^hf.release[]
! 24:
! 25: <hr />
! 26: Removing one value and show all items...<br />
! 27: ^hf.delete[3]
! 28: ^print[$hf]
! 29:
! 30: <hr />
! 31: Waiting for a 2 secs and show all items...
! 32: ^sleep(2)
! 33: ^print[$hf]
! 34:
! 35: <hr />
! 36: Scan for expired items...
! 37: <br />^^hf.cleanup[]
! 38: ^hf.cleanup[]
! 39: ^checkFiles[$sName]
! 40:
! 41: <hr />
! 42: Delete files and check if they exists...
! 43: <br />^^hf.delete[]
! 44: ^hf.delete[]
! 45: ^checkFiles[$sName]
! 46:
! 47: <hr />
! 48: Put value and check auto re-opening...
! 49: ^put[$hf;1;value 1](1)
! 50: ^checkFiles[$sName]
! 51:
! 52: # finalizing: remove files for make next test start working well
! 53: ^hf.delete[]
! 54:
! 55:
! 56:
! 57: @put[hf;sKey;sValue;iTime]
! 58: $hf.$sKey[
! 59: $.value[$sValue]
! 60: $.expires($iTime/24/60/60)
! 61: ]
! 62:
! 63:
! 64: @print[hf;sText][sKey;sValue]
! 65: <p>^if(def $sText){$sText<br />}
! 66: ^hf.foreach[sKey;sValue]{^$hf.${sKey}: '$sValue'}[<br />]
! 67: </p>
! 68:
! 69:
! 70:
! 71: @checkFiles[sName]
! 72: <p>
! 73: ${sName}.dir file ^checkFile[${sName}.dir]<br />
! 74: ${sName}.pag file ^checkFile[${sName}.dir]
! 75: </p>
! 76:
! 77:
! 78:
! 79: @checkFile[sFileName]
! 80: ^if(!-f $sFileName){doesn't }exist
E-mail: