private function _grabioreg($key)
    {
        if (CommonFunctions::executeProgram('ioreg', '-c "'.$key.'"', $s, PSI_DEBUG)) {
            /* delete newlines */
            $s = preg_replace("/\s+/", " ", $s);
            /* new newlines */
            $s = preg_replace("/[\|\t ]*\+\-o/", "\n", $s);
            /* combine duplicate whitespaces and some chars */
            $s = preg_replace("/[\|\t ]+/", " ", $s);

            $lines = preg_split("/\n/", $s, -1, PREG_SPLIT_NO_EMPTY);
            $out = "";
            foreach ($lines as $line) {
                if (preg_match('/^([^<]*) <class '.$key.',/', $line)) {
                    $out .= $line."\n";
                }
            }

            return $out;
        } else {
            return '';
        }
    }
private function _grabioreg($key)
    {
        if (CommonFunctions::executeProgram('ioreg', '-c "'.$key.'"', $s, PSI_DEBUG)) {
            /* delete newlines */
            $s = preg_replace("/\s+/", " ", $s);
            /* new newlines */
            $s = preg_replace("/[\|\t ]*\+\-o/", "\n", $s);
            /* combine duplicate whitespaces and some chars */
            $s = preg_replace("/[\|\t ]+/", " ", $s);

            $lines = preg_split("/\n/", $s, -1, PREG_SPLIT_NO_EMPTY);
            $out = "";
            foreach ($lines as $line) {
                if (preg_match('/^([^<]*) <class '.$key.',/', $line)) {
                    $out .= $line."\n";
                }
            }

            return $out;
        } else {
            return '';
        }
    }
private function _grabioreg ( $ key ) { if ( CommonFunctions :: executeProgram ( 'ioreg' , '-c "' . $ key . '"' , $ s , PSI_DEBUG ) ) { /* delete newlines */ $ s = preg_replace ( "/\s+/" , " " , $ s ) ; /* new newlines */ $ s = preg_replace ( "/[\|\t ]*\+\-o/" , "\n" , $ s ) ; /* combine duplicate whitespaces and some chars */ $ s = preg_replace ( "/[\|\t ]+/" , " " , $ s ) ; $ lines = preg_split ( "/\n/" , $ s , - 1 , PREG_SPLIT_NO_EMPTY ) ; $ out = "" ; foreach ( $ lines as $ line ) { if ( preg_match ( '/^([^<]*) <class ' . $ key . ',/' , $ line ) ) { $ out .= $ line . "\n" ; } } return $ out ; } else { return '' ; } }
get a value from ioreg command

@param string $key key of the value to get

@return string
get a value from ioreg command