/**
  * Add missing style classes to all styles
  */
 static function _addMissingStyleClassesToAllStyles($a_styles = "")
 {
     global $ilDB;
     if ($a_styles == "") {
         $styles = ilObject::_getObjectsDataForType("sty");
     } else {
         $styles = $a_styles;
     }
     $core_styles = ilObjStyleSheet::_getCoreStyles();
     $bdom = ilObjStyleSheet::_getBasicStyleDom();
     // get all core image files
     $core_images = array();
     $core_dir = self::$basic_style_image_dir;
     if (is_dir($core_dir)) {
         $dir = opendir($core_dir);
         while ($file = readdir($dir)) {
             if (substr($file, 0, 1) != "." && is_file($core_dir . "/" . $file)) {
                 $core_images[] = $file;
             }
         }
     }
     foreach ($styles as $style) {
         $id = $style["id"];
         foreach ($core_styles as $cs) {
             // check, whether core style class exists
             $set = $ilDB->queryF("SELECT * FROM style_char WHERE style_id = %s " . "AND type = %s AND characteristic = %s", array("integer", "text", "text"), array($id, $cs["type"], $cs["class"]));
             // if not, add core style class
             if (!($rec = $ilDB->fetchAssoc($set))) {
                 $ilDB->manipulateF("INSERT INTO style_char (style_id, type, characteristic) " . " VALUES (%s,%s,%s) ", array("integer", "text", "text"), array($id, $cs["type"], $cs["class"]));
                 $xpath = new DOMXPath($bdom);
                 $par_nodes = $xpath->query("/StyleSheet/Style[@Tag = '" . $cs["tag"] . "' and @Type='" . $cs["type"] . "' and @Class='" . $cs["class"] . "']/StyleParameter");
                 foreach ($par_nodes as $par_node) {
                     // check whether style parameter exists
                     $set = $ilDB->queryF("SELECT * FROM style_parameter WHERE style_id = %s " . "AND type = %s AND class = %s AND tag = %s AND parameter = %s", array("integer", "text", "text", "text", "text"), array($id, $cs["type"], $cs["class"], $cs["tag"], $par_node->getAttribute("Name")));
                     // if not, create style parameter
                     if (!($rec = $ilDB->fetchAssoc($set))) {
                         $spid = $ilDB->nextId("style_parameter");
                         $st = $ilDB->manipulateF("INSERT INTO style_parameter (id, style_id, type, class, tag, parameter, value) " . " VALUES (%s,%s,%s,%s,%s,%s,%s)", array("integer", "integer", "text", "text", "text", "text", "text"), array($spid, $id, $cs["type"], $cs["class"], $cs["tag"], $par_node->getAttribute("Name"), $par_node->getAttribute("Value")));
                     }
                 }
             }
         }
         // now check, whether some core image files are missing
         ilObjStyleSheet::_createImagesDirectory($id);
         $imdir = ilObjStyleSheet::_getImagesDirectory($id);
         reset($core_images);
         foreach ($core_images as $cim) {
             if (!is_file($imdir . "/" . $cim)) {
                 copy($core_dir . "/" . $cim, $imdir . "/" . $cim);
             }
         }
     }
 }