packr | Packages your JAR , assets and a JVM for distribution | Runtime Evironment library

<?php
require_once('globals_nonauth.php');

// read the post from PayPal system and add 'cmd'
$req = 'cmd=_notify-validate';

foreach ($_POST as $key => $value)
{
    $value = urlencode(stripslashes($value));
    $req .= "&$key=$value";
}

// post back to PayPal system to validate
$header .= "POST /cgi-bin/webscr HTTP/1.0\r\n";
$header .= "Content-Type: application/x-www-form-urlencoded\r\n";
$header .= "Content-Length: " . strlen($req) . "\r\n\r\n";
$fp = fsockopen('www.paypal.com', 80, $errno, $errstr, 30);

// assign posted variables to local variables
$item_name = $_POST['item_name'];
$item_number = $_POST['item_number'];
$payment_status = $_POST['payment_status'];
$payment_amount = $_POST['mc_gross'];
$payment_currency = $_POST['mc_currency'];
$txn_id = $_POST['txn_id'];
$receiver_email = $_POST['receiver_email'];
$payer_email = $_POST['payer_email'];

if (!$fp)
{
    // HTTP ERROR
}
else
{
    fputs($fp, $header . $req);
    while (!feof($fp))
    {
        $res = fgets($fp, 1024);
        if (strcmp($res, "VERIFIED") == 0)
        {
            $txn_db = $db->escape(stripslashes($txn_id));
            // check the payment_status is Completed
            if ($payment_status != "Completed")
            {
                fclose($fp);
                die("");
            }
            $dp_check =
                    $db->query(
                            "SELECT COUNT(`dpID`)
                             FROM `dps_accepted`
                             WHERE `dpTXN` = '{$txn_db}'");
            if ($db->fetch_single($dp_check) > 0)
            {
                $db->free_result($dp_check);
                fclose($fp);
                die("");
            }
            $db->free_result($dp_check);
            // check that txn_id has not been previously processed
            // check that receiver_email is your Primary PayPal email
            if ($receiver_email != $set['paypal'])
            {
                fclose($fp);
                die("");
            }
            // check that payment_amount/payment_currency are correct
            if ($payment_currency != "USD")
            {
                fclose($fp);
                die("");
            }
            // parse for pack
            $packr = explode('|', $item_name);
            if (str_replace("www.", "", $packr[0])
                    != str_replace("www.", "", $_SERVER['HTTP_HOST']))
            {
                fclose($fp);
                die("");
            }
            if ($packr[1] != "DP")
            {
                fclose($fp);
                die("");
            }
            $pack = $packr[2];
            if ($pack != 1 and $pack != 2 and $pack != 3 and $pack != 4
                    and $pack != 5)
            {
                fclose($fp);
                die("");
            }
            if (($pack == 1 || $pack == 2 || $pack == 3)
                    && $payment_amount != "3.00")
            {
                fclose($fp);
                die("");
            }
            if ($pack == 4 && $payment_amount != "5.00")
            {
                fclose($fp);
                die("");
            }
            if ($pack == 5 && $payment_amount != "10.00")
            {
                fclose($fp);
                die("");
            }
            // grab IDs
            $buyer = abs((int) $packr[3]);
            $for = $buyer;
            // all seems to be in order, credit it.
            if ($pack == 1)
            {
                $db->query(
                        "UPDATE `users` AS `u`
                         LEFT JOIN `userstats` AS `us`
                         ON `u`.`userid` = `us`.`userid`
                         SET `u`.`money` = `u`.`money` + 5000,
                         `u`.`crystals` = `u`.`crystals` + 50,
                         `us`.`IQ` = `us`.`IQ` + 50,
                         `u`.`donatordays` = `u`.`donatordays` + 30
                         WHERE `u`.`userid` = {$for}");
                $d = 30;
                $t = "standard";
            }
            else if ($pack == 2)
            {
                $db->query(
                        "UPDATE `users` AS `u`
                         SET `u`.`crystals` = `u`.`crystals` + 100,
                         `u`.`donatordays` = `u`.`donatordays` + 30
                         WHERE `u`.`userid` = {$for}");
                $d = 30;
                $t = "crystals";
            }
            else if ($pack == 3)
            {
                $db->query(
                        "UPDATE `users` AS `u`
                         LEFT JOIN `userstats` AS `us`
                         ON `u`.`userid` = `us`.`userid`
                         SET `us`.`IQ` = `us`.`IQ` + 50,
                         `u`.`donatordays` = `u`.`donatordays` + 30
                         WHERE `u`.`userid` = {$for}");
                $d = 30;
                $t = "iq";
            }
            else if ($pack == 4)
            {
                $db->query(
                        "UPDATE `users` AS `u`
                         LEFT JOIN `userstats` AS `us`
                         ON `u`.`userid` = `us`.`userid`
                         SET `u`.`money` = `u`.`money` + 15000,
                         `u`.`crystals` = `u`.`crystals` + 75,
                         `us`.`IQ` = `us`.`IQ` + 80,
                         `u`.`donatordays` = `u`.`donatordays` + 55
                         WHERE `u`.`userid` = {$for}");
                $d = 55;
                $t = "fivedollars";
            }
            else if ($pack == 5)
            {
                $db->query(
                        "UPDATE `users` AS `u`
                         LEFT JOIN `userstats` AS `us`
                         ON `u`.`userid` = `us`.`userid`
                         SET `u`.`money` = `u`.`money` + 35000,
                         `u`.`crystals` = `u`.`crystals` + 160,
                         `us`.`IQ` = `us`.`IQ` + 180,
                         `u`.`donatordays` = `u`.`donatordays` + 115
                         WHERE `u`.`userid` = {$for}");
                $d = 115;
                $t = "tendollars";
            }
            // process payment
            event_add($for,
                    "Your \${$payment_amount} Pack {$pack} Donator Pack has been successfully credited to you.",
                    $c);
            $db->query(
                    "INSERT INTO `dps_accepted`
                     VALUES(NULL, {$buyer}, {$for}, '$t', " . time()
                            . ", '$txn_db')");
        }
        else if (strcmp($res, "INVALID") == 0)
        {
        }
    }

    fclose($fp);
}

actions/app.go:4:2: missing go.sum entry for module providing package github.com/gobuffalo/buffalo (imported by sc_api/actions); to add:go get sc_api/actions

actions/app.go:13:2: missing go.sum entry for module providing package github.com/gobuffalo/mw-csrf (imported by sc_api/actions); to add: go get sc_api/actions

// app.go
package actions

import (
    "github.com/gobuffalo/buffalo"  // 1rst line
    "github.com/gobuffalo/envy"
    forcessl "github.com/gobuffalo/mw-forcessl"
    paramlogger "github.com/gobuffalo/mw-paramlogger"
    "github.com/unrolled/secure"

    "sc_api/models"

    "github.com/gobuffalo/buffalo-pop/v2/pop/popmw"
    csrf "github.com/gobuffalo/mw-csrf"  // 2nd line
    i18n "github.com/gobuffalo/mw-i18n"
    "github.com/gobuffalo/packr/v2"
)

CASE WHEN (ALS.SID = 6 OR ALS.SID = 7) AND ASIP.SiteID = @iSID 
    THEN ISNULL(ALS.Add / NULLIF(count,0),0.0)
                       ELSE CASE WHEN ALS.SID IN (4, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.pack END - 
                            CASE WHEN ALS.SID IN (2, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.packP END + 
                            CASE WHEN ALS.SID IN (2, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.packR END + 
     ISNULL(CASE WHEN ALS.SID IN (2, 6) THEN CAST(NULL AS FLOAT) 
                 ELSE IAOD.packS
            END,
            CASE WHEN ALS.SID IN (2, 6) THEN 0.0 
                 ELSE IAOD.PPStock 
            END) + 
                            CASE WHEN ALS.SID IN (4, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.unitsO END -
                            CASE WHEN ALS.SID IN (2, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.unitsP END + 
                            CASE WHEN ALS.SID IN (2, 6) AND @forecast = 0 THEN 0.0 ELSE IAOD.unitsR END + 
     ISNULL(CASE WHEN ALS.SID IN (2, 6) 
                 THEN CAST(NULL AS FLOAT) 
                 ELSE IAOD.unitsS 
            END,
            CASE WHEN ALS.SID IN (2, 6) 
                 THEN 0.0 
                 ELSE IAOD.unitsH 
            END) 
END

unit package Packr;

our class Packd is export {}

our class D::Packd is export {}

our class B::Packd is export {}

use Packr;

for (Packr::Packd Packr::B::Packd Packr::D::Packd ) -> \P {
    say P.new().raku;
}

Could not find symbol '&Packd' in 'Packr::D'

code
├── main.go
├── Routes
│   └── Routes.go
├── Controllers
│   ├── Controllers.go
│   ...
└── web
    ├── src
    │   └── App.vue
    ├── dist
    ├── public
    ...

package Routes

import (
    "path"
    "strings"
    "devops-portal/Controllers"
    "github.com/gin-gonic/gin"
    "net/http"
    "github.com/gobuffalo/packr/v2"
)

//SetupRouter ... Configure routes
func SetupRouter() *gin.Engine {
    r := gin.Default()
    webFiles := packr.New("web app", "../web/dist")
    r.Use(StaticServe("/", webFiles))

    grp1 := r.Group("/api/v1")
    {
        grp1.GET("request", Controllers.GetRequests)
        grp1.POST("create-request", Controllers.CreateRequest)
        grp1.GET("request/:id", Controllers.GetRequestByID)
        grp1.PUT("request/:id", Controllers.UpdateRequest)
        grp1.DELETE("request/:id", Controllers.DeleteRequest)
    }
    r.NoRoute(func(c *gin.Context){
    c.File("../web/dist/index.html")
    })

    return r
}

func ReturnPublic() gin.HandlerFunc {
    return func(context *gin.Context) {
        method := context.Request.Method
        if method == "GET" {
            context.File("./public")
        } else {
            context.Next()
        }
    }
}

func exists(fs *packr.Box, prefix string, filepath string) bool {
    if p := strings.TrimPrefix(filepath, prefix); len(p) < len(filepath) {
        name := path.Join("/", p)
        if fs.HasDir(name) {
            index := path.Join(name, "index.html")
            if !fs.Has(index) {
                return false
            }
        } else if !fs.Has(name) {
            return false
        }

        return true
    }
    return false
}

// StaticServe serves the web app
func StaticServe(urlPrefix string, fs *packr.Box) gin.HandlerFunc {
    fileserver := http.FileServer(fs)
    if urlPrefix != "" {
        fileserver = http.StripPrefix(urlPrefix, fileserver)
    }
    return func(c *gin.Context) {
        if exists(fs, urlPrefix, c.Request.URL.Path) {
            fileserver.ServeHTTP(c.Writer, c.Request)
            c.Abort()
        }
    }
}

import Vue from 'vue'
import VueRouter from 'vue-router'
import Auth from '@okta/okta-vue'

Vue.use(Auth, {
  issuer: 'https://xxxxx.okta.com/',
  client_id: 'xxxxxxxxxxxxxxxx',
  redirect_uri: 'http://localhost:3000/implicit/callback',
  scope: 'openid profile email',
  pkce: true
})

Vue.use(VueRouter)

const routes = [
    { path: '/login', name: 'Login', component: () => import('../views/Login.vue')},
    { path: '/', name: 'Home', component: () => import('../views/requests.vue'), meta: { requiresAuth: true }},
    { path: '/requests', name: 'Requests', component: () => import('../views/requests.vue'), meta: { requiresAuth: true }},
    { path: '/implicit/callback', component: Auth.handleCallback() }
]

const router = new VueRouter({
  mode: 'history',
  base: process.env.BASE_URL,
  routes
})

router.beforeEach(Vue.prototype.$auth.authRedirectGuard());

export default router