Comments (2)

Par mc, 14 avril 2008 16 h 58 min

lsof permet de visualiser les fichiers ouverts (par qui? pourquoi? comment?).

Les sockets ayant un FD au même titre que les fichiers du FS, il est possible
de visualiser les connexions en cours. c’est un beau melange de ps, netstat et
d’autres … en mieux:

/!\

Le root voit des choses:

> echo `lsof -i |wc -l` `sudo lsof -i |wc -l`
7 19

exemple: afficher les fichiers ouverts par la commande squid (

-csquid

)
sur le domaine Internet (

-i

).

lsof -csquid -i

ne fonctionne pas comme nous l’attendons: il sélectionne l’un ou l’autre.
le et logique s’écrit (

-a

)

lsof -csquid -ai

Nous voulons ensuite recupérer les infos sans avoir a deduire les colonnes
(

-F

) et ne garder que les infos relatives au domaine internet
(

-FT

).

De ces données relatives au domaine internet, seul l’état nous intéresse:
(

-Fs

). Nous obtenons donc:

lsof -csquid -ai -FT -Ts

Voilà une petite fonction qui affiche uniquement les PIDs des processus en
écoute sur le domaine Internet:

# use the lsof's -F output to show PIDs that are listening
# on a internet port.
lsof_listening_pids () {
    sed -n '
 
        # when a line starts with p,
        # store the rest of the line (the PID in fact)
        # in the hold space
        /^p/ {
            s/^p//
            h
        }
 
        # when the line is
        /^TST=LISTEN$/ {
            # so call the PID back to the pattern space
            # and print it
            g
            p
        }
    '

sudo lsof -csquid -ai -FT -Ts |
   lsof_listening_pids

maintenant j’ai confiance !

Comments (1)

Par mc, 27 février 2008 23 h 12 min

je donne souvent cet exercice en cours de C: affichez une table de vignere a l’écran.

en zsh:

# creer un tableau de a a z 
a=({a-z})
# repeter autant de fois qu'il y a d'element dans le tableau
repeat $#a {
  # afficher le tableau
  print $a;
  # le premier devient le dernier
  a+=$a[1];
  # je supprime l'ancien premier
  a[1]=() 
}

Comments (0)

Par mc, 17 février 2008 21 h 20 min

oui … c’est vrai, perl a shift, unshift, pop et push …

mais en zsh on a la meme en utilisant les sous-tableaux:


a=( this is a )

# pop
a[-1]=()

# push
a[-1]=( $a[-1] test )

# shift
a[1]=()

# unshift
a[1]=( yeah, $a[1] )

Comments (0)

Par mc, 17 février 2008 20 h 47 min

Il m’arrive souvent d’écrire dans mon shell des lignes qui feraient de bons exos pratiques. Je ne les note jamais … Mais tout ca va changer … je vais m’améliorer .. je commence a blogger les CS pour code snippets.

soit une liste de fichiers et de repertoires (exemple: le resultat d’une commande dpkg -L ) , je veux en extraire les commandes.

Les commandes sont des fichiers ( -f ), ils sont executables ( -x ) et le nom de la commande est le basename du chemin ( $F[-1] si le separateur par defaut est ‘/’ ( -F/ -a )).

au final :

dpkg -L iproute |
perl -F/ -lane '-f && -x && print $F[-1]'

Comments (1)

Par mc, 3 février 2008 20 h 33 min

sous debian, ssh-agent utiliise dbus et on s’habitue vite au confort de ne devoir tapper son mdp une seule fois par jour. Sous windows, c’est idem lorsqu’on lance puuty-agent au demarrage de la session.

sous les autres os, il faut faire ca a la mimine. en attendant mieux, voilà de quoi donner a manger a .profile, .zshenv et .xsession:


# does $SSH_AGENT_PID exists and is it
# correctly set ?
# use it as boolean ...
# exemple: ssh_agent_right_pid && echo ok
# tested: dash, zsh
ssh_agent_right_pid () {
# if pid exists, there are 2 lines
# so the second read returns 0
local a b
[ -n "$SSH_AGENT_PID" ] &&
ps -p $SSH_AGENT_PID | {
read a
read b
}
}

# if ssh-agent command is available on the system
# tries to launch and load a key
# in .xsession, source it before exec yourwm
if which ssh-agent > /dev/null; then
ssh_agent_right_pid || source ~/.today_agent > /dev/null
ssh_agent_right_pid || {
ssh-agent > ~/.today_agent
source ~/.today_agent > /dev/null
# open it in a term if you use this script in your .xesssion
ssh-add
}
ssh_agent_right_pid || {
echo « can’t launch agent » >&2
false
}
fi