[PD] show "used or free system memoy" from within pd-extended

Ingo Scherzinger ingo at miamiwave.com
Fri Feb 27 16:55:19 CET 2009


Thanx for everybody's input!

 

I just wrote a little and simple abstraction to check the system memory
using "free" and shell.

It can easily be expanded to show also "total", "shared", "buffers" and
"cached".

Maybe it's useful for some people who are in the same situation as I am,
i.e. getting low on memory.

It works on Ubuntu 8.04. No idea about other linux versions.

 

Here it is:

Ingo

 

#N canvas 278 25 721 681 10;

#X obj 245 102 shell;

#X msg 245 82 free;

#X obj 165 124 route Mem:;

#X obj 165 144 prepend set;

#X obj 245 124 nroute total;

#X obj 165 164 t b a;

#X msg 165 184 2.04594e+06 1.26157e+06 784376 0 17696 1.07144e+06;

#X obj 443 577 prepend set;

#X obj 443 597 t b a;

#X msg 463 211 \$3;

#X floatatom 592 328 5 0 0 0 - - -;

#X obj 592 288 mod 1000;

#X obj 482 268 / 1000;

#X floatatom 482 328 5 0 0 0 - - -;

#X obj 482 288 mod 1000;

#X obj 463 231 t f f f;

#X obj 374 268 / 1000;

#X obj 374 288 / 1000;

#X floatatom 374 328 5 0 0 0 - - -;

#X obj 374 308 i;

#X obj 443 490 prepend;

#X obj 443 517 prepend;

#X obj 443 557 mergefilename;

#X obj 443 651 outlet;

#X obj 419 386 prepend _;

#X obj 374 347 moses 100;

#X obj 374 367 moses 10;

#X obj 443 537 prepend free_mem:;

#X obj 374 406 prepend __;

#X obj 374 433 t a;

#X obj 592 347 moses 100;

#X obj 592 367 moses 10;

#X obj 592 433 t a;

#X obj 637 386 prepend 0;

#X obj 592 406 prepend 0 0;

#X obj 482 347 moses 100;

#X obj 482 367 moses 10;

#X obj 482 433 t a;

#X obj 527 386 prepend 0;

#X obj 482 406 prepend 0 0;

#X obj 592 453 prepend .;

#X obj 482 453 prepend .;

#X obj 103 577 prepend set;

#X obj 103 597 t b a;

#X floatatom 252 328 5 0 0 0 - - -;

#X obj 252 288 mod 1000;

#X obj 142 268 / 1000;

#X floatatom 142 328 5 0 0 0 - - -;

#X obj 142 288 mod 1000;

#X obj 123 231 t f f f;

#X obj 34 268 / 1000;

#X obj 34 288 / 1000;

#X floatatom 34 328 5 0 0 0 - - -;

#X obj 34 308 i;

#X obj 103 490 prepend;

#X obj 103 517 prepend;

#X obj 103 557 mergefilename;

#X obj 103 651 outlet;

#X obj 79 386 prepend _;

#X obj 34 347 moses 100;

#X obj 34 367 moses 10;

#X obj 34 406 prepend __;

#X obj 34 433 t a;

#X obj 252 347 moses 100;

#X obj 252 367 moses 10;

#X obj 252 433 t a;

#X obj 297 386 prepend 0;

#X obj 252 406 prepend 0 0;

#X obj 142 347 moses 100;

#X obj 142 367 moses 10;

#X obj 142 433 t a;

#X obj 187 386 prepend 0;

#X obj 142 406 prepend 0 0;

#X obj 252 453 prepend .;

#X obj 142 453 prepend .;

#X msg 123 211 \$2;

#X obj 245 13 inlet;

#X obj 103 537 prepend used_mem:;

#X msg 245 164 total used free shared buffers cached;

#X obj 245 144 prepend set;

#X symbolatom 284 56 20 0 0 0 - - -;

#X symbolatom 284 37 20 0 0 0 - - -;

#X obj 300 13 r used_memory;

#X obj 386 13 r free_memory;

#X obj 150 624 s used_memory;

#X obj 490 624 s free_memory;

#X obj 245 37 bng 35 250 50 0 empty empty memory 3 18 0 9 -257985 -1

-159808;

#X text 146 650 used_memory;

#X text 486 650 free_memory;

#X text 127 13 bang inlet to check;

#X obj 472 625 bng 15 250 50 0 empty empty empty 17 7 0 10 -260097

-1 -1;

#X obj 283 14 bng 15 250 50 0 empty empty empty 17 7 0 10 -260097 -1

-1;

#X obj 132 625 bng 15 250 50 0 empty empty empty 17 7 0 10 -260097

-1 -1;

#X connect 0 0 2 0;

#X connect 0 0 4 0;

#X connect 1 0 0 0;

#X connect 2 0 3 0;

#X connect 3 0 5 0;

#X connect 4 0 79 0;

#X connect 5 0 6 0;

#X connect 5 1 6 0;

#X connect 6 0 9 0;

#X connect 6 0 75 0;

#X connect 7 0 8 0;

#X connect 8 0 23 0;

#X connect 8 1 23 0;

#X connect 8 1 85 0;

#X connect 9 0 15 0;

#X connect 10 0 30 0;

#X connect 11 0 10 0;

#X connect 12 0 14 0;

#X connect 13 0 35 0;

#X connect 14 0 13 0;

#X connect 15 0 11 0;

#X connect 15 1 12 0;

#X connect 15 2 16 0;

#X connect 16 0 17 0;

#X connect 17 0 19 0;

#X connect 18 0 25 0;

#X connect 19 0 18 0;

#X connect 20 0 21 0;

#X connect 21 0 27 0;

#X connect 22 0 7 0;

#X connect 24 0 29 0;

#X connect 25 0 26 0;

#X connect 25 1 29 0;

#X connect 26 0 28 0;

#X connect 26 1 24 0;

#X connect 27 0 22 0;

#X connect 28 0 29 0;

#X connect 29 0 21 1;

#X connect 30 0 31 0;

#X connect 30 1 32 0;

#X connect 31 0 34 0;

#X connect 31 1 33 0;

#X connect 32 0 40 0;

#X connect 33 0 32 0;

#X connect 34 0 32 0;

#X connect 35 0 36 0;

#X connect 35 1 37 0;

#X connect 36 0 39 0;

#X connect 36 1 38 0;

#X connect 37 0 41 0;

#X connect 38 0 37 0;

#X connect 39 0 37 0;

#X connect 40 0 20 0;

#X connect 41 0 20 1;

#X connect 42 0 43 0;

#X connect 43 0 57 0;

#X connect 43 1 57 0;

#X connect 43 1 84 0;

#X connect 44 0 63 0;

#X connect 45 0 44 0;

#X connect 46 0 48 0;

#X connect 47 0 68 0;

#X connect 48 0 47 0;

#X connect 49 0 45 0;

#X connect 49 1 46 0;

#X connect 49 2 50 0;

#X connect 50 0 51 0;

#X connect 51 0 53 0;

#X connect 52 0 59 0;

#X connect 53 0 52 0;

#X connect 54 0 55 0;

#X connect 55 0 77 0;

#X connect 56 0 42 0;

#X connect 58 0 62 0;

#X connect 59 0 60 0;

#X connect 59 1 62 0;

#X connect 60 0 61 0;

#X connect 60 1 58 0;

#X connect 61 0 62 0;

#X connect 62 0 55 1;

#X connect 63 0 64 0;

#X connect 63 1 65 0;

#X connect 64 0 67 0;

#X connect 64 1 66 0;

#X connect 65 0 73 0;

#X connect 66 0 65 0;

#X connect 67 0 65 0;

#X connect 68 0 69 0;

#X connect 68 1 70 0;

#X connect 69 0 72 0;

#X connect 69 1 71 0;

#X connect 70 0 74 0;

#X connect 71 0 70 0;

#X connect 72 0 70 0;

#X connect 73 0 54 0;

#X connect 74 0 54 1;

#X connect 75 0 49 0;

#X connect 76 0 86 0;

#X connect 77 0 56 0;

#X connect 79 0 78 0;

#X connect 82 0 81 0;

#X connect 83 0 80 0;

#X connect 86 0 1 0;

#X coords 0 -1 1 1 171 43 1 240 33;

 

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.puredata.info/pipermail/pd-list/attachments/20090227/32c18f16/attachment.htm>


More information about the Pd-list mailing list