puppet 0.9.2

data/examples/code/allatonce

@@ -0,0 +1,13 @@
+# $Id: allatonce 576 2005-08-23 16:09:14Z luke $
+
+define thingie {
+    file { "/tmp/classtest": create => true, mode => 755 }
+    #testing {}
+}
+
+class testing {
+    thingie { "componentname": }
+}
+
+#component {}
+testing { "testingname": }

data/examples/code/assignments

@@ -0,0 +1,11 @@
+# $Id: assignments 576 2005-08-23 16:09:14Z luke $
+
+$goodness = sunos
+
+$subvariable = $goodness
+
+$yayness = "this is a string of text"
+
+#$sleeper = service { sleeper:
+#    running => "1"
+#}

data/examples/code/classing

@@ -0,0 +1,35 @@
+# $Id: classing 576 2005-08-23 16:09:14Z luke $
+
+# define the server as a class
+
+import "components"
+
+class base() {
+    # how do i handle components that don't take arguments?  do they still
+    # require a name?
+    sudo { }
+}
+
+class server inherits base {
+    file { "/tmp/puppetfiletest":
+        create => true
+    }
+}
+
+class webserver(docroot) inherits server {
+    apache {
+        php => false,
+        docroot => $docroot,
+        user => http,
+        group => http
+    }
+}
+
+class sleepserver(path) inherits server {
+    sleeper {
+        path => $path,
+        mode => 644
+    }
+}
+
+# see 'nodes' for how to handle nodes

data/examples/code/components

@@ -0,0 +1,73 @@
+# $Id: components 587 2005-08-24 02:53:17Z luke $
+
+# i still have no 'require'-like functionality, and i should also
+# have 'recommend'-like functionality...
+define apache(php,docroot,user,group) {
+    package { apache:
+        version => "2.0.53"
+    }
+    service { apache:
+        running => true
+    }
+
+
+    # this definitely won't parse
+    #if $php == "true" {
+    #    # this needs to do two things:
+    #    # - mark a dependency
+    #    # - cause this apache component to receive refresh events generated by php
+    #    #require("php")
+    #    $var = value
+    #}
+
+    #file { "../examples/root/etc/configfile":
+    #    owner => $user
+    #}
+}
+
+define sudo() {
+    package { sudo:
+        version => "1.6.8p7"
+    }
+    file { "/etc/sudoers":
+        owner => root,
+        group => root,
+        mode => "440"
+    }
+}
+
+define ssh {
+    package { ssh:
+        version => "3.4.4.4"
+    }
+    service { "sshd":
+        running => true
+    }
+}
+
+define sleeper(path,mode) {
+    Service {
+        path => "../examples/root/etc/init.d"
+    }
+
+    service { sleeper:
+        running => true,
+        path => "../examples/root/etc/init.d"
+    }
+    file { $path:
+        mode => $mode
+    }
+    $files = ["/tmp/testness","/tmp/funtest"]
+    file { $files:
+        create => true
+    }
+}
+
+#apache { "test":
+#    php => false,
+#    docroot => "/export/html",
+#    user => "www-data",
+#    group => "www-data"
+#}
+
+#ssh { "yucko":}

data/examples/code/execs

@@ -0,0 +1,16 @@
+$path = "/usr/bin:/bin"
+
+exec { "mkdir -p /tmp/fakedir":
+    path => $path
+}
+
+exec { "rm -rf /tmp/fakedir":
+    path => $path
+}
+
+exec { "touch /this/directory/does/not/exist":
+    path => $path,
+    returns => 1
+}
+
+

data/examples/code/failers/badclassnoparam

@@ -0,0 +1,10 @@
+class comp() {
+    file { "/etc/passwd":
+        mode => 644
+    }
+}
+
+# this argument is invalid, thus we should get a falure
+comp {
+    fakearg => "yay"
+}

data/examples/code/failers/badclassparam

@@ -0,0 +1,10 @@
+class comp(arg1) {
+    file { "/etc/passwd":
+        mode => 644
+    }
+}
+
+# i've specified an arg but it's an invalid one
+comp {
+    fakearg => "yay"
+}

data/examples/code/failers/badcompnoparam

@@ -0,0 +1,9 @@
+define comp() {
+    file { "/etc/passwd":
+        mode => 644
+    }
+}
+
+comp {
+    fakearg => "yay"
+}

data/examples/code/failers/badcompparam

@@ -0,0 +1,9 @@
+define comp(arg1) {
+    file { "/etc/passwd":
+        mode => 644
+    }
+}
+
+comp {
+    fakearg => "yay"
+}

data/examples/code/failers/badtypeparam

@@ -0,0 +1,3 @@
+file { "/etc/passwd":
+    fakeparam => 644
+}

data/examples/code/file.bl

@@ -0,0 +1,11 @@
+# $Id: file.bl 576 2005-08-23 16:09:14Z luke $
+
+file {
+    "/tmp/atest": create => true, mode => 755;
+    "/tmp/btest": create => true, mode => 755
+}
+
+file {
+    "/tmp/ctest": create => true;
+    "/tmp/dtest": create => true;
+}

data/examples/code/filedefaults

@@ -0,0 +1,10 @@
+# $Id: filedefaults 576 2005-08-23 16:09:14Z luke $
+
+File {
+    mode => 755,
+    recurse => true
+}
+
+file { "/tmp/filedefaultstest":
+    create => true
+}

data/examples/code/fileparsing

@@ -0,0 +1,116 @@
+# $Id: fileparsing 576 2005-08-23 16:09:14Z luke $
+
+# this will eventually parse different config files
+
+# this creates the 'passwd' type, but it does not create any instances
+filetype { "passwd":
+    linesplit => "\n",
+    escapednewlines => false
+}
+
+
+# this creates the 'PasswdUser' type, but again, no instances
+filerecord { "user":
+    filetype => passwd,
+    fields => [name, password, uid, gid, gcos, home, shell],
+    namevar => name,
+    splitchar => ":"
+
+}
+
+filetype { ini:
+    linesplit => "\n\n"
+}
+
+# ini files are different because we don't really care about validating fields
+# or at least, we can't do it for most files...
+filerecord { "initrecord":
+    filetype => ini,
+    fields => [name, password, uid, gid, gcos, home, shell],
+    namevar => name,
+    splitchar => ":"
+
+}
+
+# this won't work for multiple record types, will it?
+# or at least, it requires that we specify multiple times
+# ah, and it doesn't specify which of the available record types
+# it works for...
+passwd { user:
+    complete => true, # manage the whole file
+    path => "/etc/passwd"
+}
+
+user { yaytest:
+    password => x,
+    uid => 10000,
+    gid => 10000,
+    home => "/home/yaytest",
+    gcos => "The Yaytest",
+    shell => "/bin/sh"
+}
+    # there seems to be an intrinsic problem here -- i've got subtypes that only
+    # make sense when an instance of the super type already exists, and i need
+    # to associate the instances of the subtype with the instances of the supertype
+    # even if i created the parsers manually, I'd have the same problem
+
+# this is the crux of it -- i want to be able to say 'user' here without having
+# to specify the file, which leaves two options:
+#   1) associate the record type with a filetype instance (BAD)
+#   2) once the filetype and record type are created, have another command
+#       that specifically creates a filetype instance and gives names for instances
+#       of its record types
+
+define syslog {
+
+    # create a new type, with all defaults
+    filetype { "syslog":
+        escapednewlines => true
+    }
+
+    filerecord { "log":
+        filetype => syslog,
+        regex => "^([^#\s]+)\s+(\S+)$",
+        joinchar => "\t",
+        fields => [logs, dest]
+    }
+
+    # these two should just be supported within the filetypes
+    filerecord { "comment":
+        filetype => syslog,
+        regex => "^(#.*)$",
+        joinchar => "s",
+        fields => [comment]
+    }
+
+    filerecord { "blank":
+        filetype => syslog,
+        regex => "^(\s*)$",
+        joinchar => "s",
+        fields => blank
+    }
+}
+
+define cron {
+    filetype { "usercrontab":
+    }
+
+    # this won't actually work, of course
+    filerecord { "cronjob":
+        filetype => crontab,
+        regex => "^([^#\s]+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(.+)$",
+        joinchar => " ",
+        fields => [minute, hour, day, month, weekday, command],
+        defaults => ["*", "*", "*", "*", "*", nil],
+        optional => [minute, hour, day, month, weekday]
+    }
+
+    crontab { "luke":
+    }
+}
+
+# XXX this doesn't work in the slightest
+define crontab(name,path) {
+    usercrontab { "${path}/${name}":
+    }
+}

data/examples/code/filerecursion

@@ -0,0 +1,15 @@
+# $Id: filerecursion 576 2005-08-23 16:09:14Z luke $
+
+file { "/tmp/dirtest/b/a":
+    mode => 755,
+}
+
+file { "/tmp/dirtest":
+    mode => 755,
+    recurse => true,
+}
+
+file { "/tmp/dirtest/b/b":
+    mode => 644,
+}
+

data/examples/code/functions

@@ -0,0 +1,3 @@
+# $Id: functions 576 2005-08-23 16:09:14Z luke $
+
+$yaytest = fact("operatingsystem")

data/examples/code/groups

@@ -0,0 +1,7 @@
+# $Id: groups 576 2005-08-23 16:09:14Z luke $
+
+# there need to be two forms of adding to groups:
+# add the current host to a group, and add a list of hosts to a
+# group by name
+
+$group = "crap"

data/examples/code/head

@@ -0,0 +1,30 @@
+# $Id: head 587 2005-08-24 02:53:17Z luke $
+
+# this file is responsible for importing all of the files we want to actually test
+
+# these are all of the simple tests
+import "simpletests"
+import "assignments"
+import "selectors"
+#import "iftest"
+import "importing"
+import "execs"
+import "filedefaults"
+
+# facts are now imported into the top of the namespace
+#import "facts"
+
+# obsoleted
+#import "functions"
+
+# files we no longer need to import directly, or at all in some cases
+#import "one"
+#import "classing"
+#import "components"
+#import "file.bl"
+#import "fileparsing.disabled"
+#import "groups"
+
+# this imports the more complex files
+import "allatonce" # imports classing and components
+import "nodes" # imports classing and components

data/examples/code/importing

@@ -0,0 +1,8 @@
+# $Id: importing 576 2005-08-23 16:09:14Z luke $
+
+#import "groups"
+# testing import loops
+import "importing"
+
+$name = "value"
+$system = $operatingsystem

data/examples/code/nodes

@@ -0,0 +1,20 @@
+# $Id: nodes 576 2005-08-23 16:09:14Z luke $
+
+# define nodes
+
+#service.setpath("../examples/root/etc/init.d")
+
+Service {
+    path => "../examples/root/etc/init.d"
+}
+
+import "classing"
+
+sleepserver {
+    path => $operatingsystem ? {
+        sunos => "../examples/root/etc/configfile",
+        hpux => "../examples/other/etc/configfile",
+        default => "../examples/root/etc/configfile"
+    },
+    schedule => true
+}

data/examples/code/one

@@ -0,0 +1,8 @@
+# $Id: one 576 2005-08-23 16:09:14Z luke $
+
+# this service doesn't actually exist, so we noop it
+# and this way, we can test noop :)
+service { "funtest":
+    running => "0",
+    noop => true
+}