Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance. Project price only 1 $
You can buy this project and download/modify it how often you want.
/*
* Copyright 2014–2017 SlamData Inc.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package quasar.api.services.query
import slamdata.Predef.{ -> => _, _ }
import quasar._
import quasar.api._, ToApiError.ops._
import quasar.api.services._
import quasar.contrib.pathy._
import quasar.fp.numeric._
import quasar.fs._
import quasar.fs.mount.Mounting
import quasar.frontend.logicalplan.{LogicalPlan, LogicalPlanR}
import quasar.qscript.QScriptTotal
import argonaut._, Argonaut._
import matryoshka._
import matryoshka.data.Fix
import org.http4s.dsl._
import scalaz._, Scalaz._
object analysis {
private val lpr = new LogicalPlanR[Fix[LogicalPlan]]
type QST[A] = QScriptTotal[Fix, A]
def service[S[_]](implicit
A: Analyze.Ops[S],
C: Catchable[Free[S, ?]],
S0: Mounting :<: S,
S1: FileSystemFailure :<: S
): QHttpService[S] = {
def analyzeQuery(
scopedExpr: sql.ScopedExpr[Fix[sql.Sql]],
vars: Variables,
basePath: ADir,
offset: Natural,
limit: Option[Positive]
): Free[S, ApiError \/ Json] =
quasar.resolveImports(scopedExpr, basePath).run.flatMap(block =>
block.fold(
semErr => semErr.toApiError.left.point[Free[S, ?]],
block => queryPlan(block, vars, basePath, offset, limit)
.run.value
.traverse(lp => A.queryCost(lp).bimap(_.toApiError, _.asJson).run)
.map(_.valueOr(_.toApiError.left[Json]))))
QHttpService {
case req @ GET -> _ :? Offset(offset) +& Limit(limit) =>
respond(parsedQueryRequest(req, offset, limit) traverse {
case (expr, basePath, offset, limit) =>
analyzeQuery(expr, requestVars(req), basePath, offset, limit)
})
}
}
}