Skip to content
GitLab
Switch branch/tag
Find file Normal viewHistoryPermalink
theme.inc 4.01 KB
Newer Older
Dries Buytaert's avatar
   
Dries Buytaert committed
1 
<?php
Kjartan Mannes's avatar
- added the CVS keyword $Id$ to all files to make future version tracking    
Kjartan Mannes committed
2 
// $Id$
Dries Buytaert's avatar
Huge update - I don't have time to write everything down but the directory  
Dries Buytaert committed
3
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
4
5
6
7
8 
/**
* Basic theme
*
* @package theme system
*/
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
9 
class BaseTheme {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
10
11 
  var $background = "#ffffff";
  var $foreground = "#000000";
Dries Buytaert's avatar
   
Dries Buytaert committed
12
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
13 
  function system($field) {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
14
15
16 
    $system["name"] = "Basic theme";
    $system["author"] = "Drupal";
    $system["description"] = "Basic theme. Lynx friendly";
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
17
18
19
20 

    return $system[$field];
  }
Steven Wittens's avatar
- Updated BaseTheme and the Drupal themes to have header($title = "") as the...    
Steven Wittens committed
21 
  function header($title = "") {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
22 
    $output = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"DTD/xhtml1-transitional.dtd\">\n";
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
23 
    $output .= "<html><head><title>". variable_get(site_name, "drupal") ."</title></head><body bgcolor=\"$this->background\" text=\"$this->foreground\">";
Dries Buytaert's avatar
   
Dries Buytaert committed
24
25
26 
    $output .= "<table border=\"0\" cellspacing=\"4\" cellpadding=\"4\"><tr><td valign=\"top\" width=\"170\">";

    print $output;
Kjartan Mannes's avatar
- removed some warnings caused by implode.    
Kjartan Mannes committed
27 
    $this->box(t("Navigation"), @implode("<br />", link_page())); theme_blocks("all", $this);
Dries Buytaert's avatar
   
Dries Buytaert committed
28 
    print "</td><td valign=\"top\">";
Dries Buytaert's avatar
   
Dries Buytaert committed
29
30
31 

  }
Dries Buytaert's avatar
   
Dries Buytaert committed
32 
  function links($links, $delimiter = " | ") {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
33 
    return implode($delimiter, $links);
Dries Buytaert's avatar
   
Dries Buytaert committed
34 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
35
Dries Buytaert's avatar
   
Dries Buytaert committed
36
37 
  function image($name) {
    return "misc/$name";
Dries Buytaert's avatar
   
Dries Buytaert committed
38 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
39
Dries Buytaert's avatar
   
Dries Buytaert committed
40 
  function node($node, $main) {
Kjartan Mannes's avatar
- added taxonomy output to BaseTheme.    
Kjartan Mannes committed
41
42
43
44
45 
    if (function_exists("taxonomy_node_get_terms")) {
      foreach (taxonomy_node_get_terms($node->nid) as $term) {
        $terms[] = l($term->name, array("or" => $term->tid), "index");
      }
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
46
Kjartan Mannes's avatar
- added taxonomy output to BaseTheme.    
Kjartan Mannes committed
47
48
49
50 
    $output = "<b>". check_output($node->title) ."</b> by ". format_name($node) ."<br />";
    if (count($terms)) {
      $output .= "<small>(". $this->links($terms) .")</small><br />";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
51
52
53
54
55 
    if ($main && $node->teaser) {
      $output .= strip_tags(check_output($node->teaser, 1));
    }
    else {
      $output .= check_output($node->body, 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
56 
    }
Kjartan Mannes's avatar
- modified node_save so that revisions are not validated using check_input,    
Kjartan Mannes committed
57
58 
    if ($links = link_node($node, $main)) {
      $output .= "<br />[ ". $this->links($links) ." ]";
Dries Buytaert's avatar
   
Dries Buytaert committed
59
60
61
62 
    }
    $output .= "<hr />";

    print $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
63
64 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
65 
  function box($subject, $content, $region = "main") {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
66 
    $output = "<b>". check_output($subject) ."</b><br />". check_output($content) ."<p />";
Dries Buytaert's avatar
   
Dries Buytaert committed
67
68
69
70 
    print $output;
  }

  function footer() {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
71 
    $output = "</td></tr></table>";
Dries Buytaert's avatar
   
Dries Buytaert committed
72
73
74
75 
    $output .= "</body></html>";
    print $output;
  }
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
76
77 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92 
function theme_mark() {
  /*
  ** Return a marker.  Used to indicate new comments or required form
  ** fields.
  */
  return "<span style=\"color: red;\">*</span>";
}

function theme_error($message) {
  /*
  ** Return an error message.
  */
  return "<div style=\"color: red;\">$message</div>";
}
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
93
94 
function theme_list() {
  static $list;
Dries Buytaert's avatar
   
Dries Buytaert committed
95
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
96
97
98
99 
  if (!$list) {
    $list = array();
    $result = db_query("SELECT * FROM system where type = 'theme' AND status = '1' ORDER BY name");
    while ($theme = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
100
101
102 
      if (file_exists($theme->filename)) {
        $list[$theme->name] = $theme;
      }
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
103 
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
104 
  }
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
105
106
107
108
109
110
111
112
113
114
115 

  return $list;
}

function theme_init() {
  global $user;

  $themes = theme_list();
  $name = $user->theme ? $user->theme : variable_get("theme_default", 0);
  if (is_object($themes[$name])) {
    include_once($themes[$name]->filename);
Kjartan Mannes's avatar
- fixing bug reported by Remco.    
Kjartan Mannes committed
116 
    $theme_class = "Theme_$name";
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
117
118 
    @$obj =& new $theme_class;
    return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
119 
  }
Kjartan Mannes's avatar
- applying patches from Axel Kollmorgen. See    
Kjartan Mannes committed
120
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
121
122 
  @$obj =& new BaseTheme;
  return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
123
124 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
125 
function theme_blocks($region, &$theme) {
Dries Buytaert's avatar
   
Dries Buytaert committed
126 
  global $user, $PHP_SELF;
Dries Buytaert's avatar
   
Dries Buytaert committed
127
Dries Buytaert's avatar
   
Dries Buytaert committed
128 
  $result = db_query("SELECT * FROM blocks WHERE (status = '1' OR custom = '1') ". ($region != "all" ? "AND region = '%s' " : "") ."ORDER BY weight, module", $region == "left" ? 0 : 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
129
Kjartan Mannes's avatar
- moved user block from theme.inc to user.module.    
Kjartan Mannes committed
130 
  while ($result && ($block = db_fetch_object($result))) {
Dries Buytaert's avatar
   
Dries Buytaert committed
131
132
133
134 
    if ((($block->status && (!$user->uid || !$block->custom)) || ($block->custom && $user->block[$block->module][$block->delta])) && (!$block->path || preg_match("|$block->path|", $PHP_SELF))) {
      $block_data = module_invoke($block->module, "block", "view", $block->delta);
      if ($block_data["content"]) {
        $theme->box($block_data["subject"], $block_data["content"], $region);
Kjartan Mannes's avatar
- merged block and box modules. modules/box.module should be removed    
Kjartan Mannes committed
135 
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
136
137
138 
    }
  }
}
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
139
Dries Buytaert's avatar
   
Dries Buytaert committed
140
141
142 
function theme_invoke() {
  global $theme;
  $args = func_get_args();
Dries Buytaert's avatar
   
Dries Buytaert committed
143
Dries Buytaert's avatar
   
Dries Buytaert committed
144
145
146
147 
  $function = array_shift($args);

  if (method_exists($theme, $function)) {
    return call_user_method_array($function, $theme, $args);
Dries Buytaert's avatar
   
Dries Buytaert committed
148 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
149
150
151
152
153 
  else {
    return call_user_func_array($function, $args);
  }
}
Dries Buytaert's avatar
   
Dries Buytaert committed
154 
?>